01-05-2015 10:39 AM
Hi All, Is there a way to trigger automatic pricing upadate during chanage of partner role.
The standard exits are only on vbap change or vbkd change but not on modification of partners.
USEREXIT_NEW_PRICING_VBAP ,
USEREXIT_NEW_PRICING_VBKD .
01-06-2015 9:56 AM
Found work around by myself in MV45AFZZ.
USEREXIT_FIELD_MODIFICATION
STATICS lss_vbpa TYPE vbpavb.
DATA ls_xvbpa TYPE vbpavb.
IF sy-dynnr = '4701'.
IF screen-name = 'KUAGV-KUNNR'.
CLEAR ls_xvbpa.
READ TABLE xvbpa INTO ls_xvbpa WITH KEY parvw = 'SP'.
IF ls_xvbpa IS NOT INITIAL.
IF ls_xvbpa <> lss_vbpa.
PERFORM preisfindung_gesamt USING 'C'.
lss_vbpa = ls_xvbpa.
ENDIF.
ELSE.
IF lss_vbpa IS NOT INITIAL.
PERFORM preisfindung_gesamt USING 'C'.
CLEAR lss_vbpa.
ENDIF.
ENDIF.
ENDIF.
ENDIF.:
01-06-2015 9:56 AM
Found work around by myself in MV45AFZZ.
USEREXIT_FIELD_MODIFICATION
STATICS lss_vbpa TYPE vbpavb.
DATA ls_xvbpa TYPE vbpavb.
IF sy-dynnr = '4701'.
IF screen-name = 'KUAGV-KUNNR'.
CLEAR ls_xvbpa.
READ TABLE xvbpa INTO ls_xvbpa WITH KEY parvw = 'SP'.
IF ls_xvbpa IS NOT INITIAL.
IF ls_xvbpa <> lss_vbpa.
PERFORM preisfindung_gesamt USING 'C'.
lss_vbpa = ls_xvbpa.
ENDIF.
ELSE.
IF lss_vbpa IS NOT INITIAL.
PERFORM preisfindung_gesamt USING 'C'.
CLEAR lss_vbpa.
ENDIF.
ENDIF.
ENDIF.
ENDIF.: