How to Down load Data in Application server into the Internal Table

hi freinds,
iam having a file in the application server.
now i need to send the data in the file to the internal table.
is there any Function Module?
i need with out using the OPEN DATA SET and CLOSE DATA SET Keywords.
is there any possible?
Regard's,
Ranjith.

Hi,
There is no other option for uploading the data from the application server to the internal table without using OPEN DATASET and CLOSE DATASET. Even if you find the FM internal logic in FM uses these keywords to read the data from Application server.

Similar Messages

Down load data to Application Server

Hi Experts,
Can you please confirm me on the follwoing ?
1. IS it possible to download data from internal table (SAP) to Application Server(Not Presentaion Server) in XML Format ? If yes how .
2. If i am downloading millions of records from SAP to Application Server, If power failure happen in the middle, is it possible to Catch last downloaded record ? If yes how.
Experts it is very urgent.
Thanks in Advance,
Murali Krishna K

Hi again,
1. For converting to XML
   we need to use CALL TRANSFORMATION
2. below is the program
   for converting (just copy paste in new program)
   It will also save the data to presenetaion server.
   U can utilise the new generated xml table
   to store it in app server.
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.

How to upload a file in application server to an internal table

Hi,
      I am asked to upload a file from application server to internal table. Can you please suggest me the ways to do it or the function module which helps to browse the application server file names.
I have done a program. But its giving problem in searching the files from application server. I am pasting my code for ur review. Please tell me which part i have to correct or suggest me some other ways to do it.
*& Report ZUPLOAD1
REPORT ZUPLOAD1.
type-pools: truxs.
parameters: p_upl_ps radiobutton group g1 default 'X', "upload from pres. server
             p_path type rlgrap-filename,
             p_upl_as radiobutton group g1,   "upload from appln server
             <b>p_dir LIKE filepath-pathintern DEFAULT 'Y_ABAP',
             p_file LIKE filepath-pathintern lower case,</b>
             p_test as checkbox.
constants: c_x value 'X',
           c_tab type c value cl_abap_char_utilities=>horizontal_tab.
types: ty_data(1000) type c.    "structure to hold legacy data
data: i_data type standard table of ty_data. "internal table of ty_data
types: begin of stritab,
      land1 type v_t604-land1, "structure of legacy file.
      stawn type v_t604-stawn,
      bemeh type v_t604-bemeh,
      impma type v_t604-impma,
      minol type v_t604-minol,
      end of stritab.
data: gi_itab type standard table of stritab, "internal table of legacy file
      gw_itab type stritab. "work area
data: i_raw type truxs_t_text_data,
      v_fullpath type string.
at selection-screen on value-request for p_path.
if p_upl_ps = c_x. "if presentation server is selected
perform get_file.
else.            "if application server is selected
perform set_file_path.
perform upload_from_server.
perform split_data.
endif.
form get_file.
CALL FUNCTION 'F4_FILENAME'
EXPORTING
PROGRAM_NAME        = SYST-CPROG
DYNPRO_NUMBER       = SYST-DYNNR
FIELD_NAME          = ' '
IMPORTING
   FILE_NAME           = p_path.     "getting the file name of pres server
CALL FUNCTION 'TEXT_CONVERT_XLS_TO_SAP'
EXPORTING
I_FIELD_SEPERATOR          =
    I_LINE_HEADER              = 'X'              "converting excel to sap and filling in
    I_TAB_RAW_DATA             = i_raw      "internal table
    I_FILENAME                 = p_path
TABLES
    I_TAB_CONVERTED_DATA       = gi_itab
EXCEPTIONS
   CONVERSION_FAILED          = 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.
form set_file_path.                 "Getting the file path of application server
data: lv_file type p_file.
      lv_file = p_file.
      CALL FUNCTION 'FILE_GET_NAME_USING_PATH'
        EXPORTING
        CLIENT                           = SY-MANDT
          LOGICAL_PATH                     = p_dir
        OPERATING_SYSTEM                 = SY-OPSYS
        PARAMETER_1                      = ' '
        PARAMETER_2                      = ' '
        PARAMETER_3                      = ' '
        USE_BUFFER                       = ' '
          FILE_NAME                        = lv_file
        USE_PRESENTATION_SERVER          = ' '
        ELEMINATE_BLANKS                 = 'X'
       IMPORTING
         FILE_NAME_WITH_PATH              = v_fullpath
       EXCEPTIONS
         PATH_NOT_FOUND                   = 1
         MISSING_PARAMETER                = 2
         OPERATING_SYSTEM_NOT_FOUND       = 3
         FILE_SYSTEM_NOT_FOUND            = 4
         OTHERS                           = 5
      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.
