Skip to Content
0
Former Member
Dec 14, 2007 at 07:47 AM

help me out

31 Views

hi to all abap gurus,

this is my code upon clicking sigma icon im getting a small window with totals,but my question is that how to close that window .help me out

AT USER-COMMAND.

PERFORM F_USER_COMMAND CHANGING SY-UCOMM.

&----


*& Form F_USER_COMMAND

&----


  • text

----


  • <--P_SY_UCOMM text

----


FORM F_USER_COMMAND CHANGING P_SY_UCOMM LIKE SY-UCOMM.

CASE P_SY_UCOMM.

WHEN 'SIGMA'.

WINDOW STARTING AT 20 20

ENDING AT 50 30.

SET PF-STATUS 'Z_PFREP81'.

WRITE: /'for purchase doc no', WA_PUR-EBELN.

PERFORM F_GET_TOTAL USING IT_ITEM

CHANGING WA_ITEM.

WHEN 'EXIT'.

LEAVE PROGRAM.

ENDCASE.

ENDFORM.

&----


*& Form F_GET_TOTAL

&----


  • text

----


  • -->P_IT_ITEM text

  • <--P_WA_ITEM text

----


FORM F_GET_TOTAL USING P_IT_ITEM LIKE IT_ITEM

CHANGING P_WA_ITEM LIKE WA_ITEM.

LOOP AT P_IT_ITEM INTO P_WA_ITEM.

AT LAST.

SUM.

FORMAT COLOR 3.

WRITE: / 'TOTAL NET PRICE',P_WA_ITEM-NETPR CENTERED.

ENDAT.

AT LAST.

SUM.

FORMAT COLOR 2.

WRITE: / 'TOTAL QUANTITY',P_WA_ITEM-MENGE CENTERED.

ENDAT.

ENDLOOP.

ENDFORM. " F_GET_TOTAL