Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

OPEN DATA SET .. EXCEL OUTPUT

former_member191391
Participant
0 Likes
403

Hello frnds,

I had requirement to genrate a excel file ... In a given format.

How should I ?? Preffered through Open data set .... Is it possible

With Regards.

2 REPLIES 2
Read only

Former Member
0 Likes
359

Hi Manmeet,

Try this sample code,

TABLES: ZVIJ.

DATA : BEGIN OF WA,

NAME(6) TYPE C,

AGE(3) TYPE C,

DES(5) TYPE C,

SALARY(3) TYPE C,

INCENT(3) TYPE C,

END OF WA,

IT LIKE TABLE OF WA WITH HEADER LINE.

DATA : BEGIN OF WA1,

NAME(6) TYPE C,

AGE TYPE I,

DES(4) TYPE C,

SALARY TYPE I,

INCENT TYPE I,

END OF WA1,

IT1 LIKE TABLE OF WA1 WITH HEADER LINE.

OPEN DATASET 'SAMP' FOR OUTPUT IN TEXT MODE ENCODING DEFAULT.

CALL FUNCTION 'GUI_UPLOAD'

EXPORTING

filename = 'C:\Documents and Settings\Desktop\Book62.XLS' --> XLS

for Excel file.

FILETYPE = 'ASC'

HAS_FIELD_SEPARATOR = 'X'

  • HEADER_LENGTH = 0

  • READ_BY_LINE = 'X'

  • DAT_MODE = ' '

  • CODEPAGE = ' '

  • IGNORE_CERR = ABAP_TRUE

  • REPLACEMENT = '#'

  • CHECK_BOM = ' '

  • VIRUS_SCAN_PROFILE =

  • NO_AUTH_CHECK = ' '

  • IMPORTING

  • FILELENGTH =

  • HEADER =

tables

data_tab = IT

  • EXCEPTIONS

  • FILE_OPEN_ERROR = 1

  • FILE_READ_ERROR = 2

  • NO_BATCH = 3

  • GUI_REFUSE_FILETRANSFER = 4

  • INVALID_TYPE = 5

  • NO_AUTHORITY = 6

  • UNKNOWN_ERROR = 7

  • BAD_DATA_FORMAT = 8

  • HEADER_NOT_ALLOWED = 9

  • SEPARATOR_NOT_ALLOWED = 10

  • HEADER_TOO_LONG = 11

  • UNKNOWN_DP_ERROR = 12

  • ACCESS_DENIED = 13

  • DP_OUT_OF_MEMORY = 14

  • DISK_FULL = 15

  • DP_TIMEOUT = 16

  • OTHERS = 17

.

IF sy-subrc <> 0.

  • MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

  • WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

LOOP AT IT .

IT1-NAME = IT-NAME.

IT1-AGE = IT-AGE.

IT1-DES = IT-DES.

IT1-SALARY = IT-SALARY.

IT1-INCENT = IT-INCENT.

APPEND IT1.

ENDLOOP.

LOOP AT IT1.

ZVIJ-NAME = IT1-NAME.

ZVIJ-AGE = IT1-AGE.

ZVIJ-DES = IT1-DES.

ZVIJ-SALARY = IT1-SALARY.

ZVIJ-INCENT = IT1-INCENT.

INSERT ZVIJ.

ENDLOOP.

Thanks.

Reward If Helpful.

Read only

Former Member
0 Likes
359

Try this way.

download your innertable to local disk and use excel to open it by Excel Macro,and fill data with format.