form upload_from_server.
data: lv_msg type string,
      lw_data type ty_data.
open dataset v_fullpath for input message lv_msg in text mode encoding default.
if sy-subrc <> 0.
message lv_msg type 'i'.
stop.
endif.
do.
read dataset v_fullpath into lw_data.
if sy-subrc <> 0.
write:/5 'Error in processign data set'.
exit.
endif.
append lw_data to i_data.
enddo.
close dataset v_fullpath.
if sy-subrc <> 0.
write: /5 'Error closing dataset'.
endif.
endform.
form split_data.
data: lw_data type ty_data.
data: lw_itab type stritab.
data: begin of ty_itab,
      land1 type v_t604-land1,
      stawn type v_t604-stawn,
      bemeh type v_t604-bemeh,
      impma type v_t604-impma,
      minol type v_t604-minol,
      end of ty_itab.
loop at i_data into lw_data.
split lw_data at c_tab into
      ty_itab-land1
      ty_itab-stawn
      ty_itab-bemeh
      ty_itab-impma
      ty_itab-minol.
lw_itab-land1 = ty_itab-land1.
lw_itab-stawn = ty_itab-stawn.
lw_itab-bemeh = ty_itab-bemeh.
lw_itab-impma = ty_itab-impma.
lw_itab-minol = ty_itab-minol.
append lw_itab to gi_itab.
endloop.
endform.
start-of-selection.
loop at gi_itab into gw_itab.
write: /5 'COUNTRY', 'IMPORT CODE', 'SUP UNIT', 'FIRST UOM', 'SECOND UOM',
       /5 gw_itab-land1, gw_itab-stawn,gw_itab-bemeh,gw_itab-impma,gw_itab-minol.
endloop.
end-of-selection.
I hope problem must be in p_dir and p_file which are in bold.. Kindly help me out. Thanks in advance.

see the following ex:
*&      Form SUB_GET_FILEPATH
      text
--> p1        text
<-- p2        text
FORM SUB_GET_FILEPATH .
    GFILE = 'D:\SAP_INT\INBOUND\INBOX'. "Path
ENDFORM.                    " SUB_GET_FILEPATH
*&      Form SUB_GET_FILE
      text
--> p1        text
<-- p2        text
FORM SUB_GET_FILE .
DATA: P_FDIR(200) TYPE C.
DATA: IT_FILEDIR1 TYPE STANDARD TABLE OF TY_FILEDIR WITH HEADER LINE.
P_FDIR = GFILE.
CALL FUNCTION 'RZL_READ_DIR_LOCAL'
    EXPORTING
      NAME     = P_FDIR
    TABLES
      FILE_TBL = IT_FILEDIR.
REFRESH : IT_FILEDIR1.
LOOP AT IT_FILEDIR.
    IF IT_FILEDIR-NAME(4) = 'ZINC' OR IT_FILEDIR-NAME(4) = 'zinc'.
      MOVE IT_FILEDIR-NAME TO IT_FILEDIR1-NAME.
      APPEND IT_FILEDIR1.
    ENDIF.
ENDLOOP.
IF IT_FILEDIR1[] IS INITIAL.
    STOP.
