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

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







MJD37FLP 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 MJD37FLP 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 MJD37FLP. "Basic submit
SUBMIT MJD37FLP AND RETURN. "Return to original report after report execution complete
SUBMIT MJD37FLP 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 MJD37FLP

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:

ISP_SELECT_SINGLE_JDTVAUSGB CALL FUNCTION 'ISP_SELECT_SINGLE_JDTVAUSGB' EXPORTING VAUSGB = P_VAUSGBBEI MSGTY = CON_INFORMATION IMPORTING JDTVAUSGB_I = *JDTVAUSGB * MELDUNG = EXCEPTIONS NO_ENTRY_FOUND = 1.

ISP_SELECT_SINGLE_JDTPVA CALL FUNCTION 'ISP_SELECT_SINGLE_JDTPVA' EXPORTING DRERZ = *JDTVAUSGB-DRERZ PVA = *JDTVAUSGB-PVA MSGTY = CON_INFORMATION IMPORTING JDTPVA_I = *JDTPVA * MELDUNG = EXCEPTIONS NO_ENTRY_FOUND = 1.

POPUP_GET_VALUES CALL FUNCTION 'POPUP_GET_VALUES' EXPORTING POPUP_TITLE = TITEL START_COLUMN = 30 START_ROW = 08 * NO_VALUE_CHECK = ' ' IMPORTING RETURNCODE = RETURNCODE TABLES FIELDS = FELDTAB EXCEPTIONS ERROR_IN_FIELDS = 1.

ISP_VA_GET_ALL_INSETS CALL FUNCTION 'ISP_VA_GET_ALL_INSETS' EXPORTING VA = JDTVAUSGB-VAUSGB BZTYP = PAR_BEZUGSTYP TGBZ_FROM_DB = ' ' " übergebene Tagesbez.zusamm.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JVTLFNG-BEZUGSTYP' IMPORTING TEXT_LONG = GV_TEXT_LONG.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JVTLFNG-GEOEINTAT' IMPORTING TEXT_LONG = GV_TEXT_LONG.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JVTLFNG-BEZIRKTAT' IMPORTING TEXT_LONG = GV_TEXT_LONG exceptions not_found = 1.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JVTLFNG-KNDGRUPPE' IMPORTING TEXT_LONG = GV_TEXT_LONG.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JVTLFNG-LFARTTAT' IMPORTING TEXT_LONG = GV_TEXT_LONG.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JDTVAUSGB-DRERZ' IMPORTING TEXT_HEADER = GV_TEXT_HEADER.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JDTVAUSGB-PVA' IMPORTING TEXT_HEADER = GV_TEXT_HEADER.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JDTVAUSGB-ERSCHDAT' IMPORTING TEXT_HEADER = GV_TEXT_HEADER.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JDTPVA-LBEZEIINT' IMPORTING TEXT_HEADER = GV_TEXT_HEADER.

STRING_CENTER CALL FUNCTION 'STRING_CENTER' EXPORTING STRING = GV_TITELZEILE IMPORTING CSTRING = GV_TITELZEILE.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JDTVAUSGB-DRERZ' * INCL_POINTS = ' ' * IMPORTING LEN_FIELD = GV_LEN_FIELD * LEN_HEADER = GV_LEN_HEADER * LEN_LONG = GV_LEN_LONG * LEN_MIDLE = GV_LEN_MIDLE * LEN_SHORT = GV_LEN_SHORT * TEXT_HEADER = GV_TEXT_HEADER.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JDTVAUSGB-PVA' IMPORTING TEXT_LONG = GV_TEXT_LONG.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JDTVAUSGB-ERSCHDAT' IMPORTING TEXT_LONG = GV_TEXT_LONG.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JDTVASPLIT-SPLIT' IMPORTING TEXT_LONG = GV_TEXT_LONG.

ISP_SELECT_SINGLE_T001W





