Field symbol issue in upgrade version

hi
the system was upgrade from bi 3.1 to 7.0 version.the below code is working fine in 3.1.but the same code goes to dump in ECC Version.
field-symbols: <l_sx_rrc0_rto> type rrc1_sx_rto.
data: name(30) value '(SAPLRRC0)G_SX_CUR_RTO',
l_r_request type ref to cl_rsr_request,
assign (name) to <l_sx_rrc0_rto>.
-> l_r_request =
cl_rsr_request=>get_request_by_handle( <l_sx_rrc0_rto>-handle ).
-->going dump there.
Kiran
Edited by: kiran jagana on Dec 9, 2011 5:33 PM

field-symbols: <l_sx_rrc0_rto> type rrc1_sx_rto.
data: name(30) value '(SAPLRRC0)G_SX_CUR_RTO',
l_r_request type ref to cl_rsr_request,
assign (name) to <l_sx_rrc0_rto>.
-> l_r_request =
cl_rsr_request=>get_request_by_handle( <l_sx_rrc0_rto>-handle )."dump going here
TYPE-POOL rrc1 .
TYPE-POOLS: rro01, rro04, rrx1, rrs0.
report as runtime object (RTO)                                       *
TYPES: BEGIN OF rrc1_sx_instances,
            instance_id    TYPE rrx1_handle,
            report         TYPE rro01_sx_report,
            khandle        TYPE rrx1_handle,
            Area           type rrarea,          "E.M.
            Delta_buffer   Type Rrsi_TS_sid,     "E.M.
            texte          TYPE rro01_th_texte,
       END OF rrc1_sx_instances,
       rrc1_tx_instances TYPE rrc1_sx_instances OCCURS 0.
TYPES: BEGIN OF rrc1_sx_rto,
             handle       TYPE rsr_handle,
             area         Type rrarea,            "E.M
             repkey       LIKE rszcompkey,
             rkb1d        TYPE rsr_s_rkb1d,
             seldr_V      TYPE Rsdd_tsx_SELDR,
             cur_inst     TYPE rrc1_sx_instances,
             instances    TYPE rrc1_tx_instances,
             modified     TYPE rs_bool,
             r_format     TYPE REF TO cl_rsr_format,
        END OF rrc1_sx_rto,
        rrc1_tx_rto TYPE rrc1_sx_rto OCCURS 0.
<l_sx_rrc0_rto>-handle does not have any value.so it is going to dump.its upgrade error.same code works in 4.6c ,but not in ECC.in 4.6c <l_sx_rrc0_rto>-handle has value '0001'.
do the needful

Similar Messages

Field symbols issue

Hi,
I am new to using field-symbols and having this peculiar problem:
In a program, I am dynamically defining a table where employee subgroups will be columns.
CALL METHOD CL_ALV_TABLE_CREATE=>CREATE_DYNAMIC_TABLE
    EXPORTING
      IT_FIELDCATALOG = IT_FIELDCAT
    IMPORTING
      EP_TABLE        = NEW_TABLE.
* Create a new Line with the same structure of the table.
ASSIGN NEW_TABLE->* TO <L_TABLE>.
CREATE DATA NEW_LINE LIKE LINE OF <L_TABLE>.
ASSIGN NEW_LINE->* TO <L_LINE>.
Next, I intend to summarise this data according to company code, so I defined two other field symbols of type ANY TABLE :
field-symbols: <BUKRS_TAB1> type any table.
field-symbols: <BUKRS_TAB2> type any table.
ASSIGN NEW_TABLE->* TO <BUKRS_TAB1>.
ASSIGN NEW_TABLE->* TO <BUKRS_TAB2>.
However, before I execute COLLECT, I found that these two <BUKRS_TAB1> & <BUKRS_TAB2> already contain the same data as ITAB_FINAL.
Also, attempting to clear any of these field symbols results in CLEAR-ing of other field-symbols too.
Any suggestions for me?

Its OK, I used different NEW_TABLE for each field symbol and it is working fine.

Opening query in BEx field symbol issue

Hi,
I'm facing a problem in opening BEx Analyzer 7.0.
After starting BEx and logging on to the system a "BI Server error"-popup appears mentioning that there is a problem in the communication with the BI-server and that therefore the connection to the BI-server has been broken. The detailed error is: "Field symbol has not yet been assigned".
When clicking OK and logging on for the second time there is no problem.
Does anyone know how I can solve this?
Thanks,
Michel Scheres

