Skip to Content
0
Former Member
Aug 27, 2008 at 07:32 AM

Subroutine in Scripts

29 Views

Hi,

i wrote Perform......endperform in Script and kept break-point in Program. after activating debugger in Script,the cursor is coming to the Perform statement but its not entering into the Program in which break-point is there.Please refer to my coding in Script and in Program and help me solving the issue.

In Script

/:PERFORM WHDTAX IN PROGRAM ZWHDTAX

/:USING &REGUP-VBLNR&

/:USING &REGUP-ZJAHR&

/:CHANGING &SGTXT&

/:ENDPERFORM

Program name : ZWHDTAX

Type: subroutine pool

&----


*& Subroutine Pool ZWHDTAX

*&

&----


*&

*&

&----


PROGRAM ZWHDTAX.

FORM WHDTAX tables in_tab structure itcsy

out_tab structure itcsy.

Tables: REGUP, BSAK.

DATA : A_VBLNR TYPE REGUP-VBLNR,

A_GJAHR TYPE REGUP-GJAHR,

V_SGTXT TYPE REGUP-SGTXT.

read table in_tab WITH KEY NAME = 'REGUP-VBLNR'.

check sy-subrc = 0.

a_vblnr = in_tab-value.

read table in_tab WITH KEY NAME = 'REGUP-GJAHR'.

check sy-subrc = 0.

a_GJAHR = in_tab-value.

BREAK-POINT.

SELECT SINGLE SGTXT FROM BSAK INTO V_SGTXT WHERE AUGBL = A_VBLNR

AND GJAHR = A_GJAHR.

READ TABLE OUT_TAB WITH KEY NAME = 'SGTXT'.

CHECK SY-SUBRC = 0.

OUT_TAB-VALUE = V_SGTXT.

MODIFY OUT_TAB INDEX SY-TABIX.

CLEAR V_SGTXT.

ENDFORM.

************************************************************************

Thanks

K Srinivas