Skip to Content
avatar image
Former Member

Perform in Script

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

Add comment
10|10000 characters needed characters exceeded

  • Get RSS Feed

1 Answer

  • avatar image
    Former Member
    Sep 02, 2007 at 11:53 AM

    I solved myself

    Add comment
    10|10000 characters needed characters exceeded

    • Former Member

      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.