problem after implementing exit EXIT_SAPLEBND_002

[Former Member]

Hello Experts,

I had implemented the exit EXIT_SAPLEBND_002 for triggering release strategy whenever user make any changes in Purchase order.

Now, the problem is release strategy and versions management are not getting activated at the same time.

If I am activating version management then release strategy getting deactivated automatically.

How should I correct it. Please help.

[madhu_vadlamani]

Hi Shubh,

Can you paste the code.

Regards,

Madhu.

[Former Member]

Hi Madhurao,

I had put following code in the exit:

if sy-tcode eq 'ME22N' and sy-ucomm eq 'MESAVE'.
e_cekko = i_cekko.
I_CEKKO-USRC1 = 'Y'.
MOVE-CORRESPONDING i_cekko to e_cekko.
e_cekko-gnetw = e_cekko-gnetw + '0.01'.
endif.

[Former Member]

Hi

Please go through the below link:

Shiva

[Former Member]

Hi,

I had gon through the link, its about implementing exit EXIT_SAPLEBND_002 which I already had implemented.

Is it possible that release strategy and version management both can be activated at a same time after changing PO.

Still looking for any solution.

[madhu_vadlamani]

Hi Shubh,

I will check and tell you. If you wont get solution better to post to SAP and check.

Regards,

Madhu.

[Sumeetpatil]

Add this code in user exit exit_saplbend_002 .

Code=> This code use to change release status on PO amount decrease and increase.

================================

**** Start of changes for Release status change on PO amount decrease .

E_CEKKO = I_CEKKO .

DATA : wa_bekpo type BEKPO,

       wa_ekpo TYPE ekpo,

       WA_CEKKO TYPE CEKKO,

       w_reset(1) TYPE c VALUE 'X'.

if sy-tcode eq 'ME22N' OR sy-tcode eq 'ME22'.

WA_CEKKO = I_CEKKO .

IMPORT WA_CEKKO = WA_CEKKO FROM MEMORY ID 'ZREL_COST'.

IF SY-SUBRC NE 0.

  EXPORT WA_CEKKO = WA_CEKKO TO MEMORY ID 'ZREL_COST'.

ENDIF.

ENDIF.

if ( sy-tcode eq 'ME22N' OR sy-tcode eq 'ME22' )

  and sy-ucomm eq 'MESAVE' or sy-ucomm eq 'MECHECKDOC'.

*Import/Export the origninal values.

*Check if the limit is passed.

LOOP AT it_bekpo INTO wa_bekpo .

SELECT SINGLE NETWR FROM ekpo INTO wa_ekpo-netwr WHERE ebeln eq wa_bekpo-ebeln and ebelp eq wa_bekpo-ebelp.

IF SY-SUBRC EQ 0.

IF wa_bekpo-netwr < wa_ekpo-netwr.

    w_reset = 'X'.

  endif.

ENDIF.

ENDLOOP.

*IF limit passed - reset the value to high limit beyond tolerance.

IF w_reset = 'X'.

E_CEKKO-GNETW = WA_CEKKO-GNETW + 1000000.

ENDIF.

endif.

**** End of changes for Release status change on PO amount decrease .