RESODICO SAP ABAP Report - Program for Object Type DISCONNECT: Supply Disconnection

SAP T-Codes / Example ABAP code
ABAP OO / SAP Function Modules
ABAP reports / SAP Error Messages
SAP Tables / SAP Video Training

RESODICO is a standard Executable ABAP Report 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 RESODICO 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.

SUBMIT RESODICO. "Basic submit
SUBMIT RESODICO AND RETURN. "Return to original report after report execution complete
SUBMIT RESODICO VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement

Text pool values

Title: Program for Object Type DISCONNECT: Supply Disconnection
Text Symbol: 001 = (No description available)
Text Symbol: N00 = Disconnection doc.

INCLUDES used within this REPORT RESODICO

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:

DDUT_DOMVALUE_TEXT_GET CALL FUNCTION 'DDUT_DOMVALUE_TEXT_GET' EXPORTING NAME = 'DISCREASON' VALUE = WDD07V-DOMVALUE_L LANGU = SY-LANGU TEXTS_ONLY = 'X' IMPORTING DD07V_WA = wdd07V EXCEPTIONS NOT_FOUND = 1 ILLEGAL_INPUT = 2 OTHERS = 3.

ISU_DB_EDCN_SELECT CALL FUNCTION 'ISU_DB_EDCN_SELECT' EXPORTING X_DISCNO = OBJECT-KEY-NUMBER * X_ACTUAL = * IMPORTING * Y_EDISCDOC = TABLES * YT_EDISCOBJ = * YT_EDISCOBJH = YT_EDISCACT = IACT * YT_EDISCPOS = EXCEPTIONS NOT_FOUND = 1 SYSTEM_ERROR = 2 OTHERS = 3.

ISU_S_DISCDOC_CREATE CALL FUNCTION 'ISU_S_DISCDOC_CREATE' EXPORTING * X_DISCNO = X_DISCREASON = DISCONNECTIONREASON X_REFOBJTYPE = REFOBJTYPE X_REFOBJKEY = REFOBJKEY X_UPD_ONLINE = 'X' * X_NO_DIALOG = * X_AUTO = IMPORTING * Y_DB_UPDATE = Y_EXIT_TYPE = ETYPE Y_NEW_EDISCDOC = WEDISCDOC EXCEPTIONS EXISTING = 1 FOREIGN_LOCK = 2 NOT_AUTHORIZED = 3 INPUT_ERROR = 4 GENERAL_FAULT = 5 OTHERS = 6.

ISU_S_DISCDOC_CREATE CALL FUNCTION 'ISU_S_DISCDOC_CREATE' EXPORTING * X_DISCNO = X_DISCREASON = DISCONNECTIONREASON X_REFOBJTYPE = REFOBJTYPE X_REFOBJKEY = REFOBJKEY X_UPD_ONLINE = 'X' X_NO_DIALOG = 'X' * X_AUTO = IMPORTING * Y_DB_UPDATE = Y_EXIT_TYPE = ETYPE Y_NEW_EDISCDOC = WEDISCDOC EXCEPTIONS EXISTING = 1 FOREIGN_LOCK = 2 NOT_AUTHORIZED = 3 INPUT_ERROR = 4 GENERAL_FAULT = 5 OTHERS = 6.

ISU_DB_EDCN_SELECT CALL FUNCTION 'ISU_DB_EDCN_SELECT' EXPORTING X_DISCNO = WEDISCDOC-DISCNO * X_ACTUAL = * IMPORTING * Y_EDISCDOC = TABLES * YT_EDISCOBJ = * YT_EDISCOBJH = YT_EDISCACT = IT_EDISCACT * YT_EDISCPOS = EXCEPTIONS NOT_FOUND = 1 SYSTEM_ERROR = 2 OTHERS = 3 .

BINARY_RELATION_CREATE CALL FUNCTION 'BINARY_RELATION_CREATE' EXPORTING OBJ_ROLEA = I_OBJ_ROLEA OBJ_ROLEB = I_OBJ_ROLEB RELATIONTYPE = 'TRI7' * IMPORTING * BINREL = * TABLES * BINREL_ATTRIB = EXCEPTIONS NO_MODEL = 1 INTERNAL_ERROR = 2 UNKNOWN = 3 OTHERS = 4 .

