SAP for Utilities Discussions
Connect with fellow SAP users to share best practices, troubleshoot challenges, and collaborate on building a sustainable energy future. Join the discussion.
cancel
Showing results for 
Search instead for 
Did you mean: 

Dump while creating Move-In and Move-Out

Former Member
0 Kudos

Hi Gurus ,

Getting a dump while creating Move-In and Move-Out .

Getting syntax error in the following program SAPLXEMDBP003 .

"Incorrect Nesting : Before the statement "Module", the structure Introd".

The problem here is that in program SAPLES01 the defect part is CUSTOMER_SUBSCREEN_PBO_BEFORE.

I have attached the piece of code where problem occurs. Went through the coding but not able to fix it. Someone pls let me know the Solution for the problem ASAP.

Thanking you in advance.

T-Code : EC50E

Program : SAPLES01

Include : LES01F01

Part of code where error is happening :

&----


*& Form CUSTOMER_SUBSCREEN_PBO_BEFORE

&----


  • text

----


FORM customer_subscreen_pbo_before.

DATA:

cprogname LIKE trdir-name,

cdynnr LIKE tsdir-dynnr,

bername(30),

tfgr LIKE screen-group3 OCCURS 2 WITH HEADER LINE,

tfldn LIKE screen-name OCCURS 0 WITH HEADER LINE,

dp LIKE regen-kennzx,

ca(1).

  • Customer subscreen active?

cprogname = 'SAPLES01'.

cdynnr = '0400'.

bername = 'CUSTSUB'.

CALL FUNCTION 'MODX_SUBSCREEN_ACTIVE_CHECK'

EXPORTING

cprogname = cprogname

cdynnr = cdynnr

bername = bername

IMPORTING

active = ca.

IF ca = 'X'.

CLEAR ca.

LOOP AT SCREEN.

CHECK screen-group3 = '001'.

CHECK screen-input = 1 OR

screen-output = 1.

ca = 'X'.

EXIT.

ENDLOOP.

ENDIF.

IF ca = 'X'.

sub_repid = 'SAPLES01'.

sub_dynnr = '0400'.

ELSE.

sub_repid = 'SAPLES01'.

sub_dynnr = '0500'.

EXIT.

ENDIF.

IF sobj-contr-wmode = co_display.

dp = 'X'.

ENDIF.

CALL CUSTOMER-FUNCTION '030'

EXPORTING

x_display = dp

x_partner_data = sobj-act

x_wmode = sobj-contr-wmode

TABLES

tx_act_fldgrps = tfgr

ty_fieldnames = tfldn.

DESCRIBE TABLE tfldn.

IF sy-tfill > 0.

LOOP AT SCREEN.

tfldn = screen-name.

READ TABLE tfldn.

CHECK sy-subrc = 0.

screen-active = 0.

MODIFY SCREEN.

ENDLOOP.

ENDIF.

ENDFORM. " CUSTOMER_SUBSCREEN_PBO_BEFORE

1 ACCEPTED SOLUTION

Former Member
0 Kudos

hi

check notes 371985 in service.sap.com

it wil help u

kr

raj

View solution in original post

4 REPLIES 4

former_member229976
Active Participant
0 Kudos

Hi,

I think the call to the user exit 030 has to be removed. But usually your can have a better look at this within the system itself. I'd assume with try and error you will get a quick result - just decomment the responsible line(s) and check.

KR

Uwe

Former Member
0 Kudos

Thank you issue solved

0 Kudos

Dear Expert,

we get same problem.please tell me how u solve it.

thnaks

ajai

Former Member
0 Kudos

hi

check notes 371985 in service.sap.com

it wil help u

kr

raj