topic Re: fm in Application Development and Automation Discussions

fm

Former Member — Wed, 21 Nov 2007 07:23:44 GMT

Hi,

I am creating new fm and i am uploading a file. i use the gui upload fm in the folling way. when i am excuting its going start dump.

plz let me know what i want to do for this....should i want to declare the file name in string and i want pass it r else....plz can onr help me to do slove it....

FUNCTION CLIENT_LOAD .

*"----

""Local interface:

*" IMPORTING

*" REFERENCE(I_PRODUCT) TYPE ZPRODUCT

*" REFERENCE(FILENAME) LIKE RLGRAP-FILENAME DEFAULT SPACE

*" REFERENCE(FILETYPE) LIKE RLGRAP-FILETYPE DEFAULT 'ASC'

*" EXPORTING

*" REFERENCE(RETURN_CODE) TYPE SY-SUBRC

*"----

CALL FUNCTION 'GUI_UPLOAD'

EXPORTING

FILENAME = filename

FILETYPE = 'ASC'

TABLES

DATA_TAB = t_data.

IF SY-SUBRC <> 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

Thanks

Ankitha....

Re: fm

Former Member — Wed, 21 Nov 2007 08:02:01 GMT

Hi Ankitha,

The file which you are uploading and Internal table t_data might not be compatible. Either maintain the file data in the same order as t_data or change the order of fields in internal table as per the file structure.

Regards,

Satish

Re: fm

Former Member — Wed, 21 Nov 2007 09:15:40 GMT

Hi Ankitha,

you can pass the file name in either way...

ex.

File = 'C:\RG1.TXT'

CALL FUNCTION 'GUI_UPLOAD'

EXPORTING

FILENAME = L_FILE

CALL FUNCTION 'GUI_UPLOAD'

EXPORTING

FILENAME = 'C:\RG1.TXT'

and make sure the structure on itab is same as that of file.

Sachin

Re: fm

varma_narayana — Wed, 21 Nov 2007 11:24:07 GMT

Hi Ankitha..

GUI_UPLOAD expects the Filename to be of Type STRING.

So.. Do this way....

FUNCTION CLIENT_LOAD .

*"----

""Local interface:

*" IMPORTING

*" REFERENCE(I_PRODUCT) TYPE ZPRODUCT

*" REFERENCE(FILENAME) LIKE RLGRAP-FILENAME DEFAULT SPACE

*" REFERENCE(FILETYPE) LIKE RLGRAP-FILETYPE DEFAULT 'ASC'

*" EXPORTING

*" REFERENCE(RETURN_CODE) TYPE SY-SUBRC

*"----

DATA: L_FILE TYPE STRING.

MOVE FILENAME TO L_FILE.

CALL FUNCTION 'GUI_UPLOAD'

EXPORTING

FILENAME = L_FILE

FILETYPE = 'ASC'

TABLES

DATA_TAB = t_data.

IF SY-SUBRC <> 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

reward if Helpful.