SAP Reports / Programs | Construction Equipment Management | Industry Solution Engineering & Construction | Construction Equipment Management(IS-EC-CEM) SAP IS

Home SAP Development ABAP Coding SAP Fiori SAP Training SAP Tables SAP Objects...

MJ3GFF02 SAP ABAP INCLUDE - FORM Routines for Modules of Screen 0200

SAP T-Codes / Example ABAP code
ABAP OO / SAP Function Modules
ABAP reports / SAP Error Messages
SAP Tables / SAP Video Training

MJ3GFF02 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 MJ3GFF02 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 MJ3GFF02. "Basic submit
SUBMIT MJ3GFF02 AND RETURN. "Return to original report after report execution complete
SUBMIT MJ3GFF02 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement

Text pool values

Title: FORM Routines for Modules of Screen 0200

INCLUDES used within this REPORT MJ3GFF02

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:

SCROLLING_IN_TABLE CALL FUNCTION 'SCROLLING_IN_TABLE' EXPORTING entry_act = p_top_line entry_to = idx_belp_max last_page_full = ' ' loops = cnt_loopc ok_code = sav_okcode * overlapping = 'X' IMPORTING entry_new = e_top_line.

POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING defaultoption = 'N' textline1 = text textline2 = text-022 titel = text-020 IMPORTING answer = sav_answer.

J_3G_BEWEGUNGTYP CALL FUNCTION 'J_3G_BEWEGUNGTYP' EXPORTING i_absender = j_3gbelk-j_3gabsend i_absdeb = j_3gbelk-j_3gabsdeb i_absext = j_3gbelk-j_3gabsext i_empfaenger = j_3gbelk-j_3gempfae i_empdeb = j_3gbelk-j_3gempdeb i_empext = j_3gbelk-j_3gempext IMPORTING e_j_3gbeweg = j_3gbelk-j_3gbeweg.

J_3G_EQUI_ALLGEMEIN CALL FUNCTION 'J_3G_EQUI_ALLGEMEIN' EXPORTING i_equnr = j_3gbelp-equnr i_vbtyp = j_3gbelart-vbtyp i_datum = j_3gbelk-j_3gbeldat i_vrgng = con_versandbeleg_vrgng IMPORTING e_equi = equi EXCEPTIONS OTHERS = 1.

J_3G_EQUZ_ALLGEMEIN CALL FUNCTION 'J_3G_EQUZ_ALLGEMEIN' EXPORTING i_equnr = equi-equnr i_datum = j_3gbelk-j_3gbeldat i_kzmeng = equi-j_3gkzmeng IMPORTING e_eigner = equz-j_3geigner e_verwalter = equz-j_3gverwal EXCEPTIONS OTHERS = 1.

J_3G_EMPFAENGER_ALLGEMEIN CALL FUNCTION 'J_3G_EMPFAENGER_ALLGEMEIN' EXPORTING i_kunnr = j_3gbelk-j_3gempfae i_kennung = 'E' i_blart = j_3gbelart-j_3gblart i_vbtyp = j_3gbelart-vbtyp i_trtyp = hlp_actvt i_auart = j_3gbelart-auart i_beldat = j_3gbelk-j_3gbeldat "#EC DOM_EQUAL IMPORTING e_etyp = e_typ e_reftyp = j_3gbelk-j_3gempref e_psp = j_3gbelk-j_3gemppsp e_proj = j_3gbelk-j_3gemppro e_coaufnr = j_3gbelk-j_3gempaco e_pmaufnr = j_3gbelk-j_3gempapm e_lgort = j_3gbelk-j_3gemplag e_werks = j_3gbelk-j_3gempwrk e_kokrs = j_3gbelk-j_3gempkok e_kostl = j_3gbelk-j_3gempkos e_empfext = j_3gbelk-j_3gempext e_debext = j_3gbelk-j_3gempdeb e_name1 = *kna1-name1 e_name2 = emp_name3 e_name3 = emp_name2 e_bukrs = j_3gbelk-j_3gemp_bukrs e_gsber = j_3gbelk-j_3gemp_gsber e_nplnr = j_3gbelk-j_3gempnplnr CHANGING e_vornr = j_3gbelk-j_3gempvornr EXCEPTIONS OTHERS = 1.

