How to modify medruck to add some fields and change footer and header?

[Former Member]

Hi i want wht return in subroutine and how to call subroutine in scripts ,,,, This is urgent requirment for me quikck ans will be more help ful for me ... THanking U

[Former Member]

hi

write this code in script

/: perform getdata in program zmat_data

/: using &matnr&

/:changing &mtart&

/: endperform

and write the below code in program zmat_data

REPORT ZMAT_data .

TABLES : MARA.

DATA : W_MTART(255).

FORM GETdata TABLES IN_TAB STRUCTURE ITCSY

OUT_TAB STRUCTURE ITCSY.

READ TABLE IN_TAB WITH KEY NAME = 'EKPO-EMATN'.

IF SY-SUBRC EQ 0.

SELECT SINGLE MTART FROM MARA INTO W_MTART

WHERE MATNR = IN_TAB-VALUE.

ENDIF.

READ TABLE OUT_TAB WITH KEY NAME = 'V_MTART'.

OUT_TAB-VALUE = W_MTART.

MODIFY OUT_TAB INDEX SY-TABIX.

ENDFORM.

it is the code to be used

i will work n do reward point if useful

Message was edited by:

Srinivas Sriram