Date operations with internal table

Dear friends
           would you like to tell me. how i determine the most recent date and time from internal table i am not supposed to sort the table by date and time... I must check date and time with other records date and time to determine which record is most recently changed...
here the scenario is.
id       idnumber chdate      chtime
1        123456    20060606    135312
2        123456    20060606    135900
3        123456    20060606    132300
4        123457    20060606    140000
5        123457    20060606    142500
in the above scenario i must keep in my mind that the most recently changed record is identical to its idnumber i can say that:
the record should be fetched this way
id       idnumber chdate      chtime
3        123456    20060606    132300
5        123457    20060606    142500
because here the id 3 is the most recently changed in the idnumber 123456
where id 5 is the most recently changed in the idnumber 123457
please help me to determin how i am supposed to carry out this task any suggestion, code will be great help of mine.
regards
Naim

Hi Naim,
For example if ur select statement is like this..
 select id idnumber chdate chtime from xtable into table itab where ...<condn>..
 sort itab by idnumber chdate chtime descending.
 delete adjacent duplicates from itab comparing idnumber .
 Code like above statement..
 You can get result...
id idnumber chdate chtime
3 123456 20060606 132300
5 123457 20060606 142500
Reward the points if it helps.

Similar Messages

Date sorting in internal table

Dear Friends
 I wish to know how i perform the date operations in internal table... I am looking for the most recent record from the internal table for that i am supposed to look at chdate and chtime fields gives me the information on most corrently changed record... if in the case of the record which is there but not changed to determin the its most currentness i must look at the crdate and crtime..so i have the code for that which works perfectly nice without the crdate and crtime... if i insert the crdate and crtime it gives me the only those records which are most currently chnaged according to chdate and chtime...would you like to help me in this regards, I am giving you the code here.. any suggestion or changes will be great help of mine... thanking you,,,,
regards naim... the code:
TYPES: BEGIN OF itab_type,
 id TYPE i,
 idnumber TYPE i,
 chdate LIKE sy-datum,
 chtime LIKE sy-uzeit,
 crdate LIKE sy-datum,
 crtime LIKE sy-uzeit.
TYPES: END OF itab_type.
DATA: itab TYPE TABLE OF itab_type WITH HEADER LINE,
 itab_new TYPE TABLE OF itab_type WITH HEADER LINE,
 prev_rec TYPE itab_type.
DATA: v_id TYPE i.
START-OF-SELECTION.
itab-id = 1.
itab-idnumber = 123456.
itab-chdate = '20060606'.
itab-chtime = '135312'.
itab-crdate = '00000000'.
itab-crtime = '000000'.
APPEND itab. CLEAR itab.
itab-id = 2.
itab-idnumber = 123456.
itab-chdate = '20060606'.
itab-chtime = '135900'.
itab-crdate = '00000000'.
itab-crtime = '000000'.
APPEND itab. CLEAR itab.
itab-id = 3.
itab-idnumber = 123456.
itab-chdate = '00000000'.
itab-chtime = '000000'.
itab-crtime = '20060622'.
itab-crdate = '125412'.
APPEND itab. CLEAR itab.
itab-id = 4.
itab-idnumber = 123457.
itab-chdate = '20060606'.
itab-chtime = '140000'.
itab-crdate = '00000000'.
itab-crtime = '000000'.
APPEND itab. CLEAR itab.
itab-id = 5.
itab-idnumber = 123457.
itab-chdate = '20060606'.
itab-chtime = '142500'.
itab-crdate = '00000000'.
itab-crtime = '000000'.
APPEND itab. CLEAR itab.
itab-id = 6.
itab-idnumber = 123457.
itab-chdate = '20060606'.
itab-chtime = '135312'.
itab-crdate = '00000000'.
itab-crtime = '000000'.
APPEND itab. CLEAR itab.
itab-id = 7.
itab-idnumber = 123457.
itab-chdate = '00000000'.
itab-chtime = '000000'.
itab-crdate = '20060601'.
itab-crtime = '150000'.
APPEND itab. CLEAR itab.
itab_new[] = itab[].
SORT itab_new BY idnumber ASCENDING
 chdate DESCENDING
 chtime DESCENDING
 crdate Descending
 crtime Descending.
