Error while activating enhancement in va02

[Former Member]

Dear gurus

i have made an enhancement point in program MV45AFZB t-code VA02

below is the code

if sy-uname ne vbak-ernam.
  if vbap-ABGRU eq 'Z1'.
    MESSAGE 'You are not Allowed to Change RM Block' TYPE 'I'.
    ENDIF.
    ENDIF.

The Code is syntactically correct

but when i activate it it give error

SQL error in the database when accessing a table.

Missing RAISING Clause in Interface
    Program                                 CL_ENH_CONTRACT===============CP
    Include                                 CL_ENH_CONTRACT===============CM00Z
    Row                                     1
    Module type                             (METHOD)
    Module Name                             GET_ALL_INACTIVES_FOR_OBJECT


 SELECT * FROM dwinactiv INTO TABLE inactives
   94    WHERE obj_name IN l_sel
   95    AND  ( object = 'REPS' OR
   96 *          object = 'CINC' OR
   97 *          object = 'INTF' OR
   98           object = 'METH' OR
   99           object = 'TYPE' OR
  100           object = 'FUNC' ).
  101 *BREAK STORTZ.

Please help

Regards

Saad nIsar

[Former Member]

Dear gurus

i have made an enhancement point in program MV45AFZB t-code VA02

below is the code

if sy-uname ne vbak-ernam.
  if vbap-ABGRU eq 'Z1'.
    MESSAGE 'You are not Allowed to Change RM Block' TYPE 'I'.
    ENDIF.
    ENDIF.

The Code is syntactically correct

but when i activate it it give error

SQL error in the database when accessing a table.

Missing RAISING Clause in Interface
    Program                                 CL_ENH_CONTRACT===============CP
    Include                                 CL_ENH_CONTRACT===============CM00Z
    Row                                     1
    Module type                             (METHOD)
    Module Name                             GET_ALL_INACTIVES_FOR_OBJECT


 SELECT * FROM dwinactiv INTO TABLE inactives
   94    WHERE obj_name IN l_sel
   95    AND  ( object = 'REPS' OR
   96 *          object = 'CINC' OR
   97 *          object = 'INTF' OR
   98           object = 'METH' OR
   99           object = 'TYPE' OR
  100           object = 'FUNC' ).
  101 *BREAK STORTZ.

Please help

Regards

Saad nIsar

[TMNielsen]

Hello Saad nIsar

I'm sure the error has nothing to do with your coding. When you activate MV45AFZB then you activate the complete SAPMV45A.

Have you tried to syntax check the main program SAPMV45A?

What happens if you change the code to comments

*if sy-uname ne vbak-ernam.
*  if vbap-ABGRU eq 'Z1'.
*    MESSAGE 'You are not Allowed to Change RM Block' TYPE 'I'.
*  ENDIF.
*ENDIF.

Can you active the code then?

Best regards

Thomas