* CALL FUNCTION 'ISP_SELECT_SINGLE_T001W' * EXPORTING WERKS = JDTVASPLIT-DRUCKEREI * IMPORTING T001W_I = T001W * EXCEPTIONS NO_ENTRY_FOUND = 1 * OTHERS = 2.

ISP_TEXTS_FOR_DATAELEMENT_GET * CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' * EXPORTING FIELDNAME = 'JDTVASPLIT-DRUCKEREI' * IMPORTING TEXT_LONG = GV_TEXT_LONG.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JDTVASPLIT-GEWPLSPLIT' IMPORTING TEXT_LONG = GV_TEXT_LONG.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JDTVASPLIT-GEWISTSPLIT' IMPORTING TEXT_LONG = GV_TEXT_LONG.

STRING_CENTER CALL FUNCTION 'STRING_CENTER' EXPORTING STRING = GV_TITELZEILE IMPORTING CSTRING = GV_TITELZEILE.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JDTVAUSGB-DRERZ' IMPORTING TEXT_LONG = GV_TEXT_LONG.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JDTVAUSGB-PVA' IMPORTING TEXT_LONG = GV_TEXT_LONG.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JDTVAUSGB-ERSCHDAT' IMPORTING TEXT_LONG = GV_TEXT_LONG.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JDTVASPLIT-SPLIT' IMPORTING TEXT_LONG = GV_TEXT_LONG.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JDTVASPLIT-BEILGAUSST' IMPORTING TEXT_LONG = GV_TEXT_LONG.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JDTVASPLIT-ANZEIGENAUSST' IMPORTING TEXT_LONG = GV_TEXT_LONG.

ISP_TEXTS_FOR_DATAELEMENT_GET * CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' * EXPORTING FIELDNAME = 'JDTVASPLIT-DRUCKEREI' * IMPORTING TEXT_LONG = GV_TEXT_LONG.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JDTVASPLIT-SPLIT' IMPORTING TEXT_LONG = GV_TEXT_LONG.

ISP_TEXTS_FOR_DATAELEMENT_GET * CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' * EXPORTING FIELDNAME = 'JDTVAUSGB-DRERZ' * IMPORTING TEXT_HEADER = GV_TEXT_HEADER.

ISP_TEXTS_FOR_DATAELEMENT_GET * CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' * EXPORTING FIELDNAME = 'JDTVAUSGB-PVA' * IMPORTING TEXT_HEADER = GV_TEXT_HEADER.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JDTVAUSGB-ERSCHDAT' IMPORTING TEXT_HEADER = GV_TEXT_HEADER.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JDTPVA-LBEZEIINT' IMPORTING TEXT_HEADER = GV_TEXT_HEADER.

ISP_TEXTS_FOR_DATAELEMENT_GET * CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' * EXPORTING FIELDNAME = 'JDTVAUSGB-SI_NUMMER' * IMPORTING TEXT_HEADER = GV_TEXT_HEADER.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JDTVAUSGB-ANZSEITEN' IMPORTING TEXT_HEADER = GV_TEXT_HEADER.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JDTVAUSGB-VAGEWICHT' IMPORTING TEXT_HEADER = GV_TEXT_HEADER TEXT_MIDLE = GV_TEXT_MIDLE.




ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JDTVAUSGB-VAGEWPLAN' IMPORTING TEXT_HEADER = GV_TEXT_HEADER TEXT_MIDLE = GV_TEXT_MIDLE.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JDTVAUSGB-VAGEWIST' IMPORTING TEXT_HEADER = GV_TEXT_HEADER TEXT_MIDLE = GV_TEXT_MIDLE.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JVTANZZUS-MOTIV' IMPORTING TEXT_HEADER = GV_TEXT_HEADER.

ISP_TEXTS_FOR_DATAELEMENT_GET CALL FUNCTION 'ISP_TEXTS_FOR_DATAELEMENT_GET' EXPORTING FIELDNAME = 'JVTANZZUS-PRODEINH' IMPORTING TEXT_HEADER = GV_TEXT_HEADER.



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