Hi,
Front end is not installed properly. You can contact basis team it will resolve.
Regards,
Ajay.

Field Symbol Issue

Hello Experts,
I'm very new to field-symbols and having challenge when using them. Basically I'm only trying to use specific column value from one type of field symbol to another but keep having short dump. I tried to re-wirte my code using work area and it works though.
Can somebody have a look at my code and tell me what is causing the problem and how to resolve it.
DATA:
     lit_variables    TYPE STANDARD TABLE OF zut_variables INITIAL SIZE 0,
FIELD-SYMBOLS:
      <fs_variables>     type zut_variables,
      <fs_rang_var>     type zus_variables.
    loop at lit_variables ASSIGNING <fs_variables>.
        if <fs_variables> is assigned.
           <fs_range_var>-high   = <fs_variables>-high.
           <fs_range_var>-low    = <fs_variables>-low.
           <fs_range_var>-sign   = <fs_variables>-sign.
           <fs_range_var>-option = <fs_variables>-zoption.
        endif.
    endloop.
Many thanks in advance.

Hi,
As you are using same structure for field symbols , no need of using field symbols.
You can use work area.
If you doesnt no the structure , you can assign field symbol.
field-symbols <fs> type any.
Regards,
Ravi

Database bug issue after upgrade ( version 8.1.7.4)

Hi,
Currently our database version is 8.1.7.0.0
We have planned to upgrade our database to 10g Rel2 and for that we have already applied terminal patch set (i.e. 8.1.7.4).
But after applying terminal patch set we came through list of the GENERIC bug fixes included in the 817X Patch Sets. i.e.
ALERT: Oracle8i Release 3 (8.1.7) Support Status and Alerts
Note :- 120607.1
Actually in this note we are having confusion whether to apply the patch or not for the bug that is mentioned.
Some are those which affect Oracle 8.1.7.X releases are :
1)Trigger updates wrong after DROP functional index Note 259854.1
2)Changing the Database Character Set can corrupt LOBs Note 118242.1
3)Large export buffer can produce corrupt export file Note 223399.1
4)Export can generate a corrupt export file Note 199416.1
The first one has been applied successully, but having confusion with the remaining,
Question regarding points 2 & 3 above :
2)
As we are not going to alter our database character set (WE8ISO8859P1) at 8.1.7.4, so is it required to apply the patch ???
or will have to apply as we are going to upgrade it further to 10g Rel2(Here database character set might get change) for future upgradation ???
3)
Currently our database export is being done via conventional path
Now, the workaround mentioned in the patch is as follows :
(Patch is not available for Windows OS)
Workaround
~~~~~~~~~~
1. Prior to a Conventional path export, set the environment variable
ORA_OCI_NO_OPTIMIZED_FETCH to 1.
Windows:
set ORA_OCI_NO_OPTIMIZED_FETCH=1
OR:
2. Export the data in Direct path mode, by specifiying the additional
export parameter: DIRECT=Y
So the query is,
I am not getting any parameter like ORA_OCI_NO_OPTIMIZED_FETCH.
Is there any parameter like ORA_OCI_NO_OPTIMIZED_FETCH in oracle 8.1.7.4 ?
OR
Will have to change the export method to direct mode ? by doing so will there be any adverse effect ?
With Regards

You are repeating a question that you already made on your previous thread.
Re: Database upgradation to 9i rel2
Regards,
Francisco Munoz Alvarez
www.oraclenz.com

Issue with field symbol not assigned in SMQ2

We are facing an issue with an error in SMQ2.
The error is "field symbol not assigned". There is also short dump in ST22.
I have read the previous forum threads and it talks about going into the debugger mode.
However, which is the program to be debugged ?
How do I navigate from SMQ2 to the ABAP program.
Kindly let me know.
Regards,
Sanjay

Hi Sanjay,
You need to debug program RSTRFCM3. This is the program which drives SMQ2.
However just check if there are any support pack upgrades to the program recently since this is a standard program.
Regards
Abhii

Problem with FIELD SYMBOL upgrading from 46c to ECC6.0