ISU_S_DISCDOC_DISPLAY CALL FUNCTION 'ISU_S_DISCDOC_DISPLAY' EXPORTING X_DISCNO = OBJECT-KEY-NUMBER * X_UPD_ONLINE = X_NO_CHANGE = 'X' X_NO_OTHER = 'X' IMPORTING * Y_DB_UPDATE = Y_EXIT_TYPE = etype * Y_NEW_EDISCDOC = EXCEPTIONS NOT_FOUND = 1 GENERAL_FAULT = 2 NOT_AUTHORIZED = 3 OTHERS = 4.

ISU_S_DISCDOC_CHANGE
CALL FUNCTION 'ISU_S_DISCDOC_CHANGE'
     EXPORTING
          X_DISCNO       =  OBJECT-KEY-NUMBER
          X_UPD_ONLINE   =  'X'
          X_NO_DIALOG    =  ' '
*         x_auto         =  auto
*         X_OBJ          =
          X_NO_OTHER     =  'X'
*         X_DISCACT      =
     IMPORTING
*         Y_DB_UPDATE    =
          Y_EXIT_TYPE    = etype
*         Y_NEW_EDISCDOC =
*         Y_INTERFACE    =
     EXCEPTIONS
          NOT_FOUND      = 1
          FOREIGN_LOCK   = 2
          NOT_AUTHORIZED = 3
          INPUT_ERROR    = 4
          GENERAL_FAULT  = 5
          OTHERS         = 6.

ISU_S_DISCDOC_CHANGE CALL FUNCTION 'ISU_S_DISCDOC_CHANGE' EXPORTING X_DISCNO = OBJECT-KEY-NUMBER X_UPD_ONLINE = 'X' * X_NO_DIALOG = X_AUTO = AUTO * X_OBJ = X_NO_OTHER = 'X' X_SET_COMMIT_WORK = SETCOMMITWORK X_DISCACTTIME = i_discontime IMPORTING * Y_DB_UPDATE = Y_EXIT_TYPE = ETYPE * Y_NEW_EDISCDOC = Y_INTERFACE = AUTO-INTERFACE EXCEPTIONS NOT_FOUND = 1 FOREIGN_LOCK = 2 NOT_AUTHORIZED = 3 * input_error = 4 GENERAL_FAULT = 5 OTHERS = 6.

BINARY_RELATION_CREATE CALL FUNCTION 'BINARY_RELATION_CREATE' EXPORTING OBJ_ROLEA = I_OBJ_ROLEA OBJ_ROLEB = I_OBJ_ROLEB RELATIONTYPE = 'TRI6' * IMPORTING * BINREL = * TABLES * BINREL_ATTRIB = EXCEPTIONS NO_MODEL = 1 INTERNAL_ERROR = 2 UNKNOWN = 3 OTHERS = 4 .

ISU_S_DISCDOC_CHANGE CALL FUNCTION 'ISU_S_DISCDOC_CHANGE' EXPORTING X_DISCNO = OBJECT-KEY-NUMBER X_UPD_ONLINE = 'X' * X_NO_DIALOG = X_AUTO = AUTO X_NO_OTHER = 'X' IMPORTING * Y_DB_UPDATE = Y_EXIT_TYPE = ETYPE Y_INTERFACE = AUTO-INTERFACE EXCEPTIONS NOT_FOUND = 1 FOREIGN_LOCK = 2 NOT_AUTHORIZED = 3 * input_error = 4 GENERAL_FAULT = 5 OTHERS = 6.

ISU_S_DISCDOC_CHANGE CALL FUNCTION 'ISU_S_DISCDOC_CHANGE' EXPORTING X_DISCNO = OBJECT-KEY-NUMBER X_UPD_ONLINE = 'X' * X_NO_DIALOG = X_AUTO = AUTO * X_OBJ = X_NO_OTHER = 'X' X_SET_COMMIT_WORK = SETCOMMITWORK X_DISCACTTIME = i_recontime IMPORTING * Y_DB_UPDATE = Y_EXIT_TYPE = ETYPE Y_INTERFACE = AUTO-INTERFACE EXCEPTIONS NOT_FOUND = 1 FOREIGN_LOCK = 2 NOT_AUTHORIZED = 3 * input_error = 4 GENERAL_FAULT = 5 OTHERS = 6.

