topic how i pass parameters in Application Development and Automation Discussions

how i pass parameters

Former Member — Mon, 10 Sep 2007 09:38:18 GMT

i wrote a simple program like this...

REPORT ZMYTESTPRG36 .

DATA: A TYPE I, B TYPE I.

A = 5.

B = 4.

PERFORM ADD_DATA using A B.

FORM ADD_DATA using x y.

DATA Z TYPE I.

x = 2.

y = 5.

Z = X + Y.

WRITE : 'THE SUM OF ', a , b , 'IS ', Z.

ENDFORM.

i am getting the result as 7.

how i get the result as 9.

with call by reference concept..

i wanna pass the actual parameters to the subroutine...

Message was edited by:

balaji velpuri

Re: how i pass parameters

Former Member — Mon, 10 Sep 2007 09:40:13 GMT

HI,

if you don't define the parameters new.

Delete the lines

x = 2.

y = 5.

and it shoult work.

regards

NIcole

Re: how i pass parameters

Former Member — Mon, 10 Sep 2007 09:40:23 GMT

REPORT ZMYTESTPRG36 .

DATA: A TYPE I, B TYPE I.

A = 5.

B = 4.

PERFORM ADD_DATA using A B.

FORM ADD_DATA using x y.

DATA Z TYPE I.

<b>*x = 2.

*y = 5.</b>

Z = X + Y.

WRITE : 'THE SUM OF ', a , b , 'IS ', Z.

ENDFORM.

Comment the values of X and Y in the subroutine. You'll get the output as 9.

Regards,

Pavan

Re: how i pass parameters

Former Member — Mon, 10 Sep 2007 09:43:00 GMT

use following

REPORT ZMYTESTPRG36 .

DATA: A TYPE I, B TYPE I.

data: z type i.

A = 5.

B = 4.

PERFORM ADD_DATA using A B.

Z = A + B.

WRITE : 'THE SUM OF ', a , b , 'IS ', Z.

FORM ADD_DATA using x y.

DATA Z TYPE I.

x = 2.

y = 5.

Z = X + Y.

WRITE : 'THE SUM OF ', a , b , 'IS ', Z.

ENDFORM.

Re: how i pass parameters

varma_narayana — Mon, 10 Sep 2007 09:46:40 GMT

Hi Balaji..

Try this code:

REPORT ZMYTESTPRG36 .

DATA: A TYPE I, B TYPE I.

A = 5.

B = 4.

PERFORM ADD_DATA using A B.

FORM ADD_DATA using x y.

DATA Z TYPE I.

Z = X + Y.

WRITE : 'THE SUM OF ', a , b , 'IS ', Z.

ENDFORM.

<b>REWARD IF HELPFUL.</b>

Re: how i pass parameters

Former Member — Mon, 10 Sep 2007 09:59:42 GMT

Hi Balaji,

'using' will act as call by value and 'changing' will act as call by reference.

Refer the below code.

x = 4.

y = 5.

Perform ADD_DATA using x y changing s

WRITE : 'THE SUM OF ', x , y , 'IS ', S.

FORM ADD_DATA VALUES x y CHANGING S.

DATA Z TYPE I.

S = X + Y.

ENDFORM.

Regards,

Sheron