DELETE ADJACENT DUPLICATES FROM itab_new COMPARING idnumber.
LOOP AT itab.
 WRITE:/ itab-id,
 itab-idnumber,
 itab-chdate,
 itab-chtime,
 itab-crdate,
 itab-crtime.
ENDLOOP.
skip 5.
write: '_______________________________________________________________________________________'.
LOOP AT itab_new.
 WRITE:/ itab_new-id,
 itab_new-idnumber,
 itab_new-chdate,
 itab_new-chtime,
 itab_new-crdate,
 itab_new-crtime.
ENDLOOP.

Hi,
i modifed your code now see...,Copy paste and see...
REPORT ZTESTT .
TYPES: BEGIN OF itab_type,
id TYPE i,
idnumber TYPE i,
chdate LIKE sy-datum,
chtime LIKE sy-uzeit,
crdate LIKE sy-datum,
crtime LIKE sy-uzeit.
TYPES: END OF itab_type.
DATA: itab TYPE TABLE OF itab_type WITH HEADER LINE,
itab_new TYPE TABLE OF itab_type WITH HEADER LINE,
prev_rec TYPE itab_type.
DATA: v_id TYPE i.
START-OF-SELECTION.
itab-id = 1.
itab-idnumber = 123456.
itab-chdate = '20060606'.
itab-chtime = '135312'.
itab-crdate = '00000000'.
itab-crtime = '000000'.
APPEND itab. CLEAR itab.
itab-id = 2.
itab-idnumber = 123456.
itab-chdate = '20060606'.
itab-chtime = '135900'.
itab-crdate = '00000000'.
itab-crtime = '000000'.
APPEND itab. CLEAR itab.
itab-id = 3.
itab-idnumber = 123456.
itab-chdate = '00000000'.
itab-chtime = '000000'.
itab-crdate = '20060622'. "here you intechanged the data
itab-crtime = '125412'.
APPEND itab. CLEAR itab.
itab-id = 4.
itab-idnumber = 123457.
itab-chdate = '20060606'.
itab-chtime = '140000'.
itab-crdate = '00000000'.
itab-crtime = '000000'.
APPEND itab. CLEAR itab.
itab-id = 5.
itab-idnumber = 123457.
itab-chdate = '20060606'.
itab-chtime = '142500'.
itab-crdate = '00000000'.
itab-crtime = '000000'.
APPEND itab. CLEAR itab.
itab-id = 6.
itab-idnumber = 123457.
itab-chdate = '20060606'.
itab-chtime = '135312'.
itab-crdate = '00000000'.
itab-crtime = '000000'.
APPEND itab. CLEAR itab.
itab-id = 7.
itab-idnumber = 123457.
itab-chdate = '00000000'.
itab-chtime = '000000'.
itab-crdate = '20060601'.
itab-crtime = '150000'.
APPEND itab. CLEAR itab.
itab_new[] = itab[].
SORT itab_new BY
idnumber
*chdate DESCENDING
*chtime DESCENDING
crdate Descending
crtime Descending.
DELETE ADJACENT DUPLICATES FROM itab_new COMPARING idnumber crdate
crtime.
*DELETE ADJACENT DUPLICATES FROM itab_new COMPARING idnumber.
LOOP AT itab.
WRITE:/ itab-id,
itab-idnumber,
itab-chdate,
itab-chtime,
itab-crdate,
itab-crtime.
ENDLOOP.
skip 5.
LOOP AT itab_new.
WRITE:/ itab_new-id,
itab_new-idnumber,
itab_new-chdate,
itab_new-chtime,
itab_new-crdate,
itab_new-crtime.
ENDLOOP.
Regards
vijay

Finding duplicates:Minus set operator in dealing with internal tables