Hi people... i'm having big trouble making an upgrade from 4.6c to ECC6.0 with this portion of code of Z's programm.
In the line
ASSIGN (w_field) TO <fs_field>.
i don't see any assigment, so <fs_field> remains empty, when enters into firts IF conditions it is TRUE, then go into second IF condition, it is FALSE, and finally assing
<fs_field> = '/'.
, at this point i have a DUMP telling me MOVE_TO_LIT_NOTALLOWED_NODATA
I'm try any way of definition, assigment, but always i have a DUMP.
Someone can give a hand with this issue!
Thanks in advance!!!
This is the full code from the FORM with the problem.
*       FORM GRABA                                        *
* --> VALUE(P_TABLE)                                  *
FORM graba USING value(p_table) TYPE c.
DATA:
    w_field(60),
    w_dd03l TYPE dd03l.
FIELD-SYMBOLS <fs_field>.
CLEAR w_flag.
CASE p_table.
    WHEN 'BGR00'.
      d_bgr00-group = w_batin.
      d_bgr00-mandt = sy-mandt.
      d_bgr00-usnam = sy-uname.
      d_bgr00-xkeep = 'X'.
      d_bgr00-nodata = '/'.
      d_bgr00-stype = 0.
      TRANSFER d_bgr00 TO w_fname.
    WHEN 'BBKPF'.
      LOOP AT gt_dd03l INTO w_dd03l WHERE tabname EQ p_table.
        CONCATENATE
            'd_'
            w_dd03l-tabname
            w_dd03l-fieldname
          INTO w_field.
        ASSIGN (w_field) TO <fs_field>.
        IF <fs_field> IS INITIAL OR <fs_field> EQ '/'.
          IF w_dd03l-fieldname EQ 'TBNAM'.
            <fs_field> = p_table.
          ELSE.
            <fs_field> = '/'.
          ENDIF.
        ELSE.
          w_flag = 'X'.
        ENDIF.
      ENDLOOP.
      TRANSFER d_bbkpf TO w_fname.
    WHEN 'BBSEG'.
      LOOP AT gt_dd03l INTO w_dd03l WHERE tabname EQ p_table.
        CONCATENATE
            'd_'
            w_dd03l-tabname
            w_dd03l-fieldname
          INTO w_field.
        ASSIGN (w_field) TO <fs_field>.
        IF <fs_field> IS INITIAL OR <fs_field> EQ '/'.
          IF w_dd03l-fieldname EQ 'TBNAM'.
            <fs_field> = p_table.
          ELSE.
            <fs_field> = '/'.
          ENDIF.
        ELSE.
          w_flag = 'X'.
        ENDIF.
      ENDLOOP.
      TRANSFER d_bbseg TO w_fname.
ENDCASE.
ENDFORM.
Edited by: Matt on Dec 15, 2008 5:03 PM - Made subject more informative

Gentlemen:
The problem around this statement:
ASSIGN (w_field) TO <fs_field>
is explained as follows:
1. In ABAP language, there are two ways for assigning a new value to a field-symbol.
- Sentence: ASSIGN (values) TO <my_field_symbol>.
In this case, the <my_field_symbol> receives from (w_field) the data type and value content of this variable. So, we keep that a FSymbol is assigned and, at the same time, receives an initial value.
- Sentence: <my_field_symbol> = '/' or <my_field_symbol> = my_var.
In this way, we only pass the content of the variable next to = sign. But before this, the field-symbol must had been assigned (using ASSIGN statement), in another case, the compiler raises an exception.
Following the example of Federico... I think he tried to assign a field like this (please, supose the program imports the structure of a database table with a standard function, into a internal table which is looped by the work area w_field ):
- If w_field contains 'BKPF-WERKS', so sentence ASSIGN will affect the field symbol, passing to this the data type and current content of table field BKPF-WERKS.
- If w_field contains 'BKPF-.INCLUDE': *the column .INCLUDE obviously is not associated with a data type... so our statement ASSIGN... TO... never pass any data type or value to our field-symbol. So that, this field is never initialized properly, and when inmmediately you try to execute something like this: <my_field_symbol> = '/', the game (program) is over.. XD
I hope this post was helpful for anyone...
Best Regards!!
RRG
ABAPer(u) - EVOLution

Using field symbols in method issue

