SAP Reports / Programs | Periodical Sales and Distribution | SAP Media | Periodical Sales and Distribution(IS-M-SD-PS) SAP IS

MJD37FOP SAP ABAP INCLUDE - IS-M: CUA Forms (Sample PGM)







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


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 MJD37FOP. "Basic submit
SUBMIT MJD37FOP AND RETURN. "Return to original report after report execution complete
SUBMIT MJD37FOP 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-M: CUA Forms (Sample PGM)


INCLUDES used within this REPORT MJD37FOP

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:

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.



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 MJD37FOP or its description.