Former Member

Jul 19, 2007 at 11:23 AM

runtime error

22 Views

Hi ...

please look at this code it showing runtime error like this , Type conflict when calling a function module. please help me to correct this

REPORT ZPR_TEST01 line-size 500 message-id aod.

*DATA : BEGIN OF itab OCCURS 0.

INCLUDE STRUCTURE zporder.

*DATA : END OF itab.

*

data : BEGIN OF record,

ZSER_NO(15),

SLNO(15),

CUST(15) ,

MATNR(15),

WERKS(15) ,

PURNO(15) ,

ORDTYPE(15) ,

PODATE(15),

BILL(15) ,

PRICE(15) ,

MEINS(15) ,

QTY1(15) ,

QTY2(15) ,

QTY3(15) ,

END OF record.

TYPES wa_itab LIKE record OCCURS 0 .

DATA: itab TYPE wa_itab WITH HEADER LINE,

total type p .

SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.

PARAMETERS: p_slno(50) TYPE c OBLIGATORY.

p as checkbox.

SELECTION-SCREEN END OF BLOCK b1.

data : file TYPE string.

CONCATENATE 'C:\BDC_UPLOAD_' p_slno INTO file.
CONCATENATE file '.txt' INTO file.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_slno.

CALL FUNCTION 'WS_FILENAME_GET'

EXPORTING

def_filename = 'C:\Order'

def_path = 'e:\'

mask = ',.,..'

mode = 'O'

title = 'OPEN'

IMPORTING

filename = file

EXCEPTIONS

inv_winsys = 1

no_batch = 2

selection_cancel = 3

selection_error = 4

OTHERS = 5.

CALL FUNCTION 'GUI_UPLOAD'

EXPORTING

filename = p_slno

filetype = 'txt'

has_field_separator = 'X'

TABLES

data_tab = itab

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 itab.

write : itab-zser_no.

endloop.