MNT31F90 SAP ABAP INCLUDE - IS-H: General FORM Routines, SAPMNT31
MNT31F90 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 MNT31F90 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 MNT31F90. "Basic submit
SUBMIT MNT31F90 AND RETURN. "Return to original report after report execution complete
SUBMIT MNT31F90 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Title: IS-H: General FORM Routines, SAPMNT31
INCLUDES used within this REPORT MNT31F90
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:
ISHMED_CHECK_N_EINR_TCO CALL FUNCTION 'ISHMED_CHECK_N_EINR_TCO' EXPORTING SS_CALLD = SY-CALLD SS_EINRI = RNT40-EINRI SS_LEAVE = FALSE SS_MSGTYPE = 'E' SS_TCODE = TCODE.
ISH_FIND_EXCL_SCREENS CALL FUNCTION 'ISH_FIND_EXCL_SCREENS' EXPORTING ACT_TCODE = TCODE EINRI = NTPZ-EINRI EXTP_NAM = REPID ALL_SCREENS = ALL_SCREENS TABLES EXCL_SCREENS = EXCL_SCREENS.
SCROLLING_IN_TABLE CALL FUNCTION 'SCROLLING_IN_TABLE' EXPORTING ENTRY_TO = ENTRY_TO LOOPS = LINES_PER_PAGE OK_CODE = SAVE-OK-CODE ENTRY_ACT = HEAD_LINE LAST_PAGE_FULL = ' ' OVERLAPPING = ' ' IMPORTING ENTRY_NEW = HEAD_LINE.
ISH_MODIFY_SCREEN CALL FUNCTION 'ISH_MODIFY_SCREEN' EXPORTING DYNNR = DYNNR EINRI = RNT40-EINRI FCODE = 'AS ' PNAME = REPID VCODE = VCODE.
ISH_SET_NEXT_SCREEN CALL FUNCTION 'ISH_SET_NEXT_SCREEN' EXPORTING ACT_TCODE = TCODE LEAVE_TCODE = TCODE EINRI = EINRI FCODE = FCODE GOTO_DYNNR = GOTO_DYNNR SCREEN_CALLED = SCREEN_CALLED IMPORTING FCODE = FCODE_2 NEXT_DYNNR = NEXT_DYNNR.
DEQUEUE_ENNTPZ CALL FUNCTION 'DEQUEUE_ENNTPZ' EXPORTING EINRI = NTPZ-EINRI ZOTYP = NTPZ-ZOTYP TARIF = A_TARIF TALST = A_TALST.
ENQUEUE_ENNTPZ CALL FUNCTION 'ENQUEUE_ENNTPZ' EXPORTING EINRI = NTPZ-EINRI ZOTYP = NTPZ-ZOTYP TARIF = RNT40-TARIF TALST = RNT40-TALST EXCEPTIONS FOREIGN_LOCK = 1 SYSTEM_FAILURE = 2.
R3MED_UPDATE_NTPZ CALL FUNCTION 'R3MED_UPDATE_NTPZ' " IN UPDATE TASK EXPORTING TCODE = SY-TCODE TABLES NNTPZ = NNTPZ ONTPZ = ONTPZ.
COMMIT_TEXT CALL FUNCTION 'COMMIT_TEXT' EXPORTING * OBJECT = '*' * NAME = '*' * ID = '*' * LANGUAGE = '*' SAVEMODE_DIRECT = ON * KEEP = ' ' EXCEPTIONS OTHERS = 1.
ISH_UPDATE_NTPZ CALL FUNCTION 'ISH_UPDATE_NTPZ' IN UPDATE TASK EXPORTING TCODE = SY-TCODE VCODE = MODE NNTPZ = NTPZ ONTPZ = H_NTPZ.
ISH_TEXTBUTTON_SET * CALL FUNCTION 'ISH_TEXTBUTTON_SET' * EXPORTING * SS_LGTXT = INTPZ-LPLTX * SS_BUTTON_NAME = 'RNT40-N1LGTXT' * SS_VCODE = VCODE * SS_TEXT_NAME = NTPZ-LPTXT * IMPORTING * SS_BUTTON = RNT40-N1LGTXT.
ISH_SHOW_SERVICES CALL FUNCTION 'ISH_SHOW_SERVICES' EXPORTING EXTP_NAM = 'SAPMNT31' INPUT_TARID = INP_TARID " Feld darf überschrieben werden EINRI = EINRI TARIF = TARIF VCODE = VCODE SET_ZOTYP = NTPZ-ZOTYP WITH_DATE = 'X' SET_TGRKZ = 'X' SELECT_GROUPS = 'X' " Auch Gruppen dürfen selekt. werden
ISHMED_SHOW_XLEI CALL FUNCTION 'ISHMED_SHOW_XLEI' EXPORTING SS_EINRI = EINRI * SS_GDATUM = SY-DATUM * SS_KNOTENKZ = 'C' SS_N1ANFOR = ON SS_N1PFLLEI = ON SS_TALST = '*' SS_TARIF = TARIF * SS_TITEL = ' ' SS_VCODE = A_VCODE " Fichte, Nr 2601 SS_VERKN = 'AND' SS_ZOTYP = A_ZOTYP * SS_MUST_SEL = 'X' IMPORTING E_NTPK = *NTPK E_FCODE = A_FCODE TABLES T_TNK01 = A_TNK01 EXCEPTIONS NOT_FOUND = 1 OTHERS = 2.
ISH_SHOW_SERVICES_NEW CALL FUNCTION 'ISH_SHOW_SERVICES_NEW' EXPORTING EINRICHTUNG = EINRI TARIF = TARIF * TALST = ' ' * ZEITRAUM = 'X' * ZEITPUNKT = 'X' * ENTGA = ' ' * TAGRU = ' ' * BEGDT = '00000000' * ENDDT = '00000000' SEL_LEIST = SEL_LEIST SEL_GROUP = 'X' SEL_ERFSP = 'X' MULTI_SELECT = ' ' USE_GROUPS = USE_GROUPS ZOTYP = NTPZ-ZOTYP "G01 ? * DEPTH = '1' CHANGE_TARIF = ' ' * CHANGE_ZEITR = 'X' * CHANGE_ZEITP = 'X' * CHANGE_ENTGA = 'X' * CHANGE_TAGRU = 'X' CHANGE_ZOTYP = ' ' CHANGE_USEGR = CHANGE_USEGR * WIN_TITLE = 'Eingabehilfe'(015) * TEXTNR = '1' * VCODE = 'UPD' * SKIP_FIRST_SCREEN = ' ' READ_VLE = ' ' * SELECT_ALL = ' ' IMPORTING E_NTPK = *NTPK * E_NTPT = *NTPT * E_ZOTYP = * TABLES * T_NTPK = * T_NTPT = EXCEPTIONS WRONG_EINRI = 1 NOTHING_FOUND = 2 NOTHING_SELECTED = 3 MISSING_ZOTYP = 4 OTHERS = 5.
R3MED_VALUE_REQUEST CALL FUNCTION 'R3MED_VALUE_REQUEST' EXPORTING SS_LENGTH = 34 SS_HEIGTH = 9 SS_FIELD = FELDNAME SS_TABLE = 'TNT0' SS_VCODE = 'UPD' SS_EINRI = RNT40-EINRI SS_SELECT = SEL_KRIT IMPORTING SS_VALUE = WERT EXCEPTIONS NOT_FOUND = 01.
DYNP_VALUES_READ CALL FUNCTION 'DYNP_VALUES_READ' EXPORTING DYNAME = REPID DYNUMB = DYNNR TABLES DYNPFIELDS = DYNPFIELDS.
DYNP_VALUES_UPDATE CALL FUNCTION 'DYNP_VALUES_UPDATE' EXPORTING DYNAME = REPID DYNUMB = DYNNR TABLES DYNPFIELDS = DYNPFIELDS.
RENAME_TEXT CALL FUNCTION 'RENAME_TEXT' EXPORTING OBJECT = TXOBJ ID = TEXTID NAME = TEXTNAME NEWNAME = NEWTEXTNAME LANGUAGE = SY-LANGU EXCEPTIONS NOT_FOUND = 01.
CALL FUNCTION 'DELETE_TEXT' EXPORTING OBJECT = TXOBJ ID = TEXTID NAME = TEXTNAME LANGUAGE = SY-LANGU EXCEPTIONS NOT_FOUND = 01.
READ_TEXT CALL FUNCTION 'READ_TEXT' EXPORTING ID = TEXTID NAME = TEXTNAME OBJECT = TXOBJ LANGUAGE = SY-LANGU IMPORTING HEADER = TEXTHEADER TABLES LINES = TEXT_LINES EXCEPTIONS OBJECT = 1 ID = 2 NAME = 3 LANGUAGE = 4 REFERENCE_CHECK = 5 NOT_FOUND = 8.
SAVE_TEXT CALL FUNCTION 'SAVE_TEXT' EXPORTING HEADER = HEADER IMPORTING NEWHEADER = HEADER TABLES LINES = TEXT_LINES EXCEPTIONS OBJECT = 1 ID = 2 NAME = 3 LANGUAGE = 4.
INIT_TEXT CALL FUNCTION 'INIT_TEXT' EXPORTING ID = TEXTID LANGUAGE = SY-LANGU NAME = TEXTNAME OBJECT = TXOBJ IMPORTING HEADER = T_HEAD TABLES LINES = TEXT_LINES EXCEPTIONS ID = 1 LANGUAGE = 2 NAME = 3 OBJECT = 4 OTHERS = 5.
EDIT_TEXT CALL FUNCTION 'EDIT_TEXT' EXPORTING DISPLAY = DISPLAY * EDITOR_TITLE = ' ' HEADER = T_HEAD * SAVE = 'X' * CONTROL = ' ' TABLES LINES = TEXT_LINES EXCEPTIONS ID = 1 LANGUAGE = 2 LINESIZE = 3 NAME = 4 OBJECT = 5 TEXTFORMAT = 6 COMMUNICATION = 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 MNT31F90 or its description.
MNT31F90 - IS-H: General FORM Routines, SAPMNT31 MNT30O50 - ===> Object NTPZ , generated by program RSSCD0 MNT30O30 - ===> Object NORG , generated by program RSSCD0 MNT30I30 - ===> Object NORG , generated by program RSSCD0 MNT30F56 - ===> Object NTPZ , generated by program RSSCD0 MNT30F55 - ===> Object NTPZ , generated by program RSSCD0