J_3G_EMPFAENGER_ALLGEMEIN CALL FUNCTION 'J_3G_EMPFAENGER_ALLGEMEIN' EXPORTING i_kunnr = j_3gbelk-j_3gabsend i_kennung = 'A' i_blart = j_3gbelart-j_3gblart i_vbtyp = j_3gbelart-vbtyp i_trtyp = hlp_actvt i_auart = j_3gbelart-auart i_beldat = j_3gbelk-j_3gbeldat "#EC DOM_EQUAL IMPORTING e_etyp = a_typ e_reftyp = j_3gbelk-j_3gabsref e_psp = j_3gbelk-j_3gabspsp e_proj = j_3gbelk-j_3gabspro e_coaufnr = j_3gbelk-j_3gabsaco e_pmaufnr = j_3gbelk-j_3gabsapm e_lgort = j_3gbelk-j_3gabslag e_werks = j_3gbelk-j_3gabswrk e_kokrs = j_3gbelk-j_3gabskok e_kostl = j_3gbelk-j_3gabskos e_empfext = j_3gbelk-j_3gabsext e_debext = j_3gbelk-j_3gabsdeb e_name1 = kna1-name1 e_name2 = abs_name3 e_name3 = abs_name2 e_bukrs = j_3gbelk-j_3gabs_bukrs e_gsber = j_3gbelk-j_3gabs_gsber e_nplnr = j_3gbelk-j_3gabsnplnr CHANGING e_vornr = j_3gbelk-j_3gabsvornr EXCEPTIONS check_incorrect = 1 OTHERS = 2.

J_3G_BELEGNR_ALLGEMEIN CALL FUNCTION 'J_3G_BELEGNR_ALLGEMEIN' EXPORTING i_trtyp = hlp_actvt i_belnr = j_3gbelk-j_3gbelnr EXCEPTIONS belnr_vorhanden = 1 OTHERS = 2.

J_3G_MIEMPF_ALLGEMEIN CALL FUNCTION 'J_3G_MIEMPF_ALLGEMEIN' EXPORTING i_kunnr = j_3gbelk-j_3gmittle i_blart = j_3gbelart-j_3gblart i_vbtyp = j_3gbelart-vbtyp i_trtyp = hlp_actvt i_auart = j_3gbelart-auart i_beldat = j_3gbelk-j_3gbeldat "#EC DOM_EQUAL i_absender = j_3gbelk-j_3gabsend i_atyp = a_typ i_bukrs_a = j_3gbelk-j_3gabs_bukrs i_gsber_a = j_3gbelk-j_3gabs_gsber i_werks_a = j_3gbelk-j_3gabswrk i_etyp = e_typ i_beweg = j_3gbelk-j_3gbeweg i_bukrs_e = j_3gbelk-j_3gemp_bukrs bapi_vornr = j_3gbelk-j_3gabsvornr IMPORTING e_kunnr = j_3gbelk-j_3gmittle e_reftyp = j_3gbelk-j_3gmitref e_psp = j_3gbelk-j_3gmitpsp e_proj = j_3gbelk-j_3gmitpro e_coaufnr = j_3gbelk-j_3gmitaco e_pmaufnr = j_3gbelk-j_3gmitapm e_lgort = j_3gbelk-j_3gmitlag e_werks = j_3gbelk-j_3gmitwrk e_kokrs = j_3gbelk-j_3gmitkok e_kostl = j_3gbelk-j_3gmitkos e_name1 = name_mit e_bukrs = m_bukrs EXCEPTIONS check_incorrect = 1 not_allowed = 2 domkenn_failure = 3 no_receiver = 4 OTHERS = 5.

