/OPT/O_VPR SAP ABAP INCLUDE - Program for object type ZWFI_VPR : VendorPortalRegist

/OPT/O_VPR is a standard ABAP INCLUDE available within your SAP system (depending on your version and release level). Below is the basic information available for this SAP report including which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC. Also check out the submitted Comments related to this SAP report or see any standard documentation available.

If you would like to execute this report or see the full code listing simply enter /OPT/O_VPR into the relevant SAP transactions such as SE38 or SE80

ABAP code to call this SAP report using the submit statement

This report can be called from another progam/report simply by using the ABAP SUBMIT statement, see below for example ABAP code snipts of how to do this.

Text pool values

INCLUDES used within this REPORT /OPT/O_VPR

No INCLUDES are used within this REPORT code!

TABLES used within REPORT and the associated SELECT statement:

No SAP DATABASE tables are accessed within this REPORT code!

Function Modules used within report and the associated call statement:

/OPT/VSS_CALL_VPR_SCREEN
CALL FUNCTION '/OPT/VSS_CALL_VPR_SCREEN'
  EXPORTING
    vendor         = object-key-vendor
    WORKFLOW       = 'X'
    mode           = 'DISPLAY'.   " Display only

/OPT/CP_READCONSTANT
*cALL FUNCTION '/OPT/CP_READCONSTANT'
*     EXPORTING
*          CONSTNAME   = 'EMAIL_NOTICE_RECVR'
*          PRODUCTCODE = 'VDP'
*     IMPORTING
*          CONSTVALUE  = L_CONST.

/opt/CP_READCONSTANT
*CALL FUNCTION '/opt/CP_READCONSTANT'
*     EXPORTING
*          CONSTNAME   = 'EMAIL_NOTICE_TEXTOBJ'
*          PRODUCTCODE = 'VDP'
*     IMPORTING
*          CONSTVALUE  = L_CONST.

READ_TEXT
CALL FUNCTION 'READ_TEXT'
     EXPORTING
          CLIENT   = SY-MANDT
          ID       = 'ST'
          LANGUAGE = SY-LANGU
          NAME     = TEXTOBJ_NAME
          OBJECT   = 'TEXT'
     IMPORTING
          HEADER   = TXT_HDR
     TABLES
          LINES    = T_LINES
     EXCEPTIONS
          OTHERS   = 1.

/opt/CP_READCONSTANT
*CALL FUNCTION '/opt/CP_READCONSTANT'
*     EXPORTING
*          CONSTNAME   = 'EMAIL_TXTOBJ_OBJINST'
*          PRODUCTCODE = 'VDP'
*     IMPORTING
*          CONSTVALUE  = L_CONST.

SWU_TEXTLINES_REPLACE
CALL FUNCTION 'SWU_TEXTLINES_REPLACE'
     EXPORTING
          TEXT_HEADER       = TXT_HDR
     TABLES
          TEXT_LINES        = T_LINES
          CONTAINER         = OBJ_CONT
     CHANGING
          NEW_TEXT_HEADER   = TXT_HDR
     EXCEPTIONS
          TEXT_SYSTEM_ERROR = 1
          OTHERS            = 2.

/opt/CP_READCONSTANT
*CALL FUNCTION '/opt/CP_READCONSTANT'
*     EXPORTING
*          CONSTNAME   = 'SEND_MAIL'
*          PRODUCTCODE = 'VDP'
*     IMPORTING
*          CONSTVALUE  = L_CONST.

/OPT/VSS_CALL_VPR_SCREEN
CALL FUNCTION '/OPT/VSS_CALL_VPR_SCREEN'
  EXPORTING
    vendor               = object-key-vendor
    WORKFLOW             = 'X'
    mode                 = l_mode
    APPROVAL_LEVEL       = l_apprlevel
  IMPORTING
    LAST_ACTION          = l_last_action
    EXIT_COMMAND         = l_exit_comm
  exceptions
    others               = 1.                .

/OPT/VSS_SAP_UPDATE
CALL FUNCTION '/OPT/VSS_SAP_UPDATE'
 EXPORTING
   VENDOR                       = object-key-vendor
 TABLES
   RETURN                       = bapiret.

/OPT/VSS_CALL_VPR_SCREEN
CALL FUNCTION '/OPT/VSS_CALL_VPR_SCREEN'
  EXPORTING
    vendor               = object-key-vendor
    WORKFLOW             = 'X'
    mode                 = 'LOAD_TABLE'
  IMPORTING
    LAST_ACTION          = l_last_action
    EXIT_COMMAND         = l_exit_comm
  exceptions
    others               = 1.                .