ISU_S_DISCDOC_CHANGE CALL FUNCTION 'ISU_S_DISCDOC_CHANGE' EXPORTING X_DISCNO = OBJECT-KEY-NUMBER X_UPD_ONLINE = 'X' * X_NO_DIALOG = X_AUTO = AUTO * X_OBJ = X_NO_OTHER = 'X' IMPORTING * Y_DB_UPDATE = Y_EXIT_TYPE = ETYPE Y_INTERFACE = AUTO-INTERFACE EXCEPTIONS NOT_FOUND = 1 FOREIGN_LOCK = 2 NOT_AUTHORIZED = 3 * input_error = 4 GENERAL_FAULT = 5 OTHERS = 6.

ISU_S_DISCDOC_CHANGE
CALL FUNCTION 'ISU_S_DISCDOC_CHANGE'
     EXPORTING
          X_DISCNO       =  OBJECT-KEY-NUMBER
          X_UPD_ONLINE   =  'X'
          X_NO_DIALOG    =  'X'
          X_AUTO         =  AUTO
*         X_OBJ          =
*         X_NO_OTHER     =
*         X_DISCACT      =
*    IMPORTING
*         Y_DB_UPDATE    =
*         Y_EXIT_TYPE    =
*         Y_NEW_EDISCDOC =
*         Y_INTERFACE    =
     EXCEPTIONS
          NOT_FOUND      = 1
          FOREIGN_LOCK   = 2
          NOT_AUTHORIZED = 3
          INPUT_ERROR    = 4
          GENERAL_FAULT  = 5
          OTHERS         = 6.

ISU_S_DISCDOC_CHANGE
  CALL FUNCTION 'ISU_S_DISCDOC_CHANGE'
       EXPORTING
            X_DISCNO       =  OBJECT-KEY-NUMBER
            X_UPD_ONLINE   =  'X'
            X_NO_DIALOG    =  'X'
            X_AUTO         =  AUTO
*           X_OBJ          =
*           X_NO_OTHER     =
*           X_DISCACT      =
*      IMPORTING
*           Y_DB_UPDATE    =
*           Y_EXIT_TYPE    =
*           Y_NEW_EDISCDOC =
*           Y_INTERFACE    =
     EXCEPTIONS
          NOT_FOUND      = 1
          FOREIGN_LOCK   = 2
          NOT_AUTHORIZED = 3
          INPUT_ERROR    = 4
          GENERAL_FAULT  = 5
          OTHERS         = 6.

ISU_S_DISCDOC_CHANGE

CALL FUNCTION 'ISU_S_DISCDOC_CHANGE' EXPORTING X_DISCNO = OBJECT-KEY-NUMBER X_UPD_ONLINE = 'X' X_NO_DIALOG = 'X' X_AUTO = AUTO * X_OBJ = * X_NO_OTHER = * X_DISCACT = X_SET_COMMIT_WORK = SETCOMMITWORK X_DISCACTTIME = DISCONACTIVITYTIME IMPORTING * Y_DB_UPDATE = Y_EXIT_TYPE = ETYPE * Y_NEW_EDISCDOC = Y_INTERFACE = AUTO-INTERFACE EXCEPTIONS NOT_FOUND = 1 FOREIGN_LOCK = 2 NOT_AUTHORIZED = 3 INPUT_ERROR = 4 GENERAL_FAULT = 5 OBJECT_INV_DISCDOC = 6 OTHERS = 7.

ISU_S_DISCDOC_CHANGE CALL FUNCTION 'ISU_S_DISCDOC_CHANGE' EXPORTING X_DISCNO = OBJECT-KEY-NUMBER X_UPD_ONLINE = 'X' X_NO_DIALOG = 'X' X_AUTO = AUTO * X_OBJ = * X_NO_OTHER = * X_DISCACT = X_SET_COMMIT_WORK = SETCOMMITWORK X_DISCACTTIME = DISCONACTIVITYTIME IMPORTING * Y_DB_UPDATE = Y_EXIT_TYPE = ETYPE * Y_NEW_EDISCDOC = Y_INTERFACE = AUTO-INTERFACE EXCEPTIONS NOT_FOUND = 1 FOREIGN_LOCK = 2 NOT_AUTHORIZED = 3 INPUT_ERROR = 4 GENERAL_FAULT = 5 OBJECT_INV_DISCDOC = 6 OTHERS = 7.