ME_CHECK_T160M CALL FUNCTION 'ME_CHECK_T160M' EXPORTING i_arbgb = '9J' i_msgnr = '659' i_msgvs = '01' i_msgtp_default = 'E' EXCEPTIONS error = 1 nothing = 2 warning = 3 information = 5 OTHERS = 4.

/SAPCEM/MENGE_IN_BASIS_ME CALL FUNCTION '/SAPCEM/MENGE_IN_BASIS_ME' EXPORTING i_matnr = j_3gbelp-matnr i_menge = j_3gbelp-j_3gmenge i_meins = j_3gbelp-j_3gmeins i_basis_meins = basis_me IMPORTING e_menge = l_dummy_menge EXCEPTIONS meins_fault = 1.

J_3G_BEST_PRUEF_ALLGEMEIN CALL FUNCTION 'J_3G_BEST_PRUEF_ALLGEMEIN' EXPORTING i_beltyp = j_3gbelart-vbtyp i_artbes = j_3gbesart-j_3gartbes i_datum = j_3gbelk-j_3gbeldat "#EC DOM_EQUAL i_datum_bis = con_ultimo i_beweg = j_3gbelk-j_3gbeweg i_daten = j_3gbelp i_daten_alt = *j_3gbelp i_datum_alt = ybelk-j_3gbeldat "#EC DOM_EQUAL IMPORTING e_bestand = xbestand-menge TABLES t_hbest_out = ihbest t_tbest = xtbest_wa EXCEPTIONS OTHERS = 1.

J_3G_MENGE_IN_EQUI_ME CALL FUNCTION 'J_3G_MENGE_IN_EQUI_ME' EXPORTING i_equnr = j_3gbelp-equnr i_meins = j_3gbelp-j_3gmeins i_menge = j_3gbelp-j_3gmenge IMPORTING e_menge = hlp_menge EXCEPTIONS OTHERS = 1.

J_3G_LEIART_DEFAULT CALL FUNCTION 'J_3G_LEIART_DEFAULT' EXPORTING i_restyp = p_restyp i_belart = j_3gbelart-j_3gblart i_beweg = hlp_beweg i_etyp = e_typ i_atyp = a_typ i_mtart = p_mtart i_equnr = j_3gbelp-equnr i_matnr = j_3gbelp-matnr i_belk = j_3gbelk IMPORTING e_lvart_default = j_3gbelp-j_3glvart EXCEPTIONS no_default = 1 OTHERS = 3.

J_3G_BELEG_STATUS_CHECK CALL FUNCTION 'J_3G_BELEG_STATUS_CHECK' EXPORTING i_trtyp = actvt i_status = xbelp-j_3gbelsta i_statuse = xbelp-j_3gbelste EXCEPTIONS not_allowed = 1 intensified = 2.

/SAPCEM/FOLGEBELEG_CHECK * CALL FUNCTION '/SAPCEM/FOLGEBELEG_CHECK' * EXPORTING * i_belp = wa_j_3gbelp * i_refresh = ' ' * IMPORTING * e_folgebeleg = kz_folgebeleg.

J_3G_LADKOSTEN_DEFAULT CALL FUNCTION 'J_3G_LADKOSTEN_DEFAULT' EXPORTING i_blart = j_3gbelart-j_3gblart i_atyp = a_typ i_etyp = e_typ i_beweg = j_3gbelk-j_3gbeweg i_kzladg = xequi-j_3gkzladg i_kzberg = xequi-j_3gkzberg i_absdeb = j_3gbelk-j_3gabsdeb i_empdeb = j_3gbelk-j_3gempdeb i_restyp = p_belp-j_3grestyp IMPORTING e_kzladi = p_kzladi e_kzlade = p_kzlade e_kzberg = p_kzberg EXCEPTIONS default_lkost_not_found = 1.

