SAP Reports / Programs | Basis Components | Security | User and Authorization Management(BC-SEC-USR-ADM) SAP BC
SAPMSCOMP SAP ABAP dialog Program - User Company Address Maintenance
SAPMSCOMP is a standard Module pool for a dialog screen ABAP Program 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 SAPMSCOMP 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
SUCOMP - User company address maintenance
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 SAPMSCOMP. "Basic submit
SUBMIT SAPMSCOMP AND RETURN. "Return to original report after report execution complete
SUBMIT SAPMSCOMP VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Title: User Company Address Maintenance
Text Symbol: 001 = Yes
Text Symbol: 002 = No
Text Symbol: 003 = Back
Text Symbol: 004 = Save Changes?
Text Symbol: B01 = Cancel task
Text Symbol: B02 = Cancel the
Text Symbol: B03 = task?
Text Symbol: B04 = Do you want to cancel the application?
INCLUDES used within this REPORT SAPMSCOMP
INCLUDE MSCOMPI01.
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:
ADDR_ENQUEUE CALL FUNCTION 'ADDR_ENQUEUE' EXPORTING address_number = input_number EXCEPTIONS address_not_exist = 01 foreign_lock = 02 system_failure = 03 internal_error = 04.
ADDRESS1_FIELD_SELECTION_FILL CALL FUNCTION 'ADDRESS1_FIELD_SELECTION_FILL' EXPORTING tabname = 'ADDR1_DATA' fieldname = 'TIME_ZONE' mark = '+' CHANGING field_selection_comp = addr1_fsel-fisel EXCEPTIONS field_unknown = 1 OTHERS = 2.
ADDR_DIALOG_PREPARE CALL FUNCTION 'ADDR_DIALOG_PREPARE' EXPORTING field_selection = addr1_fsel-fisel keywords = addr1_keyw titlebar = title change_default_comm_types = change_comm_types frame_text = addr_frame TABLES excluded_functions = excl_func error_table = fehler EXCEPTIONS internal_error = 01. "#EC FB_RC
SUSR_ZBV_LANDSCAPE_GET CALL FUNCTION 'SUSR_ZBV_LANDSCAPE_GET' IMPORTING is_central_system = gd_system_is_central EXCEPTIONS INVALID_MODEL = 1 NOT_ACTIVE = 2 OTHERS = 3.
BAPI_COMPANY_DELETE CALL FUNCTION 'BAPI_COMPANY_DELETE' EXPORTING company = uscompany-company TABLES return = return_table.
SUSR_COMPANY_DISTRIBUTE CALL FUNCTION 'SUSR_COMPANY_DISTRIBUTE' EXPORTING company = company_b "uscompany "-comp EXCEPTIONS company_not_exists = 1 OTHERS = 2.
SUSR_COMPANY_SURFACE_RENAME CALL FUNCTION 'SUSR_COMPANY_SURFACE_RENAME' IMPORTING okcode = ok_code CHANGING company_old = company_old company_new = company_new.
BAPI_COMPANY_RENAME CALL FUNCTION 'BAPI_COMPANY_RENAME' EXPORTING company = company_old company_new = company_new TABLES return = return_table.
SUSR_ZBV_COMPANY_SEND CALL FUNCTION 'SUSR_ZBV_COMPANY_SEND' EXPORTING method = method company = company_old company_new_name = company_new EXCEPTIONS wrong_system = 1 OTHERS = 2.
ADDR_DEQUEUE CALL FUNCTION 'ADDR_DEQUEUE' EXPORTING address_number = input_number EXCEPTIONS ADDRESS_NOT_EXIST = 0 INTERNAL_ERROR = 0 OTHERS = 0.
ADDR_SUBSCREEN_INITIALIZE CALL FUNCTION 'ADDR_SUBSCREEN_INITIALIZE'.
ADDR_EXP_SUBSCREEN CALL FUNCTION 'ADDR_EXP_SUBSCREEN' EXPORTING address_number = input_number address_handle = input_handle address_group = 'BC01' dialog_mode = input_mode suggested_values = vorschlag suggested_comm_values = vorschlag_komm address_is_optional = optional EXCEPTIONS address_not_exist = 01 group_not_valid = 02 parameter_error = 03 internal_error = 04.
ADDR_IMP_SUBSCREEN CALL FUNCTION 'ADDR_IMP_SUBSCREEN' IMPORTING values = werte error_in_address_data = error_in_data data_has_changed = data_changed cursor_field = get_cursor_field.
ADDR_NUMBER_GET CALL FUNCTION 'ADDR_NUMBER_GET' EXPORTING address_handle = input_handle address_reference = addrref IMPORTING address_number = new_number returncode_numberrange = rc_number_get EXCEPTIONS address_handle_not_exist = 01 internal_error = 02 parameter_error = 03.
ADDR_MEMORY_SAVE CALL FUNCTION 'ADDR_MEMORY_SAVE' "Neu oder ändern EXPORTING execute_in_update_task = 'X' EXCEPTIONS address_number_missing = 01 person_number_missing = 02 internal_error = 03 database_error = 04.
ADDR_MEMORY_CLEAR CALL FUNCTION 'ADDR_MEMORY_CLEAR' EXPORTING force = ' ' EXCEPTIONS unsaved_data_exist = 1 internal_error = 2 OTHERS = 3.
ADDR_EXIT_SUBSCREEN CALL FUNCTION 'ADDR_EXIT_SUBSCREEN'.
ADDR_NUMBER_GET CALL FUNCTION 'ADDR_NUMBER_GET' EXPORTING address_handle = input_handle address_reference = addrref IMPORTING address_number = new_number returncode_numberrange = rc_number_get EXCEPTIONS address_handle_not_exist = 01 internal_error = 02 parameter_error = 03.
CALL FUNCTION 'SUSR_COMPANY_PUT' EXPORTING company = uscompany-company addrnumber = new_number EXCEPTIONS company_already_exists = 1 OTHERS = 2.
ADDR_SINGLE_SAVE CALL FUNCTION 'ADDR_SINGLE_SAVE' EXPORTING address_number = input_number execute_in_update_task = 'X' EXCEPTIONS address_not_exist = 1 internal_error = 2 database_error = 3 OTHERS = 4.
SUSR_COMPANY_DISTRIBUTE CALL FUNCTION 'SUSR_COMPANY_DISTRIBUTE' EXPORTING company = company_b "uscompany "-company EXCEPTIONS company_not_exists = 1 OTHERS = 2.
ADDR_SINGLE_RESET CALL FUNCTION 'ADDR_SINGLE_RESET' EXPORTING address_number = input_number EXCEPTIONS parameter_error = 0 internal_error = 0 OTHERS = 0.
ADDR_DEQUEUE CALL FUNCTION 'ADDR_DEQUEUE' EXPORTING address_number = input_number EXCEPTIONS ADDRESS_NOT_EXIST = 0 INTERNAL_ERROR = 0 OTHERS = 0.
ADDR_SINGLE_RESET CALL FUNCTION 'ADDR_SINGLE_RESET' EXPORTING address_number = input_number * address_handle = input_handle EXCEPTIONS parameter_error = 0 internal_error = 0 OTHERS = 0.
ADDR_DEQUEUE CALL FUNCTION 'ADDR_DEQUEUE' EXPORTING address_number = input_number EXCEPTIONS ADDRESS_NOT_EXIST = 0 INTERNAL_ERROR = 0 OTHERS = 0.
ADDR_SINGLE_RESET CALL FUNCTION 'ADDR_SINGLE_RESET' EXPORTING address_number = input_number address_handle = input_handle EXCEPTIONS parameter_error = 1 internal_error = 2 OTHERS = 3.
ADDR_SUBSCREEN_SET_OKCODE CALL FUNCTION 'ADDR_SUBSCREEN_SET_OKCODE' EXPORTING ok_code = ok_code EXCEPTIONS OTHERS = 1.
ADDR_EXIT_SUBSCREEN CALL FUNCTION 'ADDR_EXIT_SUBSCREEN' IMPORTING data_has_changed = data_has_changed.
POPUP_TO_CONFIRM CALL FUNCTION 'POPUP_TO_CONFIRM' EXPORTING TITLEBAR = 'Back'(003) text_question = 'Save changes?'(004) TEXT_BUTTON_1 = 'Yes'(001) TEXT_BUTTON_2 = 'No'(002) DEFAULT_BUTTON = '1' DISPLAY_CANCEL_BUTTON = 'X' IMPORTING ANSWER = answer EXCEPTIONS text_not_found = 0 OTHERS = 0.
ADDR_SINGLE_RESET CALL FUNCTION 'ADDR_SINGLE_RESET' EXPORTING address_number = input_number address_handle = input_handle EXCEPTIONS number_not_found = 1 handle_not_found = 2 parameter_error = 3 internal_error = 4 OTHERS = 5.
ADDR_DEQUEUE CALL FUNCTION 'ADDR_DEQUEUE' EXPORTING address_number = input_number EXCEPTIONS ADDRESS_NOT_EXIST = 0 INTERNAL_ERROR = 0 OTHERS = 0.
PRGN_POPUP_TO_CONFIRM_LOSS_OFD CALL FUNCTION 'PRGN_POPUP_TO_CONFIRM_LOSS_OFD' EXPORTING textline1 = text-b04 titel = text-b01 IMPORTING answer = answer.
ADDR_SINGLE_RESET CALL FUNCTION 'ADDR_SINGLE_RESET' EXPORTING address_number = input_number address_handle = input_handle EXCEPTIONS number_not_found = 1 handle_not_found = 2 parameter_error = 3 internal_error = 4 OTHERS = 5.
ADDR_DEQUEUE CALL FUNCTION 'ADDR_DEQUEUE' EXPORTING address_number = input_number EXCEPTIONS ADDRESS_NOT_EXIST = 0 INTERNAL_ERROR = 0 OTHERS = 0.
ADDR_SINGLE_RESET CALL FUNCTION 'ADDR_SINGLE_RESET' EXPORTING address_number = input_number EXCEPTIONS parameter_error = 0 internal_error = 0 OTHERS = 0.
ADDR_DEQUEUE CALL FUNCTION 'ADDR_DEQUEUE' EXPORTING address_number = input_number EXCEPTIONS ADDRESS_NOT_EXIST = 0 INTERNAL_ERROR = 0 OTHERS = 0.
ADDR_REFERENCE_DELETE CALL FUNCTION 'ADDR_REFERENCE_DELETE' EXPORTING address_number = pf_old_addrnumber address_reference = ls_addrref EXCEPTIONS address_not_exist = 1 reference_not_exist = 2 internal_error = 3 parameter_error = 4 OTHERS = 5.
ADDR_SINGLE_SAVE CALL FUNCTION 'ADDR_SINGLE_SAVE' EXPORTING address_number = pf_old_addrnumber EXCEPTIONS address_not_exist = 1 person_not_exist = 2 address_number_missing = 3 reference_missing = 4 internal_error = 5 database_error = 6 parameter_error = 7 OTHERS = 8.
ADDR_REFERENCE_INSERT CALL FUNCTION 'ADDR_REFERENCE_INSERT' EXPORTING address_number = pf_new_addrnumber address_reference = ls_addrref EXCEPTIONS address_not_exist = 1 reference_exists = 2 internal_error = 3 parameter_error = 4 numberrange_error = 5 OTHERS = 6.
ADDR_SINGLE_SAVE CALL FUNCTION 'ADDR_SINGLE_SAVE' EXPORTING address_number = pf_new_addrnumber EXCEPTIONS address_not_exist = 1 person_not_exist = 2 address_number_missing = 3 reference_missing = 4 internal_error = 5 database_error = 6 parameter_error = 7 OTHERS = 8.
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 SAPMSCOMP or its description.