cancel
Showing results for 
Search instead for 
Did you mean: 

Perform in Script

Former Member
0 Kudos

Hi ABAPers,

I am customising standard Goods Receipt script form, in that i want to add Purchase Order date. In standard form PO number displayed already. Now i have exported the PO number as parameter using Perform statement in script, accordingly i designed a report program to hold subroutine to return PO date. But it is not working.

After activating scipt debugger on. i went step by step, at perform statement, even it is not calling the subroutine which created in report program.

How can i do?

Pls reply me. I want the answer immediately.

Yours,

S.GUNA

Accepted Solutions (0)

Answers (1)

Answers (1)

Former Member
0 Kudos

I solved myself

Former Member
0 Kudos

DEFINE &ID& := '4500000050'.

PERFORM GET_VAL IN PROGRAM ZMMIM_001GOODRECEIPT

USING &ID&

CHANGING &DESCR&

ENDPERFORM.

PO DATE: &DESCR&

***

*types :

TYPES: BEGIN OF ty_ekko,

ebeln LIKE EKKO-EBELN,

bedat LIKE EKKO-BEDAT,

END OF ty_ekko.

  • INTERNAL TABLE DECLARATION

DATA IT_EKKO TYPE TABLE OF ty_ekko WITH HEADER LINE.

FORM get_val TABLES in_tab STRUCTURE ITCSY out_tab STRUCTURE ITCSY.

SELECT EBELN

BEDAT

FROM EKKO

INTO TABLE it_ekko

WHERE EBELN = in_tab-value .

DATA: g_temp(40).

LOOP AT it_ekko.

  • g_temp = it_ekko-bedat.

CONCATENATE it_ekko-bedat6(2) '/' it_ekko-bedat4(2) '/' it_ekko-bedat(4) INTO g_temp.

READ TABLE out_tab INDEX 1.

MOVE g_temp TO out_tab-VALUE.

MODIFY out_tab INDEX SY-TABIX.

ENDLOOP.

ENDFORM.