J_3G_LADKOSTEN_DEFAULT CALL FUNCTION 'J_3G_LADKOSTEN_DEFAULT' EXPORTING i_blart = j_3gbelart-j_3gblart i_atyp = a_typ i_etyp = e_typ i_beweg = j_3gbelk-j_3gbeweg i_kzladg = '1' "!!!! xmara-j_3gkzladg i_absdeb = j_3gbelk-j_3gabsdeb i_empdeb = j_3gbelk-j_3gempdeb i_restyp = p_belp-j_3grestyp IMPORTING e_kzladi = p_kzladi e_kzlade = p_kzlade EXCEPTIONS default_lkost_not_found = 1.

J_3G_BILLING_INDICATOR_DEFAULT

CALL FUNCTION 'J_3G_BILLING_INDICATOR_DEFAULT' EXPORTING i_atyp = a_typ i_etyp = e_typ i_faktab = j_3gbelk-j_3gfaktab i_faktem = j_3gbelk-j_3gfaktem i_beweg = j_3gbelk-j_3gbeweg i_mittle = j_3gbelk-j_3gmittle i_bltyp = j_3gbelk-j_3gbltyp IMPORTING e_faktab = j_3gbelk-j_3gfaktab e_faktem = j_3gbelk-j_3gfaktem TABLES xbelp = xbelp xbelp_bal = xbelp_bal.

J_3G_LOADING_COST_DEFAULT CALL FUNCTION 'J_3G_LOADING_COST_DEFAULT' EXPORTING i_atyp = a_typ i_etyp = e_typ i_beweg = j_3gbelk-j_3gbeweg i_absdeb = j_3gbelk-j_3gabsdeb i_empdeb = j_3gbelk-j_3gempdeb i_blart = j_3gbelk-j_3gblart TABLES xbelp = xbelp xbelp_bal = xbelp_bal.

HELP_VALUES_GET_WITH_TABLE CALL FUNCTION 'HELP_VALUES_GET_WITH_TABLE' EXPORTING display = ' ' fieldname = 'J_3GBELAB' tabname = 'J_3GHBEST' titel = text-111 title_in_values_list = text-111 no_conversion = 'X' IMPORTING select_value = ifobel-j_3gbelzu TABLES fields = xhelpvalue valuetab = xhelpwert EXCEPTIONS field_not_in_ddic = 01 more_then_one_selectfield = 02 no_selectfield = 03.

/SAPCEM/FOLGEBELEG_CHECK CALL FUNCTION '/SAPCEM/FOLGEBELEG_CHECK' EXPORTING i_belp = xbelp i_refresh = ' ' IMPORTING e_folgebeleg = kz_folgebeleg TABLES t_fobel = ifobel.

/SAPCEM/HBEST_TBEST_MERGE
    CALL FUNCTION '/SAPCEM/HBEST_TBEST_MERGE'
         EXPORTING
              i_vdate           = j_3gbelk-j_3gbeldat
              i_cdate           = con_ultimo
              i_check           = ' '
              i_cequi           = hlp_equi_check
              i_cmatn           = hlp_matn_check
              it_empfa          = r_empfae[]
              it_agext          = r_agext[]
              it_weext          = r_weext[]
              it_requi          = resso_wa[]
              it_rmatn          = resso_wa[]
              i_corr_hbest_read = 'X'
         IMPORTING
              et_hbest          = et_hbest[].

HELP_VALUES_GET_WITH_TABLE CALL FUNCTION 'HELP_VALUES_GET_WITH_TABLE' EXPORTING display = con_blank fieldname = 'J_3GBELAB' tabname = 'J_3GHBEST' titel = text-110 title_in_values_list = text-110 no_conversion = 'X' IMPORTING select_value = iabbel-j_3gbelab TABLES fields = xhelpvalue valuetab = xhelpwert EXCEPTIONS field_not_in_ddic = 01 more_then_one_selectfield = 02 no_selectfield = 03.

