Disabling spool request generation for a purchase order

Question

Hi,
I have a requirement as follows :
In ME22n, according to standard configuration for a purchase order whenever the indicators 'Deliv. compl' or 'invoice flag' is checked or unchecked and saved, a spool request is generated. This spool request can be viewed in messages tab of PO.
My requirement is to disable the spool request generation on change of the above mentioned indicators.
I have found a user exit 'EXIT_SAPMM06E_016' which is triggerred on clicking on 'SAVE' of PO.
I am unable to find the field or structure with which i can disable the generation of spool request.
Your help is much appreciated!
Thanks & Regards,
Richa Aggarwal

Answer 1

Richa,
you can replace 101 with your routine number. who said you cannot? in NACE, output procedure
the code in 101.
FORM KOBED_101.
  LOOP AT XNAST WHERE KSCHL EQ KOMT1-KSCHL AND
                      OBJKY EQ MSG_OBJKY   AND
                      AKTIV EQ SPACE       AND
                      VSTAT EQ '0'.
    EXIT.
  ENDLOOP.
  CHECK SY-SUBRC NE 0.
  SY-SUBRC = 4.
  CHECK ( KOMKBEA-DRUVO EQ NEU OR KOMKBEA-DRUVO EQ AEND ).
  CLEAR SY-SUBRC.
ENDFORM.
*       FORM KOBEV_101                                                *
FORM KOBEV_101.
  LOOP AT XNAST WHERE KSCHL EQ T683S-KSCHL AND
                      OBJKY EQ MSG_OBJKY   AND
                      AKTIV EQ SPACE       AND
                      VSTAT EQ '0'.
    EXIT.
  ENDLOOP.
  CHECK SY-SUBRC NE 0.
  SY-SUBRC = 4.
  CHECK ( KOMKBEA-DRUVO EQ NEU OR KOMKBEA-DRUVO EQ AEND ).
  CLEAR SY-SUBRC.
ENDFORM.
so you can copy the code from these forms, and keep them before your code in your custom routine,.. like:
FORM KOBED_901. "==> i am creating a new VOFM routine 901 here
  LOOP AT XNAST WHERE KSCHL EQ KOMT1-KSCHL AND
                      OBJKY EQ MSG_OBJKY   AND
                      AKTIV EQ SPACE       AND
                      VSTAT EQ '0'.
    EXIT.
  ENDLOOP.
  CHECK SY-SUBRC NE 0.
  SY-SUBRC = 4.
  CHECK ( KOMKBEA-DRUVO EQ NEU OR KOMKBEA-DRUVO EQ AEND ).
  CLEAR SY-SUBRC.
"==> from here add your code.
data:lv_subrc type sy-sibrc.
if xyz NE asdasd "==> your validations..
lv_subrc = 4.
endif.
sy-subrc = lv_subrc.
ENDFORM.
*       FORM KOBEV_901                                                *
FORM KOBEV_901.
  LOOP AT XNAST WHERE KSCHL EQ T683S-KSCHL AND
                      OBJKY EQ MSG_OBJKY   AND
                      AKTIV EQ SPACE       AND
                      VSTAT EQ '0'.
    EXIT.
  ENDLOOP.
  CHECK SY-SUBRC NE 0.
  SY-SUBRC = 4.
  CHECK ( KOMKBEA-DRUVO EQ NEU OR KOMKBEA-DRUVO EQ AEND ).
  CLEAR SY-SUBRC.
"==> from here add your code.
data:lv_subrc type sy-sibrc.
if xyz NE asdasd "==> your validations..
lv_subrc = 4.
endif.
sy-subrc = lv_subrc.
ENDFORM.