topic Re: Open Data Set in Application Development and Automation Discussions

Open Data Set

Former Member — Wed, 08 Oct 2008 11:17:41 GMT

Hi ,

Any one have the sample program abt OPEN DATA SET and CLOSE DATA SET

Re: Open Data Set

Former Member — Wed, 08 Oct 2008 11:21:08 GMT

hi,

see the below program.

REPORT ZDOWNLOAD_APPL_DEMO.TYPES : BEGIN OF ST_DEMO,

REG_NO(10) TYPE C,

NAME(20) TYPE C,

ADDR(20) TYPE C,

END OF ST_DEMO.DATA : WA_DEMO TYPE ST_DEMO,

IT_DEMO TYPE TABLE OF ST_DEMO,

L_FNAME TYPE STRING .PARAMETERS: P_FNAME(128) TYPE C DEFAULT '\usr\sap\SRI\SYS\src\DOWN.TXT' OBLIGATORY.

L_FNAME = P_FNAME.

WA_DEMO-REG_NO = '100001'.

WA_DEMO-NAME = 'ANAND'.

WA_DEMO-ADDR = 'NAGARKOVIL'.

APPEND WA_DEMO TO IT_DEMO.WA_DEMO-REG_NO = '100002'.

WA_DEMO-NAME = 'VIKRAM'.

WA_DEMO-ADDR = 'CHENNAI'.

APPEND WA_DEMO TO IT_DEMO. OPEN DATASET L_FNAME FOR OUTPUT IN TEXT MODE ENCODING DEFAULT.

WRITE :5 'REG NUM',16 'NAME',37 'ADDRESS' .

LOOP AT IT_DEMO INTO WA_DEMO.

IF SY-SUBRC = 0.

TRANSFER WA_DEMO TO L_FNAME.

WRITE :/5 WA_DEMO-REG_NO,16 WA_DEMO-NAME,37 WA_DEMO-ADDR.

ENDIF.

ENDLOOP.

regards,

raghu

Re: Open Data Set

Former Member — Wed, 08 Oct 2008 11:24:35 GMT

Hello,

See these:

[Working With Files|https://www.sdn.sap.com/irj/sdn/wiki?path=/display/snippets/working%2bwith%2bfiles]

[Reading file contents|https://www.sdn.sap.com/irj/sdn/wiki?path=/display/snippets/reading%2bfile%2bcontents]

[Running a code from Notepad|https://www.sdn.sap.com/irj/sdn/wiki?path=/display/snippets/running%2ba%2bcode%2bfrom%2bnotepad]

Regards.

Re: Open Data Set

Former Member — Wed, 08 Oct 2008 11:29:53 GMT

Check this link

http://saptechnical.com/Tutorials/ABAP/DownloadFile/AppServer.htm

Regards

Madhan

Re: Open Data Set

Former Member — Wed, 08 Oct 2008 11:31:25 GMT

Download internal table to Application server file(Unix)

DATA: e_file like rlgrap-filename value '/usr/sap/tmp/file.txt'.

open dataset e_file for output in text mode.

LOOP AT it_datatab......

transfer it_datatab to e_file.

ENDLOOP.

close dataset e_file.

Re: Open Data Set

Former Member — Wed, 08 Oct 2008 11:32:13 GMT

Hi,

Example Code.


data: p_file type rlgrap-filename. " Application Server file path

 open dataset p_file for input in text mode encoding default.
      if sy-subrc = 0.
        do.
          read dataset p_file into ls_input-wa_string.
          if sy-subrc eq 0.
            append ls_input to lt_input.
          else.
            exit.
          endif.
        enddo.
      close dataset p_file.
      endif.

Hope it will helps