ENQUEUE_EJ_3GHBEST CALL FUNCTION 'ENQUEUE_EJ_3GHBEST' EXPORTING mandt = sy-mandt j_3gbart = '1' j_3gempfae = hlp_empfae j_3gagext = hlp_empdeb j_3gweext = hlp_empext j_3grestyp = j_3gbelp-j_3grestyp j_3gressou = ressou EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.

ENQUEUE_EJ_3GABEST CALL FUNCTION 'ENQUEUE_EJ_3GABEST' EXPORTING mandt = sy-mandt j_3gempfae = hlp_empfae j_3gagext = hlp_empdeb j_3gweext = hlp_empext j_3grestyp = j_3gbelp-j_3grestyp j_3gressou = ressou EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.

ENQUEUE_EJ_3GHBEST CALL FUNCTION 'ENQUEUE_EJ_3GHBEST' EXPORTING * MODE_J_3GHBEST = 'E' mandt = sy-mandt j_3gbart = '1' j_3gempfae = j_3gbelk-j_3gabsend j_3gagext = j_3gbelk-j_3gabsdeb j_3gweext = j_3gbelk-j_3gabsext j_3grestyp = j_3gbelp-j_3grestyp j_3gressou = ressou EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.

ENQUEUE_EJ_3GABEST CALL FUNCTION 'ENQUEUE_EJ_3GABEST' EXPORTING mandt = sy-mandt j_3gempfae = j_3gbelk-j_3gabsend j_3gagext = j_3gbelk-j_3gabsdeb j_3gweext = j_3gbelk-j_3gabsext j_3grestyp = j_3gbelp-j_3grestyp j_3gressou = ressou EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.

CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING input = belegnr IMPORTING output = belegnr.

MASTER_DATA CALL FUNCTION 'MASTER_DATA' EXPORTING datenfeld = dynfield fieldvalue = fieldvalue.

ME_CHECK_T160M
  CALL FUNCTION 'ME_CHECK_T160M'
       EXPORTING
            i_arbgb     = '9J'
            i_msgnr     = msgnr
            i_msgvs     = '  '
       EXCEPTIONS
            error       = 1
            nothing     = 2
            warning     = 3
            information = 5
            OTHERS      = 4.

J_3G_BELEGDAT_CHECK CALL FUNCTION 'J_3G_BELEGDAT_CHECK' EXPORTING i_blart = j_3gbelk-j_3gblart i_beldat = beldat "#EC DOM_EQUAL i_absender = absender i_empfaenger = empfaenger EXCEPTIONS beldat_invalid = 1 beldat_lt_maximum = 2.

J_3G_EQUI_READ CALL FUNCTION 'J_3G_EQUI_READ' EXPORTING i_equnr = p_equnr i_datum = j_3gbelk-j_3gbeldat "#EC DOM_EQUAL IMPORTING e_equi = equi e_equz = equz e_eqkt = eqkt EXCEPTIONS OTHERS = 1.

J_3G_WEIGHT CALL FUNCTION 'J_3G_WEIGHT' EXPORTING i_j_3gtplkz = p_j_3gtplkz i_restyp = p_restyp i_ressou = p_ressou i_menge = p_menge i_me = p_me i_me_blart = p_me_blart i_datum = j_3gbelk-j_3gbeldat "#EC DOM_EQUAL IMPORTING e_j_3ggewicht = pos_gewicht EXCEPTIONS catalogue_missing = 1 weight_missing = 3 OTHERS = 2.

J_3G_LEIART_ALLGEMEIN CALL FUNCTION 'J_3G_LEIART_ALLGEMEIN' EXPORTING i_lvart = j_3gbelp-j_3glvart i_blart = j_3gbelart-j_3gblart i_absend = j_3gbelk-j_3gabsend i_empfae = j_3gbelk-j_3gempfae i_equnr = p_equnr i_matnr = p_matnr i_datum = j_3gbelk-j_3gbeldat "#EC DOM_EQUAL EXCEPTIONS OTHERS = 1.