ISU_S_DISCDOC_CHANGE
CALL FUNCTION 'ISU_S_DISCDOC_CHANGE'
     EXPORTING
          X_DISCNO       =  OBJECT-KEY-NUMBER
          X_UPD_ONLINE   =  'X'
          X_NO_DIALOG    =  'X'
          X_AUTO         =  AUTO
*         X_OBJ          =
*         X_NO_OTHER     =
*         X_DISCACT      =
*    IMPORTING
*         Y_DB_UPDATE    =
*         Y_EXIT_TYPE    =
*         Y_NEW_EDISCDOC =
*         Y_INTERFACE    =
     EXCEPTIONS
          NOT_FOUND      = 1
          FOREIGN_LOCK   = 2
          NOT_AUTHORIZED = 3
          INPUT_ERROR    = 4
          GENERAL_FAULT  = 5
          OTHERS         = 6.

ISU_S_DISCDOC_CHANGE
CALL FUNCTION 'ISU_S_DISCDOC_CHANGE'
     EXPORTING
          X_DISCNO       =  OBJECT-KEY-NUMBER
          X_UPD_ONLINE   =  'X'
          X_NO_DIALOG    =  ' '
          X_AUTO         =  AUTO
*         X_OBJ          =
*         X_NO_OTHER     =
*         X_DISCACT      =
     IMPORTING
*         Y_DB_UPDATE    =
          Y_EXIT_TYPE    = etype
*         Y_NEW_EDISCDOC =
*         Y_INTERFACE    =
     EXCEPTIONS
          NOT_FOUND      = 1
          FOREIGN_LOCK   = 2
          NOT_AUTHORIZED = 3
          INPUT_ERROR    = 4
          GENERAL_FAULT  = 5
          OTHERS         = 6.

ISU_S_DISCDOC_CHANGE
  CALL FUNCTION 'ISU_S_DISCDOC_CHANGE'
       EXPORTING
            X_DISCNO       =  OBJECT-KEY-NUMBER
            X_UPD_ONLINE   =  'X'
            X_NO_DIALOG    =  ' '
            X_AUTO         =  AUTO
*           X_OBJ          =
*           X_NO_OTHER     =
*           X_DISCACT      =
     IMPORTING
*           Y_DB_UPDATE    =
            Y_EXIT_TYPE    = etype
*           Y_NEW_EDISCDOC =
*           Y_INTERFACE    =
     EXCEPTIONS
          NOT_FOUND      = 1
          FOREIGN_LOCK   = 2
          NOT_AUTHORIZED = 3
          INPUT_ERROR    = 4
          GENERAL_FAULT  = 5
          OTHERS         = 6.

ISU_S_DISCDOC_CHANGE CALL FUNCTION 'ISU_S_DISCDOC_CHANGE' EXPORTING X_DISCNO = OBJECT-KEY-NUMBER X_UPD_ONLINE = 'X' X_NO_DIALOG = 'X' X_AUTO = AUTO * X_OBJ = * X_NO_OTHER = * X_DISCACT = IMPORTING * Y_DB_UPDATE = Y_EXIT_TYPE = ETYPE * Y_NEW_EDISCDOC = Y_INTERFACE = AUTO-INTERFACE EXCEPTIONS NOT_FOUND = 1 FOREIGN_LOCK = 2 NOT_AUTHORIZED = 3 INPUT_ERROR = 4 GENERAL_FAULT = 5 OBJECT_INV_DISCDOC = 6 OTHERS = 7.

ISU_CHECK_DCORDER_OBSOLETE CALL FUNCTION 'ISU_CHECK_DCORDER_OBSOLETE' EXPORTING X_VKONT = VKONT X_DISCNO = DISCNO IMPORTING Y_DCORDER_OBSOLETE = DCORDEROBSOLETE EXCEPTIONS OTHERS = 01.

