4000_INIT 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 4000_INIT 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.
No INCLUDES are used within this REPORT code!
No SAP DATABASE tables are accessed within this REPORT code!
FUNCTION_EXISTS CALL FUNCTION 'FUNCTION_EXISTS' EXPORTING funcname = fm_get_accessibility_mode EXCEPTIONS function_not_exist = 1 OTHERS = 2.
TRIPS_LIST_PERIO_HEAD CALL FUNCTION 'TRIPS_LIST_PERIO_HEAD' EXPORTING employeenumber = p_ptrp_pernr old_versions = ' ' * IMPORTING * NO_TRIPS = TABLES perio = p_t_perio head = p_t_head EXCEPTIONS * table_perio_read_error = 1 * table_head_read_error = 2 tables_inconsistent = 3 OTHERS = 4.
CHECK_AUTH_AUTHF CALL FUNCTION 'CHECK_AUTH_AUTHF' EXPORTING datum = sy-datum authf = authf pernr = p_ptrp_pernr reinr = p_ptrp_reinr EXCEPTIONS OTHERS = 1.
FITP_READ_PLAN_DATA CALL FUNCTION 'FITP_READ_PLAN_DATA' EXPORTING pernr = p_ptrp_pernr reinr = p_ptrp_reinr hdvrs = p_wa_head-hdvrs plannr = p_wa_plan-plannr * ONLY_NEWEST = IMPORTING number_of_variants = number_of_variants TABLES t_variant = p_t_variant t_item = p_t_item t_fare_comp = p_t_fare_comp t_flight = p_t_flight t_flight_leg = p_t_flight_leg t_flight_pref = p_t_flight_pref t_flight_fare = p_t_flight_fare t_flight_tst = p_t_flight_tst t_hotel = p_t_hotel t_hotel_pref = p_t_hotel_pref t_car = p_t_car t_car_pref = p_t_car_pref t_train = p_t_train t_train_pref = p_t_train_pref t_pnr = p_t_pnr t_pnr_name = p_t_pnr_name t_pnr_osi = p_t_pnr_osi t_pnr_phone = p_t_pnr_phone t_pnr_address = p_t_pnr_address t_pnr_remarks = p_t_pnr_remarks t_pnr_ssr = p_t_pnr_ssr t_tm_memo = p_t_tm_memo t_info = p_t_info t_sync_data = p_t_sync_data "QHKK062623 t_other = p_t_other "QHKK026957 EXCEPTIONS no_variant_found = 1 OTHERS = 2.
CHECK_AUTH_AUTHF CALL FUNCTION 'CHECK_AUTH_AUTHF' EXPORTING datum = sy-datum authf = authf pernr = p_ptrp_pernr reinr = p_ptrp_reinr EXCEPTIONS OTHERS = 1.
BUILD_ITEMS_FROM_REQUEST CALL FUNCTION 'BUILD_ITEMS_FROM_REQUEST' "WNZK063328 EXPORTING "WNZK063328 userg = ptrp_userg "WNZK063328 TABLES "WNZK063328 request = p_t_request "WNZK063328 item = p_t_item "WNZK063328 EXCEPTIONS "WNZK063328 incomplete = 1 "WNZK063328 OTHERS = 2. "WNZK063328
FITP_SYNCHRONIZE_REQUEST_PLAN CALL FUNCTION 'FITP_SYNCHRONIZE_REQUEST_PLAN' EXPORTING morei = ptrp_morei TABLES t_req_head = p_t_req_head t_request = p_t_request t_plan = p_t_plan t_item = p_t_item CHANGING wa_req_head = p_wa_req_head wa_plan = p_wa_plan.
Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.