HR - Supress Error messages at end of PNP Logical dB ABAP

Question

It appears from the code for logical dB PNP that you can turn off the error messages that automatically print at the end of the program, but I don't see how to do it.  Here's the SAP code in include DBPNPI01:
FORM end-processing.
  CHECK sw_supress_write EQ no.
Can anyone tell me how to 'change' sw_supress_write?

Answer 1

Try this code:
DATA:
  BEGIN OF t_empty OCCURS 50,
        pernr LIKE pernr-pernr,
  END   OF t_empty.
DATA:
  temp1 TYPE i,
  temp2 TYPE i,
  temp3 TYPE i.
NODES: pernr.
START-OF-SELECTION.
  PERFORM pnp_skipped_pernr(sapdbpnp)
    TABLES t_empty
    USING 'Y'
    CHANGING temp1 temp2 temp3.
GET pernr.
* Do something here.
*FORM pnp_skipped_pernr
*         TABLES   locked_pernr_tab     LIKE locked[]        "out
*         USING    supress_reject_info  LIKE sw_supress_write"in
*         CHANGING auth_skipped_count   LIKE auth-skip-count "out
*                  locked_skipped_count LIKE locked_pernr_count"out
*                  locked_occurs_param  LIKE locked_ocp.     "out
*  locked_pernr_tab[]   = locked[].
*  sw_supress_write     = supress_reject_info.
*  auth_skipped_count   = auth-skip-count.
*  locked_skipped_count = locked_pernr_count.
*  locked_occurs_param  = locked_ocp.
*ENDFORM.                               "pnp_skipped_pern
Let us know how it goes.