ENDIF.
LOOP AT IT_FILEDIR1.
    REFRESH: I_TAB.
    CLEAR: I_TAB.
    NAME = IT_FILEDIR1-NAME.
    CONCATENATE: GFILE '\' NAME INTO G_FILE.
    OPEN DATASET G_FILE FOR INPUT IN TEXT MODE
                                     ENCODING DEFAULT
                                     IGNORING CONVERSION ERRORS.
    IF SY-SUBRC EQ 0.
      CONCATENATE 'FILENAME : ' G_FILE INTO I_MSG1.
      APPEND I_MSG1.
      DO.
        READ DATASET G_FILE INTO RECORD.
        IF SY-SUBRC = 0.
          SPLIT RECORD AT ',' INTO I_TAB-BUKRS I_TAB-EBELN
              I_TAB-BLDAT I_TAB-XBLNR I_TAB-LIFNR I_TAB-AMOUNT
              I_TAB-CURR I_TAB-BUSAREA
              I_TAB-BKTXT I_TAB-DMBTR I_TAB-MENGE I_TAB-SRNO.
          MOVE-CORRESPONDING I_TAB TO I_TAB1.
        ELSE.
          EXIT.
        ENDIF.
        APPEND I_TAB1.
        CLEAR: I_TAB, I_TAB1.
      ENDDO.
    ENDIF.
    CLOSE DATASET G_FILE.

Error while loading data from application server

Hi all,
Am facing a problem while loading data from application server.
The error i get is ....
*" The argument ' Rental/Lease ' cannot be interpreted as a number while assigning character to application structure*.
'Rental/Lease' is a value for a character infoobject length 30. I checked for the sequence of fields in data source and the sequnce of values am receiving in application server and the sequence match.
when i copy these values into a CSV onto a desktop and load,load is successful.
Please let me know your views.
Thanks&Regards,
Praveen

It looks like the system is trying to convert Rental/Lease to a number format. Is the info object type CHAR or NUMC or ??? I would look there.
Also, make sure / is in RSKC.
Brian

Application Server file to internal table

Hi,
How can i read the application server file into the internal table?? Which FM should i use??
Regards,
Kit

Hi,
Open Dataset is used to read or write on to application server ... other than that i am not sure that there exists any way to do the same ... here is a short description for that
FILE HANDLING IN SAP
Introduction
Files on application server are sequential files.
Files on presentation server / workstation are local files.
A sequential file is also called a dataset.
Handling of Sequential file
Three steps are involved in sequential file handling
OPEN
PROCESS
CLOSE
Here processing of file can be READING a file or WRITING on to a file.
OPEN FILE
Before data can be processed, a file needs to be opened.
After processing file is closed.
Syntax:
OPEN DATASET <file name> FOR {OUTPUT/INPUT/APPENDING}
IN {TEXT/BINARY} MODE
This statement returns SY_SUBRC as 0 for successful opening of file or 8, if unsuccessful.
OUTPUT: Opens the file for writing. If the dataset already exists, this will place the cursor at the start of the dataset, the old contents get deleted at the end of the program or when the CLOSE DATASET is encountered.
INPUT: Opens a file for READ and places the cursor at the beginning of the file.
FOR APPENDING: Opens the file for writing and places the cursor at the end of file. If the file does not exist, it is generated.
BINARY MODE: The READ or TRANSFER will be character wise. Each time n characters are READ or transferred. The next READ or TRANSFER will start from the next character position and not on the next line.
IN TEXT MODE: The READ or TRANSFER will start at the beginning of a new line each time. If for READ, the destination is shorter than the source, it gets truncated. If destination is longer, then it is padded with spaces.
Defaults: If nothing is mentioned, then defaults are FOR INPUT and in BINARY MODE.
PROCESS FILE:
Processing a file involves READing the file or Writing on to file TRANSFER.
TRANSFER Statement
Syntax:
TRANSFER <field> TO <file name>.
<Field> can also be a field string / work area / DDIC structure.
Each transfer statement writes a statement to the dataset. In binary mode, it writes the length of the field to the dataset. In text mode, it writes one line to the dataset.
If the file is not already open, TRANSFER tries to OPEN file FOR OUTPUT (IN BINARY MODE) or using the last OPEN DATASET statement for this file.
IF FILE HANDLING, TRANSFER IS THE ONLY STATEMENT WHICH DOES NOT RETURN SY-SUBRC
READ Statement
Syntax:
READ DATASET <file name> INTO <field>.
<Field> can also be a field string / work area / DDIC structure.
Each READ will get one record from the dataset. In binary mode it reads the length of the field and in text mode it reads each line.
CLOSE FILE:
The program will close all sequential files, which are open at the end of the program. However, it is a good programming practice to explicitly close all the datasets that were opened.
Syntax:
CLOSE DATASET <file name>.
SY-SUBRC will be set to 0 or 8 depending on whether the CLOSE is successful or not.
DELETE FILE:
A dataset can be deleted.
Syntax:
DELETE DATASET <file name>.
SY-SUBRC will be set to 0 or 8 depending on whether the DELETE is successful or not.
Pseudo logic for processing the sequential files:
For reading:
Open dataset for input in a particular mode.
Start DO loop.
Read dataset into a field.
If READ is not successful.
Exit the loop.
Endif.
Do relevant processing for that record.
End the do loop.
Close the dataset.
For writing:
Open dataset for output / Appending in a particular mode.
Populate the field that is to be transferred.
TRANSFER the filed to a dataset.
Close the dataset.
chk a sampel
parameters: p_file like rlgrap-filename obligatory
default '/usr/sap/upload.xls'.
types: begin of t_data,
vbeln like vbap-vbeln,
posnr like vbap-posnr,
matnr like vbap-matnr,
werks like vbap-werks,
megne like vbap-zmeng,
end of t_data.
data: it_data type standard table of t_data,
wa_data type t_data.
open dataset p_file for output in text mode encoding default.
if sy-subrc ne 0.
write:/ 'Unable to open file:', p_file.
else.
do.
read dataset p_file into wa_data.
if sy-subrc ne 0.
exit.
else.
append wa_data to it_data.
endif.
enddo.
close dataset p_file.
endif.
And if you want to write on the file.
*--- open UNIX file
open dataset unixfile for output in text mode message w_msg.
if sy-subrc ne 0.
write: / 'Cannot open for writing:', unixfile, w_msg.
exit.
endif.
*--- write UNIX file
loop at it_file.
transfer it_file to unixfile.
endloop.
*--- close UNIX file
close dataset unixfile.

