‎2007 Aug 07 6:44 AM
HI FRIENDS,
i m modifying one script..............in which perform...endperform.............
i m just paasiing one more parameter..............
but when i m doing debugging that...that parameter is not coming........
can anybody tell me is there any other configuration that i need to do........?
‎2007 Aug 07 7:05 AM
hi Imran
try like this
this in script
PERFORM F001-BASICDATA_LTEXT IN PROGRAM ZMR002_RFQ
USING &W_FTEXT& ''''''passing value
CHANGING &W_LINE1& '''''getting value
CHANGING &W_LINE2&'''''Getting value
this part in your program
&----
*& Form F001-LTEXT_DEVIDING
&----
text
----
-->P_IT_DVTXT text
----
FORM F001-LTEXT_DEVIDING TABLES in_par STRUCTURE itcsy out_par STRUCTURE itcsy.
*
DATA : W_TEXTLINE(100) TYPE C,
W_DELIMITER TYPE C,
W_OUTPUTLEN TYPE I,
W_FTEXT(100) TYPE C,
OUT_LINE1 TYPE C,
OUT_LINE2 TYPE C,
OUT_LINE3 TYPE C,
W_LINE1(35) TYPE C,
W_LINE2(35) TYPE C,
W_LINE3(35) TYPE C.
*
READ TABLE in_par WITH KEY 'W_FTEXT'.
*
W_FTEXT = IN_PAR-VALUE.
W_TEXTLINE = W_FTEXT.
W_DELIMITER = ' '.
W_OUTPUTLEN = 40.
*
*
CALL FUNCTION 'RKD_WORD_WRAP'
EXPORTING
TEXTLINE = W_TEXTLINE
DELIMITER = W_DELIMITER
OUTPUTLEN = W_OUTPUTLEN
IMPORTING
OUT_LINE1 = W_LINE1
OUT_LINE2 = W_LINE2
OUT_LINE3 = W_LINE3.
*
LOOP AT out_par.
if out_par-name eq 'W_LINE1'.
out_par-value = W_LINE1.
elseif out_par-name eq 'W_LINE2'.
out_par-value = W_LINE2.
elseif out_par-name eq 'W_LINE3'.
out_par-value = W_LINE3.
endif.
MODIFY out_par.
ENDLOOP.
try to undustand what i doing
Rewards if helpful
‎2007 Aug 07 7:05 AM
hi Imran
try like this
this in script
PERFORM F001-BASICDATA_LTEXT IN PROGRAM ZMR002_RFQ
USING &W_FTEXT& ''''''passing value
CHANGING &W_LINE1& '''''getting value
CHANGING &W_LINE2&'''''Getting value
this part in your program
&----
*& Form F001-LTEXT_DEVIDING
&----
text
----
-->P_IT_DVTXT text
----
FORM F001-LTEXT_DEVIDING TABLES in_par STRUCTURE itcsy out_par STRUCTURE itcsy.
*
DATA : W_TEXTLINE(100) TYPE C,
W_DELIMITER TYPE C,
W_OUTPUTLEN TYPE I,
W_FTEXT(100) TYPE C,
OUT_LINE1 TYPE C,
OUT_LINE2 TYPE C,
OUT_LINE3 TYPE C,
W_LINE1(35) TYPE C,
W_LINE2(35) TYPE C,
W_LINE3(35) TYPE C.
*
READ TABLE in_par WITH KEY 'W_FTEXT'.
*
W_FTEXT = IN_PAR-VALUE.
W_TEXTLINE = W_FTEXT.
W_DELIMITER = ' '.
W_OUTPUTLEN = 40.
*
*
CALL FUNCTION 'RKD_WORD_WRAP'
EXPORTING
TEXTLINE = W_TEXTLINE
DELIMITER = W_DELIMITER
OUTPUTLEN = W_OUTPUTLEN
IMPORTING
OUT_LINE1 = W_LINE1
OUT_LINE2 = W_LINE2
OUT_LINE3 = W_LINE3.
*
LOOP AT out_par.
if out_par-name eq 'W_LINE1'.
out_par-value = W_LINE1.
elseif out_par-name eq 'W_LINE2'.
out_par-value = W_LINE2.
elseif out_par-name eq 'W_LINE3'.
out_par-value = W_LINE3.
endif.
MODIFY out_par.
ENDLOOP.
try to undustand what i doing
Rewards if helpful
‎2007 Aug 07 10:06 AM
hi,
thanks for the reply........whatever u hv given that i have already done.........
but when i m debugging program.that form is not triggering..............
so i want to know is there any configuration that i need to do..........?
Regards,
Imran
‎2007 Aug 07 10:16 AM
no Imran no need to do any configurations
whats u debug?
when you run the program (script) in the perform line program will go to the abap editor and executing so check whether there values are filled, if not check that program
if its running properly values should come back to script.
try with my same variables.
if not write again with your codings.
‎2007 Aug 07 10:12 AM
Hi Imran
Is it a standard script???
Can i have your part of coding???
Or else
try like this
/: PERFORM TOTALAMT IN PROGRAM ZFISP0002
/: USING &RF140-BEZSHKZG&
/: USING &BSEG-WRBTR&
/: USING &TOTALC&
/: USING &TOTALD&
/: CHANGING &TOTALC&
/: CHANGING &TOTALD&
/: ENDPERFORMReward all helpfull answers
Regards
Pavan
Message was edited by:
Pavan praveen
‎2007 Aug 07 10:58 AM
hi pavan,
i hv done same thing..................
but when in print program i m debugging...............
IN TABLE IN_TAB THAT PARAMETER IS NOT COMING.........
‎2007 Aug 07 11:18 AM
HI Imran
Can i have your coding please mail me to praveen.srrec@gmail.com
I'll try to sort out ur issue
Regards
Pavan