Dear experts,
I am newbie to ABAP developement,i have been given an assignment to find the duplicate list of vendors in lfa table.
Now duplicate list doesnot means that text tokens will be just exact to conclude them as duplicate ,it could also be like
1111 Vendor ABC
1222 ABC Vendor
If anybody has clue ,how to work on such a problem ,plz come forward.
Right now i just tried initially how to find exact duplicates,i found on change command,it do works.
Then i am trying a new way which should just do the same thing.
I did as per this algorithm
1.Compute wholesome list in one internal table itab1
2.Used delete adjacent duplicates in itab2.
3.I feel itab3=itab1-itab2 will contain all duplicates in itab3.
Can anyone give me a hint.How can i do A-B ?.

Hi Arul,
There is no special aided SET operations upon internal tables in ABAP. Concerning your particular task I would say that you can try INSERT statement for each record in your internal table without preliminary comparing them with DB table. If there is a record in DB table with the same key then sy-subrc after INSERT will be non zero (actually 4) and no real insert would occur. So, only those records would be inserted which have no counterpart in DB table.
Best regards, Sergei

Passing data to different internal tables with different columns from a comma delimited file

Hi,
I have a program wherein we upload a comma delimited file and based on the region( we have drop down in the selection screen to pick the region). Based on the region, the data from the file is passed to internal table. For region A, we have 10 columns and for region B we have 9 columns.
There is a split statement (split at comma) used to break the data into different columns.
I need to add hard error messages if the no. of columns in the uploaded file are incorrect. For example, if the uploaded file is of type region A, then the uploaded file should be split into 10 columns. If the file contains lesser or more columns thenan error message should be added. Similar is the case with region B.
I do not want to remove the existing split statement(existing code). Is there a way I can exactly pass the data into the internal table accurately? I have gone through some posts where in they have made use of the method cl_alv_table_create=>create_dynamic_table by passing the field catalog. But I cannot use this as I have two different internal tables to be populated based on the region. Appreciate help on this.
Thanks,
Pavan

Hi Abhishek,
I have no issues with the rows. I have a file with format like a1,b1,c1,d1,e1, the file should be uploaded and split at comma. So far its fine. After this, if the file is related to region A say Asia, then it should have 5 fields( as an example). So, all the 5 values a1,b1..e1 will be passed to 5 fields of itab1.
I also have region B( say Europe) whose file will have only 4 fields. So, file is of the form a2,b2,c2,d2. Again data is split at comma and passed to itab2.
If some one loads file related to Asia and the file has only 4 fields then the data would be incorrect. Similar is the case when someone tries to load Europe file with 5 fields related data. To avoid this, I want to validate the data uploaded. For this, I want to count the no. of fields (seperated by comma). If no. of fields is 5 then the file is related to Asia or if no. of fields is 4 then it is Europe file.
Well, the no. of commas is nothing but no. of fields - 1. If the file is of the form a1,b1..e1 then I can say like if no. of commas = 4 then it is File Asia.But I am not sure how to write a code for this.Please advise.
Thanks,
Pavan

Filling dynamic internal table with data from other internal table

Hi Friends,
My problem is that i have already built a dynamic internal table
(class int_table->create) but now i want to fill it with data from other internal table.
The dynamic table column name and the field value of the data filled internal table are same, but how to access that column name, since i cant hard code it anyway.
Like if my werks field value is '8001'. I want to place it under the column 8001 of dynamic table, Can anybody help me in this regard?
Awarding points is not a problem for even giving a slight hint.
Best Regards