How to extract data from info cube into an internal table using ABAP code

HI
Can Anyone plz suggest me
How to extract data from info cube into an internal table using ABAP code like BAPI's or function modules.
Thankx in advance
regds
AJAY

HI Dinesh,
Thankq for ur reply
but i ahve already tried to use the function module.
When I try to Use the function module RSDRI_INFOPOV_READ
I get an information message "ERROR GENERATION TEST FRAME".
can U plz tell me what could be the problem
Bye
AJAY

Upload tab-delimited file from the application server to an internal table

Hello SAPients.
I'm using OPEN DATASET..., READ DATASET..., CLOSE DATASET to upload a file from the application server (SunOS). I'm working with SAP 4.6C. I'm trying to upload a tab-delimited file to an internal table but when I try load it the fields are not correctly separated, in fact, they are all misplaced and the table shows '#' where supposedly there was a tab.
I tried to SPLIT the line using as separator a variable with reference to CL_ABAP_CHAR_UTILITIES=>HORIZONTAL_TAB but for some reason that class doesn't exist in my system.
Do you know what I'm doing wrong? or Do you know a better method to upload a tab-delimited file into an internal table?
Thank you in advance for your help.

Try:
REPORT ztest MESSAGE-ID 00.
PARAMETER: p_file LIKE rlgrap-filename   OBLIGATORY.
DATA: BEGIN OF data_tab OCCURS 0,
      data(4096),
      END   OF data_tab.