HI All
I created a method as follows and the problem is that when i enter
to the method the i have dump since the field symbol is not
assigned
there is a nice way that i can by-pass this issue ,
the reason that i created a method for that is that
i need to do this operation several of time in my code
The signature
LS_TARGET_STR     Importing     Type     Z_ATTR_STRUCT
ES_ATTR             Exporting     Type     ANY
THe code
FIELD-SYMBOLS <ls_attr> TYPE any.
DATA lo_attr TYPE REF TO data.
CREATE DATA lo_attr TYPE (ls_target_str).
ASSIGN lo_attr->* TO <ls_attr>.
es_attr = <ls_attr>.
Regards
Alex
Edited by: Alex Dean on Nov 21, 2010 5:13 PM

HI Matt
The value of the field is acatully data (this part working Ok)
and after the assign the sybrc = 0.
the problem is with the statment
es_attr = <ls_attr>.
The statment is
DATA: lr_struct TYPE REF TO data.
    con_types(
      EXPORTING
        ls_target_str = ls_target_node-data-attribute_struct    " Name of Attribute Structure of Node Entity
      IMPORTING
        es_attr = lr_struct
And the signature is
LS_TARGET_STR     Importing     Type     Z_ATTR_STRUCT
ES_ATTR             Exporting     Type     ANY
The code of convert types is
FIELD-SYMBOLS <ls_attr> TYPE any.
DATA lo_attr TYPE REF TO data.
CREATE DATA lo_attr TYPE (ls_target_str).
ASSIGN lo_attr->* TO <ls_attr>.
es_attr = <ls_attr>.
***********This is the place that i am
getting the dump . with -> es_attr = <ls_attr>
maybe its becouse that lr_struct is defiend type ref to data .
How can i solve this issue ?
Thanks,
Regards
Alex
Edited by: Alex Dean on Nov 22, 2010 9:36 AM

Installing Upgrade version issues

I installed Adobe Acrobat 9 Pro upgrade version on my computer last year. I had an old versin of Acrobat 6.0 standard that was previously loaded. That computer died a horrible death last week and I had to finally buy a new one to replace it. The issue is the newer Acrobat 9 will not install unless there is an older version present. I tried to install the old Acrobat 6 but Windows 7 Home Premium gives me error messages stating it is not compatible. Any suggestions on how to get Acrobat 9 installed? Thanks

The answer is likely very much the same as here: http://forums.adobe.com/thread/943303?tstart=0. I also shortly explained how to manually add those registry keys not so long ago, but this forum is so noisy/ busy, I can't seem to find my own posts again... If you do a little digging, they should turn up.
Mylenium

Issue while moving from string to field symbol -- waiting for help

Hi Abap Experts,
At present I got stucked here at client place. Please help me . Thanks in advance.
I have a structure in field symbol. I also have data in the string (rec ty )
I need to move it to corresponding fields in the field symbol. While moving, it is giving a dump.
data:linetype type string,
struc type ref to DATA.
field-symbols: <fs> type any.
linetype = i_strucname.
" Get internal table and attach the field-symbol
CREATE DATA struc type standard table OF (linetype).
ASSIGN struc->* TO <fs>.
<fs> = string. (dump is occuring here)

Hi,
My code:
data:linetype type string,
struc type ref to DATA.
field-symbols: <fs> type any ,
<f1> type any .
linetype = i_strucname (Z structure)
" Get internal table and attach the field-symbol
CREATE DATA struc type standard table OF (linetype).
ASSIGN struc->* TO <fs>.
I need to populate the Z structure at runtime with the appropriate field values from the string.
for example:
input: abc \ \xyz
structure: first ffield length 10,   " MY Z STRUCTURE
               second field length 5
                third field length 10.
output: abc        xyz
I get the structures dynamically.

Problem with field symbols in ecc 6.0

i have the following code written in 4.6 version   now i am executing the old report   in 6.0 but i am facing with some unicode error.
FIELD-SYMBOLS:
    <line_of_bs_table> LIKE tbl1024,
   READ TABLE bs_table INDEX row_bst ASSIGNING <line_of_bs_table> .
    buffer_bsbuffer_ptr(aux) = <line_of_bs_table> >col_bst.
tb1024 is standard sap structure for storing buffer contents
i have the following error in ecc 6.0
structure type   '<line_of_bs_table> >+col_bst' does not start with a charecter type field in unicode programs in such cases
offset/ length declarations are not allowed.
can any one tell how can a field symbol structure is changed to charecter type.

Hi elinuk,
you have already posted this thread in the ABAP general forum under problem in field symbols in ecc6.0 and I think that this forum is more related to this issue than the DMS forum. So please close this thread and investigate this issue further in the ABAP general forum.
Best regards,
Christoph

Difference between Field symbols and work area for Internal tables

Hi,
In ECC versions we all know that we need to declare the internal tables without headerline, and for handling the internal tables we need to use exclusive work areas.
Currently i have an issue that we have been asked to use field symbols instead of work areas...can any one help me how to use the field symbols and also let me know how it will improve the performance of the program..
Thanks and Regards,
Kathir

Hi
DATA: WA TYPE ITAB.
LOOP AT ITAB INTO WA.
IF WA-FIELD = .....
ENDIF.
ENDLOOP.[(code]
FIELD-SYMBOLS <WA> TYPE ANY.
LOOP AT ITAB ASSIGNING <WA>.
ENDLOOP.
Now the problem is you can't know the name of the fields of the table at runtime, so you can't write:
IF <WA>-FIELD = .....
ENDIF.
Anyway you can create a field-symbols strcturated like the table:
[code]FIELD-SYMBOLS <WA> TYPE ITAB.
LOOP AT ITAB ASSIGNING <WA>.
IF <WA>-FIELD = .....
ENDIF.
ENDLOOP.
I don't know which are the differences for the performance between to use a field-symbol and to use a structure as work-area.
The differnce between the field-symbols and work-area is the field-symbol is assigned directly to the record, so u don't need to do a MODIFY statament to change something:
LOOP AT ITAB INTO WA.
WA-FIELD =
MODIFY ITAB FROM WA.
ENDLOOP.
LOOP AT ITAB ASSIGNING <WA>.
<WA>-FIELD =
ENDLOOP.
These two pieces of abap code do the same action, so probably the field-symbol improve the performance because it do an access directly to the record without to use an external structure as workarea.
Max

Short dump GETWA_NOT_ASSIGNED - Field symbol FS_ENVDLIST not assigned

Hi Experts,
I need your help. Currently i am getting a short in CIC0 transaction.
Please find steps executed which result in short dump.
Search for a BP with BD display as the active tab. This search will be successful.
Press u2018End Contactu2019 Now search for 2nd BP with BD display as the active tab.
This will result in a dump.
Now if I again execute the t-code CIC0 & enter the same BP it will be successful
On debugging, I found out that the program cannot identify the data environment since the field symbol <fs_envdlist> does not get assigned when BD_DISPLAY tab is active. But the program still continues to use this field symbol which results in a dump
CRM Version - 4.0 - Patch level 10
Please let me know if the below link is not accessible
[http://imageshack.us/photo/my-images/685/page3uk.jpg/]
[http://imageshack.us/photo/my-images/338/page2dr.jpg]
[http://imageshack.us/photo/my-images/510/page1up.jpg/]
[http://imageshack.us/photo/my-images/140/page4fa.jpg/]
[http://imageshack.us/photo/my-images/845/screenshotsxq.jpg/]

Hi Andrei,
Thank you for the reply, but both this note are applicable to me
1144076 u2013 Talks about dump when too many hits are returned - I do not have any such message
996915 u2013 Talks about searching for the premise for a point of delivery without entering any search parameters - again in my scenario, input data is always provided.
Is there any solution, i did get note 1254404 which is closest to my issue, but its valid from crm 5.0 and we are on CRM 4.0

Field symbols as Class Attributes

Hello Gurus,
Is anybody able to say to me if it is possible to declare field symbols as class attributes? As I can understand until now, this is not possible and we need to use some attribute with the "TYPE REF TO Data" to get the information we need. Correct?
Thanks,
Daniel.

Ok, let me see if someone can give me some idea on how to improve my method:
Method: PREPARE_PTOOL_DATA
Parameters specification:
Parameter        Type     Typing     Reference Type
PF_ANALYSIS        Importing     Type     /SYM/SC_PT_ID_ANALYSIS_D
PF_ANAL_DESC        Importing     Type     /SYM/SC_NM_DESC_ANALYSIS
PF_LOGIC        Importing     Type     CHAR01
PF_MATERIAL        Importing     Type     MATNR
PF_MAKTX        Importing     Type     MAKTX
PT_DATA_COMPA        Exporting     Type     /SYM/SC_TAB_PT_RESULT_CP
PT_CALC_ANALY        Exporting     Type     /SYM/SC_TAB_PT_RESULT_CA
PT_DATA_MATERIAL1 Changing     Type     /SYM/SC_TAB_PROC_ALLERG_RESULT
PT_DATA_MATERIAL2     Changing     Type     /SYM/SC_TAB_PROC_ALLERG_RESULT
Source code:
From the /SYM/SC_CL_PROCESS_ALLERG_GEN class
Old version (but it is working)
METHOD prepare_ptool_data.
DATA: ls_data_material1   TYPE /sym/sc_s_proc_allerg_result,
        ls_data_material2   TYPE /sym/sc_s_proc_allerg_result,
        lf_index_material1 TYPE sy-tabix,
        lf_index_material2 TYPE sy-tabix,
        ls_result_cp        TYPE /sym/sc_pt_result_cp,
        ls_result_ca        TYPE /sym/sc_pt_result_ca.
Prepare data for Data Comparison step
IF pt_data_compa IS REQUESTED.
    LOOP AT pt_data_material1 INTO ls_data_material1.
      lf_index_material1 = sy-tabix.
      CLEAR ls_result_cp.
      MOVE pf_analysis   TO ls_result_cp-analysis.
      MOVE pf_anal_desc TO ls_result_cp-desc_analysis.
      MOVE ls_data_material1-algbe TO ls_result_cp-desc_property.
If Logic 'A', move the text from ls_data_material1 to original
material status
      IF pf_logic EQ c_logic_a.
        MOVE ls_data_material1-agsbe TO ls_result_cp-val_orig_matnr.
If Logic 'B', move the text from ls_data_material1 to "toy"
material status
      ELSEIF pf_logic EQ c_logic_b.
        MOVE ls_data_material1-agsbe TO ls_result_cp-val_toy_matnr.
      ENDIF. " IF pf_logic EQ c_logic_a.
Read the lt_data_toy by the Allergen ID (ALGEN)
      CLEAR ls_data_material2.
      READ TABLE pt_data_material2 INTO ls_data_material2
            WITH KEY algen = ls_data_material1-algen BINARY SEARCH.
      IF sy-subrc EQ 0.
        lf_index_material2 = sy-tabix.
If Logic 'A', move the text from ls_data_material2 to "toy°
material status
        IF pf_logic EQ c_logic_a.
          MOVE ls_data_material2-agsbe TO ls_result_cp-val_toy_matnr.
If Logic 'B', move the text from ls_data_material2 to original
material status
        ELSEIF pf_logic EQ c_logic_b.
          MOVE ls_data_material2-agsbe TO ls_result_cp-val_orig_matnr.
        ENDIF. " IF pf_logic EQ c_a.
Delete record from lt_data_toy, index lf_index_toy
        DELETE pt_data_material2 INDEX lf_index_material2.
      ENDIF. " IF sy-subrc EQ 0.
      APPEND ls_result_cp TO pt_data_compa.
Delete record from lt_data_orig, index lf_index_orig
      DELETE pt_data_material1 INDEX lf_index_material1.
    ENDLOOP. " LOOP AT lt_data_material1 INTO ls_data_material1.
ENDIF. " IF pt_data_compa IS REQUESTED.
Prepare data for Calculation Analysis step
IF pt_calc_analy IS REQUESTED.
    LOOP AT pt_data_material1 INTO ls_data_material1.
      lf_index_material1 = sy-tabix.
      CLEAR ls_result_ca.
      MOVE pf_material   TO ls_result_ca-matnr.
      MOVE pf_maktx      TO ls_result_ca-maktx.
      MOVE pf_analysis   TO ls_result_ca-analysis.
      MOVE pf_anal_desc TO ls_result_ca-desc_analysis.
      MOVE ls_data_material1-algbe TO ls_result_ca-desc_property.
If Logic 'A', move the text from ls_data_material1 to original
material status
      IF pf_logic EQ c_logic_a.
        MOVE ls_data_material1-agsbe TO ls_result_ca-val_curr_stat.
If Logic 'B', move the text from ls_data_material1 to "toy"
material status
      ELSEIF pf_logic EQ c_logic_b.
        MOVE ls_data_material1-agsbe TO ls_result_ca-val_simul_stat.
      ENDIF. " IF pf_logic EQ c_logic_a.
Read the lt_data_toy by the Allergen ID (ALGEN)
      CLEAR ls_data_material2.
      READ TABLE pt_data_material2 INTO ls_data_material2
            WITH KEY algen = ls_data_material1-algen BINARY SEARCH.
      IF sy-subrc EQ 0.
        lf_index_material2 = sy-tabix.
If Logic 'A', move the text from ls_data_material2 to "toy°
material status
        IF pf_logic EQ c_logic_a.
          MOVE ls_data_material2-agsbe TO ls_result_ca-val_simul_stat.
If Logic 'B', move the text from ls_data_material2 to original
material status
        ELSEIF pf_logic EQ c_logic_b.
          MOVE ls_data_material2-agsbe TO ls_result_ca-val_curr_stat.
        ENDIF. " IF pf_logic EQ c_a.
Delete record from lt_data_toy, index lf_index_toy
        DELETE pt_data_material2 INDEX lf_index_material2.
      ENDIF. " IF sy-subrc EQ 0.
      APPEND ls_result_ca TO pt_calc_analy.
Delete record from lt_data_orig, index lf_index_orig
      DELETE pt_data_material1 INDEX lf_index_material1.
    ENDLOOP. " LOOP AT lt_data_material1 INTO ls_data_material1.
ENDIF. " IF pt_calc_analy IS REQUESTED.
ENDMETHOD.
As you can see, I am repeating almost the same code, just changing some items. I am not sure if I can use new parameters (ANY or ANY TABLE) but, my first idea to improve it was to use the field-symbols (and it works ok). The issue is that I have to repeat the assignment lines every same named method of the classes I am changing (I would like to do the assignment into a new method of the superclass). Do you think it is possible or should I give up and proceed with the assignments locally, for each same named method of each class?
Thanks,
Daniel.

Modify DB by single field using Field Symbol

Hi,
please help me ,actually i have not use the field symbol in any object. i have one requirement ,i have to modify the DB by field STATUS using Field symbol ,
I am sending u my code so please help me how can i modify DB using field symbol..
          gw_msg3_status1   = k_status1 .
          LOOP AT gi_msg3 INTO gs_msg3.
            gs_msg3-status = gw_msg3_status1 .
            gs_msg3-issue   = lw_issuno.
       MODIFY gi_msg3 FROM gs_msg3 TRANSPORTING status.
            MODIFY gi_msg3 INDEX sy-tabix FROM gs_msg3 TRANSPORTING issue status.
          ENDLOOP.
Thanks & Regards,
Meenakshi

perform dboperation_table using 'SET' 'BIRTHDT' '=' <fs>.
    perform dboperation_table using 'WHERE' 'PARTNER' '=' <fs>
    perform dboperation_update using 'BUT000'.
form dboperation_table
using p_type
      p_var1
      p_var2
      p_var3.
data: t_l type cmst_str_data.
data: d_cx_root            type ref to cx_root,
        d_text               type string.
try.
      clear t_l.
      if p_var3 is not initial.
        t_l = p_var3.
        condense t_l.
        concatenate '''' t_l '''' into t_l.
      endif.
      concatenate p_var1 p_var2 t_l into t_l
      separated by space.
      case p_type.
        when 'SET'.   append t_l to g_s_t.
        when 'WHERE'. append t_l to g_w_t.
      endcase.
    catch cx_root into d_cx_root.
      d_text = d_cx_root->get_text( ).
      message a398(00) with d_text.
endtry.
endform.                    "DBOPERATION_table
form dboperation_update
using p_tabname type zdboperation-tabname.
data: tabname type bus_table.
data: d_cx_root            type ref to cx_root,
        d_text               type string.
try.
      tabname-tabname = p_tabname.
      call function 'ZDBOPERATION_UPDATE'
        in update task
        exporting
          tabname     = tabname
        tables
          where_table = g_w_t
          set_table   = g_s_t.
    catch cx_root into d_cx_root.
      d_text = d_cx_root->get_text( ).
      message a398(00) with d_text.
endtry.
endform.                    "DBOPERATION_update
Hope it will help you.
Regards,
Madan.

Field symbol issue in upgrade version

Similar Messages

Maybe you are looking for