Hi
See this
Dynamic internal table is internal table that we create on the fly with flexible column numbers.
For sample code, please look at this code tutorial. Hopefully it can help you
Check this link:
http://www.****************/Tutorials/ABAP/DynamicInternaltable/DynamicInternalTable.htm
Sample code:
DATA: l_cnt(2) TYPE n,
l_cnt1(3) TYPE n,
l_nam(12),
l_con(18) TYPE c,
l_con1(18) TYPE c,
lf_mat TYPE matnr.
SORT it_bom_expl BY bom_comp bom_mat level.
CLEAR: l_cnt1, <fs_dyn_wa>.
Looping the component internal table
LOOP AT it_bom_expl INTO gf_it_bom_expl.
CLEAR: l_cnt1.
AT NEW bom_comp.
CLEAR: l_cnt, <fs_dyn_wa>, lf_mat.
For every new bom component the material data is moved to
temp material table which will be used for assigning the levels
checking the count
it_mat_temp[] = it_mat[].
Component data is been assigned to the field symbol which is checked
against the field of dynamic internal table and the value of the
component number is been passed to the dynamic internal table field
value.
ASSIGN COMPONENT c_comp_list OF STRUCTURE <fs_dyn_wa> TO
<fs_check>.
<fs_check> = gf_it_bom_expl-bom_comp.
ENDAT.
AT NEW bom_mat.
CLEAR l_con.
ENDAT.
lf_mat = gf_it_bom_expl-bom_mat.
Looping the temp internal table and looping the dynamic internal table
*by reading line by line into workarea, the materialxxn is been assigned
to field symbol which will be checked and used.
LOOP AT it_mat_temp.
l_nam = c_mat.
l_cnt1 = l_cnt1 + 1.
CONCATENATE l_nam l_cnt1 INTO l_nam.
LOOP AT <fs_dyn_table2> ASSIGNING <fs_dyn_wa2>.
ASSIGN COMPONENT l_nam OF STRUCTURE <fs_dyn_wa2> TO <fs_xy>.
ENDLOOP.
IF <fs_xy> = lf_mat.
CLEAR lf_mat.
l_con1 = l_con.
ENDIF.
Checking whether the material exists for a component and if so it is
been assigned to the field symbol which is checked against the field
of dynamic internal table and the level of the component number
against material is been passed to the dynamic internal table field
value.
IF <fs_xy> = gf_it_bom_expl-bom_mat.
ASSIGN COMPONENT l_nam OF STRUCTURE <fs_dyn_wa> TO <fs_check>.
CLEAR l_con.
MOVE gf_it_bom_expl-level TO l_con.
CONCATENATE c_val_l l_con INTO l_con.
CONDENSE l_con NO-GAPS.
IF l_con1 NE space.
CONCATENATE l_con1 l_con INTO l_con SEPARATED BY c_comma.
CLEAR l_con1.
l_cnt = l_cnt - 1.
ENDIF.
<fs_check> = l_con.
l_cnt = l_cnt + 1.
ENDIF.
ENDLOOP.
AT END OF bom_comp.
At end of every new bom component the count is moved to the field
symbol which is checked against the field of dynamic internal table
and the count is been passed to the dynamic internal table field
value.
ASSIGN COMPONENT c_count OF STRUCTURE <fs_dyn_wa> TO <fs_check>.
<fs_check> = l_cnt.
INSERT <fs_dyn_wa> INTO TABLE <fs_dyn_table>.
ENDAT.
ENDLOOP.
Reward if useful
Anji

Validate the data in the internal table with the date in selection screen

Hi all,
I want to validate the data in the internal table and get only the records with the input date in the selection screen.
The date is in the select options and please let me know how to get the records only if it satisfies the input date in the selection screen.
Regards,
Shalem

For Ex.
SELECT-OPTIONS: S_DATE FOR VBAK-VDATU
If you want to read one INTERNAL TABLE record
READ TABLE it_tab(internal table name) WHERE vdatu(date field name in the internal table) = s_date
If you want to move more then one
LOOP AT it_tab WHERE vdatu = s_date.
Take the field values in another table and append it. then end loop.
you will get the records which only have the date in select option..
If you want detail code give me internal table name and select option name i will write you the code.
regards
Yuvaram

Upload data to an internal table with Services of the Table Tool

Hi,
I'm trying to upload data to an internal table with the table with the new abap debugger but I can see the option in Services of the Table Tool. I see the information in this sap link and also I saw some screen shot in other pages.
http://help.sap.com/saphelp_nw70ehp2/helpdata/en/49/2db60934e414d0e10000000a42189b/content.htm
Is this option depends the SAP version or the patch version or I need to configure the debugger?

