SAP Reports / Programs | Financial Accounting | Travel Management | Travel Expenses(FI-TV-COS) SAP FI
MP56TF00 SAP ABAP INCLUDE - Include LRHPJF01
MP56TF00 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 MP56TF00 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 MP56TF00. "Basic submit
SUBMIT MP56TF00 AND RETURN. "Return to original report after report execution complete
SUBMIT MP56TF00 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 MP56TF00
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:
HRCA_GETEMPLOYEEDATA_FROMUSER ** CALL FUNCTION 'HRCA_GETEMPLOYEEDATA_FROMUSER' ** EXPORTING ** USERNAME = W_UNAME ** VALIDBEGIN = SY-DATUM ** IMPORTING ** EMPLOYEENUMBER = W_PERNR ** RETURN = IT_RETURN ** EXCEPTIONS ** USER_NOT_FOUND = 1 ** COUNTRYGROUPING_NOT_FOUND = 2 ** INFTY_NOT_FOUND = 3 ** OTHERS = 4.
BAPI_USR01DOHR_GETEMPLOYEE * CALL FUNCTION 'BAPI_USR01DOHR_GETEMPLOYEE' * EXPORTING * id = w_uname * IMPORTING * employeenumber = w_pernr.
HRCA_CJPN_INTERN_TO_EXTERN_CNV CALL FUNCTION 'HRCA_CJPN_INTERN_TO_EXTERN_CNV' EXPORTING edit_imp = ' ' int_num = posnr IMPORTING ext_num = cobl-ps_posid EXCEPTIONS OTHERS = 0.
HRCA_PA03_PCR_READ CALL FUNCTION 'HRCA_PA03_PCR_READ' EXPORTING abkrs = p0001-abkrs IMPORTING state = state current_period = current_period current_year = current_year permo = zw_permo current_begda = current_begda current_endda = current_endda following_period = following_period following_year = following_year following_begda = following_begda following_endda = following_endda twm_date = twm_date EXCEPTIONS pcr_does_not_exist = 1 abkrs_does_not_exist = 2 period_does_not_exist = 3 system_failure = 4 communication_failure = 5 error_in_filterobjects = 6 error_in_ale_customizing = 7 not_unique_receiver = 8 no_rfc_destination_maintained = 9 OTHERS = 10.
HRCA_COBL_CHECK CALL FUNCTION 'HRCA_COBL_CHECK' EXPORTING i_cobl = cobl IMPORTING number_of_errors = number_of_errors e_cobl = cobl TABLES cobl_messages = cobl_messages EXCEPTIONS OTHERS = 1.
HRCA_CJPN_INTERN_TO_EXTERN_CNV CALL FUNCTION 'HRCA_CJPN_INTERN_TO_EXTERN_CNV' EXPORTING edit_imp = ' ' int_num = konti-posnr IMPORTING ext_num = konti_ps_posid EXCEPTIONS OTHERS = 0.
HRCA_COBL_CHECK CALL FUNCTION 'HRCA_COBL_CHECK' EXPORTING i_cobl = cobl IMPORTING number_of_errors = number_of_errors e_cobl = cobl TABLES cobl_messages = cobl_messages EXCEPTIONS OTHERS = 1.
CMMT_ITEM_CONVERSION_OUTBOUND * CALL FUNCTION 'CMMT_ITEM_CONVERSION_OUTBOUND' * EXPORTING * i_cmmt_item = cobl-fipos * IMPORTING * e_cmmt_item_long = psref-fipex * EXCEPTIONS * not_found = 1 * OTHERS = 2.
ENQUEUE_EPCLTC CALL FUNCTION 'ENQUEUE_EPCLTC' EXPORTING * MODE_PCL1 = 'E' * CLIENT = SY-MANDT relid = tc_relid srtfd = srtfd EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.
PTRM_UTIL_IMPORT_TC_CLUSTER CALL FUNCTION 'PTRM_UTIL_IMPORT_TC_CLUSTER' EXPORTING i_pernr = tc_key-pernr i_sw_decryption = space "No decrypt.-> masked CC nums QHKK004307
PTRM_UTIL_EXPORT_TC_CLUSTER CALL FUNCTION 'PTRM_UTIL_EXPORT_TC_CLUSTER' EXPORTING i_pernr = tc_key-pernr it_ccbel = ccbel[] it_inbel = inbel[] it_trans = trans[] i_letzt = letzt IMPORTING et_ccbel = ccbel[] et_inbel = inbel[] et_trans = trans[] e_letzt = letzt * Begin of QHKN1427966 * e_subrc = rp_exp_tc_subrc.
DEQUEUE_EPCLTC CALL FUNCTION 'DEQUEUE_EPCLTC' EXPORTING * MODE_PCL1 = 'E' * CLIENT = SY-MANDT relid = tc_relid srtfd = srtfd EXCEPTIONS OTHERS = 1.
TRV_COMMIT_WORK * CALL FUNCTION 'TRV_COMMIT_WORK' * EXPORTING * i_employeenumber = te-key-pernr * EXCEPTIONS * foreign_lock = 1 * system_failure_within_lock = 2 * no_import_parameter = 3 * OTHERS = 4.
TRV_COMMIT_WORK CALL FUNCTION 'TRV_COMMIT_WORK' EXCEPTIONS edi_dequeue_error = 1 OTHERS = 2.
POPUP_TO_CONFIRM_WITH_MESSAGE * CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE' "XNB_ITS * EXPORTING "XNB_ITS * DEFAULTOPTION = 'J' "XNB_ITS * DIAGNOSETEXT1 = TEXT-SI8 "XNB_ITS * TEXTLINE1 = TEXT-SI6 "XNB_ITS * TITEL = TEXT-SI7 "XNB_ITS * IMPORTING "XNB_ITS * ANSWER = FLAG. "XNB_ITS
POPUP_TO_CONFIRM_WITH_MESSAGE * CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE' "XNB_ITS * EXPORTING "XNB_ITS * DEFAULTOPTION = 'J' "XNB_ITS * DIAGNOSETEXT1 = TEXT-SI9 "XNB_ITS * TEXTLINE1 = TEXT-SI6 "XNB_ITS * TITEL = TEXT-SI7 "XNB_ITS * IMPORTING "XNB_ITS * ANSWER = FLAG. "XNB_ITS
POPUP_TO_CONFIRM_WITH_MESSAGE * CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE' "XNB_ITS * EXPORTING "XNB_ITS * DEFAULTOPTION = 'J' "XNB_ITS * DIAGNOSETEXT1 = TEXT-SI9 "XNB_ITS * TEXTLINE1 = TEXT-SI6 "XNB_ITS * TITEL = TEXT-SI7 "XNB_ITS * IMPORTING "XNB_ITS * ANSWER = FLAG. "XNB_ITS
GET_MASTER_COST_ASSIGNMENT * call function 'GET_MASTER_COST_ASSIGNMENT' * exporting * employeenumber = ptrv_pernr * begin_date = datvo * end_date = datbi * budat = cobl_check_budat * messages_as_warning = messages_as_warning ** CALLED_IN_PBO = * tables * konti = konti * kostr_stamm = kostr_stamm ** INFOTYP0001 = ** INFOTYP0017 = ** INFOTYP0027 = * cobl_messages = bapiret2 * exceptions * others = 0.
CALL FUNCTION 'TRV_COMMIT_WORK' "GLW note 1805657 EXCEPTIONS edi_dequeue_error = 1 OTHERS = 2.
POPUP_TO_CONFIRM CALL FUNCTION 'POPUP_TO_CONFIRM' EXPORTING titlebar = text-t90 text_question = text-mc1 text_button_1 = text-hm2 text_button_2 = question_text-entry default_button = '1' display_cancel_button = '' start_column = 25 start_row = 6 IMPORTING answer = answer EXCEPTIONS text_not_found = 1 OTHERS = 2.
POPUP_TO_CONFIRM_WITH_MESSAGE * CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE' "XNB_ITS * EXPORTING "XNB_ITS * DEFAULTOPTION = 'N'"XNB_ITS * DIAGNOSETEXT1 = TEXT-SIA"XNB_ITS * DIAGNOSETEXT2 = TEXT-SI1"XNB_ITS * DIAGNOSETEXT3 = TEXT-SI2"XNB_ITS * TEXTLINE1 = TEXT-SI3"XNB_ITS * TITEL = TEXT-SV3"XNB_ITS * IMPORTING "XNB_ITS * ANSWER = FLAG."XNB_ITS
HRCA_CJPN_INTERN_TO_EXTERN_CNV CALL FUNCTION 'HRCA_CJPN_INTERN_TO_EXTERN_CNV' EXPORTING edit_imp = ' ' * int_num = psref-posnr "AKAK011844 int_num = ptrv_psref-posnr "AKAK011844 IMPORTING ext_num = cobl-ps_posid EXCEPTIONS OTHERS = 0.
RP_TRAVEL_COBL_1200 CALL FUNCTION 'RP_TRAVEL_COBL_1200' EXPORTING date = w-endda cobl_in = cobl auftl = ptk14-auftl popup = 'X' pme27_in = pme27 input = 'X' bukrs_ch = p0017-bwaen IMPORTING auftl = ptk14-auftl cobl_out = cobl EXCEPTIONS cancel = 4.
RP_TRAVEL_COBL_1200 CALL FUNCTION 'RP_TRAVEL_COBL_1200' EXPORTING date = w-endda cobl_in = cobl auftl = ptk14-auftl popup = 'X' pme27_in = pme27 input = ' ' bukrs_ch = p0017-bwaen IMPORTING auftl = ptk14-auftl cobl_out = cobl EXCEPTIONS cancel = 4.
HRCA_CJPN_EXTERN_TO_INTERN_CNV CALL FUNCTION 'HRCA_CJPN_EXTERN_TO_INTERN_CNV' EXPORTING ext_num = cobl-ps_posid IMPORTING * int_num = psref-posnr "AKAK011844 int_num = ptrv_psref-posnr "AKAK011844 EXCEPTIONS not_found = 1 OTHERS = 2.
TRIP_EDIT_TEXT_IN_POPUP CALL FUNCTION 'TRIP_EDIT_TEXT_IN_POPUP' EXPORTING i_morei = wa_head-morei i_editor_type = 'K' i_editor_key = '000' * I_SPKZL = * I_KZPMF = * I_KMVER = * I_TDID = 'FITV' * I_TITLE = ' ' i_modus = bearb_stat(1) i_control_type = 'E' TABLES t_tab_editor = editor EXCEPTIONS default_text_not_found = 1 OTHERS = 2.
PTRV_EDIT_USERPREFS CALL FUNCTION 'PTRV_EDIT_USERPREFS' "WTLK047360 EXPORTING dynnr = '1210'.
TRIPS_LIST_PERIO_HEAD * CALL FUNCTION 'TRIPS_LIST_PERIO_HEAD' * EXPORTING * EMPLOYEENUMBER = PTP02-PERNR * OLD_VERSIONS = ' ' * IMPORTING * NO_TRIPS = NO_TRIPS * TABLES * PERIO = T_PERIO * HEAD = T_HEAD * EXCEPTIONS * TABLE_PERIO_READ_ERROR = 1 * TABLE_HEAD_READ_ERROR = 2 * TABLES_INCONSISTENT = 3 * OTHERS = 99.
POPUP_TO_CONFIRM_WITH_MESSAGE * CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE'"XNB_ITS * EXPORTING "XNB_ITS * DEFAULTOPTION = 'N' "XNB_ITS * DIAGNOSETEXT1 = TEXT-SIA"XNB_ITS * DIAGNOSETEXT2 = TEXT-SI1"XNB_ITS * DIAGNOSETEXT3 = TEXT-SI2"XNB_ITS * TEXTLINE1 = TEXT-SI3"XNB_ITS * TITEL = TEXT-SV3"XNB_ITS * IMPORTING "XNB_ITS * ANSWER = FLAG."XNB_ITS
POPUP_TO_CONFIRM_WITH_MESSAGE * CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE'"XNB_ITS * EXPORTING "XNB_ITS * DEFAULTOPTION = 'N' "XNB_ITS * DIAGNOSETEXT1 = TEXT-SIA"XNB_ITS * DIAGNOSETEXT2 = TEXT-SI1"XNB_ITS * DIAGNOSETEXT3 = TEXT-SI2"XNB_ITS * TEXTLINE1 = TEXT-SI3"XNB_ITS * TITEL = TEXT-SV3"XNB_ITS * IMPORTING "XNB_ITS * ANSWER = FLAG."XNB_ITS
POPUP_TO_CONFIRM_WITH_MESSAGE * CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE'"XNB_ITS * EXPORTING "XNB_ITS * DEFAULTOPTION = 'N' "XNB_ITS * DIAGNOSETEXT1 = TEXT-SIA"XNB_ITS * DIAGNOSETEXT2 = TEXT-SI1"XNB_ITS * DIAGNOSETEXT3 = TEXT-SI2"XNB_ITS * TEXTLINE1 = TEXT-SI3"XNB_ITS * TITEL = TEXT-SV3"XNB_ITS * IMPORTING "XNB_ITS * ANSWER = FLAG."XNB_ITS
POPUP_TO_CONFIRM_WITH_MESSAGE * CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE'"XNB_ITS * EXPORTING "XNB_ITS * DEFAULTOPTION = 'N'"XNB_ITS * DIAGNOSETEXT1 = TEXT-SJ4"XNB_ITS * DIAGNOSETEXT2 = TEXT-SJ5"XNB_ITS * DIAGNOSETEXT3 = SPACE"XNB_ITS * TEXTLINE1 = TEXT-SJ6"XNB_ITS * TITEL = TEXT-SV3"XNB_ITS * IMPORTING "XNB_ITS * ANSWER = FLAG."XNB_ITS
POPUP_TO_CONFIRM_WITH_MESSAGE * CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE'"XNB_ITS * EXPORTING "XNB_ITS * DEFAULTOPTION = 'N'"XNB_ITS * DIAGNOSETEXT1 = TEXT-SJ4"XNB_ITS * DIAGNOSETEXT2 = TEXT-SJ5"XNB_ITS * DIAGNOSETEXT3 = SPACE"XNB_ITS * TEXTLINE1 = TEXT-SJ6"XNB_ITS * TITEL = TEXT-SV3"XNB_ITS * IMPORTING "XNB_ITS * ANSWER = FLAG."XNB_ITS
CONVERT_TO_FOREIGN_CURRENCY * CALL FUNCTION 'CONVERT_TO_FOREIGN_CURRENCY' "YKYK008513 * EXPORTING "YKYK008513 * DATE = beleg-BLDAT "YKYK008513 * FOREIGN_CURRENCY = beleg-WAERS "YKYK008513 * LOCAL_AMOUNT = V_WERT "YKYK008513 * LOCAL_CURRENCY = WA_PERIO-WAERS "YKYK008513 * RATE = 0 "YKYK008513 * TYPE_OF_RATE = T706D-KURST "YKYK008513 * IMPORTING "YKYK008513 * FOREIGN_AMOUNT = beleg-BETRG "YKYK008513 * EXCEPTIONS "YKYK008513 * NO_RATE_FOUND = 04 "YKYK008513 * OVERFLOW = 08. "YKYK008513
CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = beleg-bldat foreign_amount = it_706b2-betrg foreign_currency = it_706b2-waers local_currency = beleg-waers rate = 0 type_of_rate = t706d-kurst IMPORTING exchange_rate = w_kursb local_amount = beleg-betrg EXCEPTIONS no_rate_found = 04 overflow = 08.
CONVERT_TO_LOCAL_CURRENCY * CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' "YKYK008513 * EXPORTING "YKYK008513 * DATE = beleg-BLDAT "YKYK008513 * FOREIGN_AMOUNT = beleg-BETRG "YKYK008513 * FOREIGN_CURRENCY = beleg-WAERS "YKYK008513 * LOCAL_CURRENCY = WA_PERIO-WAERS "YKYK008513 * RATE = 0 "YKYK008513 * TYPE_OF_RATE = T706D-KURST "YKYK008513 * IMPORTING "YKYK008513 * EXCHANGE_RATE = W_KURSB "YKYK008513 * FOREIGN_FACTOR = beleg-FFACT "YKYK008513 * LOCAL_AMOUNT = W-BETRG "YKYK008513 * LOCAL_FACTOR = beleg-TFACT "YKYK008513 * EXCEPTIONS "YKYK008513 * NO_RATE_FOUND = 04 "YKYK008513 * OVERFLOW = 08. "YKYK008513
CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = beleg-bldat foreign_amount = it_706b2-betrg foreign_currency = it_706b2-waers local_currency = beleg-waers rate = 0 type_of_rate = t706d-kurst IMPORTING exchange_rate = w_kursb local_amount = w-betrg EXCEPTIONS no_rate_found = 04 overflow = 08.
PTRV_DETERMINE_AUTHP CALL FUNCTION 'PTRV_DETERMINE_AUTHP' EXPORTING current_pernr = ptp00-pernr IMPORTING authp = lf_authp.
RP_GET_CURRENCY CALL FUNCTION 'RP_GET_CURRENCY' EXPORTING molga = p_t500p-molga begda = sy-datum IMPORTING waers = p_ptp42-waers EXCEPTIONS molga_not_in_t001p = 1 no_entry_found_in_table_t001 = 2 no_entry_found_in_table_t500p = 3 no_entry_found_in_table_t500c = 4 OTHERS = 5.
RP_GET_CURRENCY CALL FUNCTION 'RP_GET_CURRENCY' EXPORTING molga = molga begda = datum IMPORTING waers = country_waers EXCEPTIONS molga_not_in_t001p = 1 no_entry_found_in_table_t001 = 2 no_entry_found_in_table_t500p = 3 no_entry_found_in_table_t500c = 4 OTHERS = 5.
DYNP_VALUES_READ CALL FUNCTION 'DYNP_VALUES_READ' EXPORTING dyname = program dynumb = number translate_to_upper = 'X' TABLES dynpfields = dynpfields EXCEPTIONS error_message = 1.
F4_EXCHANGE_RATE CALL FUNCTION 'F4_EXCHANGE_RATE' EXPORTING type_of_rate = t706d-kurst date = ptk03-bldat foreign_currency = ptk03-waers local_currency = ptk03-paycurr fieldname = 'PTK03-KURSB' dyname = program dynumb = number display_only = show.
DYNP_GET_STEPL CALL FUNCTION 'DYNP_GET_STEPL' IMPORTING povstepl = cursor_line_h EXCEPTIONS stepl_not_found = 1 OTHERS = 2.
DYNP_VALUES_READ CALL FUNCTION 'DYNP_VALUES_READ' EXPORTING dyname = program dynumb = number translate_to_upper = 'X' TABLES dynpfields = dynpfields EXCEPTIONS error_message = 1.
CONVERT_DATE_TO_INTERNAL CALL FUNCTION 'CONVERT_DATE_TO_INTERNAL' EXPORTING date_external = dynpfields-fieldvalue IMPORTING date_internal = ptk03-bldat EXCEPTIONS error_message = 1.
F4_EXCHANGE_RATE CALL FUNCTION 'F4_EXCHANGE_RATE' EXPORTING type_of_rate = t706d-kurst date = ptk03-bldat foreign_currency = ptk03-waers local_currency = ptk03-paycurr fieldname = 'PTK03-KURSB' dyname = program dynumb = number display_only = show.
HR_READ_INFOTYPE_AUTHC_DISABLE CALL FUNCTION 'HR_READ_INFOTYPE_AUTHC_DISABLE'.
HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING pernr = p_pernr infty = '0001' begda = sy-datum * ENDDA = '99991231' "WBGK021635 endda = sy-datum "WBGK021635 IMPORTING subrc = subrc_1101 TABLES infty_tab = p0001 EXCEPTIONS infty_not_found = 1 OTHERS = 2.
HRCA_PA03_PCR_READ CALL FUNCTION 'HRCA_PA03_PCR_READ' EXPORTING abkrs = p0001-abkrs IMPORTING state = state current_period = current_period current_year = current_year * PERMO = * CURRENT_BEGDA = * CURRENT_ENDDA = following_period = following_period following_year = following_year * FOLLOWING_BEGDA = * FOLLOWING_ENDDA = * TWM_DATE = EXCEPTIONS pcr_does_not_exist = 1 abkrs_does_not_exist = 2 period_does_not_exist = 3 system_failure = 4 communication_failure = 5 error_in_filterobjects = 6 error_in_ale_customizing = 7 not_unique_receiver = 8 no_rfc_destination_maintained = 9 OTHERS = 10.
FITV_RD_EXPORT_TRIPDATA * CALL FUNCTION 'FITV_RD_EXPORT_TRIPDATA' * EXPORTING * wa_ptp02 = rd_ptp02 * wa_perio = wa_perio "QIZK012372 * bearb_stat = bearb_stat(1).
FITV_RD_EXPORT_TRIPDATA CALL FUNCTION 'FITV_RD_EXPORT_TRIPDATA' EXPORTING wa_ptp02 = rd_ptp02 wa_perio = rd_perio "QIZK012372 bearb_stat = bearb_stat(1).
MESSAGES_INITIALIZE CALL FUNCTION 'MESSAGES_INITIALIZE'. "KCN1519037
HRCA_PA03_PCR_READ CALL FUNCTION 'HRCA_PA03_PCR_READ' EXPORTING abkrs = p0001-abkrs IMPORTING state = state current_period = current_period current_year = current_year permo = zw_permo current_begda = current_begda current_endda = current_endda following_period = following_period following_year = following_year following_begda = following_begda following_endda = following_endda twm_date = twm_date EXCEPTIONS pcr_does_not_exist = 1 abkrs_does_not_exist = 2 period_does_not_exist = 3 system_failure = 4 communication_failure = 5 error_in_filterobjects = 6 error_in_ale_customizing = 7 not_unique_receiver = 8 no_rfc_destination_maintained = 9 OTHERS = 10.
HRCA_CJPN_INTERN_TO_EXTERN_CNV CALL FUNCTION 'HRCA_CJPN_INTERN_TO_EXTERN_CNV' "WKUK040577 EXPORTING "WKUK040577 edit_imp = ' ' "WKUK040577 int_num = konti-posnr "WKUK040577 IMPORTING "WKUK040577 ext_num = p_cobl-ps_posid "WKUK040577 EXCEPTIONS "WKUK040577 OTHERS = 0. "WKUK040577
HRCA_COBL_CHECK CALL FUNCTION 'HRCA_COBL_CHECK' EXPORTING i_cobl = p_cobl IMPORTING number_of_errors = number_of_errors e_cobl = p_cobl TABLES cobl_messages = cobl_messages_old.
MESSAGES_INITIALIZE * CALL FUNCTION 'MESSAGES_INITIALIZE'. "KCN1451399"KCN1519037
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = cobl_messages_new-id msgty = cobl_messages_new-type msgv1 = cobl_messages_new-message_v1 msgv2 = cobl_messages_new-message_v2 msgv3 = cobl_messages_new-message_v3 msgv4 = cobl_messages_new-message_v4 txtnr = cobl_messages_new-number EXCEPTIONS OTHERS = 0.
MESSAGES_SHOW CALL FUNCTION 'MESSAGES_SHOW' EXPORTING show_linno = space EXCEPTIONS OTHERS = 0.
FUNCTION_EXISTS CALL FUNCTION 'FUNCTION_EXISTS' DESTINATION lwa_receivers EXPORTING funcname = 'IAOM_ACCOUNT_MANAGER' * IMPORTING * GROUP = * INCLUDE = * NAMESPACE = * STR_AREA = EXCEPTIONS function_not_exist = 1 OTHERS = 2.
IAOM_ACCOUNT_MANAGER CALL FUNCTION 'IAOM_ACCOUNT_MANAGER' DESTINATION lwa_receivers EXPORTING i_account_request = ld_request IMPORTING e_results_of_request = ld_results.
HRCA_CJPN_EXTERN_TO_INTERN_CNV CALL FUNCTION 'HRCA_CJPN_EXTERN_TO_INTERN_CNV' EXPORTING ext_num = lwa_results-assignment-wbs_element IMPORTING int_num = ps_ptrv_psref-posnr EXCEPTIONS not_found = 1 OTHERS = 2.
HRCA_CJPN_EXTERN_TO_INTERN_CNV CALL FUNCTION 'HRCA_CJPN_EXTERN_TO_INTERN_CNV' EXPORTING ext_num = lwa_results-assignment-wbs_element IMPORTING int_num = ps_ptrv_psref-posnr EXCEPTIONS not_found = 1 OTHERS = 2.
DYNP_VALUES_READ CALL FUNCTION 'DYNP_VALUES_READ' EXPORTING dyname = l_prog dynumb = l_dynnr translate_to_upper = 'X' TABLES dynpfields = dynpro_fields EXCEPTIONS error_message = 1.
DDIF_FIELDINFO_GET CALL FUNCTION 'DDIF_FIELDINFO_GET' EXPORTING tabname = 'PTRV_SELECT_CPROJECTS' * FIELDNAME = ' ' langu = sy-langu * LFIELDNAME = ' ' * ALL_TYPES = ' ' * GROUP_NAMES = ' ' * UCLEN = * IMPORTING * X030L_WA = * DDOBJTYPE = * DFIES_WA = * LINES_DESCR = TABLES dfies_tab = lt_field_tab * FIXED_VALUES = EXCEPTIONS not_found = 1 internal_error = 2 OTHERS = 3.
F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING retfield = 'PROJECT_EXT_ID' * dynpprog = 'SAPMP56T' * dynpnr = '1700' * dynprofield = 'PTK_COST_DIST-PROJECT_EXT_ID' value_org = 'S' TABLES value_tab = lt_select_cprojects field_tab = lt_field_tab return_tab = lt_return_tab dynpfld_mapping = lt_dynpfld_mapping EXCEPTIONS parameter_error = 1 no_values_found = 2 OTHERS = 3.
DYNP_VALUES_UPDATE CALL FUNCTION 'DYNP_VALUES_UPDATE' EXPORTING dyname = 'SAPMP56T' dynumb = '1700' TABLES dynpfields = lt_dynpfields EXCEPTIONS invalid_abapworkarea = 1 invalid_dynprofield = 2 invalid_dynproname = 3 invalid_dynpronummer = 4 invalid_request = 5 no_fielddescription = 6 undefind_error = 7 OTHERS = 8.
HRCA_GET_CPROJECT_LIST_PERNR CALL FUNCTION 'HRCA_GET_CPROJECT_LIST_PERNR' EXPORTING i_pernr = p_pernr i_datum_von = p_datum_von i_datum_bis = p_datum_bis TABLES et_select_cprojects = pt_select_cprojects et_worklist_cprojects = pt_worklist_cprojects EXCEPTIONS error_occurred = 1 OTHERS = 2.
FITV_RD_POPUP_BATCH_INPUT CALL FUNCTION 'FITV_RD_POPUP_BATCH_INPUT' EXPORTING ort = ort_ein herkunft = fname IMPORTING ort_back = ort.
PTRV_FSSC_SR_SAPMP56T_LAUNCH * CALL FUNCTION 'PTRV_FSSC_SR_SAPMP56T_LAUNCH' * EXPORTING * is_p0001 = p0001 * iv_tcode = sy-tcode * is_ptp02 = wa_head * is_ptrv_head = wa_head_ptrv * is_head_perio = gwa_head_perio * it_ptk03 = lt_ptk03 * it_ptk04 = lt_ptk04 * it_ptk05 = lt_ptk05 * it_ptk08 = lt_ptk08 * it_ptk10 = lt_ptk10 * it_ptk17 = lt_ptk17 * it_messages = gt_ssc_messages.
PTRM_WEB_SSC_SR_SWITCH CALL FUNCTION 'PTRM_WEB_SSC_SR_SWITCH' EXPORTING iv_activity = ld_tcode * IV_APPLICATION = 'TRAVEL' IMPORTING ev_switch_on = ld_switch.
SSC_SR_MANUAL_REGISTER CALL FUNCTION 'SSC_SR_MANUAL_REGISTER' EXPORTING iv_scenario = 'TRAVEL' * iv_element = sy-tcode iv_element = ld_tcode iv_callback = 'PTRV_FSSC_APPL_SRC_SAPMP56T'.
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 MP56TF00 or its description.