/SAPCEM/RESTBESTAND_AKTUELL CALL FUNCTION '/SAPCEM/RESTBESTAND_AKTUELL' EXPORTING i_beweg = belk-j_3gbeweg i_beltyp = belk-j_3gbltyp i_empfae = empfae i_agext = agext i_weext = weext i_restyp = restyp i_ressou = ressou i_lvart = lvart i_atyp = typ IMPORTING e_restbest = restbest e_meins = einheit EXCEPTIONS meins_fault = 1 no_removal_sequence = 2.

/SAPCEM/MENGE_IN_BASIS_ME CALL FUNCTION '/SAPCEM/MENGE_IN_BASIS_ME' EXPORTING i_matnr = xbelpos-matnr i_menge = xbelpos-j_3gmenge i_meins = xbelpos-j_3gmeins i_basis_meins = einheit IMPORTING e_menge = posmenge EXCEPTIONS meins_fault = 1.

/SAPCEM/EQUI_PRICING_INFO CALL FUNCTION '/SAPCEM/EQUI_PRICING_INFO' EXPORTING i_datum = j_3gbelk-j_3gbeldat i_empint = j_3gbelk-j_3gempfae i_tplkz_only = con_x IMPORTING e_tplkz = j_3gbelp-j_3gtplkz TABLES t_equi = it_equi t_intern = it_info_int EXCEPTIONS MISSING_CONDITION_RECORD = 2 tplkz_found = 0 tplkz_not_found = 2 OTHERS = 1.

J_3G_GET_KATNR CALL FUNCTION 'J_3G_GET_KATNR' EXPORTING i_equnr = j_3gbelp-equnr i_datum = j_3gbelk-j_3gbeldat "#EC DOM_EQUAL i_katkz = j_3gbelp-j_3gtplkz IMPORTING e_katnr = j_3gbelp-j_3gkatnrc e_lfdnr = j_3gbelp-lfdnr e_katkz = j_3gbelp-j_3gtplkz EXCEPTIONS no_number = 1 two_numbers = 2 no_values = 3 no_katkz = 4.

J_3G_AUTHORITY_J_3GEMPGR2 CALL FUNCTION 'J_3G_AUTHORITY_J_3GEMPGR2' EXPORTING i_field1 = equi-eqart i_field2 = hlp_empgru i_field3 = hlp_beweg i_field4 = j_3gbelp-j_3glvart EXCEPTIONS no_authority = 1 OTHERS = 2.

J_3G_AUTHORITY_J_3GBEWTP2 CALL FUNCTION 'J_3G_AUTHORITY_J_3GBEWTP2' EXPORTING i_field1 = hlp_beweg i_field2 = equi-j_3geifr i_field3 = j_3gbelp-j_3glvart EXCEPTIONS no_authority = 1 OTHERS = 2.

MESSAGES_INITIALIZE CALL FUNCTION 'MESSAGES_INITIALIZE' EXPORTING * COLLECT_AND_SEND = ' ' reset = reset * LINE_FROM = ' ' * LINE_TO = ' ' * I_IDENTIFICATION = * CHECK_ON_COMMIT = 'X' * IMPORTING * E_IDENTIFICATION = EXCEPTIONS OTHERS = 1.

J_3G_PAKET_AUFLOESEN CALL FUNCTION 'J_3G_PAKET_AUFLOESEN' EXPORTING i_paket = j_3gbelp-equnr "#EC DOM_EQUAL i_menge = j_3gbelp-j_3gmenge i_meins = j_3gbelp-j_3gmeins TABLES t_pakp = t_pakp EXCEPTIONS not_found = 1 wrong_package_type = 2.

DEQUEUE_EJ_3GHBEST CALL FUNCTION 'DEQUEUE_EJ_3GHBEST' EXPORTING mandt = sy-mandt j_3gbart = '1' j_3gempfae = p_empfae j_3gagext = p_empdeb j_3gweext = p_empext j_3grestyp = p_restyp j_3gressou = p_ressource.