DATA: BEGIN OF vendor_file_x OCCURS 0.
* LFA1 Data
DATA: mandt LIKE bgr00-mandt,
      lifnr LIKE blf00-lifnr,
      anred LIKE blfa1-anred,
      bahns LIKE blfa1-bahns,
      bbbnr LIKE blfa1-bbbnr,
      bbsnr LIKE blfa1-bbsnr,
      begru LIKE blfa1-begru,
      brsch LIKE blfa1-brsch,
      bubkz LIKE blfa1-bubkz,
      datlt LIKE blfa1-datlt,
      dtams LIKE blfa1-dtams,
      dtaws LIKE blfa1-dtaws,
      erdat LIKE lfa1-erdat,
      ernam LIKE lfa1-ernam,
      esrnr LIKE blfa1-esrnr,
      konzs LIKE blfa1-konzs,
      ktokk LIKE lfa1-ktokk,
      kunnr LIKE blfa1-kunnr,
      land1 LIKE blfa1-land1,
      lnrza LIKE blfa1-lnrza,
      loevm LIKE blfa1-loevm,
      name1 LIKE blfa1-name1,
      name2 LIKE blfa1-name2,
      name3 LIKE blfa1-name3,
      name4 LIKE blfa1-name4,
      ort01 LIKE blfa1-ort01,
      ort02 LIKE blfa1-ort02,
      pfach LIKE blfa1-pfach,
      pstl2 LIKE blfa1-pstl2,
      pstlz LIKE blfa1-pstlz,
      regio LIKE blfa1-regio,
      sortl LIKE blfa1-sortl,
      sperr LIKE blfa1-sperr,
      sperm LIKE blfa1-sperm,
      spras LIKE blfa1-spras,
      stcd1 LIKE blfa1-stcd1,
      stcd2 LIKE blfa1-stcd2,
      stkza LIKE blfa1-stkza,
      stkzu LIKE blfa1-stkzu,
      stras LIKE blfa1-stras,
      telbx LIKE blfa1-telbx,
      telf1 LIKE blfa1-telf1,
      telf2 LIKE blfa1-telf2,
      telfx LIKE blfa1-telfx,
      teltx LIKE blfa1-teltx,
      telx1 LIKE blfa1-telx1,
      xcpdk LIKE lfa1-xcpdk,
      xzemp LIKE blfa1-xzemp,
      vbund LIKE blfa1-vbund,
      fiskn LIKE blfa1-fiskn,
      stceg LIKE blfa1-stceg,
      stkzn LIKE blfa1-stkzn,
      sperq LIKE blfa1-sperq,
      adrnr LIKE lfa1-adrnr,
      mcod1 LIKE lfa1-mcod1,
      mcod2 LIKE lfa1-mcod2,
      mcod3 LIKE lfa1-mcod3,
      gbort LIKE blfa1-gbort,
      gbdat LIKE blfa1-gbdat,
      sexkz LIKE blfa1-sexkz,
      kraus LIKE blfa1-kraus,
      revdb LIKE blfa1-revdb,
      qssys LIKE blfa1-qssys,
      ktock LIKE blfa1-ktock,
      pfort LIKE blfa1-pfort,
      werks LIKE blfa1-werks,
      ltsna LIKE blfa1-ltsna,
      werkr LIKE blfa1-werkr,
      plkal LIKE lfa1-plkal,
      duefl LIKE lfa1-duefl,
      txjcd LIKE blfa1-txjcd,
      sperz LIKE lfa1-sperz,
      scacd LIKE blfa1-scacd,
      sfrgr LIKE blfa1-sfrgr,
      lzone LIKE blfa1-lzone,
      xlfza LIKE lfa1-xlfza,
      dlgrp LIKE blfa1-dlgrp,
      fityp LIKE blfa1-fityp,
      stcdt LIKE blfa1-stcdt,
      regss LIKE blfa1-regss,
      actss LIKE blfa1-actss,
      stcd3 LIKE blfa1-stcd3,
      stcd4 LIKE blfa1-stcd4,
      ipisp LIKE blfa1-ipisp,
      taxbs LIKE blfa1-taxbs,
      profs LIKE blfa1-profs,
      stgdl LIKE blfa1-stgdl,
      emnfr LIKE blfa1-emnfr,
      lfurl LIKE blfa1-lfurl,
      j_1kfrepre LIKE blfa1-j_1kfrepre,
      j_1kftbus   LIKE blfa1-j_1kftbus,
      j_1kftind   LIKE blfa1-j_1kftind,
      confs LIKE lfa1-confs,
      updat LIKE lfa1-updat,
      uptim LIKE lfa1-uptim,
      nodel LIKE blfa1-nodel.
DATA: END   OF vendor_file_x.
FIELD-SYMBOLS: <field>,
                <field_1>.
DATA: delim          TYPE x        VALUE '09'.
DATA: fld_chk(4096),
      last_char,
      quote_1     TYPE i,
      quote_2     TYPE i,
      fld_lth     TYPE i,
      columns     TYPE i,
      field_end   TYPE i,
      outp_rec    TYPE i,
      extras(3)   TYPE c        VALUE '.,"',
      mixed_no(14) TYPE c        VALUE '1234567890-.,"'.
