MGJAMI01 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 MGJAMI01 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.
No INCLUDES are used within this REPORT code!
No SAP DATABASE tables are accessed within this REPORT code!
FI_PERIOD_DETERMINE CALL FUNCTION 'FI_PERIOD_DETERMINE' EXPORTING I_BUDAT = JVRAM01-BUDAT I_BUKRS = JVRAM01-BUKRS I_MONAT = JVRAM01-MONAT IMPORTING E_GJAHR = JVRAM01-BUJHR E_MONAT = JVRAM01-MONAT.
FI_PERIOD_DETERMINE CALL FUNCTION 'FI_PERIOD_DETERMINE' EXPORTING I_BUDAT = SY-DATUM I_BUKRS = JVRAM01-BUKRS IMPORTING E_GJAHR = HLP_GJAHR.
JV_SHOW_FAGL_INT_WARNING CALL FUNCTION 'JV_SHOW_FAGL_INT_WARNING' EXPORTING iv_bukrs = jvram01-bukrs.
CUSTOMER_READ CALL FUNCTION 'CUSTOMER_READ' EXPORTING I_BUKRS = JVRAM01-BUKRS I_KUNNR = JVRAM01-KUNNR IMPORTING E_KNA1 = KNA1 E_KNB1 = KNB1 EXCEPTIONS NOT_FOUND = 01.
JV_AUTHORITY_CHECK_PROCESS CALL FUNCTION 'JV_AUTHORITY_CHECK_PROCESS' EXPORTING PROCESS_CODE = 'AM-ASSET' ACTIVITY = '16' BUKRS = JVRAM01-BUKRS.
AM_F4HILFE_BWASL CALL FUNCTION 'AM_F4HILFE_BWASL' EXPORTING I_BWASL = '200' IMPORTING E_BWASL = JVRAM01-ANBWA.
ASSOCIATED_COMP_INPUT CALL FUNCTION 'ASSOCIATED_COMP_INPUT' "vbund EXPORTING MULTIPLE_COMPANIES = SPACE. "vbund
ASSOCIATED_COMP_READ CALL FUNCTION 'ASSOCIATED_COMP_READ' "vbund IMPORTING RETAINED_COMPANY = JVRAM01-VBUND. "vbund
G_CHCK_GSBER_KONS CALL FUNCTION 'G_CHCK_GSBER_KONS' "vbund EXCEPTIONS "vbund NOT_FOUND = 1. "vbund
READ_TGSB CALL FUNCTION 'READ_TGSB' "vbund EXPORTING "vbund I_GSBER = JVRAM01-PARGB. "vbund
JV_OWNERSHIP CALL FUNCTION 'JV_OWNERSHIP' EXPORTING I_BUKRS = JVRAM01-BUKRS I_ANLN1 = JVRAM01-ZANLN1 I_ANLN2 = '0000' "best guess for now I_AUFNR = HLP_AUFNR I_PSPNR = HLP_PSPNR I_KUNNR = HLP_KUNNR I_BLDAT = JVRAM01-BLDAT IMPORTING O_VNAME = ANL_VNAME O_EGRUP = ANL_ETYPE TABLES T_EQ_SHARE = DUMMYTAB EXCEPTIONS OTHERS = 1.
JV_OWNERSHIP CALL FUNCTION 'JV_OWNERSHIP' EXPORTING I_BUKRS = JVRAM01-BUKRS I_ANLN1 = HLP_ANLN1 I_ANLN2 = HLP_ANLN2 "best guess for now I_AUFNR = JVRAM01-AUFNR I_PSPNR = JVRAM01-PSPNR I_KUNNR = HLP_KUNNR I_BLDAT = JVRAM01-BLDAT IMPORTING O_VNAME = COO_VNAME O_EGRUP = COO_ETYPE TABLES T_EQ_SHARE = DUMMYTAB EXCEPTIONS OTHERS = 1.
FI_DOCUMENT_READ CALL FUNCTION 'FI_DOCUMENT_READ' EXPORTING I_XNBKL = CON_X I_BUKRS = JVRAM01-BUKRS I_BELNR = JVRAM04-FI_BELNR I_GJAHR = JVRAM04-GJAHR IMPORTING E_AWTYP = ANEK-AWTYP E_AWREF = ANEK-BELNR E_AWORG = ANEK-AWORG E_AWSYS = ANEK-AWSYS EXCEPTIONS NOT_FOUND = 2.
FI_DOCUMENT_READ CALL FUNCTION 'FI_DOCUMENT_READ' EXPORTING I_BUKRS = JVRAM01-BUKRS I_BELNR = JVRAM04-FI_BELNR I_GJAHR = JVRAM04-GJAHR TABLES T_BKPF = LT_BKPF EXCEPTIONS NOT_FOUND = 2.
AM_REVERSE_DOCUMENT CALL FUNCTION 'AM_REVERSE_DOCUMENT' EXPORTING I_ANEK = L_ANEK. "note 396475
Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.