SAP Reports / Programs | Personnel Management | Personnel Administration(PA-PA) SAP PA

RPHDYNPGF01 SAP ABAP INCLUDE - documentation and ABAP source code







RPHDYNPGF01 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 RPHDYNPGF01 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 RPHDYNPGF01. "Basic submit
SUBMIT RPHDYNPGF01 AND RETURN. "Return to original report after report execution complete
SUBMIT RPHDYNPGF01 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement


INCLUDES used within this REPORT RPHDYNPGF01

'INCLUDE MPPSEL00 .',
'INCLUDE RPHDYNPGTYP .',
FORM GENERIC_INCLUDES_COPY
FORM INCLUDE_COPY


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:

DDIF_TABL_GET CALL FUNCTION 'DDIF_TABL_GET' EXPORTING NAME = P_TABL_NAME STATE = 'A' * LANGU = ' ' * IMPORTING * GOTSTATE = * DD02V_WA = * DD09L_WA = TABLES DD03P_TAB = DD03P_TAB * DD05M_TAB = * DD08V_TAB = * DD12V_TAB = * DD17V_TAB = * DD35V_TAB = * DD36M_TAB = EXCEPTIONS ILLEGAL_INPUT = 1 OTHERS = 2.

RPY_DYNPRO_INSERT CALL FUNCTION 'RPY_DYNPRO_INSERT' EXPORTING SUPPRESS_CORR_CHECKS = 'X' * CORRNUM = ' ' SUPPRESS_EXIST_CHECKS = 'X' SUPPRESS_GENERATE = 'X' * SUPPRESS_DICT_SUPPORT = ' ' SUPPRESS_EXTENDED_CHECKS = ' ' HEADER = P_HEADER TABLES CONTAINERS = P_CONTAINERS FIELDS_TO_CONTAINERS = P_FIELDS FLOW_LOGIC = P_FLOW EXCEPTIONS CANCELLED = 1 ALREADY_EXISTS = 2 PROGRAM_NOT_EXISTS = 3 NOT_EXECUTED = 4 MISSING_REQUIRED_FIELD = 5 ILLEGAL_FIELD_VALUE = 6 FIELD_NOT_ALLOWED = 7 NOT_GENERATED = 8 ILLEGAL_FIELD_POSITION = 9 OTHERS = 10.

RPY_DYNPRO_INSERT CALL FUNCTION 'RPY_DYNPRO_INSERT' EXPORTING SUPPRESS_CORR_CHECKS = 'X' * CORRNUM = ' ' SUPPRESS_EXIST_CHECKS = 'X' SUPPRESS_GENERATE = ' ' * SUPPRESS_DICT_SUPPORT = ' ' SUPPRESS_EXTENDED_CHECKS = 'X' HEADER = P_HEADER TABLES CONTAINERS = P_CONTAINERS FIELDS_TO_CONTAINERS = P_FIELDS FLOW_LOGIC = P_FLOW EXCEPTIONS CANCELLED = 1 ALREADY_EXISTS = 2 PROGRAM_NOT_EXISTS = 3 NOT_EXECUTED = 4 MISSING_REQUIRED_FIELD = 5 ILLEGAL_FIELD_VALUE = 6 FIELD_NOT_ALLOWED = 7 NOT_GENERATED = 8 ILLEGAL_FIELD_POSITION = 9 OTHERS = 10.

RH_TEXT_CHECK CALL FUNCTION 'RH_TEXT_CHECK' EXPORTING TABNAME = P_TABL_NAME * ALLE Felder bestellen * fieldname = p_field_name TCLAS = P_TCLAS TABLES INFO_TAB = INFO_TAB EXCEPTIONS DDIC_ENTRY_NOT_FOUND = 1 INTERNAL_ERROR = 2 MISSING_TEXT = 3 OTHERS = 4.

