RDDPUTJH 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 RDDPUTJH into the relevant SAP transactions such as SE38 or SE80
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.
Title: Switch: Creates TODIR from GTODIR
Text Symbol: 010 = not a valid TODIR key.
Text Symbol: 020 = Objects generated in temporary TODIR (TTODIR)
Text Symbol: 030 = Table TTODIR generated
INCLUDE RDDRSCST.
No SAP DATABASE tables are accessed within this REPORT code!
SUBST_GET_SAPRELEASE CALL FUNCTION 'SUBST_GET_SAPRELEASE' IMPORTING EV_SAPRELEASE = GC_SAPRELEASE EXCEPTIONS NO_SVERS_ENTRY = 1 OTHERS = 2.
SUBST_RELMAP_CREATE_CHECK_MAP CALL FUNCTION 'SUBST_RELMAP_CREATE_CHECK_MAP' " (jz) EXPORTING " (jz) IV_RELMAPNAME = GC_MAPNAME " (jz) IV_STARTRELEASE = SRCREL " (jz) IV_TARGETRELEASE = GC_SAPRELEASE " (jz) IMPORTING " (jz) EV_RELMAP = GV_CHECKMAP " (jz) EXCEPTIONS " (jz) RELMAP_NOT_FOUND = 1 " (jz) MAPPING_NOT_FOUND = 2 " (jz) OTHERS = 3. " (jz)
CHECK_EXIST CALL FUNCTION 'CHECK_EXIST' EXPORTING * I_TADIR = ' ' IV_PGMID = LS_LTODIR-PGMID IV_OBJECT = LS_LTODIR-OBJECT IV_OBJ_NAME = LS_LTODIR-OBJ_NAME IMPORTING E_EXIST = LV_EX EXCEPTIONS TR_NO_CHECK_FUNCTION = 1 OTHERS = 2 .
SUBST_CREATE_COMM CALL FUNCTION 'SUBST_CREATE_COMM' EXPORTING IC_TRKORR = GV_COMMF IC_TRFUNCTION = 'P' IC_TRSTATUS = 'R' IC_TARSYSTEM = 'SAP' IC_AS4USER = 'SAPUSER' " IC_KORRDEV = ' ' " IC_STRKORR = ' ' IC_OVERWRITE = 'X' IC_SEL_E071 = 'X' IC_SEL_E071K = 'X' TABLES TT_E071 = LT_E071 TT_E071K = LT_E071K EXCEPTIONS ORDER_EXISTS = 01.
SUBST_MAPENTRY_MATCH CALL FUNCTION 'SUBST_MAPENTRY_MATCH' " (jz) EXPORTING " (jz) IV_RELMAP = LS_TTODIR-RELMAP " (jz) IV_CHECKMAP = GV_CHECKMAP " (jz) IMPORTING " (jz) EV_COMPARE = LV_YESNO. " (jz)
CHECK_EXIST CALL FUNCTION 'CHECK_EXIST' EXPORTING * I_TADIR = ' ' IV_PGMID = LS_TTODIR-PGMID IV_OBJECT = LS_TTODIR-OBJECT IV_OBJ_NAME = LS_TTODIR-OBJ_NAME IMPORTING E_EXIST = LV_EX EXCEPTIONS TR_NO_CHECK_FUNCTION = 1 OTHERS = 2 .
SUBST_CREATE_COMM CALL FUNCTION 'SUBST_CREATE_COMM' EXPORTING IC_TRKORR = GV_COMMF IC_TRFUNCTION = 'P' IC_TRSTATUS = 'R' IC_TARSYSTEM = 'SAP' IC_AS4USER = 'SAPUSER' " IC_KORRDEV = ' ' " IC_STRKORR = ' ' IC_OVERWRITE = 'X' IC_SEL_E071 = 'X' IC_SEL_E071K = 'X' TABLES TT_E071 = LT_E071 TT_E071K = LT_E071K EXCEPTIONS ORDER_EXISTS = 01.
SUBST_INIT_DEFAULT_PROTOCOL CALL FUNCTION 'SUBST_INIT_DEFAULT_PROTOCOL' EXPORTING IV_MSAG = GC_MSAG IV_ACTTYPE = GC_PROTO_PUT IV_FNAME = PC_PROTO_NAME IV_SUBDIR = GC_DIR_LOG IV_REPID = GC_REPID EXCEPTIONS SAPRELEASE_NOT_FOUND = 01.
SUBST_WRITE_DEFAULT_PROTOCOL CALL FUNCTION 'SUBST_WRITE_DEFAULT_PROTOCOL' EXPORTING IV_SUPPRESS_FOOTER = ' '.
SUBST_GET_REPORT_PARM CALL FUNCTION 'SUBST_GET_REPORT_PARM' EXPORTING IV_PARMNAME = LV_NAME IMPORTING EV_PARAMETER = LV_VALUE.
Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.
RDDPUTJH - Switch: Creates TODIR from GTODIR RDDPUTJH - Switch: Creates TODIR from GTODIR RDDPUTJE - FA: Enter Export Version in Table EXP_VERS RDDPUTJE - FA: Enter Export Version in Table EXP_VERS RDDPUTJC - FA: Extract TABU Transports for Certain Tables From Piece Lists RDDPUTJC - FA: Extract TABU Transports for Certain Tables From Piece Lists