DEQUEUE_EJ_3GABEST CALL FUNCTION 'DEQUEUE_EJ_3GABEST' EXPORTING mandt = sy-mandt j_3gempfae = p_empfae j_3gagext = p_empdeb j_3gweext = p_empext j_3grestyp = p_restyp j_3gressou = p_ressource.

J_3G_PAKET_LESEN CALL FUNCTION 'J_3G_PAKET_LESEN' EXPORTING i_paket = p_equnr IMPORTING e_pakk = pakk EXCEPTIONS not_found = 1.

J_3G_GET_REMOVAL_SEQUENCE CALL FUNCTION 'J_3G_GET_REMOVAL_SEQUENCE' EXPORTING i_beweg = j_3gbelk-j_3gbeweg i_beltyp = j_3gbelk-j_3gbltyp i_restyp = modus i_atyp = a_typ i_lvart = j_3gbelp-j_3glvart TABLES t_abgrf = t_abgrf EXCEPTIONS OTHERS = 0.

HELP_VALUES_GET_WITH_TABLE CALL FUNCTION 'HELP_VALUES_GET_WITH_TABLE' EXPORTING display = 'X' fieldname = 'J_3GLVART' tabname = 'J_3GABGRF' titel = 'Abgriff'(150) TABLES fields = xhelpvalue valuetab = xhelpwert EXCEPTIONS field_not_in_ddic = 01 more_then_one_selectfield = 02 no_selectfield = 03.

J_3G_DOMINANZ_DEFAULT CALL FUNCTION 'J_3G_DOMINANZ_DEFAULT' EXPORTING i_blart = j_3gbelk-j_3gblart i_beweg = j_3gbelk-j_3gbeweg i_atyp = a_typ i_etyp = e_typ IMPORTING e_dolmb_equi = default_domlmb_equi e_domb_equi = default_dommb_equi e_dolmb_matn = default_domlmb_matn e_domb_matn = default_dommb_matn e_dolmb_minimum = default_domlmb_kopf e_domb_minimum = default_dommb_kopf.

J_3G_FRISTDATUM_DEFAULT CALL FUNCTION 'J_3G_FRISTDATUM_DEFAULT' EXPORTING i_empfae = p_belk-j_3gempfae i_empext = p_belk-j_3gempext i_empdeb = p_belk-j_3gempdeb i_beldat = p_belk-j_3gbeldat i_beweg = p_belk-j_3gbeweg i_ressou = p_equnr i_lvart = p_lvart i_blart = p_belk-j_3gblart IMPORTING e_fristdat = p_fristdat e_kzfrist = p_kzfrist EXCEPTIONS no_abrechdaten = 1 OTHERS = 2.

/SAPCEM/SEEK_BESTPRUEF_KENNZ CALL FUNCTION '/SAPCEM/SEEK_BESTPRUEF_KENNZ' EXPORTING i_restyp = restyp i_ressou = ressou i_etyp = typ i_bltyp = j_3gbelart-vbtyp IMPORTING e_artbes = artbes EXCEPTIONS no_bestart = 1 OTHERS = 2.

/SAPCEM/GET_BATCH CALL FUNCTION '/SAPCEM/GET_BATCH' EXPORTING i_matnr = p_j_3gbelp-matnr i_beweg = j_3gbelk-j_3gbeweg i_abs = absdat i_emp = empdat IMPORTING e_batch_sender = p_abs_charge e_batch_recipient = p_emp_charge EXCEPTIONS no_matnr = 1 false_factory_sender = 2 false_store_sender = 3 no_mat_in_factory_sender = 4 mandatory_batch_sender = 5 no_batch_found_sender = 6 false_factory_recipient = 7 false_store_recipient = 8 no_mat_in_factory_recipient = 9 mandatory_batch_recipient = 10 no_batch_found_recipient = 11 OTHERS = 12.

