Customer Expected Price - Custom Cond. Val. Form. Routine 608 not working

[Former Member]

Hi ABAP experts,

I have created a new condition value forumla routine 608. Copied the code from 008.

I want to place a delivery block at header level.

data: maximum(3) type p value 50,

difference(7) type p.

check: komp-cepok ne 'C',

komp-kposn ne 0,

komk-vbtyp na vbtyp_fakt.

if komp-fxmsg = space.

komp-fxmsg = '805'.

endif.

komp-cepok = ' '.

check: komp-prsfd = 'X'.

komp-cepok = 'A'.

difference = komp-netwr - xkwert.

if difference lt 0.

difference = difference * -1.

endif.

check: difference gt maximum.

komk-lifsk = 'ZZ'.

komp-cepok = 'B'.

xkomv-fxmsg = '249'.

This routine is not placing any delivery block even if there price difference greater than 50 between customer expected condition value and Net Value.

Please let me know.

What's going wrong?

Thanks,

Matt

[Former Member]

Customer expected price difference goes to its own hold status which you can see using V.25. it wouldnt put a Delivery Block on the order