/ISDFPS/OPEN_DOCS_BY_ORSUP SAP ABAP Report - Selection Screen for Selecting an Active Supply Relationship

/ISDFPS/OPEN_DOCS_BY_ORSUP is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for Program /ISDFPS/OPEN_DOCS_BY_ORSUP specifies a selection screen which the user can use to select an active supply relationship...see full standard documentation available for this report. Also check out the submitted Comments related to this SAP report and the details below to see which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC.

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

Transaction Code(s):

Below is a list of transaction codes which are relevant to this SAP report

/ISDFPS/ORSUP_DOCS - Open Docs for Supply Relationship

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 /ISDFPS/OPEN_DOCS_BY_ORSUP

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:

RH_GET_ACTIVE_WF_PLVAR
  CALL FUNCTION 'RH_GET_ACTIVE_WF_PLVAR'
    IMPORTING
      ACT_PLVAR       = GV_PLVAR
    EXCEPTIONS
      NO_ACTIVE_PLVAR = 1
      OTHERS          = 2.

RH_MACO
  CALL FUNCTION 'RH_MACO'                                   "#EC *
    EXPORTING
      SEARK           = OBJID
      WIN_TITLE       = TEXT-003
      PLVAR           = GV_PLVAR
      OTYPE           = 'O'
    IMPORTING
      SEL_OBJECT      = LS_OBJEC
    EXCEPTIONS
      F15             = 1
      NOTHING_FOUND   = 2
      WRONG_CONDITION = 3
      OTHERS          = 4.

DYNP_VALUES_UPDATE
    CALL FUNCTION 'DYNP_VALUES_UPDATE'                      "#EC *
      EXPORTING
        DYNAME               = DYNAME
        DYNUMB               = DYNUMB
      TABLES
        DYNPFIELDS           = LT_DYNP_UPDT
      EXCEPTIONS
        INVALID_ABAPWORKAREA = 1
        INVALID_DYNPROFIELD  = 2
        INVALID_DYNPRONAME   = 3
        INVALID_DYNPRONUMMER = 4
        INVALID_REQUEST      = 5
        NO_FIELDDESCRIPTION  = 6
        UNDEFIND_ERROR       = 7
        OTHERS               = 8.

DYNP_VALUES_READ
  CALL FUNCTION 'DYNP_VALUES_READ'
    EXPORTING
      DYNAME                   = DYNAME
      DYNUMB                   = DYNUMB
      PERFORM_INPUT_CONVERSION = 'X'
    TABLES
      DYNPFIELDS               = DYNP_TAB.

RH_OBJID_REQUEST
  CALL FUNCTION 'RH_OBJID_REQUEST'
    EXPORTING
      PLVAR           = GV_PLVAR
      OTYPE           = 'O'
      SEARK           = LV_SEARK
      WIN_TITLE       = TEXT-003
    IMPORTING
      SEL_OBJECT      = LS_OBJEC
    EXCEPTIONS
      CANCELLED       = 1
      WRONG_CONDITION = 2
      NOTHING_FOUND   = 3
      INTERNAL_ERROR  = 4
      ILLEGAL_MODE    = 5
      OTHERS          = 6.

DYNP_VALUES_UPDATE
  CALL FUNCTION 'DYNP_VALUES_UPDATE'                        "#EC *
    EXPORTING
      DYNAME               = DYNAME
      DYNUMB               = DYNUMB
    TABLES
      DYNPFIELDS           = DYNP_TAB
    EXCEPTIONS
      INVALID_ABAPWORKAREA = 1
      INVALID_DYNPROFIELD  = 2
      INVALID_DYNPRONAME   = 3
      INVALID_DYNPRONUMMER = 4
      INVALID_REQUEST      = 5
      NO_FIELDDESCRIPTION  = 6
      UNDEFIND_ERROR       = 7
      OTHERS               = 8.

DYNP_VALUES_READ
  CALL FUNCTION 'DYNP_VALUES_READ'
    EXPORTING
      DYNAME             = DYNAME
      DYNUMB             = DYNUMB
      TRANSLATE_TO_UPPER = 'X'
    TABLES
      DYNPFIELDS         = LT_DYNP_READ.

RH_READ_OBJECT
    CALL FUNCTION 'RH_READ_OBJECT'
      EXPORTING
        PLVAR     = GV_PLVAR
        OTYPE     = 'O'
        OBJID     = LV_OBJID
        ISTAT     = '1'
      IMPORTING
        SHORT     = LS_FORCERID_HR_OR_EXT-SOBID_SHORT
        STEXT     = LS_FORCERID_HR_OR_EXT-SOBID_STEXT
      EXCEPTIONS
        NOT_FOUND = 1
        OTHERS    = 2.

RH_READ_OBJECT
    CALL FUNCTION 'RH_READ_OBJECT'
      EXPORTING
        PLVAR     = GV_PLVAR
        OTYPE     = 'O'
        OBJID     = LV_OBJID
        ISTAT     = '1'
      IMPORTING
        SHORT     = LS_FORCERID_HR_OR_EXT-OBJID_SHORT
        STEXT     = LS_FORCERID_HR_OR_EXT-OBJID_STEXT
      EXCEPTIONS
        NOT_FOUND = 1
        OTHERS    = 2.

F4IF_INT_TABLE_VALUE_REQUEST
  CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
      DDIC_STRUCTURE  = '/ISDFPS/FORCERID_HR_OR_EXT'
      RETFIELD        = 'FRGUID'
      DYNPPROG        = DYREPID
      DYNPNR          = DYNUMB
      DYNPROFIELD     = 'FRGUID'
      VALUE_ORG       = 'S'
      DISPLAY         = 'F'
    TABLES
      VALUE_TAB       = LT_FORCERID_HR_OR_EXT
      FIELD_TAB       = LT_FIELD_TAB
    EXCEPTIONS
      PARAMETER_ERROR = 1
      NO_VALUES_FOUND = 2
      OTHERS          = 3.

DYNP_VALUES_READ
  CALL FUNCTION 'DYNP_VALUES_READ'
    EXPORTING
      DYNAME             = DYNAME
      DYNUMB             = DYNUMB
      TRANSLATE_TO_UPPER = 'X'
    TABLES
      DYNPFIELDS         = LT_DYNP_READ.

F4IF_INT_TABLE_VALUE_REQUEST
  CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
      DDIC_STRUCTURE  = '/ISDFPS/FORSUP'
      RETFIELD        = 'FRCNT'
      DYNPPROG        = DYREPID
      DYNPNR          = DYNUMB
      DYNPROFIELD     = 'FRCNT'
      VALUE_ORG       = 'S'
      DISPLAY         = 'F'
    TABLES
      VALUE_TAB       = LT_FORCERSUP
    EXCEPTIONS
      PARAMETER_ERROR = 1
      NO_VALUES_FOUND = 2
      OTHERS          = 3.

/ISDFPS/SHOW_OPEN_DOCUMENTS
    CALL FUNCTION '/ISDFPS/SHOW_OPEN_DOCUMENTS'
      EXPORTING
        IM_FRGUID  = FRGUID
        IM_FRCNT   = FRCNT
        IM_OBJID   = LV_OBJID
        IM_SEL_DAT = DATE
        IM_FLAG_RL = RLIEF.