Hi,
I used the statement
SPLIT i_file AT '|' INTO TABLE It_file.
But it is overwriting each row but not appending to the internal table while passing do and enddo.
Actually my requirement is download the pipe delimited text file and sent an XLS attachment to the
distribution mail id's.
I know sending the mails by using the FM.
But I need all data from the file line by line and pass to the Mail sending function module.
Can you help me in acheiving this.
Regards
Jay

Moving the data from multiple internal tables into a single one

Hello everyone,
I am creating a classical report which uses the following tables.
tables : ekko, ekpo, mara, makt,lfa1.
my input parameter is
Select-options Purchase Order number
Following fields are getting used.
Doc no                  EKKO-EBELN
Material              EKPO-MATNR
Item number          EKPO-EBELP
Quantity             EKPO-MENGE
Material Group          MARA-MATKL
Vendor                  EKKO-LIFNR
Old Material code   MARA-BISMT
Material Desc.           MAKT-MAKTX
Vendor name         LFA1-NAME1
Now i need to do the following task.
1 Select record from EKKO Using document number.
2 Select record from EKPO using EKKO record using Document no as key.
3 Find out Old Material code of each and every material from Material master.
4 Find out Material description for each and every material from MAKT.
5 Sort record on Vendor, Purchase Order number and Material.
I have defined seperate internal tables for these operation.
Once i have fetched records into these individual internal tables from the corresponding DB tables i need to move these values into a new internal tables which has all the above fields mentioned
I need to move these values into a new internal table because to display the values on the report.
Any idea for the above ? Plz help with a sample example or some relevant.
Regards,
Ranjith Nambiar

Hi
1 Select record from EKKO Using document number.
2 Select record from EKPO using EKKO record using Document no as key.
Use inner join and retrive data into one internal table.for Ex ITAB1
3 Find out Old Material code of each and every material from Material master.
Use ITAB1 with for allentries in MARA table to get the onl materil number populate in to one table.
4 Find out Material description for each and every material from MAKT.
Get the Material desc with the same manner as above,
5 Sort record on Vendor, Purchase Order number and Material.
now sort the ITAB1 as you req.
now Loop on the ITAB1.
and read above 2 tables for old matnr and matner deac and append into another table as you want.
Hope this will help.
Regards,
Hiren Patel

Xml data to abap internal table

I'm presently working on a interface where data in abap internal table is converted into xml format and placed in the frontend and vice versa.
I'm through with the first part and in secodn part also I'm able to transfer the data from frontend to Document Object Model(DOM) by parsing but finally am not able to put it into an internal table.
Please help (Urgent).
Thanks and regards,
S.K.Tripathy

Hi sitakant,
1. itab --- > xml
   xml ---> itab.
2. This program will do both.
   (just copy paste in new program)
3.
REPORT abc.
DATA
DATA : t001 LIKE TABLE OF t001 WITH HEADER LINE.
DATA : BEGIN OF itab OCCURS 0,
a(100) TYPE c,
END OF itab.
DATA: xml_out TYPE string .
DATA : BEGIN OF upl OCCURS 0,
       f(255) TYPE c,
       END OF upl.
DATA: xmlupl TYPE string .
FIRST PHASE
FIRST PHASE
FIRST PHASE
Fetch Data
SELECT * FROM t001 INTO TABLE t001.
XML
CALL TRANSFORMATION ('ID')
SOURCE tab = t001[]
RESULT XML xml_out.
Convert to TABLE
CALL FUNCTION 'HR_EFI_CONVERT_STRING_TO_TABLE'
EXPORTING
    i_string         = xml_out
    i_tabline_length = 100
TABLES
    et_table         = itab.
Download
CALL FUNCTION 'GUI_DOWNLOAD'
EXPORTING
    filetype = 'BIN'
    filename = 'd:\xx.xml'
TABLES
    data_tab = itab.
SECOND PHASE
SECOND PHASE
SECOND PHASE
BREAK-POINT.
REFRESH t001.
CLEAR t001.
CALL FUNCTION 'GUI_UPLOAD'
EXPORTING
    filename = 'D:\XX.XML'
    filetype = 'BIN'
