MJD37FOP 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 MJD37FOP 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.
Title: IS-M: CUA Forms (Sample PGM)
No INCLUDES are used within this REPORT code!
No SAP DATABASE tables are accessed within this REPORT code!
CONVERSION_EXIT_ALPHA_OUTPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING INPUT = P_DRERZ IMPORTING OUTPUT = P_DRERZ.
CONVERSION_EXIT_ALPHA_OUTPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING INPUT = P_PVA IMPORTING OUTPUT = P_PVA.
ISP_CHECK_DATE_IN_INTERVALL CALL FUNCTION 'ISP_CHECK_DATE_IN_INTERVALL' EXPORTING CHECKDATE = P_EPERDAT DATBIS = JDTGENTR-GENZRBIS DATVON = JDTGENTR-GENZRVON IMPORTING IS_IN_INTERVALL = VA_IN_INTERVALL.
ISM_JDTDRER_MP_SYNCHRO_CHECK CALL FUNCTION 'ISM_JDTDRER_MP_SYNCHRO_CHECK' EXPORTING IN_DRERZ = VA_DRERZ IMPORTING OUT_XMPSAKTIV = XMPSAKTIV.
ISM_PUBL_MIGRATION_ACTIVECHECK CALL FUNCTION 'ISM_PUBL_MIGRATION_ACTIVECHECK' EXPORTING IN_PUBLICATION = VA_DRERZ IMPORTING OUT_XMIGRATION_ACTIVE = xmigration_active OUT_JYTGOLIV = H_JYTGOLIV.
ISP_VAS_CHECK_DSPTR CALL FUNCTION 'ISP_VAS_CHECK_DSPTR' EXPORTING DRERZ = JDTVAUSGB-DRERZ GUEBIS = JDTVAUSGB-ERSCHDAT GUEVON = JDTVAUSGB-ERSCHDAT PVA = JDTVAUSGB-PVA INCL_JDTBZUS = CON_ANGEKREUZT INCL_LAST_DISPO_DATE = CON_BLANK IMPORTING XDISPO = DISPONIERTE_TRIGGER_VORHANDEN LAST_DISPO_DATE = DUMMY_DATE EXCEPTIONS INTERVALL_ERROR = 01.
ISP_TEXT_FOR_DOMAIN_VALUE_GET CALL FUNCTION 'ISP_TEXT_FOR_DOMAIN_VALUE_GET' EXPORTING FIELDNAME = 'JDTGENTR-GENSTAT' FIELDVALUE = FELDINHALT IMPORTING DOMAIN_VALUE_TEXT = FELDTEXT EXCEPTIONS NOT_FOUND = 4.
CONVERSION_EXIT_ALPHA_OUTPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING INPUT = JDTVAUSGB-DRERZ IMPORTING OUTPUT = P_DRERZ.
CONVERSION_EXIT_ALPHA_OUTPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING INPUT = JDTVAUSGB-PVA IMPORTING OUTPUT = P_PVA.
ISP_VAS_CHECK_DSPTR CALL FUNCTION 'ISP_VAS_CHECK_DSPTR' "TK07021997 EXPORTING "TK07021997 DRERZ = JDTVAUSGB-DRERZ "TK07021997 GUEBIS = JDTVAUSGB-ERSCHDAT "TK07021997 GUEVON = JDTVAUSGB-ERSCHDAT "TK07021997 PVA = JDTVAUSGB-PVA "TK07021997 INCL_JDTBZUS = CON_ANGEKREUZT "TK07021997 INCL_LAST_DISPO_DATE = CON_BLANK "TK07021997 IMPORTING "TK07021997 XDISPO = DISPONIERTE_TRIGGER_VORHANDEN LAST_DISPO_DATE = DUMMY_DATE "TK07021997 EXCEPTIONS "TK07021997 INTERVALL_ERROR = 01. "TK07021997
DATE_GET_WEEK CALL FUNCTION 'DATE_GET_WEEK' "TK19011998 EXPORTING DATE = JDTVAUSGB-EPERDATUM "TK19011998 IMPORTING WEEK = WEEK_NUMBER "TK19011998 EXCEPTIONS DATE_INVALID = 1. "TK19011998
ISP_ISSUE_STATUS_GET CALL FUNCTION 'ISP_ISSUE_STATUS_GET' EXPORTING ISSUE = JDTVAUSGB IMPORTING ISSUE_STATUS = GV_VA_STATUS STATUS_TEXT = GV_VA_STATUS_TEXT STATUS_TEXT_2 = GV_VA_STATUS_TEXT_2 EXCEPTIONS ISSUE_NOT_FOUND = 01 NO_VALID_STATUS_FOUND = 02 SELECTION_NOT_UNIQUE = 03.
ISP_ISSUE_STATUS_GET CALL FUNCTION 'ISP_ISSUE_STATUS_GET' EXPORTING ISSUE = JDTVAUSGB IMPORTING ISSUE_STATUS = GV_VA_STATUS STATUS_TEXT = GV_VA_STATUS_TEXT STATUS_TEXT_2 = GV_VA_STATUS_TEXT_2 EXCEPTIONS ISSUE_NOT_FOUND = 01 NO_VALID_STATUS_FOUND = 02 SELECTION_NOT_UNIQUE = 03.
ISP_TEXT_FOR_DOMAIN_VALUE_GET CALL FUNCTION 'ISP_TEXT_FOR_DOMAIN_VALUE_GET' EXPORTING FIELDNAME = 'JDTGENTR-GENSTAT' FIELDVALUE = FELDINHALT IMPORTING DOMAIN_VALUE_TEXT = FELDTEXT EXCEPTIONS NOT_FOUND = 4.
ISP_TEXT_FOR_DOMAIN_VALUE_GET CALL FUNCTION 'ISP_TEXT_FOR_DOMAIN_VALUE_GET' EXPORTING FIELDNAME = 'JDTGENTR-GENSTAT' FIELDVALUE = FELDINHALT IMPORTING DOMAIN_VALUE_TEXT = FELDTEXT EXCEPTIONS NOT_FOUND = 4.
ISM_CONVERT_TO_NORMAL_FORM CALL FUNCTION 'ISM_CONVERT_TO_NORMAL_FORM' EXPORTING INPUT = IT_VASPLIT-SUCHFELD_KBEZ IMPORTING OUTPUT = IT_VASPLIT-SUCHFELD_KBEZ 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.