ISU_S_DISCDOC_CHANGE CALL FUNCTION 'ISU_S_DISCDOC_CHANGE' EXPORTING X_DISCNO = OBJECT-KEY-NUMBER X_UPD_ONLINE = 'X' * X_NO_DIALOG = X_AUTO = AUTO * X_OBJ = X_NO_OTHER = 'X' X_SET_COMMIT_WORK = SETCOMMITWORK IMPORTING * Y_DB_UPDATE = Y_EXIT_TYPE = ETYPE Y_INTERFACE = AUTO-INTERFACE EXCEPTIONS NOT_FOUND = 1 FOREIGN_LOCK = 2 NOT_AUTHORIZED = 3 * input_error = 4 GENERAL_FAULT = 5 OBJECT_INV_DISCDOC = 6 OTHERS = 7.

ISU_DISCACTION_OBJECTS_DET CALL FUNCTION 'ISU_DISCACTION_OBJECTS_DET' EXPORTING X_DISCTYPE = DISCTYPE X_ACTTIME = ACTTIME X_ACTDATE = ACTDATE X_DISCACT = DISCACT X_DISCNO = DISCNO IMPORTING Y_ACTION_DISCONORDER = ACTIONDISCONORDER TABLES YT_OBEJCTS_DISCONORDER = OBEJCTSDISCONORDER YT_OBJECTS_RECONORDER = OBJECTSRECONORDER EXCEPTIONS ACTION_INVALID = 1001 DATE_INVALID = 1002 TIME_INVALID = 1003 DISCTYPE_INVALID = 1004 SYSTEM_ERROR = 1005 DISCNO_INVALID = 1006 NO_OBJECTS_FOUND = 1007 OTHERS = 01.

ISU_S_DISCDOC_CHANGE
CALL FUNCTION 'ISU_S_DISCDOC_CHANGE'
     EXPORTING
          X_DISCNO       =  OBJECT-KEY-NUMBER
          X_UPD_ONLINE   =  'X'
          X_NO_DIALOG    =  'X'
          x_auto         =  auto
*         X_OBJ          =
*          X_NO_OTHER     =  'X'
*         X_DISCACT      =
     IMPORTING
*         Y_DB_UPDATE    =
          Y_EXIT_TYPE    = etype
*         Y_NEW_EDISCDOC =
*         Y_INTERFACE    = AUTO-INTERFACE
     EXCEPTIONS
             NOT_FOUND          = 1
             FOREIGN_LOCK       = 2
             NOT_AUTHORIZED     = 3
             INPUT_ERROR        = 4
             GENERAL_FAULT      = 5
             OBJECT_INV_DISCDOC = 6
             OTHERS             = 7.

ISU_S_DISCDOC_CHANGE CALL FUNCTION 'ISU_S_DISCDOC_CHANGE' EXPORTING X_DISCNO = OBJECT-KEY-NUMBER X_UPD_ONLINE = 'X' X_NO_DIALOG = 'X' X_AUTO = AUTO * X_OBJ = * X_NO_OTHER = * X_DISCACT = X_SET_COMMIT_WORK = SETCOMMITWORK IMPORTING * Y_DB_UPDATE = Y_EXIT_TYPE = ETYPE * Y_NEW_EDISCDOC = Y_INTERFACE = AUTO-INTERFACE EXCEPTIONS NOT_FOUND = 1 FOREIGN_LOCK = 2 NOT_AUTHORIZED = 3 INPUT_ERROR = 4 GENERAL_FAULT = 5 OBJECT_INV_DISCDOC = 6 OTHERS = 7.

Contribute (Add Comments)

Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.

The contribute/comments section below therefore offer's an opportunity for anyone to add additional information. This can be anything from useful hints, tips and screen shots to relevant SAP notes or anything else you feel is relevant to this report.

This will then be available for everyone to easily find by simply searching on the report name RESODICO or its description.

RESODICO - Program for Object Type DISCONNECT: Supply Disconnection
RESODICO - Program for Object Type DISCONNECT: Supply Disconnection
RESODEVL - Program for Object Type DEVICELOC: IS-U Device Location
RESODEVL - Program for Object Type DEVICELOC: IS-U Device Location
RESOCONTAINER - Program for Object Type CONTAINER : Waste Container
RESOCONTAINER - Program for Object Type CONTAINER : Waste Container

REBII_453124

RCNVSF04_VERSION_WRITE_AFVG

RDBWF159

REFG_UPDATE_LANGUS_VERS_ADMTOP

REHS_ACTION_STATUS_REPORT_OFF

RCRDT001

RCATSRCO

RCNVSF01_IMP_MEMORY_NETZ