OPEN DATASET p_file FOR INPUT.
DO.
READ DATASET p_file INTO data_tab-data.
IF sy-subrc = 0.
    APPEND data_tab.
ELSE.
    EXIT.
ENDIF.
ENDDO.
* count columns in output structure
DO.
ASSIGN COMPONENT sy-index OF STRUCTURE vendor_file_x TO <field>.
IF sy-subrc <> 0.
    EXIT.
ENDIF.
columns = sy-index.
ENDDO.
* Assign elements of input file to internal table
CLEAR vendor_file_x.
IF columns > 0.
LOOP AT data_tab.
    DO columns TIMES.
      ASSIGN space TO <field>.
      ASSIGN space TO <field_1>.
      ASSIGN COMPONENT sy-index OF STRUCTURE vendor_file_x TO <field>.
      SEARCH data_tab-data FOR delim.
      IF sy-fdpos > 0.
        field_end = sy-fdpos + 1.
        ASSIGN data_tab-data(sy-fdpos) TO <field_1>.
* Check that numeric fields don't contain any embedded " or ,
        IF <field_1> CO mixed_no AND
           <field_1> CA extras.
          TRANSLATE <field_1> USING '" , '.
          CONDENSE <field_1> NO-GAPS.
        ENDIF.
* If first and last characters are '"', remove both.
        fld_chk = <field_1>.
        IF NOT fld_chk IS INITIAL.
          fld_lth = strlen( fld_chk ) - 1.
          MOVE fld_chk+fld_lth(1) TO last_char.
          IF fld_chk(1) = '"' AND
             last_char = '"'.
            MOVE space TO fld_chk+fld_lth(1).
            SHIFT fld_chk.
            MOVE fld_chk TO <field_1>.
          ENDIF.       " for if fld_chk(1)=" & last_char="
        ENDIF.         " for if not fld_chk is initial
* Replace "" with "
        DO.
          IF fld_chk CS '""'.
            quote_1 = sy-fdpos.
            quote_2 = sy-fdpos + 1.
            MOVE fld_chk+quote_2 TO fld_chk+quote_1.
          ELSE.
            MOVE fld_chk TO <field_1>.
            EXIT.
          ENDIF.
        ENDDO.
        <field> = <field_1>.
      ELSE.
        field_end = 1.
      ENDIF.
      SHIFT data_tab-data LEFT BY field_end PLACES.
    ENDDO.
    APPEND vendor_file_x.
    CLEAR vendor_file_x.
ENDLOOP.
ENDIF.
CLEAR   data_tab.
REFRESH data_tab.
FREE    data_tab.
Rob

Comparing Application server file and internal table

hi all
Iam new to the world of ABAP. I have a requirement wherein i need to compare data in a internal table and that of the file. I need to extract the delta records( ie the record is found in the internal table but not in the file and vice versa ) and put it in another internal table. Which is the best way to do it?
Awaiting quick reply. Thanks
Nirmal.

Hello Nimal
First read the file into your itab. For comparison you can use the same logic as change documents are prepared. Assuming both of your itabs are of structure struc_a. Then define the following type:
TYPES: BEGIN OF ty_s_itab_di.
INCLUDE TYPE struc_a.
TYPES: CHIND TYPE bu_chind.
TYPES: END OF ty_s_itab_di.
TYPES: ty_t_itab_di TYPE STANDARD TABLE OF ty_s_itab_di
WITH DEFAULT KEY.
DATA:
gt_itab_old TYPE ty_t_itab_di,
gt_itab_new TYPE ty_t_itab_di.
Fill itabs gt_Itab_old with the corresponding data of itab1 and gt_itab_new with the corresponding data of itab2.
Very important: sort you itabs either by all key fields or by all fields.
Call function CHANGEDOCUMENT_PREPARE_TABLES with the following parameters:
- CHECK_INDICATOR = ' '
- TABLE_NEW = gt_Itab_new
- TABLE_OLD = gt_itab_old
The function module will remove identical lines from both itabs. New entries in gt_itab_New will have CHIND = 'I' and deleted entries in gt_itab_old will have CHIND = 'D'.
Read the documentation of the function module and play around with it. You will see that this a quite easy yet powerful approach for comparing itabs.
Regards
Uwe

