MN217F90 SAP ABAP INCLUDE - IS-H: General FORM Routines, SAPMNT31
MN217F90 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 MN217F90 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 MN217F90. "Basic submit
SUBMIT MN217F90 AND RETURN. "Return to original report after report execution complete
SUBMIT MN217F90 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 MN217F90
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:
ISH_FIND_EXCL_SCREENS CALL FUNCTION 'ISH_FIND_EXCL_SCREENS' EXPORTING act_tcode = tcode einri = n2pslz-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 = rn217-einri * FCODE = '*' pname = repid vcode = vcode set_cursor = on CHANGING tc_control = tc_in2pslz.
ISH_MODIFY_SCREEN CALL FUNCTION 'ISH_MODIFY_SCREEN' EXPORTING dynnr = dynnr einri = rn217-einri * FCODE = 'AS ' pname = repid vcode = vcode set_cursor = on.
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_EN2PSLZ CALL FUNCTION 'DEQUEUE_EN2PSLZ' EXPORTING einri = n2pslz-einri skat = rn217-skat skey = rn217-skey.
ENQUEUE_EN2PSLZ CALL FUNCTION 'ENQUEUE_EN2PSLZ' EXPORTING einri = n2pslz-einri * ZUPTYP = N2PSLZ-ZUPTYP skat = rn217-skat skey = rn217-skey * ZUTARID = ZUTARID * ZUTARLS = ZUTARLS * ENDDT = ENDDT EXCEPTIONS foreign_lock = 1 system_failure = 2.
ISH_N2_UPDATE_N2PSLZ * CALL FUNCTION 'R3MED_UPDATE_NTPZ' CALL FUNCTION 'ISH_N2_UPDATE_N2PSLZ' " IN UPDATE TASK EXPORTING tcode = sy-tcode TABLES nn2pslz = nn2pslz on2pslz = on2pslz.
ISH_UPDATE_NTPZ * CALL FUNCTION 'ISH_UPDATE_NTPZ' " Noch nicht angepaßt * IN UPDATE TASK * EXPORTING * TCODE = SY-TCODE * VCODE = MODE * NN2PSLZ = N2PSLZ * ON2PSLZ = OLD_N2PSLZ.
ISH_N2_SHOW_N2PSLZ CALL FUNCTION 'ISH_N2_SHOW_N2PSLZ' EXPORTING skat = skat einri = einri * ORGID = ' ' extp_nam = 'SAPMN217' input_tarid = inp_tarid * OPEN_LEVEL = 0 * SELECT_GROUPS = 'X' * SET_ZUPTYP = N2PSLZ-ZUPTYP set_katart = set_katart vcode = vcode * WITHMARK = 'N' withhelp = no IMPORTING e_ntpk = *ntpk e_n2ps = *n2ps * TABLES * T_NTPK = NTPKNEU "Dummy EXCEPTIONS missing_einri = 1 not_found = 2.
ISHMED_SHOW_XLEI CALL FUNCTION 'ISHMED_SHOW_XLEI' EXPORTING ss_einri = einri ss_gdatum = sy-datum ss_knotenkz = 'C' ss_n1anfor = '*' ss_n1erbri = on "4.02/01 '*'
ISH_N2_VALUE_REQUEST * CALL FUNCTION 'ISH_N2_VALUE_REQUEST' * EXPORTING * SS_LENGTH = 34 * SS_HEIGTH = 9 * SS_FIELD = FELDNAME * SS_TABLE = 'TN26A' * SS_VCODE = VCODE * SS_EINRI = RN217-EINRI * SS_SELECT = SEL_KRIT * IMPORTING * SS_VALUE = WERT * EXCEPTIONS * NOT_FOUND = 01.
ISH_N2_SHOW_NTPK * CALL FUNCTION 'ISH_N2_SHOW_NTPK' * EXPORTING * SS_PKAT = TN2K1-TARID * SS_EINRI = RN217-EINRI * SS_VCODE = VCODE * SS_WITHHELP = NO * SS_RESSOURCE = RESSOURCE * SS_PROBLEM = PROBLEM * SS_ZIEL = ZIEL * IMPORTING * E_NTPK = *NTPK * TABLES ** T_NTPK = I_NTPK " Wird hier nicht genutzt * EXCEPTIONS * NOT_FOUND = 1.
ISH_N2_SHOW_NTPK * CALL FUNCTION 'ISH_N2_SHOW_NTPK' * EXPORTING * SS_PKAT = TN2K1-TARID * SS_EINRI = RN217-EINRI * SS_VCODE = VCODE * SS_WITHHELP = NO * SS_RESSOURCE = RESSOURCE * SS_PROBLEM = PROBLEM * SS_ZIEL = ZIEL * IMPORTING * E_NTPK = *NTPK * TABLES * T_NTPK = I_NTPK " Wird hier nicht genutzt * EXCEPTIONS * NOT_FOUND = 1.
ISH_DYNP_VALUES_READ CALL FUNCTION 'ISH_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.
ISH_N2_READ_N2PS CALL FUNCTION 'ISH_N2_READ_N2PS' EXPORTING skat = skat skey = skey spras = sy-langu IMPORTING e_n2ps = $n2ps EXCEPTIONS not_found = 01.
ISH_N2_READ_NTPK * CALL FUNCTION 'ISH_N2_READ_NTPK' * EXPORTING * PKAT = PKAT * PKEY = PKEY * SPRAS = SY-LANGU * IMPORTING * E_NTPK = $NTPK * EXCEPTIONS * NOT_FOUND = 01.
ISH_READ_NTPK_NTPT_NEW CALL FUNCTION 'ISH_READ_NTPK_NTPT_NEW' EXPORTING begdt = sy-datum einri = tn2k1-einri enddt = sy-datum spras = sy-langu talst = pkey tarif = tn2k1-tarid read_ntpt = 'X' IMPORTING e_ntpk = $ntpk e_ntpt = *ntpt * KTXTCONC = KTXTCONC EXCEPTIONS missing_data = 1 no_ntpk_ntpt_found = 2 OTHERS = 3.
ISHMED_READ_N1STZY_N1STZT CALL FUNCTION 'ISHMED_READ_N1STZY_N1STZT' EXPORTING einri = tn2k1-einri datum = sy-datum * N1ZNR = N1ZNR n1id = n1id * READ_N1STZT = 'X' * SPRAS = SY-LANGU IMPORTING e_n1stzy = $n1stzy e_n1stzt = *n1stzt EXCEPTIONS missing_data = 1 no_n1stzy_n1stzt = 2 OTHERS = 3.
ISHMED_READ_N1STZY_N1STZT CALL FUNCTION 'ISHMED_READ_N1STZY_N1STZT' EXPORTING einri = tn2k1-einri * DATUM = n1znr = n1znr * N1ID = N1ID * READ_N1STZT = 'X' * SPRAS = SY-LANGU IMPORTING e_n1stzy = $n1stzy e_n1stzt = *n1stzt EXCEPTIONS missing_data = 1 no_n1stzy_n1stzt = 2 OTHERS = 3.
ISH_N2_READ_TNK01 * CALL FUNCTION 'ISH_N2_READ_TNK01' * EXPORTING * KATID = KATID * IMPORTING * E_TNK01 = $TNK01 * EXCEPTIONS * NOT_FOUND = 01.
ISH_N2_READ_TN2K1 CALL FUNCTION 'ISH_N2_READ_TN2K1' EXPORTING katid = katid IMPORTING e_tn2k1 = $tn2k1 EXCEPTIONS not_found = 01.
ISH_DOMAIN_VALUE_TEXTS CALL FUNCTION 'ISH_DOMAIN_VALUE_TEXTS' EXPORTING domname = domname domvalue = domvalue IMPORTING ddtext = ddtext.
ISHMED_POPUP_SELECT_STD_ZYKL CALL FUNCTION 'ISHMED_POPUP_SELECT_STD_ZYKL' EXPORTING i_einri = rn217-einri i_help = on * I_N1ID = N1STZY-N1ID IMPORTING e_n1stzy = cn1stzy e_n1stzt = n1stzt EXCEPTIONS cancel = 1 OTHERS = 2.
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 MN217F90 or its description.