R_JORTUPDA_CREATE is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for Manual creation of city reference records This program checks whether there are cities that have been terminated and for which addresses still exist...see full standard documentation available for this report. Also check out the submitted Comments related to this SAP report and the details below to see which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC.
If you would like to execute this report or see the full code listing simply enter R_JORTUPDA_CREATE 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.
Selection Text: P_AENDNR = Change Number
Selection Text: P_LAND = Country
Selection Text: S_ORTNR = City Number
Title: Create JSTORTUPDA Reference Records
Text Symbol: 001 = Correction Specifs
INCLUDE MJ000TAL.
INCLUDE MJS00T01.
No SAP DATABASE tables are accessed within this REPORT code!
REUSE_ALV_GRID_DISPLAY CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY' EXPORTING * I_INTERFACE_CHECK = ' ' * I_BUFFER_ACTIVE = ' ' I_CALLBACK_PROGRAM = LV_REPID I_CALLBACK_PF_STATUS_SET = 'PF_STATUS_BASIC' *'STATUS_SET' I_CALLBACK_USER_COMMAND = 'USER_COMMAND' * I_CALLBACK_TOP_OF_PAGE = ' ' * I_CALLBACK_HTML_TOP_OF_PAGE = LV_FORMNAME * I_CALLBACK_HTML_END_OF_LIST = ' ' * I_STRUCTURE_NAME = * I_BACKGROUND_ID = ' ' * I_GRID_TITLE = * I_GRID_SETTINGS = IS_LAYOUT = LS_LAYOUT IT_FIELDCAT = LT_FIELDCAT * IT_EXCLUDING = * IT_SPECIAL_GROUPS = IT_SORT = LT_SORTINFO * IT_FILTER = * IS_SEL_HIDE = * I_DEFAULT = 'X' ** I_SAVE = CON_ALV_SAVE-ALL ** IS_VARIANT = LS_VARIANT * IT_EVENTS = * IT_EVENT_EXIT = IS_PRINT = LS_PRINT * IS_REPREP_ID = * I_SCREEN_START_COLUMN = 0 * I_SCREEN_START_LINE = 0 * I_SCREEN_END_COLUMN = 0 * I_SCREEN_END_LINE = 0 * IT_ALV_GRAPHICS = * IT_ADD_FIELDCAT = * IT_HYPERLINK = * IMPORTING * E_EXIT_CAUSED_BY_CALLER = * ES_EXIT_CAUSED_BY_USER = TABLES T_OUTTAB = itab_ort_alv EXCEPTIONS PROGRAM_ERROR = 1 OTHERS = 2 .
POPUP_GET_VALUES call function 'POPUP_GET_VALUES' "ohne jegliche Prüfung exporting * CUA INFO , Koordinaten des POPUP Fensters : popup_title = 'Korrekturangaben'(001) start_column = 25 start_row = 5 importing returncode = rc tables fields = feld_tab exceptions error_in_fields = 1.
ISM_JSTSTRPRO_OVERLAP_CHECK call function 'ISM_JSTSTRPRO_OVERLAP_CHECK' exporting in_gueltigab = con_time_begin in_jststrpro = wa_jststrpro1 changing street_tab = street_tab exceptions overlap = 1 others = 2.
REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING I_PROGRAM_NAME = PV_REPID I_STRUCTURE_NAME = 'JSTORTUPDA' CHANGING CT_FIELDCAT = PT_FIELDCAT EXCEPTIONS INCONSISTENT_INTERFACE = 1 PROGRAM_ERROR = 2.
ISP_JSTAENDER_CHECK CALL FUNCTION 'ISP_JSTAENDER_CHECK' EXPORTING aendnr = p_aendnr aktion = con_aktion_upgrade * POSTAL_DATA_CHANGE = ' ' IMPORTING aenderungsnr = gs_jstaender out_message = ls_msg EXCEPTIONS OTHERS = 1.
Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.