How to read xml file and place it into an internal table...

hello all,
can any one help me in - how to read xml data file (placed in application server) and placing the same into an internal table (remove the xml tags or say fetching the xml data without xml tags).

Hi Murashali,
use this.
TYPES: BEGIN OF day,
name TYPE string,
work(1) TYPE c,
END OF day.
DATA: BEGIN OF week,
day1 TYPE day,
day2 TYPE day,
day3 TYPE day,
day4 TYPE day,
day5 TYPE day,
day6 TYPE day,
day7 TYPE day,
END OF week.
DATA xml_string TYPE string.
DATA result LIKE week.
week-day1-name = 'Monday'. week-day1-work = 'X'.
week-day2-name = 'Tuesday'. week-day2-work = 'X'.
week-day3-name = 'Wednesday'. week-day3-work = 'X'.
week-day4-name = 'Thursday'. week-day4-work = 'X'.
week-day5-name = 'Friday'. week-day5-work = 'X'.
week-day6-name = 'Saturday'. week-day6-work = ' '.
week-day7-name = 'Sunday'. week-day7-work = ' '.
CALL TRANSFORMATION ...
SOURCE root = week
RESULT XML xml_string.
CALL TRANSFORMATION ...
SOURCE XML xml_string
RESULT root = result.
Regards,
Vijay

Data from field symbol into an internal table or workarea

Hi Experts,
I have field symbol in which i get the data. I want to get this data into an internal table of type any or into an work area. How is this possible.
My declaration for field symbol is as follow:
FIELD-SYMBOLS: <l_t_data> TYPE any.
DATA l_r_data TYPE REF TO data.
    CREATE DATA l_r_data type STANDARD TABLE OF (l_local_tab).
    ASSIGN l_r_data->* TO <l_t_data>.
I get the data in this field symbol <l_t_data>. by passing into a funtion module. and I get the data into it. Now i have to assign the values of this field symbol to any internal table or to a work are how do i do it. Please help.
Regards,
Prashant.

Not exactly sure what you need here, but.....
FIELD-SYMBOLS: <l_t_data> TYPE TABLE.   "<<-- Change this
FIELD-SYMBOLS: <l_s_data> TYPE ANY.      "<<---Add This
DATA l_r_data TYPE REF TO data.
CREATE DATA l_r_data type STANDARD TABLE OF (l_local_tab).
ASSIGN l_r_data->* TO <l_t_data>.
Loop at <l_t_data> assigning <l_s_data>.
* Do what ever using <l_s_data>
Endloop.
Regards,
Rich Heilman
Edited by: Rich Heilman on Feb 28, 2008 2:42 PM

Load data from FTP server into Oracle

I have a zipped file in a FTP server. I need to unzip the file and sql load it into an Oracle table.
Does Oracle has any utilities with which I can direct do "get" from the FTP server?
Does Oracle has any zip/unzip features?
I am using 10g.

user6794035 wrote:
I have a zipped file in a FTP server. I need to unzip the file and sql load it into an Oracle table.
Does Oracle has any utilities with which I can direct do "get" from the FTP server?
Does Oracle has any zip/unzip features?
I am using 10g.Oracle does not support thes features directly. You'll have to write an OS script to performthe tasks and insert the data.
Dependending on your output format you can use UTL_FILE, SQL*LOADER, or external tables to load the data.

Loading data : Creation of entries in the Qualified Table

Hi,
I was wondering if anyone has succesfully achieved the following...
I'm looking at the standard materials repository.
- Main Table : Product
- Qualified Table: Location Data. This qualified table single non-qualifier field is a look-up to a flat look-up table, called Plants
The flat table is populated with the valid list of plants, using the check table synchronisation. The Main Table is empty, so is the Location Table.
In order to load products into this repository using the import manager it seems that it is required to "create" entries in the qualified table (Location), one for each plant-code.
Is this true ? I actually would expect the SAP MDM Import Manager client to be able to create the records in both the main table and if needed, the qualified table. As long as my plant code exists in the "Plants" look-up table, that should be sufficient. It seems not the case..
Thx,
Dirk