TR_TADIR_INTERFACE CALL FUNCTION 'TR_TADIR_INTERFACE' EXPORTING * WI_DELETE_TADIR_ENTRY = ' ' * WI_REMOVE_REPAIR_FLAG = ' ' * WI_SET_REPAIR_FLAG = ' ' WI_TEST_MODUS = ' ' WI_TADIR_PGMID = 'R3TR' WI_TADIR_OBJECT = 'PROG' WI_TADIR_OBJ_NAME = P_REPORT_NAME * WI_TADIR_KORRNUM = ' ' * WI_TADIR_SRCSYSTEM = ' ' WI_TADIR_AUTHOR = SY-UNAME WI_TADIR_DEVCLASS = '$TMP' * WI_TADIR_MASTERLANG = ' ' * WI_TADIR_CPROJECT = ' ' * WI_TADIR_VERSID = ' ' * WI_REMOVE_GENFLAG = ' ' WI_SET_GENFLAG = 'X' * WI_READ_ONLY = ' ' * IV_SET_EDTFLAG = ' ' * IV_WBO_INTERNAL = ' ' * IMPORTING * NEW_GTADIR_ENTRY = * NEW_TADIR_ENTRY = EXCEPTIONS TADIR_ENTRY_NOT_EXISTING = 1 TADIR_ENTRY_ILL_TYPE = 2 NO_SYSTEMNAME = 3 NO_SYSTEMTYPE = 4 ORIGINAL_SYSTEM_CONFLICT = 5 OBJECT_RESERVED_FOR_DEVCLASS = 6 OBJECT_EXISTS_GLOBAL = 7 OBJECT_EXISTS_LOCAL = 8 OBJECT_IS_DISTRIBUTED = 9 OBJ_SPECIFICATION_NOT_UNIQUE = 10 NO_AUTHORIZATION_TO_DELETE = 11 DEVCLASS_NOT_EXISTING = 12 SIMULTANIOUS_SET_REMOVE_REPAIR = 13 ORDER_MISSING = 14 NO_MODIFICATION_OF_HEAD_SYST = 15 PGMID_OBJECT_NOT_ALLOWED = 16 MASTERLANGUAGE_NOT_SPECIFIED = 17 DEVCLASS_NOT_SPECIFIED = 18 SPECIFY_OWNER_UNIQUE = 19 LOC_PRIV_OBJS_NO_REPAIR = 20 GTADIR_NOT_REACHED = 21 OBJECT_LOCKED_FOR_ORDER = 22 CHANGE_OF_CLASS_NOT_ALLOWED = 23 NO_CHANGE_FROM_SAP_TO_TMP = 24 OTHERS = 25.

CALL FUNCTION ' CALL FUNCTION ''HR_COUNTRYGROUPING_GET''', ' EXPORTING', ' PERNR = PERNR', ' TCLAS = ''$TCLAS$''', *' BEGDA = ''18000101''', "XYVAHRK025194 *' ENDDA = ''99991231''', "XYVAHRK025194 ' BEGDA = HR_LOW_DATE', "XYVAHRK025194 ' ENDDA = HR_HIGH_DATE', "XYVAHRK025194 *'* P0001 = ', "XYVPH9K011270 '* WERKS =', "XYVPH9K011270 ' IMPORTING', ' MOLGA = MOLGA', ' EXCEPTIONS', ' NOT_FOUND = 1', ' OTHERS = 2.'.

PRETTY_PRINTER CALL FUNCTION 'PRETTY_PRINTER' EXPORTING INCTOO = SPACE * IMPORTING * INDENTATION_MAYBE_WRONG = TABLES NTEXT = PRETTY_CODING OTEXT = X_CODING EXCEPTIONS ENQUEUE_TABLE_FULL = 1 INCLUDE_ENQUEUED = 2 INCLUDE_READERROR = 3 INCLUDE_WRITEERROR = 4 ERROR_MESSAGE = 5 OTHERS = 6.

