Need Dynamic Table instead of Standard Table in FM INFO_SICHERN_S001

Hi Guys,
I have copied standard FM INFO_SICHERN_S001 into Zdefined FM.
My requirement is instead of
Updating or Modifying or Deleting standard table I need to do all these things for entered table.
How to do this.
Thanks in Advance.
Prasad.

I solved Myself.

Similar Messages

#datasync error - could that come from merging on fields from fact tables instead of dimensions tables?

I'm reporting out of two universes published by Epic
1. Warehouse - Patient
2. Warehouse - Transactions
I wanted to join two queries based on the primary key for a hospital encounter. Following the tutorial seemed pretty straightforward until I got to displaying data from a merged query.
The table displayed results from Query1, but adding fields from Query2 wiped out all the data in the table, leaving only #datasync in each field.
My workaround to get fields from both queries displayed (see screenshot)
1. Merge queries on *two* fields - primary key of hospital encounter and primary key of patient
2. Create new variable
3. Make variable type Detail
4. Associate variable with hospital encounter key from Query1
5. Set formula equal to a field from Query2
I'm not sure why this workaround works or if what I'm experiencing is a symptom of something larger. Could this workaround be needed because I am merging on fields from a fact table instead of fields from a dimension table?
Thanks in advance

You have defined merged dimension on 'company code-Key' which is common in both the Bex-queries.
You are able to bring the merged dimension and other objects from Query_ One to report block without any issue but when adding objects from Query_Two you are getting the error #DATASYNC.
In this case objects from Query_One are got sync with the merged dimension object without any issue because they got added first to it.
Similarly when you add merged dimension and objects from Query_Two you find no issue, because objects from Query_Two go sync first.
Once objects from a query(Query_One/Query_Two) got added to a merged dimension, when we try adding objects from other query we get #DATASYNC error. This is because data in the other query is not able to sync with the initial result set, this is a know behavior.
There are two workarounds:
1) Merging all common dimension/characteristic objects: Only merged dimensions data will sync with the initial query, un-merged dimensions/characteristic objects will still give #DATASYNC error.
2) Create detail objects/attribute objects at report level for all uncommon characteristic/dimension objects from query_two referring to merged dimension. Then add these newly created detail/attribute objects to the table block that is having initial query objects with merged dimension, with this you see result set of query_two in the table block not #DATASYNC error.
~ Manoj

Memory and performance when copying a sorted table to a standard table

