SAP Reports / Programs | Provisioning | Aerospace & Defence Industry Solution | Provisioning(IS-AD-SPC-PR) SAP IS
S2K_IP_UPLOAD SAP ABAP Report - SPEC 2000 Initial Provisioning: Upload
S2K_IP_UPLOAD 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 S2K_IP_UPLOAD into the relevant SAP transactions such as SE38 or SE80
Transaction Code(s):
Below is a list of transaction codes which are relevant to this SAP report
ADSPCIP - SPEC 2000: File Upload To ERP
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 S2K_IP_UPLOAD. "Basic submit
SUBMIT S2K_IP_UPLOAD AND RETURN. "Return to original report after report execution complete
SUBMIT S2K_IP_UPLOAD VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Selection Text: P_SQNBR = Sequence Number
Selection Text: PATH = RSPL File Path
Selection Text: BY_IPDB = Bypass writing to IP database
Selection Text: BY_EIMP = Upload without End Items
Selection Text: BY_CHK = Bypass customer file checks
Title: SPEC 2000 Initial Provisioning: Upload
Text Symbol: 025 = Last TRD =
Text Symbol: 026 = Last TSN =
Text Symbol: 027 = ,All Files (*.*),*.*.
Text Symbol: 028 = Failed to upload file
Text Symbol: 029 = File mismatch: TSN is not next in sequence
Text Symbol: 030 = File rejected
Text Symbol: 031 = Error unidentified
Text Symbol: 032 = No value
Text Symbol: 033 = Mandatory fields missing
Text Symbol: 034 = Yes
Text Symbol: 035 = No
Text Symbol: 036 = File Seq No.
Text Symbol: 037 = Transmission file location
Text Symbol: 038 = Manufacturer No.
Text Symbol: 039 = Manufacturer Number
Text Symbol: 040 = Part Number
Text Symbol: 041 = Sequence Number of Upload:
Text Symbol: 042 = SPEC 2000 IP: Upload
Text Symbol: 001 = Select Sequence Number
Text Symbol: 002 = Settings for Upload
Text Symbol: 003 = Additional Selection for Upload
Text Symbol: 004 = Do you want to proceed with the current settings?
Text Symbol: 005 = Parsing S file => Line
Text Symbol: 006 = Parsing T file => Line
Text Symbol: 007 = Parsing V file => Line
Text Symbol: 008 = PNS PDS LMS/ PNS PDS EIS CBS/PNS PDS LMS EIX CBS should be at line No
Text Symbol: 009 = File path not entered. Enter file path?
Text Symbol: 010 = The parser selected is wrong
Text Symbol: 011 = Report of Errors
Text Symbol: 012 = Report of Errors Occured During Transmission
Text Symbol: 013 = Error Message
Text Symbol: 014 = Error
Text Symbol: 015 = Error Type
Text Symbol: 016 = Err Type
Text Symbol: 017 = Total Number of New Parts in the File:
Text Symbol: 018 = Total Numbe of Revised Parts in the File:
Text Symbol: 019 = Total Numbe of Part Deletion in the File:
Text Symbol: 020 = Record on line number
Text Symbol: 021 = in transmission file
Text Symbol: 022 = Writing to IP data base..................
Text Symbol: 023 = Executing business checks..................
Text Symbol: 024 = Rules not maintained in customising table
INCLUDES used within this REPORT S2K_IP_UPLOAD
INCLUDE S2KIPTOP.
INCLUDE FAD_PDRCDT.
INCLUDE FAD_PDRCDC.
INCLUDE FAD_PDSCDV.
INCLUDE FAD_PDSCDC.
INCLUDE FAD_CSNCDV.
INCLUDE FAD_CSNCDC.
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:
ADIP_F4_HELP_SQNBR CALL FUNCTION 'ADIP_F4_HELP_SQNBR' IMPORTING sqnbr = p_sqnbr.
WS_FILENAME_GET CALL FUNCTION 'WS_FILENAME_GET' EXPORTING mask = string_mask mode = 'O' title = 'SPEC2000' IMPORTING filename = path EXCEPTIONS inv_winsys = 1 no_batch = 2 selection_cancel = 3 selection_error = 4 OTHERS = 5.
EDI_PATH_NAME_OUT * CALL FUNCTION 'EDI_PATH_NAME_OUT' * EXPORTING * port = 'S2K_SFILE' * controlrec = i_edidc * IMPORTING * pathname = temp_path * EXCEPTIONS * port_not_exist = 1 * logical_path_error = 2 * OTHERS = 3.
F4_DXFILENAME_TOPRECURSION * CALL FUNCTION 'F4_DXFILENAME_TOPRECURSION' * EXPORTING * i_location_flag = ' ' * i_server = '?' * i_path = l_path * filemask = '*.*'
DYNP_VALUES_UPDATE * CALL FUNCTION 'DYNP_VALUES_UPDATE' * EXPORTING * dyname = dyname * dynumb = dynumb * TABLES * dynpfields = lt_dynpfields * EXCEPTIONS * OTHERS = 8.
EDI_PATH_NAME_OUT * CALL FUNCTION 'EDI_PATH_NAME_OUT' * EXPORTING * port = 'S2K_TFILE' * controlrec = i_edidc * IMPORTING * pathname = temp_path * EXCEPTIONS * port_not_exist = 1 * logical_path_error = 2 * OTHERS = 3.
F4_DXFILENAME_TOPRECURSION * CALL FUNCTION 'F4_DXFILENAME_TOPRECURSION' * EXPORTING * i_location_flag = ' ' * i_server = '?' * i_path = l_path * filemask = '*.*'
DYNP_VALUES_UPDATE * CALL FUNCTION 'DYNP_VALUES_UPDATE' * EXPORTING * dyname = dyname * dynumb = dynumb * TABLES * dynpfields = lt_dynpfields * EXCEPTIONS * OTHERS = 8.
EDI_PATH_NAME_OUT * CALL FUNCTION 'EDI_PATH_NAME_OUT' * EXPORTING * port = 'S2K_VFILE' * controlrec = i_edidc * IMPORTING * pathname = temp_path * EXCEPTIONS * port_not_exist = 1 * logical_path_error = 2 * OTHERS = 3.
F4_DXFILENAME_TOPRECURSION * CALL FUNCTION 'F4_DXFILENAME_TOPRECURSION' * EXPORTING * i_location_flag = ' ' * i_server = '?' * i_path = l_path * filemask = '*.*'
DYNP_VALUES_UPDATE * CALL FUNCTION 'DYNP_VALUES_UPDATE' * EXPORTING * dyname = dyname * dynumb = dynumb * TABLES * dynpfields = lt_dynpfields * EXCEPTIONS * OTHERS = 8.
ENQUEUE_ESPCIPPDR CALL FUNCTION 'ENQUEUE_ESPCIPPDR' EXPORTING mode_spcippdr = 'E' mode_spcipcsn = 'E' mode_spcipeff = 'E' mode_spcipparts = 'E' mode_spcippds = 'E' mode_spcipoch = 'E' mode_spciposds = 'E' mode_spcippqa = 'E' mode_spciprpde = 'E' mode_spcipuoa = 'E' sqnbr = p_sqnbr * _SCOPE = '2' _wait = ' ' * _COLLECT = ' ' EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.
ENQUEUE_ESPCIPHDR CALL FUNCTION 'ENQUEUE_ESPCIPHDR' EXPORTING * MODE_SPCIPHDR = 'X' * CLIENT = SY-MANDT srnbr = hdr_srnbr * X_SRNBR = ' ' * _SCOPE = '2' * _WAIT = ' ' * _COLLECT = ' ' EXCEPTIONS foreign_lock = 1 OTHERS = 2.
POPUP_TO_CONFIRM CALL FUNCTION 'POPUP_TO_CONFIRM' EXPORTING titlebar = text-042 text_question = tempstr text_button_1 = text-034 * ICON_BUTTON_1 = ' ' text_button_2 = text-035 * ICON_BUTTON_2 = ' ' default_button = '1' display_cancel_button = 'X' IMPORTING answer = answer EXCEPTIONS text_not_found = 1 OTHERS = 2.
DELETE_TEXT_FROM_CATALOG CALL FUNCTION 'DELETE_TEXT_FROM_CATALOG' EXPORTING OBJECT = '*' NAME = temp_sqn ID = '*' LANGUAGE = 'E' * LOCAL_CAT = ' ' * TABLES * T_OBJECT = * T_NAME = * T_ID = * T_LANGUAGE = EXCEPTIONS NOT_FOUND = 1 OTHERS = 2 .
POPUP_TO_CONFIRM CALL FUNCTION 'POPUP_TO_CONFIRM' EXPORTING titlebar = text-014 * DIAGNOSE_OBJECT = ' ' text_question = text-009 text_button_1 = text-034 * ICON_BUTTON_1 = ' ' text_button_2 = text-035 * ICON_BUTTON_2 = ' ' default_button = '1' display_cancel_button = 'X' IMPORTING answer = answer EXCEPTIONS text_not_found = 1 OTHERS = 2.
SAPGUI_PROGRESS_INDICATOR CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING text = text-023.
ENQUEUE_ESPCIPPDR * CALL FUNCTION 'ENQUEUE_ESPCIPPDR' * EXPORTING * mode_spcippdr = 'E' * mode_spcipcsn = 'E' * mode_spcipeff = 'E' * mode_spcipparts = 'E' * mode_spcippds = 'E' * mode_spcipoch = 'E' * mode_spciposds = 'E' * mode_spcippqa = 'E' * mode_spciprpde = 'E' * mode_spcipuoa = 'E' * SQNBR = p_sqnbr ** _SCOPE = '2' * _wait = ' ' ** _COLLECT = ' ' * EXCEPTIONS * foreign_lock = 1 * system_failure = 2 * OTHERS = 3.
SAPGUI_PROGRESS_INDICATOR CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING text = text-022.
STATUS_BUFFER_REFRESH CALL FUNCTION 'STATUS_BUFFER_REFRESH' .
DEQUEUE_ESPCIPPDR CALL FUNCTION 'DEQUEUE_ESPCIPPDR' EXPORTING mode_spcippdr = 'E' mode_spcipcsn = 'E' mode_spcipeff = 'E' mode_spcipparts = 'E' mode_spcippds = 'E' mode_spcipoch = 'E' mode_spciposds = 'E' mode_spcippqa = 'E' mode_spciprpde = 'E' mode_spcipuoa = 'E' **************************************************** * Code Change begins, RANGANATHANS, 18th Jan 2002 * Releasing lock on the Sequence number selected * Releasing lock on Header table (Srnbr) ****************************************************
sqnbr = p_sqnbr.
DEQUEUE_ESPCIPHDR CALL FUNCTION 'DEQUEUE_ESPCIPHDR' EXPORTING srnbr = hdr_srnbr.
REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING i_program_name = repid i_internal_tabname = 'FINAL_MESSAGE' * I_STRUCTURE_NAME = 'TYP_MSG' i_client_never_display = 'X' i_inclname = 'S2KIPTOP' i_bypassing_buffer = 'X' * I_BUFFER_ACTIVE = CHANGING ct_fieldcat = fcat[] EXCEPTIONS inconsistent_interface = 1 program_error = 2 OTHERS = 3.
REUSE_ALV_LIST_DISPLAY CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY' EXPORTING * I_INTERFACE_CHECK = ' ' * I_BUFFER_ACTIVE = ' ' i_callback_program = 'S2K_IP_UPLOAD' it_fieldcat = final_cat[] i_save = 'A' it_events = it_events TABLES t_outtab = final_message EXCEPTIONS program_error = 1 OTHERS = 2.
REUSE_ALV_COMMENTARY_WRITE CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE' EXPORTING it_list_commentary = gt_list_top_of_page.
CREATE_TEXT ** CALL FUNCTION 'CREATE_TEXT' ** EXPORTING ** fid = tid ** flanguage = 'E' ** fname = tname ** fobject = tdobject ** TABLES ** flines = temp_str ** EXCEPTIONS ** no_init = 1 ** no_save = 2 ** OTHERS = 3.
SAVE_TEXT * CALL FUNCTION 'SAVE_TEXT' * EXPORTING * client = sy-mandt * header = header * INSERT = flg_insert * savemode_direct = flg_save_mode * TABLES * lines = temp_str.
READ_TEXT CALL FUNCTION 'READ_TEXT' EXPORTING client = sy-mandt id = tid language = 'E' name = tname object = tdobject TABLES lines = itab_lines EXCEPTIONS id = 1 language = 2 name = 3 not_found = 4 object = 5 reference_check = 6 wrong_access_to_archive = 7 OTHERS = 8.
SAVE_TEXT CALL FUNCTION 'SAVE_TEXT' EXPORTING client = sy-mandt header = header INSERT = flg_insert savemode_direct = flg_save_mode TABLES lines = temp_str.
CALL FUNCTION 'STATUS_OBJECT_CREATE' EXPORTING * chgkz = 'X' client = sy-mandt * OBJNR = ' ' obtyp = p_objtyp stsma = p_stsma * IONRA_IMP = * I_OBJECTKEY = IMPORTING objnr = objnr_tmp stonr = stonr EXCEPTIONS obtyp_invalid = 1 status_object_already_exists = 2 stsma_invalid = 3 stsma_obtyp_invalid = 4 OTHERS = 5 .
NUMBER_GET_NEXT CALL FUNCTION 'NUMBER_GET_NEXT' EXPORTING nr_range_nr = '1' object = 'IS_ADSPCIP' quantity = '1' IMPORTING number = objnr_newnum EXCEPTIONS interval_not_found = 1 number_range_not_intern = 2 object_not_found = 3 quantity_is_0 = 4 quantity_is_not_1 = 5 interval_overflow = 6 OTHERS = 7.
OBJECT_NUMBER_GET_OR CALL FUNCTION 'OBJECT_NUMBER_GET_OR' EXPORTING aufnr = objnr_new IMPORTING objnr = objnr EXCEPTIONS number_already_exists = 1 OTHERS = 2.
STATUS_OBJECT_SWITCH_NUMBER CALL FUNCTION 'STATUS_OBJECT_SWITCH_NUMBER' EXPORTING client = sy-mandt objnr_new = objnr objnr_old = objnr_tmp EXCEPTIONS object_not_found = 1 objnr_new_invalid = 2 objnr_old_invalid = 3 status_object_already_exists = 4 OTHERS = 5.
STATUS_CHANGE_INTERN * CALL FUNCTION 'STATUS_CHANGE_INTERN' * EXPORTING * objnr = objnr * TABLES * status = status.
SAPGUI_PROGRESS_INDICATOR CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING percentage = l_count text = l_str.
BUSFUNC_SFILE CALL FUNCTION 'BUSFUNC_SFILE' TABLES t_spciphdr = itab_spciphdr EXCEPTIONS error_in_record = 1 mandatory_field = 2 no_value = 3 OTHERS = 4.
ADSPC_BUSFUNC_SFILE_TAB CALL FUNCTION 'ADSPC_BUSFUNC_SFILE_TAB' TABLES t_spciphdr = itab_spciphdr t_spcippdr = itab_spcippdr t_spcippds = itab_spcippds t_spcipcsn = itab_spcipcsn t_spciposds = itab_spciposds t_spcipeff = itab_spcipeff "#EC ENHOK t_spcipoch = itab_spcipoch t_spciprpde = itab_spciprpde t_spcipparts = itab_spcipparts t_spcipuoa = itab_spcipuoa t_spcippqa = itab_spcippqa t_message = itab_message EXCEPTIONS reject = 1 OTHERS = 2.
SAPGUI_PROGRESS_INDICATOR CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING percentage = l_count text = l_str.
BUSFUNC_SFILE CALL FUNCTION 'BUSFUNC_SFILE' TABLES t_spciphdr = itab_spciphdr EXCEPTIONS error_in_record = 1 mandatory_field = 2 no_value = 3 OTHERS = 4.
ADSPC_BUSFUNC_TFILE_TAB CALL FUNCTION 'ADSPC_BUSFUNC_TFILE_TAB' TABLES t_spciphdr = itab_spciphdr t_spcippdr = itab_spcippdr t_spcippds = itab_spcippds t_spcipcsn = itab_spcipcsn t_spciposds = itab_spciposds t_spcipeff = itab_spcipeff "#EC ENHOK t_spcipoch = itab_spcipoch t_spciprpde = itab_spciprpde "#EC ENHOK t_spcipparts = itab_spcipparts t_spcipuoa = itab_spcipuoa "#EC ENHOK t_spcippqa = itab_spcippqa t_message = itab_message EXCEPTIONS reject = 1 OTHERS = 2.
STATUS_CHECK CALL FUNCTION 'STATUS_CHECK' EXPORTING * BYPASS_BUFFER = ' ' * CLIENT = SY-MANDT objnr = p_objnr status = 'I8007' EXCEPTIONS object_not_found = 1 status_not_active = 2 OTHERS = 3 .
STATUS_CHANGE_INTERN CALL FUNCTION 'STATUS_CHANGE_INTERN' EXPORTING * CHECK_ONLY = ' ' client = sy-mandt objnr = p_objnr * ZEILE = ' ' set_chgkz = 'X' TABLES status = l_status EXCEPTIONS object_not_found = 1 status_inconsistent = 2 status_not_allowed = 3 OTHERS = 4 .
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 S2K_IP_UPLOAD or its description.
S2K_IP_UPLOAD - SPEC 2000 Initial Provisioning: Upload S2K_IP_UPLOAD - SPEC 2000 Initial Provisioning: Upload S2K_IP_UPLAOD_INC - Include S2K_IP_UPLAOD_INC S2K_IP_SET_EXCEL_MAPTOP - Include S2K_IP_SET_EXCEL_MAPTOP S2K_IP_SET_EXCEL_MAP - Program S2k_IP_SET_EXCEL_MAP S2K_IP_SET_EXCEL_MAP - Program S2k_IP_SET_EXCEL_MAP