TR_APPEND_LOG CALL FUNCTION 'TR_APPEND_LOG' * EXPORTING * OPEN_FILE = 'X' * CLOSE_FILE = 'X' * CONDENSE = 'X' * MASTER_LANGU = 'E' * ACCEPT_NOT_INIT = ' ' * IV_SUPPRESS_STATISTICS = ' ' TABLES XMSG = MYPROT EXCEPTIONS FILE_NOT_FOUND = 1 WRONG_CALL = 2 OTHERS = 3.

TR_FLUSH_LOG CALL FUNCTION 'TR_FLUSH_LOG'.

CALL FUNCTION ' CALL FUNCTION ''RH_TEXT_GET''', ' EXPORTING', ' TABNAME = ''$INFTY_TABL_NAME$''', ' RECORD = P$P_INFTY$', ' LANGU = SY-LANGU', ' BEGDAT = $BEGDA$', *' ENDDAT = HR_HIGH_DATE', "XPVAL0K016738 ' ENDDAT = $BEGDA$', "XPVAL0K016738 ' TCLAS = ''$P_TCLAS$''', "XYVAHRK025194 '* INFTY_0001 =', ' MOLGA = MOLGA', ' TABLES', ' FIELDS = FIELDS', ' TEXT_TAB = TEXT_TAB', ' EXCEPTIONS', ' DDIC_ENTRY_NOT_FOUND = 1', ' INCORRECT_CALL = 2', ' INTERNAL_ERROR = 3', ' MISSING_TEXT = 4', ' OTHERS = 5 .'.

CALL FUNCTION ' CALL FUNCTION ''$FUNCTIONMODULE$''', ' EXPORTING', '* C_IT0000 =', '* C_IT0001 =', ' C_IT$P_INFTY$ = P$P_INFTY$', ' BEGDA_IT = $BEGDA$', ' ENDDA_IT = P$P_INFTY$-ENDDA', "N1669251 ' BEGDA_SEL = $BEGDA$', ' ENDDA_SEL = P$P_INFTY$-ENDDA', "N1669251 ' TCLAS = ''$P_TCLAS$''', ' MOLGA = MOLGA', '* C_OBJEC =', ' IMPORTING', ' AF_VALUES = $TABL_NAME$', ' TABLES', ' AF_FIELDS = FIELDS', '* IT0000 =', '* IT0001 =', '* ITnnnn =', ' EXCEPTIONS', ' OTHERS = 1 .',

RPY_DYNPRO_READ CALL FUNCTION 'RPY_DYNPRO_READ' EXPORTING PROGNAME = P_TEMPLATE_REPNAM DYNNR = P_TEMPLATE_DYNPNR SUPPRESS_EXIST_CHECKS = ' ' SUPPRESS_CORR_CHECKS = 'X' IMPORTING HEADER = R_TEMPLATE_HEADER TABLES CONTAINERS = R_TEMPLATE_CONTAINERS FIELDS_TO_CONTAINERS = R_TEMPLATE_FIELDS FLOW_LOGIC = R_TEMPLATE_FLOW EXCEPTIONS CANCELLED = 1 NOT_FOUND = 2 PERMISSION_ERROR = 3 OTHERS = 4.

CALL FUNCTION ' CALL FUNCTION ''RH_TEXT_GET''', ' EXPORTING', ' TABNAME = ''$INFTY_TABL_NAME$''', ' RECORD = $P_INFTY$', ' LANGU = SY-LANGU', ' BEGDAT = $BEGDA$', *' ENDDAT = HR_HIGH_DATE', "XPVAL0K016738 ' ENDDAT = $BEGDA$', "XPVAL0K016738 ' TCLAS = ''$P_TCLAS$''', '* INFTY_0001 =', ' MOLGA = MOLGA', ' TABLES', ' FIELDS = FIELDS', ' TEXT_TAB = TEXT_TAB', ' EXCEPTIONS', ' DDIC_ENTRY_NOT_FOUND = 1', ' INCORRECT_CALL = 2', ' INTERNAL_ERROR = 3', ' MISSING_TEXT = 4', ' OTHERS = 5 .'.



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 RPHDYNPGF01 or its description.