topic Re: help with perform using in Application Development and Automation Discussions

help with perform using

Former Member — Tue, 19 Jun 2007 12:18:33 GMT

Hallow

I use perform using and I wont to move into perform tables

I try like this but t_data. In subroutine is get empty

What I doing wrong?

I new in this topic

nametab_3001 is internal table

PERFORM write_server USING nametab_3001 .

FORM write_server USING p_t_data.

FIELD-SYMBOLS: <wa> TYPE ANY.

OPEN DATASET adress IN TEXT MODE

ENCODING DEFAULT FOR OUTPUT.

IF sy-subrc = 0.

no_file = ' '.

LOOP AT t_data ASSIGNING <wa>.

TRANSFER <wa> TO adress.

ENDLOOP.

CLOSE DATASET adress.

ELSE.

no_file = 'X'.

ENDIF.

Regards

Re: help with perform using

Former Member — Tue, 19 Jun 2007 12:22:12 GMT

Hi...

In form u have used different table name... check this ...

PERFORM write_server TABLES nametab_3001 .

FORM write_server TABLES p_t_data .

FIELD-SYMBOLS: <wa> TYPE ANY.

OPEN DATASET adress IN TEXT MODE

ENCODING DEFAULT FOR OUTPUT.

IF sy-subrc = 0.

no_file = ' '.

LOOP AT p_t_data ASSIGNING <wa>. "<change here..

TRANSFER <wa> TO adress.

ENDLOOP.

CLOSE DATASET adress.

ELSE.

no_file = 'X'.

ENDIF.

regards,

sai ramesh

Message was edited by:

Sai ramesh

Re: help with perform using

Former Member — Tue, 19 Jun 2007 12:22:39 GMT

well if you want to pass a TABLE to your Form-routine, then you gott use the TABLES staement rather than the USING statement.

Re: help with perform using

former_member150733 — Tue, 19 Jun 2007 12:23:15 GMT

Try replacing the USING with TABLES

Re: help with perform using

Former Member — Tue, 19 Jun 2007 13:31:37 GMT

HI..,

Check this code once... it is error free!!!

data:

begin of t_spfli occurs 0,

carrid type spfli-carrid,

connid type spfli-connid,

end of t_spfli.

select carrid connid from spfli into table t_spfli.

PERFORM write_server tables t_spfli.

FORM write_server tables p_t_data .

FIELD-SYMBOLS: <wa> TYPE any.

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

IF sy-subrc = 0.

LOOP AT p_t_data ASSIGNING <wa>. "<change here..

TRANSFER <wa> TO 'adress'.

ENDLOOP.

CLOSE DATASET 'adress'.

ELSE.

ENDIF.

endform.

reagards,

sai ramesh