Hello,
As you all probably know, it's not possible to use a sorted table as a tables parameter of a function module, but sometimes you want to use a sorted table in your function module for performance reasons, and at the end of the function module, you just copy it to a standard table to return to the calling program.
The problem with this is that at that moment, the contents of the table is in memory twice, which could result in the well known STORAGE_PARAMETERS_WRONG_SET runtime exception.
I've been looking for ways to do this without using an excessive amount of memory and still being performant. I tried four methods, all have their advantages and disadvantages, so I was hoping someone here could help me come up with the best way to do this. Both memory and performance are an issue.
Requirements :
- Memory usage must be as low as possible
- Performance must be as high as possible
- Method must work on all SAP versions from 4.6c and up
So far I have tried 3 methods.
I included a test report to this message, the output of this on my dev system is :
Test report for memory usage of copying tables
table1[] = table2[]
Memory :    192,751 Kb
Runtime:    436,842
Loop using workarea (with delete from original table)
Memory :    196,797 Kb
Runtime: 1,312,839
Loop using field symbol (with delete from original table)
Memory :    196,766 Kb
Runtime: 1,295,009
The code of the program :
I had some problems pasting the code here, so it can be found at [http://pastebin.com/f5e2848b5|http://pastebin.com/f5e2848b5]
Thanks in advance for the help.
Edited by: Dries Horions on Jun 19, 2009 1:23 PM
Edited by: Dries Horions on Jun 19, 2009 1:39 PM
Edited by: Dries Horions on Jun 19, 2009 1:40 PM
Edited by: Dries Horions on Jun 19, 2009 1:40 PM

I've had another idea:
Create a RFC function like this (replace SOLI_TAB with your table types):
FUNCTION Z_COPY_TABLE .
*"*"Lokale Schnittstelle:
*" IMPORTING
*"     VALUE(IT_IN) TYPE SOLI_TAB
*" EXPORTING
*"     VALUE(ET_OUT) TYPE SOLI_TAB
et_out[] = it_in[].
ENDFUNCTION.
and then try something like this in your program:
DATA: gd_copy_done TYPE c LENGTH 1.
DATA: gt_one TYPE soli_tab.
DATA: gt_two TYPE soli_tab.
PERFORM move_tables.
FORM move_tables.
CLEAR gd_copy_done.
CALL FUNCTION 'Z_COPY_TABLE'
    STARTING NEW TASK 'ztest'
    PERFORMING copy_done ON END OF TASK
    EXPORTING
      it_in = gt_one[].
CLEAR gt_one[].
WAIT UNTIL gd_copy_done IS NOT INITIAL.
ENDFORM.
FORM copy_done USING ld_task TYPE clike.
RECEIVE RESULTS FROM FUNCTION 'Z_COPY_TABLE'
   IMPORTING
     et_out        = gt_two[].
gd_copy_done = 'X'.
ENDFORM.
Maybe this is a little bit faster than the Memory-Export?
Edited by: Carsten Grafflage on Jul 20, 2009 11:06 AM

How to,Pass HASHED table data to STANDARD table

i have itab1 as Hashed.
when i pass this as out put table for
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
it gives me error,saying hashed type cannot be used..
please suggest the remedy..

IT_DEV2[ ] = IT_DEV[ ].
seems to be right..it works fine in this code....but if the selected records are huge it gives irrelevant values
REPORT ZMONTHLY_STOCK .
DATA : IT_DEV TYPE ZBIW_MNTH_STK_L .
DATA : IT_DEV2 LIKE STANDARD TABLE OF ZBIW_MNTH_STK.
*Selection-Screen
Parameters : LFMON type LFMON obligatory,
 LFGJA type LFGJA obligatory,
 BWKEY type BWKEY.
START-OF-SELECTION.
 SELECT e~MATNR e~BWKEY e~LFGJA e~LFMON e~LBKUM e~SALK3 l~MTART
l~MATKL l~MEINS f~WAERS FROM
 MBEWH AS e INNER JOIN
 MARA AS l ON e~MATNR = l~MATNR
INNER JOIN
 T001K AS n ON e~BWKEY = n~BWKEY
INNER JOIN
 T001 AS f ON n~BUKRS = f~BUKRS
 INTO CORRESPONDING
 FIELDS OF TABLE it_dev
 WHERE
 e~LFGJA EQ LFGJA AND e~LFMON EQ LFMON.
IF SY-SUBRC = 0.
IT_DEV2[] = IT_DEV[].
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
 I_CALLBACK_PROGRAM = SY-CPROG
 I_STRUCTURE_NAME = 'ZBIW_MNTH_STK'
 TABLES
 T_OUTTAB = IT_DEV2.
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDIF.

Table defined as *Standard table name

Hi all,
Tables in standard program are defined as *table name, i want to know how to use it and why they r defined as *table name
and what is the use of defining like this.
example:
Include Program FPLTDATA
TABLES: FPLT, *FPLT, TFPLT.
TABLES: FPLTD, *FPLTD.
TABLES: CCDATA, *CCDATA, CCDATE, CCARD_CVV, CCARD_RCVV.
Thanks
Venkatesh babu V

Hi Venkatesh,
just use F1 help on command TABLES.
Tables *tablename
declares an additional table work area.
Regards
rea

Read a csv file, fill a dynamic table and insert into a standard table

Hi everybody,
I have a problem here and I need your help:
I have to read a csv file and insert the data of it into a standard table.
1 - On the parameter scrreen I have to indicate the standard table and the csv file.
2 - I need to create a dynamic table. The same type of the one I choose at parameter screen.
3 - Then I need to read the csv and put the data into this dynamic table.
4 - Later I need to insert the data from the dynamic table into the standard table (the one on the parameter screen).
How do I do this job? Do you have an example? Thanks.

Here is an example table which shows how to upload a csv file from the frontend to a dynamic internal table. You can of course modify this to update your database table.
report zrich_0002.
type-pools: slis.
field-symbols: <dyn_table> type standard table,
 <dyn_wa>,
 <dyn_field>.
data: it_fldcat type lvc_t_fcat,
 wa_it_fldcat type lvc_s_fcat.
type-pools : abap.
data: new_table type ref to data,
 new_line type ref to data.
data: xcel type table of alsmex_tabline with header line.
selection-screen begin of block b1 with frame title text .
parameters: p_file type rlgrap-filename default 'c:Test.csv'.
parameters: p_flds type i.
selection-screen end of block b1.
start-of-selection.
* Add X number of fields to the dynamic itab cataelog
do p_flds times.
 clear wa_it_fldcat.
 wa_it_fldcat-fieldname = sy-index.
 wa_it_fldcat-datatype = 'C'.
 wa_it_fldcat-inttype = 'C'.
 wa_it_fldcat-intlen = 10.
 append wa_it_fldcat to it_fldcat .
enddo.
* Create dynamic internal table and assign to FS
call method cl_alv_table_create=>create_dynamic_table
 exporting
 it_fieldcatalog = it_fldcat
 importing
 ep_table = new_table.
assign new_table->* to <dyn_table>.
* Create dynamic work area and assign to FS
create data new_line like line of <dyn_table>.
assign new_line->* to <dyn_wa>.
* Upload the excel
call function 'ALSM_EXCEL_TO_INTERNAL_TABLE'
 exporting
 filename = p_file
 i_begin_col = '1'
 i_begin_row = '1'
 i_end_col = '200'
 i_end_row = '5000'
 tables
 intern = xcel
 exceptions
 inconsistent_parameters = 1
 upload_ole = 2
 others = 3.
* Reformt to dynamic internal table
loop at xcel.
 assign component xcel-col of structure <dyn_wa> to <dyn_field>.
 if sy-subrc = 0.
 <dyn_field> = xcel-value.
 endif.
 at end of row.
 append <dyn_wa> to <dyn_table>.
 clear <dyn_wa>.
 endat.
endloop.
* Write out data from table.
loop at <dyn_table> into <dyn_wa>.
 do.
 assign component sy-index of structure <dyn_wa> to <dyn_field>.
 if sy-subrc <> 0.
 exit.
 endif.
 if sy-index = 1.
 write:/ <dyn_field>.
 else.
 write: <dyn_field>.
 endif.
 enddo.
endloop.
REgards,
RIch Heilman

How to dynamic field insert into intenal table?

hi friends
this is my urgent requirements .... how to dynamic field insert into internal table if it possible please tell me
thanks & regards
pauldharma

Hi,
Go through this
REPORT yusmm_text1 NO STANDARD PAGE HEADING
 LINE-SIZE 199.
T A B L E S
TABLES: MARA,
 MAKT,
 THEAD.
GLOBAL TYPE-POOLS
TYPE-POOLS : SLIS.
 GLOBAL TYPES
TYPES : BEGIN OF TP_FINAL,
 MATNR TYPE MARA-MATNR,
 BEGRU TYPE MARA-BEGRU,
 MTART TYPE MARA-MTART,
 MAKTX TYPE MAKT-MAKTX,
 SPRAS TYPE MAKT-SPRAS,
 LTXT(2000) TYPE C ,
 SRNO TYPE N ,
 END OF TP_FINAL.
TYPES : BEGIN OF TP_T002,
 SPRAS TYPE T002-SPRAS,
 LAISO TYPE T002-LAISO,
 SRNO TYPE N ,
 END OF TP_T002.
TYPES : BEGIN OF TP_MARA_MAKT,
 MATNR TYPE MARA-MATNR,
 BEGRU TYPE MARA-BEGRU,
 MTART TYPE MARA-MTART,
 SPRAS TYPE MAKT-SPRAS,
 MAKTX TYPE MAKT-MAKTX,
 END OF TP_MARA_MAKT.
Types: BEGIN OF tp_matnr,
 matnr TYPE mara-matnr,
 END OF tp_matnr.
 GLOBAL ELEMENTARY VARIABLES
DATA : gv_date TYPE sy-datum.
DATA : gv_repid TYPE sy-repid.
DATA : g_var1(10) TYPE C.
DATA : gv_index TYPE sy-tabix.
DATA: gv_strg TYPE string,
 gv_strg1(2000) TYPE C.
DATA : gv_lang TYPE sy-langu.
DATA : g_v(3) TYPE N .
DATA : gv_lines(3) TYPE N .
DATA : gv_var(3) TYPE N .
DATA : gv_var1(3) TYPE N.
DATA: gv_str TYPE STRING.
DATA: gv_str1 TYPE STRING.
DATA : gv_li TYPE I,
 gv_lit TYPE I,
 gv_lin TYPE I.
DATA: g_var11(3) TYPE N,
 gv_li1(3) TYPE N,
 g_var2(3) TYPE N.
DATA : gv_i1 TYPE I.
DATA : gv_i TYPE I.
DATA: gl_lenght TYPE I.
 GLOBAL STRUCTURES
DATA: T_NEWTABLE TYPE REF TO DATA,
 T_NEWLINE TYPE REF TO DATA,
 T_FLDCAT1 TYPE SLIS_T_FIELDCAT_ALV,
 T_FLDCAT TYPE LVC_T_FCAT,
 WA_IT_FLDCAT TYPE LVC_S_FCAT,
 WA_IT_FLDCAT1 TYPE SLIS_FIELDCAT_ALV,
 WA_COLNO(2) TYPE N,
 WA_FLNAME(5) TYPE C,
 L_LT TYPE SLIS_LAYOUT_ALV.
 GLOBAL INTERNAL TABLES (WITH INCLUDE STRUCTURE)
DATA : IG_MARA_MAKT TYPE STANDARD TABLE OF TP_MARA_MAKT,
 WG_MARA_MAKT TYPE TP_MARA_MAKT.
DATA : IG_T002 TYPE STANDARD TABLE OF TP_T002,
 WG_T002 TYPE TP_T002.
DATA : IG_FINAL TYPE STANDARD TABLE OF TP_FINAL,
 WG_FINAL TYPE TP_FINAL.
data : IG_MATNR TYPE STANDARD TABLE OF TP_MATNR WITH HEADER LINE,
 WG_MATNR TYPE TP_MATNR.
DATA:BEGIN OF IG_THEAD OCCURS 0.
 INCLUDE STRUCTURE THEAD .
DATA: END OF IG_THEAD.
DATA:BEGIN OF IG_TLINE OCCURS 0.
 INCLUDE STRUCTURE TLINE .
DATA:END OF IG_TLINE.
FIELD-SYMBOLS
FIELD-SYMBOLS: <T_DYNTABLE> TYPE STANDARD TABLE,"Dynamic internal
 "tablename
 <FS_DYNTABLE>, "Field symbol to create work area
 <FS_FLDVAL> TYPE ANY. " Field symbol to assign values
COMPULSORY
FIELD-SYMBOLS: <FS_DATA> TYPE REF TO DATA,
 <FS_DATA1> TYPE REF TO DATA,
 <FS_2> TYPE STANDARD TABLE,
 <FS_22> TYPE STANDARD TABLE,
 <FS_1>,
 <FS_11>,
 <F>,
 <FA>,
 <LWA_LINE_WA>,
 <LWA_LINE_WA1>.
------- Create Dyn Table From FC
DATA: LT_DATA TYPE REF TO DATA,
 LT_DATA1 TYPE REF TO DATA,
 LWA_LINE TYPE REF TO DATA,
 LWA_LINE1 TYPE REF TO DATA,
 LI_FIELD_CAT TYPE LVC_T_FCAT,
 LWA_FIELD_CAT TYPE LVC_S_FCAT.
 PARAMETERS & SELECT-OPTIONS
SELECTION-SCREEN : BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
SELECT-OPTIONS : S_SPRAS FOR MAKT-SPRAS NO INTERVALS DEFAULT 'EN'
 OBLIGATORY ,
 S_MATNR FOR MARA-MATNR,
 S_MTART FOR MARA-MTART.
PARAMETERS: GP_SIZE TYPE I DEFAULT '200'.
SELECTION-SCREEN : END OF BLOCK B1.
 INITIALIZATION
INITIALIZATION.
gv_repid = sy-repid.
gv_date = sy-datum.
AT SELECTION-SCREEN
AT SELECTION-SCREEN.
IF GP_SIZE < 0.
 MESSAGE E002(00).
ENDIF.
IF GP_SIZE > 50000.
 MESSAGE W130(26) WITH TEXT-004.
 SET CURSOR FIELD 'gp_size'.
ENDIF.
START-OF-SELECTION
START-OF-SELECTION.
PERFORM FIELDCAT.
PERFORM LAYOUT.
PERFORM DATA_FETCH.
PERFORM READ_DATA_TO_FINAL.
SORT ig_final BY matnr spras.
gv_lin = gv_li.
gv_li = gv_li - 2.
LOOP AT ig_final INTO wg_final.
 ASSIGN COMPONENT 1 OF STRUCTURE <LWA_LINE_WA1> TO <FA>.
 <FA> = 'Material Number'.
 ASSIGN COMPONENT 2 OF STRUCTURE <LWA_LINE_WA1> TO <FA>.
 <FA> = 'Authorization Group'.
 g_VAR11 = wg_final-srno + 2.
 gv_li1 = gv_li1 + 2.
 MOVE : g_var11 TO gv_i1.
 ASSIGN COMPONENT g_var11 OF STRUCTURE <LWA_LINE_WA1> TO <FA>.
 <FA> = 'MatDesc'.
 g_var2 = g_var11 + gv_lines.
 ASSIGN COMPONENT g_var2 OF STRUCTURE <LWA_LINE_WA1> TO <FA>.
 <FA> = 'BasicData'.
 APPEND <LWA_LINE_WA1> TO <FS_22>.
 EXIT.
 ENDLOOP.
LOOP AT ig_final INTO wg_final.
 AT NEW matnr.
 gv_index = sy-tabix.
 ASSIGN COMPONENT 1 OF STRUCTURE <LWA_LINE_WA> TO <F>.
 <F> = wg_final-matnr.
 ENDAT.
 AT NEW MATNR.
 GV_INDEX = SY-TABIX.
 ASSIGN COMPONENT 1 OF STRUCTURE <LWA_LINE_WA1> TO <FA>.
 <FA> = wg_final-matnr.
 ENDAT.
 ASSIGN COMPONENT 2 OF STRUCTURE <LWA_LINE_WA> TO <F>.
 <F> = wg_final-begru.
 ASSIGN COMPONENT 2 OF STRUCTURE <LWA_LINE_WA1> TO <FA>.
 <FA> = wg_final-begru.
 gv_var = wg_final-srno + 2.
 gv_li = gv_li + 2.
 MOVE : gv_var TO gv_i.
 ASSIGN COMPONENT gv_var OF STRUCTURE <LWA_LINE_WA> TO <F>.
 <F> = wg_final-maktx.
 ASSIGN COMPONENT gv_var OF STRUCTURE <LWA_LINE_WA1> TO <FA>.
 <FA> = wg_final-maktx.
 gv_var1 = gv_var + gv_lines .
 ASSIGN COMPONENT gv_var1 OF STRUCTURE <LWA_LINE_WA> TO <F>.
 <F> = wg_final-ltxt.
 ASSIGN COMPONENT gv_var1 OF STRUCTURE <LWA_LINE_WA1> TO <FA>.
 <FA> = wg_final-ltxt.
 AT END OF matnr.
 APPEND <LWA_LINE_WA> TO <FS_2>.
 CLEAR <LWA_LINE_WA>.
 ENDAT.
 AT END OF matnr.
 APPEND <LWA_LINE_WA1> TO <FS_22>.
 CLEAR <LWA_LINE_WA1>.
 ENDAT.
ENDLOOP.
PERFORM display..
*& Form data_fetch
 text
--> p1 text
<-- p2 text
FORM DATA_FETCH .
SELECT matnr
 from mara up to gp_size rows
 appending corresponding fields of table ig_matnr
 where matnr in s_matnr
 and mtart in s_mtart.
loop at ig_matnr.
SELECT MARA~MATNR
 MARA~BEGRU
 MARA~MTART
 MAKT~SPRAS
 MAKT~MAKTX FROM MARA INNER JOIN MAKT
 ON MARAMATNR = MAKTMATNR
 appending corresponding fields of TABLE ig_mara_makt UP TO GP_SIZE
ROWS
 WHERE makt~spras IN s_spras
 AND mara~matnr IN s_matnr
 AND mara~mtart IN s_mtart
 AND mara~matnr EQ ig_matnr-matnr.
 endloop.
IF sy-subrc = 0.
 SORT ig_mara_makt.
ENDIF.
ENDFORM. " data_fetch
*& Form read_data_to_final
 text
--> p1 text
<-- p2 text
FORM READ_DATA_TO_FINAL .
LOOP AT ig_mara_makt INTO wg_mara_makt .
 wg_final-MATNR = wg_mara_makt-MATNR.
 wg_final-BEGRU = wg_mara_makt-BEGRU.
 wg_final-MTART = wg_mara_makt-MTART.
 wg_final-SPRAS = wg_mara_makt-SPRAS.
 wg_final-MAKTX = wg_mara_makt-MAKTX.
 READ TABLE ig_t002 INTO wg_t002 WITH KEY spras = wg_final-spras.
 IF sy-subrc = 0.
 wg_final-srno = wg_t002-srno.
 ENDIF.
 CLEAR ig_thead[].
 ig_thead-TDOBJECT = 'MATERIAL'.
 ig_thead-TDNAME = wg_final-matnr.
 ig_thead-TDID = 'GRUN'.
 ig_thead-TDSPRAS = wg_final-spras.
 CALL FUNCTION 'TEXT_READ'
 EXPORTING
 I_HEADER = IG_THEAD
 I_READONLY = 'X'
 IMPORTING
 E_HEADER = IG_THEAD
 TABLES
 T_LINES = IG_TLINE[]
 EXCEPTIONS
 NOTFOUND = 1.
 IF sy-subrc EQ 0.
 LOOP AT ig_tline.
 gv_strg = ig_tline-tdline.
 IF gv_strg1 <> ' '.
 CONCATENATE gv_strg1 ';' gv_strg INTO gv_strg1.
 ELSE.
 gv_strg1 = gv_strg.
 ENDIF.
 ENDLOOP.
 wg_final-ltxt = gv_strg1.
 APPEND wg_final TO ig_final.
 CLEAR wg_final.
 gv_strg1 = ' '.
 ELSE.
 APPEND wg_final TO ig_final.
 ENDIF.
ENDLOOP.
ENDFORM. " read_data_to_final
" read_data_to_final
*& Form layout
 text
--> p1 text
<-- p2 text
FORM LAYOUT .
CLEAR L_LT.
L_LT-ZEBRA = 'X'.
L_LT-COLWIDTH_OPTIMIZE = 'X'.
L_LT-WINDOW_TITLEBAR = 'MATERIAL DETAILS'.
ENDFORM. " layout
*& Form fieldcat
 text
--> p1 text
<-- p2 text
FORM FIELDCAT .
SELECT SPRAS
 LAISO FROM t002 INTO CORRESPONDING FIELDS OF TABLE ig_t002
 WHERE spras IN s_spras.
DESCRIBE TABLE ig_t002 LINES gv_lines.
LOOP AT ig_t002 INTO wg_t002.
 g_v = g_v + 1.
 Wg_t002-srno = g_v.
 MODIFY ig_t002 FROM wg_t002 TRANSPORTING SRNO.
ENDLOOP.
LOOP AT ig_t002 INTO wg_t002.
 CLEAR WA_IT_FLDCAT.
 MOVE SY-INDEX TO WA_COLNO.
 CONCATENATE 'MD-' wg_t002-LAISO
 WA_COLNO
 INTO WA_FLNAME.
 WA_IT_FLDCAT-FIELDNAME = WA_FLNAME.
 WA_IT_FLDCAT-DATATYPE = 'CHAR'.
 WA_IT_FLDCAT-SELTEXT = WA_FLNAME.
 WA_IT_FLDCAT-INTLEN = 250.
 WA_IT_FLDCAT-TABNAME = '<FS_2>'.
 APPEND WA_IT_FLDCAT TO T_FLDCAT.
 CLEAR wg_t002.
 ENDLOOP.
LOOP AT ig_t002 INTO wg_t002.
 CLEAR WA_IT_FLDCAT.
 MOVE SY-INDEX TO WA_COLNO.
 CONCATENATE 'BD-' wg_t002-LAISO
 WA_COLNO
 INTO WA_FLNAME.
 WA_IT_FLDCAT-FIELDNAME = WA_FLNAME.
 WA_IT_FLDCAT-DATATYPE = 'CHAR'.
 WA_IT_FLDCAT-SELTEXT = WA_FLNAME.
 WA_IT_FLDCAT-INTLEN = 250.
 WA_IT_FLDCAT-TABNAME = '<FS_2>'.
 APPEND WA_IT_FLDCAT TO T_FLDCAT.
 CLEAR wg_t002.
 ENDLOOP.
MOVE 'MATNR' TO WA_FLNAME.
WA_IT_FLDCAT-FIELDNAME = WA_FLNAME.
WA_IT_FLDCAT-DATATYPE = 'CHAR'.
WA_IT_FLDCAT-SELTEXT = 'Material No'.
WA_IT_FLDCAT-INTLEN = 18.
WA_IT_FLDCAT-TABNAME = '<FS_2>'.
INSERT WA_IT_FLDCAT INTO T_FLDCAT INDEX 1.
MOVE 'BEGRU' TO WA_FLNAME.
WA_IT_FLDCAT-FIELDNAME = WA_FLNAME.
WA_IT_FLDCAT-DATATYPE = 'CHAR'.
WA_IT_FLDCAT-SELTEXT = 'Authorization Group'.
WA_IT_FLDCAT-INTLEN = 4.
WA_IT_FLDCAT-TABNAME = '<FS_2>'.
INSERT WA_IT_FLDCAT INTO T_FLDCAT INDEX 2.
DESCRIBE TABLE T_FLDCAT LINES gv_li.
ASSIGN LT_DATA TO <FS_DATA>.
Creating the Dynamic Internal Table
CALL METHOD CL_ALV_TABLE_CREATE=>CREATE_DYNAMIC_TABLE
 EXPORTING
 IT_FIELDCATALOG = T_FLDCAT " Fieldcatalogue
 IMPORTING
 EP_TABLE = <FS_DATA> " Dynamic Internal Table
 EXCEPTIONS
 GENERATE_SUBPOOL_DIR_FULL = 1
 OTHERS = 2.
Assign Dyn Table To Field Sumbol
ASSIGN <FS_DATA>->* TO <FS_1>.
Assigning the Internal Table TYPE ANY to Standard internal Table
ASSIGN <FS_1> TO <FS_2>.
Creating a Workarea
CREATE DATA LWA_LINE LIKE LINE OF <FS_2> .
Assigning the Content to the workares as a Pointer
ASSIGN LWA_LINE->* TO <LWA_LINE_WA>.
LOOP AT T_FLDCAT INTO WA_IT_FLDCAT.
 WA_IT_FLDCAT1-FIELDNAME = WA_IT_FLDCAT-FIELDNAME.
 WA_IT_FLDCAT1-TABNAME = WA_IT_FLDCAT-TABNAME.
 WA_IT_FLDCAT1-SELTEXT_L = WA_IT_FLDCAT-SELTEXT.
 WA_IT_FLDCAT1-REF_TABNAME = 'MARC'.
 APPEND WA_IT_FLDCAT1 TO T_FLDCAT1.
 CLEAR : WA_IT_FLDCAT,WA_IT_FLDCAT1.
ENDLOOP.
ASSIGN LT_DATA1 TO <FS_DATA1>.
CALL METHOD CL_ALV_TABLE_CREATE=>CREATE_DYNAMIC_TABLE
 EXPORTING
 IT_FIELDCATALOG = T_FLDCAT " Fieldcatalogue
 IMPORTING
 EP_TABLE = <FS_DATA1> " Dynamic Internal table
 EXCEPTIONS
 GENERATE_SUBPOOL_DIR_FULL = 1
 OTHERS = 2.
Assign Dyn Table To Field Sumbol
ASSIGN <FS_DATA1>->* TO <FS_11>.
Assigning the Internal Table TYPE ANY to Standard internal Table
ASSIGN <FS_11> TO <FS_22>.
Creating a Workarea
CREATE DATA LWA_LINE1 LIKE LINE OF <FS_22> .
Assigning the Content to the workares as a Pointer
ASSIGN LWA_LINE1->* TO <LWA_LINE_WA1>.
ENDFORM. " fieldcat
*& Form show
 text
--> p1 text
<-- p2 text
FORM Display .
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
 EXPORTING
 I_INTERFACE_CHECK = ' '
 I_BYPASSING_BUFFER = ' '
 I_BUFFER_ACTIVE = ' '
 I_CALLBACK_PROGRAM = GV_REPID
 I_CALLBACK_PF_STATUS_SET = 'PF_STATUS_SET'
 I_CALLBACK_USER_COMMAND = 'USER_COMMAND'
 I_CALLBACK_TOP_OF_PAGE = ' '
 I_CALLBACK_HTML_TOP_OF_PAGE = ' '
 I_CALLBACK_HTML_END_OF_LIST = ' '
 I_STRUCTURE_NAME =
 I_BACKGROUND_ID = ' '
 I_GRID_TITLE =
 I_GRID_SETTINGS =
 IS_LAYOUT = L_LT
 IT_FIELDCAT = T_FLDCAT1[]
 IT_EXCLUDING =
 IT_SPECIAL_GROUPS =
 IT_SORT =
 IT_FILTER =
 IS_SEL_HIDE =
 I_DEFAULT = 'X'
 I_SAVE = ' '
 IS_VARIANT =
 IT_EVENTS =
 IT_EVENT_EXIT =
 IS_PRINT =
 IS_REPREP_ID =
 I_SCREEN_START_COLUMN = 0
 I_SCREEN_START_LINE = 0
 I_SCREEN_END_COLUMN = 0
 I_SCREEN_END_LINE = 0
 I_HTML_HEIGHT_TOP = 0
 I_HTML_HEIGHT_END = 0
 IT_ALV_GRAPHICS =
 IT_HYPERLINK =
 IT_ADD_FIELDCAT =
 IT_EXCEPT_QINFO =
 IR_SALV_FULLSCREEN_ADAPTER =
IMPORTING
 E_EXIT_CAUSED_BY_CALLER =
 ES_EXIT_CAUSED_BY_USER =
 TABLES
 T_OUTTAB = <FS_2>
EXCEPTIONS
 PROGRAM_ERROR = 1
 OTHERS = 2
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM. " display
FORM PF_STATUS_SET USING RS_EXTAB TYPE SLIS_T_EXTAB.
SET PF-STATUS 'DISPLAY' .
ENDFORM. "PF_STATUS_SET
*& Form Name: user_command *
*& Form Desc: For Handling USER_COMMAND *
FORM USER_COMMAND USING IF_UCOMM TYPE SY-UCOMM
 IS_SELFIELD TYPE SLIS_SELFIELD.
CASE IF_UCOMM.
 WHEN 'DOWNLOAD'.
 CALL FUNCTION 'POPUP_TO_CONFIRM'
 EXPORTING
TITLEBAR = ' '
DIAGNOSE_OBJECT = ' '
 TEXT_QUESTION = 'Data download to excel'
TEXT_BUTTON_1 = 'Ja'(001)
ICON_BUTTON_1 = ' '
TEXT_BUTTON_2 = 'Nein'(002)
ICON_BUTTON_2 = ' '
DEFAULT_BUTTON = '1'
DISPLAY_CANCEL_BUTTON = 'X'
USERDEFINED_F1_HELP = ' '
START_COLUMN = 25
START_ROW = 6
POPUP_TYPE =
IMPORTING
ANSWER =
TABLES
PARAMETER =
EXCEPTIONS
TEXT_NOT_FOUND = 1
OTHERS = 2
 IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
 ENDIF.
 CALL FUNCTION 'GUI_DOWNLOAD'
 EXPORTING
 BIN_FILESIZE =
 FILENAME = 'C:\Material-Text.xls'
 FILETYPE = 'ASC'
 APPEND = ' '
 WRITE_FIELD_SEPARATOR = 'X'
 HEADER = '00'
 TRUNC_TRAILING_BLANKS = 'X'
 WRITE_LF = 'X'
 COL_SELECT = ' '
 COL_SELECT_MASK = ' '
 DAT_MODE = 'X'
 IMPORTING
 FILELENGTH = GL_LENGHT
 TABLES
 DATA_TAB = <FS_22>
EXCEPTIONS
 FILE_WRITE_ERROR = 1
 NO_BATCH = 2
 GUI_REFUSE_FILETRANSFER = 3
 INVALID_TYPE = 4
 NO_AUTHORITY = 5
 UNKNOWN_ERROR = 6
 HEADER_NOT_ALLOWED = 7
 SEPARATOR_NOT_ALLOWED = 8
 FILESIZE_NOT_ALLOWED = 9
 HEADER_TOO_LONG = 10
 DP_ERROR_CREATE = 11
 DP_ERROR_SEND = 12
 DP_ERROR_WRITE = 13
 UNKNOWN_DP_ERROR = 14
 ACCESS_DENIED = 15
 DP_OUT_OF_MEMORY = 16
 DISK_FULL = 17
 DP_TIMEOUT = 18
 FILE_NOT_FOUND = 19
 DATAPROVIDER_EXCEPTION = 20
 CONTROL_FLUSH_ERROR = 21
 OTHERS = 22
 IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
 ENDIF.
 IF GL_LENGHT NE 0.
 MESSAGE S398(00) WITH 'DATA downloaded to EXCEL'.
 ENDIF.
Thanks
ENDCASE.
ENDFORM. "user_command

What are the methods to modify SAP standard tables?

hi
what are the methods to modify SAP standard tables?

.APPEND structures AND CUSTOMIZING INCLUDES.
these are the two methods.. but customizing includes we, as a developers do not use.
generally we use .APPEND structures to modify standard tables.
note that we need an access key to modify atandard tables.
we can create an apend structure and add that structure to the standard table at the end.
note that .append structures should only be added only at the end.
that is the reason we use .append structures to modify standard tables.as we should not include a field in the middle and disturb the original order of the standard table fields as it may effect many objects depending on the standard table.
but Some standard tables for which there is a LONG datatype field can never be modified.
the reason is the LONG datatype field should always be there at the end and also .APPEND strutures should always be there at the end. there will be a conflict. so, some standard tables can not be appended.

Standard tables hashed tables

in SORT we will not use sorted tables like where we will not use STANDARD TABLES and HASDED TABLES ........CAN U EXPLAIN IN DETAIL .......

Standard Internal Tables
Standard tables have a linear index. You can access them using either the index or the key. If you use the key, the response time is in linear relationship to the number of table entries. The key of a standard table is always non-unique, and you may not include any specification for the uniqueness in the table definition.
This table type is particularly appropriate if you want to address individual table entries using the index. This is the quickest way to access table entries. To fill a standard table, append lines using the (APPEND) statement. You should read, modify and delete lines by referring to the index (INDEX option with the relevant ABAP command). The response time for accessing a standard table is in linear relation to the number of table entries. If you need to use key access, standard tables are appropriate if you can fill and process the table in separate steps. For example, you can fill a standard table by appending records and then sort it. If you then use key access with the binary search option (BINARY), the response time is in logarithmic relation to
the number of table entries.
Sorted Internal Tables
Sorted tables are always saved correctly sorted by key. They also have a linear key, and, like standard tables, you can access them using either the table index or the key. When you use the key, the response time is in logarithmic relationship to the number of table entries, since the system uses a binary search. The key of a sorted table can be either unique, or non-unique, and you must specify either UNIQUE or NON-UNIQUE in the table definition. Standard tables and sorted tables both belong to the generic group index tables.
This table type is particularly suitable if you want the table to be sorted while you are still adding entries to it. You fill the table using the (INSERT) statement, according to the sort sequence defined in the table key. Table entries that do not fit are recognised before they are inserted. The response time for access using the key is in logarithmic relation to the number of
table entries, since the system automatically uses a binary search. Sorted tables are appropriate for partially sequential processing in a LOOP, as long as the WHERE condition contains the beginning of the table key.
Hashed Internal Tables
Hashes tables have no internal linear index. You can only access hashed tables by specifying the key. The response time is constant, regardless of the number of table entries, since the search uses a hash algorithm. The key of a hashed table must be unique, and you must specify UNIQUE in the table definition.
This table type is particularly suitable if you want mainly to use key access for table entries. You cannot access hashed tables using the index. When you use key access, the response time remains constant, regardless of the number of table entries. As with database tables, the key of a hashed table is always unique. Hashed tables are therefore a useful way of constructing and
using internal tables that are similar to database tables.
Index Tables
Index table is only used to specify the type of generic parameters in a FORM or FUNCTION. That means that you can't create a table of type INDEX.
Internal tables are not DB tables. Standard and Sorted tables in combined are basically called as Index tables and there nothing else. Here is the hierarchy
 ANY TABLE
 |
 | |
 Index Tables Hashed Table
 |
 | |
Standard Table Sorted Table
Reward points if it is usefull .....
Girish

Standard table data lost during adjustment

Dear experts,
Greetings.,
I was trying to make changes in a domain of an append structure of a standard table and while adjusting the table..i lost the data from the table (which was standard table). Any suggestion how to retrive it back?
Please help
Regards
Sathya

Hi,
Just check with your BASIS team if there is any backup. Usually they take the backup in production server. In dev and test they don't take unless it is required. If there is no backup, i dont think you can get back the data as table adjustment happens at database level and not at data dictionary level.
Thanks,
Vinod.

Table T2500, is standard?

Hi Experts,
Im working in BW and Im using in R/3 the table T2500 (view T25A) in order to identify the 'Product Family' (element: RKEG_WWFLI) wich will be transfer to BW.
I see that this table is not actualized, and I dont found any point at any program where the insert for new families take place.
Could somedoby tell me if this table is an standard table? (R/3 4.6c)
How must be actualizate this? Can I made manual input via sm30 or have this a risk? Where is using by SAP in R/3?
Thanks a lot!

closed

Need to create a Change document for tracking Purpose on standard table

Hi Experts,
I am updating a field in standard table so need to create a change document for tracking the changes being done on the field.
I created the change Document with transaction SCDO but I am stuck at point - How to call that in the report program to enable the change document.
Please advice.
Thanks!!

Hi
U can assign your transaction to Z-report like this:
PARAMETERS: TAB1 RADIOBUTTON GROUP R1 DEFAULT 'X',
 TAB2 RADIOBUTTON GROUP R1,
 TAB3 RADIOBUTTON GROUP R1.
DATA: TABNAME TYPE TABNAME.
START-OF-SELECTION.
CASE 'X'.
 WHEN TAB1. TABNAME = 'BSID'.
 WHEN TAB2. TABNAME = 'BSAD'.
 WHEN TAB3. TABNAME = 'BKPF'.
ENDCASE.
CALL FUNCTION 'RS_TABLE_LIST_CREATE'
 EXPORTING
 TABLE_NAME = TABNAME
* ACTION = 'ANZE'
* WITHOUT_SUBMIT = ' '
* GENERATION_FORCED =
* NEW_SEL =
* NO_STRUCTURE_CHECK = ' '
* DATA_EXIT = ' '
* IMPORTING
* PROGNAME =
* TABLES
* SELTAB =
 EXCEPTIONS
 TABLE_IS_STRUCTURE = 1
 TABLE_NOT_EXISTS = 2
 DB_NOT_EXISTS = 3
 NO_PERMISSION = 4
 NO_CHANGE_ALLOWED = 5
 OTHERS = 6
IF SY-SUBRC <> 0.
 MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.

Need SRM Standard Tables

Hi Gurus
Kindly provide me standard tables commonly used in SRM.
Thanks,
Ranjan

Hi Ranjan,
Check these links for tables used in SRM-
List Of Tables for Purchase order in SRM
SRM Tables for Attributes
Regards,
Sujit

Dynamic value help for a table field to fill two fields, how to?

Hi all gurus,
In SRM 7 I defined a dynamic value help for a single field (ZZ_PROLE_R3) of my header custom table.
That's the code from WDDOMODIFYVIEW in the webdynpro /SAPSRM/WDC_DODC_CT, view V_DODC_CT:
DATA: lo_tabnode        TYPE REF TO IF_WD_CONTEXT_NODE.
      DATA: lo_tabnode_info   TYPE REF TO IF_WD_CONTEXT_NODE_INFO.
      DATA: tab_value         TYPE WDR_CONTEXT_ATTR_VALUE_LIST,
            wa_value          TYPE WDR_CONTEXT_ATTR_VALUE.
      lo_tabnode = wd_context->GET_CHILD_NODE( name = 'THCUS' ). "the custom table node
      lo_tabnode_info = lo_tabnode->get_node_info( ).
      wd_this->GET_VALHELP_ZZ_PROLE_R3( EXPORTING iv_guid = lv_guid
                                        IMPORTING ZZ_PROLE_R3_VALHELP = tab_value ). "this method returns the dyn value table
      lo_tabnode_info->set_attribute_value_set( name = 'ZZ_PROLE_R3'
                                                 value_set = tab_value ).
The method GET_VALHELP_ZZ_PROLE_R3 dynamically builds the value help table tab_value; such table is made up by two fields:
value : contains the value of the field
text   : contains a description of the value
The above solution works; now I'd like to enhance it. The custom table THCUS contains also a field called ZZ_PROLE_R3_DESC, which represents the description of ZZ_PROLE_R3. It is, exactly, the TEXT field in tab_value.
So I'd like to do as follows:
- the user clicks on the search help for ZZ_PROLE_R3 field of the table;
- the above described value help appears;
- after the selection, both ZZ_PROLE_R3 and ZZ_PROLE_R3_DESC are filled with the selected couple value - text chosen from the value help.
Could anyone help me achieving such a behaviour?
Again, a little request... when I open the above value help dialog box, the window itself has a label "Floorplan Manager application for OIF.." that obviously I'd like to redefine (e.g. "Role selection value help"). Is there any way to do that?
Thanks in advance

Chris Paine wrote:
It seems to me - given that your code is in wddomodifyview that you are trying to have different dropdowns per row
- I'm not sure where you are populating lv_guid - but I'd guess it is an attribute of the row selected? If it isn't then I can't see any reason that you would do this code in wddomodifyview and not wddoinit.
Hi Chris and thanks for your help,
lv_guid is the GUID of the document's header; I need to pass it to the method that populates my value help table because the values in it are derived from some fields on the document. (the situation actually is more complex; there's an RFC call on the backend for which the document is intended for to retrieve the data that populate the value help...).
I'm quite unexperienced on webdynpro and terminology; if dropdown menus are fixed selection option that appears on a field, I guess this is not my case. I did a pair of screenshot to provide an idea of what the solution by now is, and what "I would like to have":
[Pre-selection (F4 icon on the field in table)|http://imagebin.ca/view/npIsaqF.html]
[Value Help popup for the field ZZ_PROLE_R3|http://imagebin.ca/view/8fZUh3T.html]
[Result by now |http://imagebin.ca/view/3PaqdvE.html]
[Result I'd like to have.|http://imagebin.ca/view/dExR0J.html]
Chris Paine wrote:
However - by your comment on the "value help dialog box" I am guessing you are using an input field? If this is the case then I would strongly suggest that you change/enhance the structure of the context node THCUS (btw, better coding practise to refer to it as wd_this->wdctx_thcus when using the get child node construct) so that you refer to an actual SAP ddic search help, if you then associate in the structure the value and text fields then populating the text field should happen automatically. Also you'd have the nice side effect that your value help dialog would be named after the associated ddic search help.
Thanks for the code suggestion, I'll apply that. For what concerns the context node THCUS... It is, by standard, a node which I can't explictly find in the context for the view V_DODC_CT. The problem is that ZZ_PROLE_R3 and the corresponding description field ZZ_PROLE_R3_DESC of the table must be filled with data retrieved dynamically @ runtime from the backend. So I guess I can't populate a val help referring to a dictionary table/field; I'd rather do as follows:
- retrieve what's the target backend for the document (to do so, I have to process the document .. that's why the header guid passed to my method);
- RFC call to a custom method that extracts possible values for the specific backend;
- bind the ammissible values to the value help.
Chris Paine wrote:
I realise that this is rather a lot - so if you have any specific question please do respond - hopefully I or someone else will be able to clarify.
Thanks again for your help; additional info as well as code examples would be highly appreciated

Dynamic record deletion from database table

Hi,
I need to delete selected records from database table(dynamic names). Table names are being passed from main program with some of their field names. The record to be deleted from the database table is being decided based on the fields passed for the table and their contains passed from the main program.
It is not possible to write dynamic where clause for DELETE statement directly.
So, I created a dynamic internal table and i am trying to fetch all records using SELECT statement(for which we can write dynamic where condition, something like...SELECT...WHERE (itab). ) which need to be deleted in the iternal table.
Piece of code :
 CONCATENATE c_im v_tablefield1 INTO v_imprtfield1.
 CONCATENATE v_tablefield1 c_in v_imprtfield1
 into s_condition separated by space.
 APPEND s_condition TO t_condition.
 PERFORM GET_DYNAMIC_ITAB USING s_flds_agtab-tabname
 changing t_itab.
 ASSIGN t_itab->* TO <itab>.
*Select the data (to be deleted) from the database table
 SELECT * FROM (s_flds_agtab-tabname) INTO TABLE <itab>
 WHERE (t_condition).
*Delete the records from the table
 IF SY-SUBRC = 0.
 DELETE (s_flds_agtab-tabname) FROM TABLE <itab>.
 ENDIF.
Here t_condition is of standard table of WHERETXT.
t_condition at the run time before giving dump was:
SPART IN IM_SPART
AND KUNNR IN IM_KUNNR
Here IM_SPART is renge type of SPART and IM_KUNNR is renge of KUNNR.
I am getting a DUMP:
The WHERE condition has an unexpected format.
Error analysis
The current ABAP/4 program attempted to execute an ABAP/4 Open SQL
statement containing a WHERE condition of the form WHERE (itab) or
WHERE ... AND (itab). The part of the WHERE condition specified at
runtime in the internal table itab contains the operator
 IN (v1, ..., vn)
in incomplete form.
How to correct the error
If the error occurred in a non-modified SAP program, you may be
able to find a solution in the SAP note system.
If you have access to the note system yourself, use the following
search criteria:
"SAPSQL_IN_ILLEGAL_LIST"
"SAPLZSD_TAB_REFRESH " or "LZSD_TAB_REFRESHU01 "
"Z_SD_REFRESH_AGTABLES"
If you cannot solve the problem yourself, please send the
following documents to SAP:
I would like to know whether "IN" operator is allowed in (itab) of WHERE clause. While testing I changed the "IN" to "=" specifying a suitable value there. It worked. So please let me know if i can give "IN" operator using renge table in the dynamic where clause.
Thanking you,
Surya

Hi again, so if you can not use the IN in a dynamic where clause you might be forced to dynamically build the entire select statement, Here is a sample program which may give you some ideas, notice that we are writing the select statement code, putting it in another program and generating the subroutine at runtime, then call this routine. I'm sure that this will help you see what you need to do.
report zrich_0003 .
tables: kna1.
types: t_source(72).
data: routine(32) value 'DYNAMIC_SELECT',
 program(8),
 message(128),
 line type i.
data: isource type table of t_source,
 xsource type t_source.
ranges:
 r_kunnr for kna1-kunnr.
data: ikna1 type table of kna1.
data: xkna1 type kna1.
r_kunnr-sign = 'I'.
r_kunnr-option = 'EQ'.
r_kunnr-low = '0001000500'.
append r_kunnr.
xsource = 'REPORT ZTEMP.'.
insert xsource into isource index 1.
xsource = 'FORM dynamic_select'.
insert xsource into isource index 2.
xsource = 'Tables r_kunnr ikna1.'.
append xsource to isource.
xsource = 'select * into table ikna1 from kna1'.
append xsource to isource.
xsource = 'where kunnr in r_kunnr.'.
append xsource to isource.
xsource = 'ENDFORM.'.
append xsource to isource.
generate subroutine pool isource name program
 message message
 line line.
if sy-subrc = 0.
perform (routine) in program (program) tables r_kunnr
 ikna1.
else.
write:/ message.
endif.
loop at ikna1 into xkna1.
write:/ xkna1-kunnr.
endloop.
Regards,
Rich Heilman

Need Dynamic Table instead of Standard Table in FM INFO_SICHERN_S001

Similar Messages

Maybe you are looking for