Reading File On Application Server

 

  • for Reading the Data on Application Server, we need to follow the given steps :-

    • OPEN DATASET ( file path ) FOR INPUT IN TEXT MODE ENCODING DEFAULT.
    • TRANSFER ( DATA ) to ( File path )
    • CLOSE DATASET

  • In the previous part, we have created a file on the application server.



  • Now, we will read that file on the application server.

Requirement :-

  • How to read a file on the Application Server ?

Hints :-

  • Open the file.
  • Read the Data one by one
  • Close the file

Solution :-

  • Step 1 :- Create a executable program in ABAP Editor.



  • Step 2 :- Declare the created file in the previous part.



  • Step 3 :- Open the File using FOR INPUT.



  • Step 4 :- Create a type structure for the VBAK table which we have used and then create a internal table and work area for it and also create a variable for string in which we will store file data.



  • Step 5 :- Use loop to read the file and stored it into string variable and then split it into the above work area and then append it into the internal table.



  • Step 6 :- After loop close the file.



  • Step 7 :- Display the interna; table in form of ALV.



Code :-

*&---------------------------------------------------------------------*
*& Report ZAR_READ_FILE_APPLICATION
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT zar_read_file_application.

TYPES : BEGIN OF ty_vbak,
          vbeln TYPE vbeln_va,
          erdat TYPE erdat,
          erzet TYPE erzet,
          ernam TYPE ernam,
          vbtyp TYPE vbtypl,
        END OF ty_vbak.

DATA : lt_vbak TYPE TABLE OF ty_vbak,
       ls_vbak TYPE ty_vbak.
DATA : lv_string TYPE  string.

DATA : lo_direct(20) TYPE c VALUE '/usr/sap/tmp/VBAK.txt'.

OPEN DATASET lo_direct FOR INPUT IN TEXT MODE ENCODING DEFAULT.
if sy-subrc eq 0.
  DO.
  READ DATASET lo_direct into lv_string.
  if sy-subrc eq 0.
    SPLIT lv_string at ' ' into ls_vbak-vbeln ls_vbak-erdat
                          ls_vbak-erzet ls_vbak-ernam ls_vbak-vbtyp.
  Append ls_vbak to lt_vbak.
  clear ls_vbak.
  ELSE.
    exit.
  endif.
  ENDDO.
  CLOSE DATASET lo_direct.
endif.

TRY.
CALL METHOD cl_salv_table=>factory
  EXPORTING
    list_display   = IF_SALV_C_BOOL_SAP=>FALSE
  IMPORTING
    r_salv_table   = data(lo_alv)
  CHANGING
    t_table        = lt_vbak
    .
  CATCH cx_salv_msg.
ENDTRY.
lo_alv->display( ).

Execute the Code :-



Comments

Post a Comment

Popular posts from this blog

Understanding Different Types of SAP Function Modules: Normal, RFC, and Update

Image
  1. Normal/Regular Function Module :- It can be called inside the system. Here Pass by value + Pass by reference both is fine. 2. RFC Function Modules :- You can call from same system or from another possible. In RFC function module you can only have pass by value. In the same system if you are going to add the DESTINATION NONE’ while calling the RFC then it’ll be called in separate session. 3. UPDATE Function Modules :- This is generally used to update the database record. Update Function Module can be called from the same system. ( Background RFC / trfc / grfc ) This is used to achieve generally the SAP LUW. Some time we use from performance perspective also. When COMMIT WORK gets executed then Update starts getting executed. Important Questions on Update Function Modules :- When Update function Module gets Triggered ? ON COMMIT WORK IF a update function module gets failed, under which transaction we can see that ? OR What is the T-Code for moni
Read more

Unlocking SAP ABAP Secrets: Interactive Classical Reports with GET CURSOR, At User Command, and a Comparison of HIDE Statements

Image
 Welcome back everyone, We were discussing about the interactive classical reports, so let’s continue it. Interactive Classical Reports- GET CURSOR :- In Interactive Classical Reports, GET CURSOR statement is used to create secondary list according to cursor position. The parameter FIELD provides the name of an output field. The parameter VALUE provide the output value. Syntax : GET CURSOR FIELD <lv_field> VALUE <lv_value>. In the above syntax - the field name and field value will be returned in to variables lv_field and lv_value respectively. Requirement :- If you remember, In our last two blog, We have been displaying the order header table in a basic list and order item table in the secondary list. We have used SY-LISEL and HIDE statements to achieve the requirement. Now, we have to use the get CURSOR to achieve the same to same requirement. Code :- ************************************************************* *Start of Program *Declaring Strcutrure
Read more

Mastering ABAP: A Step-by-Step Guide to Function Modules and Groups for Modularized Programming

Image
  Function Modules :- It is a modularization technique. The transaction code to create a function module is SE37. To create a function module, we need to create a function group. Function Group :- Function group is a container for the function modules. The transaction code to create a function group is SE80. A function group can store up to 99 function modules. Requirement :- let’s create a function module for sum of two numbers. 1. Creation of function group :- Step 1 :- Go to SE80 transaction code → Object Navigator. Step 2 :- From the drop down select function group. Step 3 :- Give a name of function group. Step 4 :- press enter. Step 5 :- Click on yes a popup screen will appear. Step 6 :- Give short description → press enter → Assign package and transaction request and press enter. Step 7 :- Right click on function group and click on activate to activate the function group. Step 8 :- You will see two includes, will be added after ac
Read more