J_3G_BEST_PRUEF_ALLGEMEIN CALL FUNCTION 'J_3G_BEST_PRUEF_ALLGEMEIN' EXPORTING i_beltyp = vbtyp i_artbes = artbes i_datum = beldat "#EC DOM_EQUAL i_datum_bis = con_ultimo i_beweg = beweg i_daten = belp i_daten_alt = belp_alt i_datum_alt = beldat_alt "#EC DOM_EQUAL TABLES t_hbest_out = t_hbest t_tbest = t_tbest EXCEPTIONS OTHERS = 1.

VIEW_KUWE2 CALL FUNCTION 'VIEW_KUWE2' EXPORTING comwa = xcomwa IMPORTING wewa = xkuwev EXCEPTIONS error_message = 1.

SD_ADDRESS_BUILD CALL FUNCTION 'SD_ADDRESS_BUILD' EXPORTING i_kupav = i_kupav IMPORTING e_txtpa = p_nameort EXCEPTIONS error_message = 1.

VIEW_KNA1 CALL FUNCTION 'VIEW_KNA1' EXPORTING kunde = p_kunnr IMPORTING anschrift = p_anschrift EXCEPTIONS no_kna1 = 1 OTHERS = 2.

SWU_OBJECT_REFRESH CALL FUNCTION 'SWU_OBJECT_REFRESH'.

/SAPCEM/EQUI_PRICING_INFO CALL FUNCTION '/SAPCEM/EQUI_PRICING_INFO' EXPORTING i_datum = j_3gbelk-j_3gbeldat i_empint = hlp_empint i_empext = hlp_empext TABLES t_equi = it_equi t_intern = it_info_int t_extern = it_info_ext EXCEPTIONS OTHERS = 1.

/SAPCEM/SHIPDOC_USRFIELD_CHECK CALL FUNCTION '/SAPCEM/SHIPDOC_USRFIELD_CHECK' EXPORTING i_belk = j_3gbelk i_belp = j_3gbelp IMPORTING e_belp = j_3gbelp t_mesg = t_mesg.

EQUI_HIERARCHY_EXIST CALL FUNCTION 'EQUI_HIERARCHY_EXIST' EXPORTING equipment = j_3gbelp-equnr read_date = j_3gbelk-j_3gbeldat IMPORTING equi_exist = hier_exist.

J_3G_EQUI_READ CALL FUNCTION 'J_3G_EQUI_READ' EXPORTING i_equnr = j_3gbelp-equnr i_datum = j_3gbelk-j_3gbeldat IMPORTING e_equz = equz EXCEPTIONS not_found = 1 OTHERS = 2.

J_3G_PAKET_LESEN CALL FUNCTION 'J_3G_PAKET_LESEN' EXPORTING i_paket = j_3gbelp-equnr EXCEPTIONS not_found = 1 OTHERS = 2.

POPUP_TO_DECIDE CALL FUNCTION 'POPUP_TO_DECIDE' EXPORTING textline1 = hlp_text textline2 = text-560 text_option1 = text-570 text_option2 = text-580 titel = hlp_text cancel_display = ' ' IMPORTING answer = sav_answer EXCEPTIONS OTHERS = 1.

J_3G_EQUI_HIERARCHY_AUFLOESEN CALL FUNCTION 'J_3G_EQUI_HIERARCHY_AUFLOESEN' EXPORTING i_equnr = p_equnr i_datum = p_beldat i_levup = p_levup i_levdo = p_levdo TABLES t_equitab = equi_tab EXCEPTIONS no_hierarchy = 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 MJ3GFF02 or its description.

MJ3GFF02 - FORM Routines for Modules of Screen 0200
MJ3GFF01 - FORM Routines for Modules of Screen 0101/0102
MJ3GFF0010 - Formroutinen für Module des Dynpro 0010
MJ3GFF00 - Globale Formroutinen für SAPMJ3GF
MJ3GETOP - Programmspezifische TOP-Modul
MJ3GEQ0T - Include MJ3GEQ0T

MF05AO00_RECHNUNG_KORR_1

MEPEPMI_DEVICE_MGMT_FORM_230

MGCU0F01_FIND_POSITION_D110

MGUOBF01