TABLES
    data_tab = upl.
LOOP AT upl.
CONCATENATE xmlupl upl-f INTO xmlupl.
ENDLOOP.
XML
CALL TRANSFORMATION ('ID')
SOURCE XML xmlupl
RESULT tab = t001[]
BREAK-POINT.
regards,
amit m.

Populate data in dynamic internal table

Hi ppl,
I have a requirement where I need to display certain fields in the report output.
The output contains 8 fixed fields (common for all rows in output) and some dynamic fields (number of column varies with rows) which will be determined at runtime.
I am able to create the dunamic internal table....and at runtime I see the fields created in the internal table correctly.
Now my requirement is to fill this table with the data from 2 internal tables.
The values for the 8 common fields comes from the internal table t_output and the values for dynamic fields come from t_dynamic.
Please let me know the logic to merge these 2 internal tables into the dynamic internal table <dyn_table>.
Regards.

Hello David,
This has been discussed many times before in this forum. Since the table structure is dynamic the fields are determined at runtime.
To assign data to this table you have to use [ASSIGN COMPONENT ... |http://help.sap.com/abapdocu_70/en/ABAPASSIGN_MEM_AREA_DYNAMIC_DOBJ.htm#!ABAP_ALTERNATIVE_4@4@] variant.
Please refer to the example provided in the documentation for details.
BR,
Suhas

How to populate data into Dynamic Internal Table.

Hi Experts,
I had created one Dynamic Internal table and one static internal table.I want to move data from Static Internal table to Dynamic interal table.And aslo the number of coloum of these two tables are not same.
So please help me for solving this issue.
Thanks,
Seema.

Hi,
Check out this sample program for dynamictable report.
REPORT YMS_DYNAMICDEMO
 NO STANDARD PAGE HEADING
 MESSAGE-ID zcs_c2c_001.
type-pools : abap.
field-symbols: <dyn_table> type standard table,
 <dyn_wa>,
 <dyn_field>.
data: dy_table type ref to data,
 dy_line type ref to data,
 xfc type lvc_s_fcat,
 ifc type lvc_t_fcat.
selection-screen begin of block b1 with frame.
parameters: p_table(30) type c default 'T001'.
selection-screen end of block b1.
start-of-selection.
perform get_structure.
perform create_dynamic_itab.
perform get_data.
perform write_out.
form get_structure.
data : idetails type abap_compdescr_tab,
 xdetails type abap_compdescr.
data : ref_table_des type ref to cl_abap_structdescr.
Get the structure of the table.
ref_table_des ?=
 cl_abap_typedescr=>describe_by_name( p_table ).
idetails[] = ref_table_des->components[].
loop at idetails into xdetails.
 clear xfc.
 xfc-fieldname = xdetails-name .
 xfc-datatype = xdetails-type_kind.
 xfc-intlen = xdetails-length.
 xfc-decimals = xdetails-decimals.
 append xfc to ifc.
endloop.
endform.
form create_dynamic_itab.
Create dynamic internal table and assign to FS
call method cl_alv_table_create=>create_dynamic_table
 exporting
 it_fieldcatalog = ifc
 importing
 ep_table = dy_table.
assign dy_table->* to <dyn_table>.
Create dynamic work area and assign to FS
create data dy_line like line of <dyn_table>.
assign dy_line->* to <dyn_wa>.
endform.
form get_data.
Select Data from table.
select * into table <dyn_table>
 from (p_table).
endform.
form write_out.
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.
endform.
Thanks,
Shankar

How to copy data from one internal table to another

i am using some function module to get some data for my function module
and the retrieved data is not getting populated in mu fumctional module
i am sucessful in getting the data to an internal table in my function module but dont know how to pass it to my table parameter
thanks in advance

Hi Naval,
Declare an internal table of type table parameter structure and pass it the table parameters of the Function module.
Check the code for this function module.
DATA IT_MARA LIKE MARA OCCURS 0 WITH HEADER LINE.
SELECT * FROM MARA UP TO 10 ROWS INTO TABLE IT_MARA.
CALL FUNCTION 'GUI_DOWNLOAD'
 EXPORTING
 FILENAME = 'C:\TEST.TXT'. FILETYPE = 'ASC'
 WRITE_FIELD_SEPARATOR = 'X'
 TABLES
 DATA_TAB = IT_MARA
 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.
Thanks,
Vinay

How to download data from an internal table to a text

Hi All,
I want to download data from an internal table to a text file.
The fields should be pipe(|) separated. I have tried GUI_DOWNLOAD but it is not taking the field separator.
The sample of the desired data that i require should be this way:-
13456TR|M|COUP|MATERIAL|KGS
Thanks in advance.
Regards
Satish.

Hi,
Try this..
REPORT zc1download message-id zc1dwnmsg.
*& Declaration Section for the Tables *
TABLES: makt.
*& Declaration Section for the Internal Tables
DATA: intab TYPE TABLE OF makt,
 wa_intab LIKE LINE OF intab,
 no_of_rec TYPE i,
 count TYPE i.
DATA: BEGIN OF f_intab,
 str(255) TYPE c,
 END OF f_intab.
DATA: t_intab LIKE TABLE OF f_intab,
 w_intab LIKE LINE OF t_intab,
 temp(255) TYPE c.
FIELD-SYMBOLS: <f> TYPE ANY.
*& Selection ScreenSection for the file download
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
PARAMETERS: file TYPE rlgrap-filename MEMORY ID file,
 tab RADIOBUTTON GROUP rad1 DEFAULT 'X',
 others RADIOBUTTON GROUP rad1,
 delimit TYPE c.
SELECTION-SCREEN END OF BLOCK b1.
START-OF-SELECTION.
IF file IS INITIAL. " check to ensure file.
 MESSAGE i001.
 EXIT.
ENDIF.
IF others = 'X'. " check to ensure delimiter.
 IF delimit = ' '.
 MESSAGE i002.
 EXIT.
 ENDIF.
ENDIF.
SELECT * FROM makt INTO TABLE intab.
IF tab = 'X'. " default delimiter tab is used
 CALL FUNCTION 'WS_DOWNLOAD'
 EXPORTING
 filename = file
 filetype = 'DAT'
 mode = 'A'
 TABLES
 data_tab = intab
 EXCEPTIONS
 file_open_error = 1
 file_write_error = 2
 invalid_filesize = 3
 invalid_type = 4
 no_batch = 5
 unknown_error = 6
 invalid_table_width = 7
 gui_refuse_filetransfer = 8
 customer_error = 9
 no_authority = 10
 OTHERS = 11.
 IF sy-subrc <> 0.
 MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
 WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
 ENDIF.
ELSE. " If user defind delimiter is to be used
 Counts the number of fields *
 DO.
 ASSIGN COMPONENT sy-index OF STRUCTURE wa_intab TO <f>.
 IF sy-subrc <> 0.
 EXIT.
 ELSE.
 count = count + 1.
 ENDIF.
 ENDDO.
 LOOP AT intab INTO wa_intab.
 DO count TIMES. " Adding the delimiter in required places
 ASSIGN COMPONENT sy-index OF STRUCTURE wa_intab TO <f>.
 CONCATENATE temp delimit <f> INTO temp.
 ENDDO.
 SHIFT temp.
 APPEND temp TO t_intab.
 CLEAR temp.
 ENDLOOP.
 CALL FUNCTION 'WS_DOWNLOAD'
 EXPORTING
 filename = file
 filetype = 'ASC'
 mode = 'A'
 TABLES
 data_tab = t_intab
 EXCEPTIONS
 file_open_error = 1
 file_write_error = 2
 invalid_filesize = 3
 invalid_type = 4
 no_batch = 5
 unknown_error = 6
 invalid_table_width = 7
 gui_refuse_filetransfer = 8
 customer_error = 9
 no_authority = 10
 OTHERS = 11.
 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.
WRITE:/ 'The Data has been tranfered to :', file.
Cheers
Kathir!~

How to read data from an internal table into a real table?

Hello experts,
I'm relatively new to ABAP and I'm trying to figure out how to read data from an internal table into a table that I created. I'm trying to use the RRW3_GET_QUERY_VIEW_DATA function module to read data from a multiprovider. I'm trying to read data from the e_cell_data and e_axis_data tables into a table that I've already created. Please see code below.
TABLES MULTITAB.
DATA:
query_name TYPE RSZCOMPID,
s_cubename TYPE RSINFOPROV,
t_cell_data TYPE RRWS_T_CELL,
t_axis_data TYPE RRWS_THX_AXIS_DATA,
t_axis_info TYPE RRWS_THX_AXIS_INFO,
wa_t_cell_data like line of t_cell_data,
wa_t_axis_data like line of t_axis_data,
w_corp_tab like line of t_cell_data.
s_cubename = 'CORP_MPO1'.
query_name = 'Z_corp_test'.
 CALL FUNCTION 'RRW3_GET_QUERY_VIEW_DATA'
 EXPORTING
 i_infoprovider = s_cubename
 i_query = query_name
 i_t_parameter = query_string_tab
 IMPORTING
 e_cell_data = t_cell_data
 e_axis_data = t_axis_data
 e_axis_info = t_axis_info.
If anyone has any information to help me, I would greatly appreciate it. Thanks.

Hi,
<li>Once you call the function module RRW3_GET_QUERY_VIEW_DATA, lets say data is available in the corresponding tables e_cell_data e_axis_data which you have mentioned.
<li>Modify your internal table defined for other purpose, with data from e_cell_data e_axis_data like below.
LOOP AT t_cell_data INTO wa_t_cell_data.
"Get the required data from t_cell_data.
MOVE-CORRESPONDING wa_t_cell_data TO it_ur_tab.
"Modify your internal table wih data
MODIFY it_ur_tab TRANSPORTING <field1> <field2> <field3>.
ENDLOOP.
LOOP AT t_axis_data INTO wa_t_axis_data.
"Get the required data from t_cell_data.
MOVE-CORRESPONDING wa_t_axis_data TO it_ur_tab.
"Modify your internal table wih data
MODIFY it_ur_tab TRANSPORTING <field1> <field2> <field3>.
ENDLOOP.
Thanks
Venkat.O

How to select data from an internal table

material                          norm                    date last modified
B2-SP HEAT                 50.000               20090420
BF COKE                                 575.000               20090419
GROSS COKE                 200.000               20090419
B2-SP HEAT                 100.000               20090419
TWT                                 33.000               20090330
B7-SP HEAT                 2.000               20090310
B1-SP HEAT                 1.000               20090309
B7-SP HEAT                 615.000               20090308
B2-SP HEAT                 585.000               20090308
B1-SP HEAT                 100.000               20090308
B3-SP HEAT                 610.000               20090308
BF COKE                                 68.500               20090308
GROSS COKE                 72.600               20090308
B8-SP HEAT                 600.000               20090308
B9-SP HEAT                 625.000               20090308
BX-SP HEAT                 615.000               20090308
B9-SP HEAT                 58.000               20090307
B1-SP HEAT                 100.000               20090307
B6-SP HEAT                 350.000               20090306
B2-SP HEAT                 888.000               20090306
Like above there r numerous data in a table :
how will i select data into another internal table where material above is not repeated with latest modified date.please help.

Hi Sonu,
The main task is to move the contents of the one internal table to another with some condition.
First sort and delete the duplicate entries from the First Internal table like below :
sort it_tab by material ascending date_modified descending.
delete adjacent duplicates from it_tab.
Then move that Internal table contents to another internal table.
Define another internal table with the same structure as you have first internal table and then
Second Step :
it_itab1 = it_itab.
If you are using seperate Header line and Body then you can do like below :
       it_itab1[] = it_itab[].
This will fix the issue.
Please let me know if you need any further explonation.
Regards,
Kittu
Edited by: Kittu on Apr 24, 2009 12:21 PM

Date operations with internal table

Similar Messages

Maybe you are looking for