The sequence of Import
- Load the Flat Lookup tables. ( in your case Plants)
- Load the Qualified Tables ( in your case load the non qualifiers of the Location Data)
- Load the Main table (in your case Products)
Though MDM allows you to create Lookup values on the fly, I would rather go with this approach.
If you are using Import Manager, you can add the Qualified Table Records in the fly.
But if you are using Import Server, you will NOT be able to add Qualified table records in the fly. I tested this, and I see the files in the ImportX error directory.

Need to Load data in XML file into multiple Oracle tables

Experts
I want to load data that is stored at XML file into multiple Oracle table using plsql.
I am novice in this area.Kindly explain in depth or step by step so that i can achive this.
Thanks in advnace.

Hi,
extract your xml and then you can use insert all clause.
here's very small example on 10.2.0.1.0
SQL> create table table1(id number,val varchar2(10));
Table created.
SQL> create table table2(id number,val varchar2(10));
Table created.
SQL> insert all
2 into table1 values(id,val)
3 into table2 values(id2,val2)
4 select extractValue(x.col,'/a/id1') id
5        ,extractValue(x.col,'/a/value') val
6        ,extractValue(x.col,'/a/value2') val2
7        ,extractValue(x.col,'/a/id2') id2
8 from (select xmltype('<a><id1>1</id1><value>a</value><id2>2</id2><value2>b</value2></a>') col from dual) x;
2 rows created.
SQL> select * from table1;
        ID VAL
         1 a
SQL> select * from table2;
        ID VAL
         2 b                                                                    Ants

How to upload XML file into the internal table in Webdynpro ABAP ?

Hi Friends,
I am not able to upload the XML file into ABAP,can you please help me in solving this issue with the help of source code.
Regards
Dinesh

Hi Dinesh,
Try go through this program which I had developed earlier. It takes as input an XML file and then breaks it down into name-value pairs of an intrnal table. You need to pass an XML file as input to this program. (I had hard coded the path for my XML file in it. You need to replace it with 1 of your own or you can just delete it and use the browse button to selet the file on your PC)
Regards,
Uday
REPORT ZUDAY_XML no standard page heading.
" Internal table to store the XML file in binary mode
data: begin of it_xml occurs 1,
        c(255) type x,
      end of it_xml,
" Name-value pairs table rturned by FM SMUM_XML_PARSE
      it_SMUM_XMLTB type SMUM_XMLTB occurs 0 with header line,
" Table returned by FM SMUM_XML_PARSE for error handling
      it_bapiret2 type bapiret2 occurs 0 with header line.
" XSTRING variable to be used by FM SCMS_BINARY_TO_XSTRING to hold the XML file in XSTRING format
data: I_xstring type xstring,
" String variable to hold XML file path to pass to GUI_UPLOAD
      I_file_path type string,
" Variable to store the size of the uploaded binary XML file
      I_LENGTH TYPE I VALUE 0.
parameters: P_path type IBIPPARMS-PATH default 'C:\Documents and Settings\c5104398\Desktop\flights.xml'.
" Get the XML file path from the user
at selection-screen on value-request for P_path.
CALL FUNCTION 'F4_FILENAME'
    IMPORTING
      FILE_NAME = P_PATH.

How do I load data from R/3 into /BI0/TCUST_SALES

Hi,
There is a SAP supplied characteristic called 0CUST_SALES which has a text table called /BI0/TCUST_SALES. How do go about populating this table from the R/3 system? My version is BW 3.5
Thanks
Ram

Hi,
1.) Go into R/3 and run tcode RSA5.
2.) Expand all levels and search for 0customer_text and activate it.
3.) Go to RSA3, type in 0customer_text and execute it ... verify you get data.
4.) Go to BW and replicate your R/3 source system.
5.) Go to the Infosource tab, and look for 0customer.
6.) Right click on 0customer and assign a new datasource -- enter you R/3 source and select 0customer_text. Activate it.
7.) Add your infopackage and run it.
Brian

How to Down load Data in Application server into the Internal Table

Similar Messages

Maybe you are looking for