MCCADF40 SAP ABAP INCLUDE - documentation and ABAP source code
MCCADF40 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 MCCADF40 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 MCCADF40. "Basic submit
SUBMIT MCCADF40 AND RETURN. "Return to original report after report execution complete
SUBMIT MCCADF40 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
INCLUDES used within this REPORT MCCADF40
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:
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING DELIM = TCIS-DELIM FIELD = LOCAL_TCID_TAB-FLDNA LOCAT = STRING_LOC STRLN = ND_STRING_LENGTH STRNG = ND_STRING STRNM = 'ND_STRING'
IMPORTING ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH RLOCT = STRING_LOC RSTRG = ND_STRING.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING DELIM = TCIS-DELIM FIELD = DFIES-FIELDTEXT LOCAT = STRING_LOC STRLN = ND_STRING_LENGTH STRNG = ND_STRING STRNM = 'ND_STRING'
IMPORTING ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH RLOCT = STRING_LOC RSTRG = ND_STRING.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING DELIM = TCIS-DELIM FIELD = DFIES-DATATYPE LOCAT = STRING_LOC STRLN = ND_STRING_LENGTH STRNG = ND_STRING STRNM = 'ND_STRING'
IMPORTING ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH RLOCT = STRING_LOC RSTRG = ND_STRING.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING DELIM = TCIS-DELIM FIELD = LOCAL_TCID_TAB-DBLEN LOCAT = STRING_LOC STRLN = ND_STRING_LENGTH STRNG = ND_STRING STRNM = 'ND_STRING'
IMPORTING ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH RLOCT = STRING_LOC RSTRG = ND_STRING.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING DELIM = TCIS-DELIM FIELD = NO_DECIMALS LOCAT = STRING_LOC STRLN = ND_STRING_LENGTH STRNG = ND_STRING STRNM = 'ND_STRING'
IMPORTING ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH RLOCT = STRING_LOC RSTRG = ND_STRING.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING DELIM = TCIS-DELIM FIELD = CHECKTABLE_EXIST LOCAT = STRING_LOC STRLN = ND_STRING_LENGTH STRNG = ND_STRING STRNM = 'ND_STRING'
IMPORTING ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH RLOCT = STRING_LOC RSTRG = ND_STRING.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING DELIM = TCIS-DELIM FIELD = DFIES-CHECKTABLE LOCAT = STRING_LOC STRLN = ND_STRING_LENGTH STRNG = ND_STRING STRNM = 'ND_STRING'
IMPORTING ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH RLOCT = STRING_LOC RSTRG = ND_STRING.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING DELIM = TCIS-DELIM FIELD = DFIES-MASK LOCAT = STRING_LOC STRLN = ND_STRING_LENGTH STRNG = ND_STRING STRNM = 'ND_STRING'
IMPORTING ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH RLOCT = STRING_LOC RSTRG = ND_STRING.
FILL_TABLE CALL FUNCTION 'FILL_TABLE' EXPORTING LOCAT = CADOUT_LOC STRLN = ND_OCC_LENGTH STRNG = ND_STRING TBLEN = CADOUT_LENGTH
IMPORTING RLOCT = CADOUT_LOC
TABLES TABLE = CADOUT.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING DELIM = TCIS-DELIM FIELD = LOCAL_TCIU_TAB-FLDNM LOCAT = STRING_LOC STRLN = ND_STRING_LENGTH STRNG = ND_STRING STRNM = 'ND_STRING'
IMPORTING ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH RLOCT = STRING_LOC RSTRG = ND_STRING.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING DELIM = TCIS-DELIM FIELD = DFIES-FIELDTEXT LOCAT = STRING_LOC STRLN = ND_STRING_LENGTH STRNG = ND_STRING STRNM = 'ND_STRING'
IMPORTING ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH RLOCT = STRING_LOC RSTRG = ND_STRING.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING DELIM = TCIS-DELIM FIELD = DFIES-DATATYPE LOCAT = STRING_LOC STRLN = ND_STRING_LENGTH STRNG = ND_STRING STRNM = 'ND_STRING'
IMPORTING ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH RLOCT = STRING_LOC RSTRG = ND_STRING.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING DELIM = TCIS-DELIM FIELD = LOCAL_TCIU_TAB-DBLEN LOCAT = STRING_LOC STRLN = ND_STRING_LENGTH STRNG = ND_STRING STRNM = 'ND_STRING'
IMPORTING ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH RLOCT = STRING_LOC RSTRG = ND_STRING.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING DELIM = TCIS-DELIM FIELD = NO_DECIMALS LOCAT = STRING_LOC STRLN = ND_STRING_LENGTH STRNG = ND_STRING STRNM = 'ND_STRING'
IMPORTING ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH RLOCT = STRING_LOC RSTRG = ND_STRING.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING DELIM = TCIS-DELIM FIELD = CHECKTABLE_EXIST LOCAT = STRING_LOC STRLN = ND_STRING_LENGTH STRNG = ND_STRING STRNM = 'ND_STRING'
IMPORTING ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH RLOCT = STRING_LOC RSTRG = ND_STRING.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING DELIM = TCIS-DELIM FIELD = DFIES-CHECKTABLE LOCAT = STRING_LOC STRLN = ND_STRING_LENGTH STRNG = ND_STRING STRNM = 'ND_STRING'
IMPORTING ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH RLOCT = STRING_LOC RSTRG = ND_STRING.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING DELIM = TCIS-DELIM FIELD = DFIES-MASK LOCAT = STRING_LOC STRLN = ND_STRING_LENGTH STRNG = ND_STRING STRNM = 'ND_STRING'
IMPORTING ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH RLOCT = STRING_LOC RSTRG = ND_STRING.
FILL_TABLE CALL FUNCTION 'FILL_TABLE' EXPORTING LOCAT = CADOUT_LOC STRLN = ND_OCC_LENGTH STRNG = ND_STRING TBLEN = CADOUT_LENGTH
IMPORTING RLOCT = CADOUT_LOC
TABLES TABLE = CADOUT.
CALL FUNCTION 'FILL_STRING' EXPORTING STRNM = 'ND_STRING' STRNG = ND_STRING STRLN = ND_STRING_LENGTH FIELD = SPACE LOCAT = STRING_LOC DELIM = TCIS-DELIM
IMPORTING RSTRG = ND_STRING RLOCT = STRING_LOC ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING STRNM = 'ND_STRING' STRNG = ND_STRING STRLN = ND_STRING_LENGTH FIELD = TEXT_TAB LOCAT = STRING_LOC DELIM = TCIS-DELIM
IMPORTING RSTRG = ND_STRING RLOCT = STRING_LOC ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING STRNM = 'ND_STRING' STRNG = ND_STRING STRLN = ND_STRING_LENGTH FIELD = SPACE LOCAT = STRING_LOC DELIM = TCIS-DELIM
IMPORTING RSTRG = ND_STRING RLOCT = STRING_LOC ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING STRNM = 'ND_STRING' STRNG = ND_STRING STRLN = ND_STRING_LENGTH FIELD = TEXT_TAB LOCAT = STRING_LOC DELIM = TCIS-DELIM
IMPORTING RSTRG = ND_STRING RLOCT = STRING_LOC ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING STRNM = 'ND_STRING' STRNG = ND_STRING STRLN = ND_STRING_LENGTH FIELD = SPACE LOCAT = STRING_LOC DELIM = TCIS-DELIM
IMPORTING RSTRG = ND_STRING RLOCT = STRING_LOC ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
FILL_TABLE CALL FUNCTION 'FILL_TABLE' EXPORTING STRNG = ND_STRING STRLN = ND_OCC_LENGTH LOCAT = CADOUT_LOC TBLEN = CADOUT_LENGTH
IMPORTING RLOCT = CADOUT_LOC
TABLES TABLE = CADOUT.
WRITE_MESSAGE CALL FUNCTION 'WRITE_MESSAGE' EXPORTING MSGTY = MSGTY MSGID = MSGID MSGNO = MSGNO MSGV1 = 'TCIM' MSGV2 = CADSYS MSGV3 = SPACE MSGV4 = SPACE MSGV5 = SPACE
IMPORTING ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING STRNM = 'ND_STRING' STRNG = ND_STRING STRLN = ND_STRING_LENGTH FIELD = TCIM_TAB-PCODE LOCAT = STRING_LOC DELIM = TCIS-DELIM
IMPORTING RSTRG = ND_STRING RLOCT = STRING_LOC ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING STRNM = 'ND_STRING' STRNG = ND_STRING STRLN = ND_STRING_LENGTH FIELD = TCIM_TAB-UCODE LOCAT = STRING_LOC DELIM = TCIS-DELIM
IMPORTING RSTRG = ND_STRING RLOCT = STRING_LOC ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING STRNM = 'ND_STRING' STRNG = ND_STRING STRLN = ND_STRING_LENGTH FIELD = TCIM_TAB-DIREC LOCAT = STRING_LOC DELIM = TCIS-DELIM
IMPORTING RSTRG = ND_STRING RLOCT = STRING_LOC ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING STRNM = 'ND_STRING' STRNG = ND_STRING STRLN = ND_STRING_LENGTH FIELD = TCIM_TAB-SETNM LOCAT = STRING_LOC DELIM = TCIS-DELIM
IMPORTING RSTRG = ND_STRING RLOCT = STRING_LOC ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
FILL_TABLE CALL FUNCTION 'FILL_TABLE' EXPORTING STRNG = ND_STRING STRLN = ND_OCC_LENGTH LOCAT = CADOUT_LOC TBLEN = CADOUT_LENGTH
IMPORTING RLOCT = CADOUT_LOC
TABLES TABLE = CADOUT.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING STRNM = 'ND_STRING' STRNG = ND_STRING STRLN = ND_STRING_LENGTH FIELD = LOCAL_TCIU_TAB-SETNM LOCAT = STRING_LOC DELIM = TCIS-DELIM
IMPORTING RSTRG = ND_STRING RLOCT = STRING_LOC ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING STRNM = 'ND_STRING' STRNG = ND_STRING STRLN = ND_STRING_LENGTH FIELD = LOCAL_TCIU_TAB-FLDNM LOCAT = STRING_LOC DELIM = TCIS-DELIM
IMPORTING RSTRG = ND_STRING RLOCT = STRING_LOC ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING STRNM = 'ND_STRING' STRNG = ND_STRING STRLN = ND_STRING_LENGTH FIELD = LOCAL_TCIU_TAB-DBLEN LOCAT = STRING_LOC DELIM = TCIS-DELIM
IMPORTING RSTRG = ND_STRING RLOCT = STRING_LOC ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING STRNM = 'ND_STRING' STRNG = ND_STRING STRLN = ND_STRING_LENGTH FIELD = LOCAL_TCIU_TAB-FLDLN LOCAT = STRING_LOC DELIM = TCIS-DELIM
IMPORTING RSTRG = ND_STRING RLOCT = STRING_LOC ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
FILL_TABLE CALL FUNCTION 'FILL_TABLE' EXPORTING STRNG = ND_STRING STRLN = ND_OCC_LENGTH LOCAT = CADOUT_LOC TBLEN = CADOUT_LENGTH
IMPORTING RLOCT = CADOUT_LOC
TABLES TABLE = CADOUT.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING STRNM = 'ND_STRING' STRNG = ND_STRING STRLN = ND_STRING_LENGTH FIELD = LOCAL_TCID_TAB-SETNM LOCAT = STRING_LOC DELIM = TCIS-DELIM
IMPORTING RSTRG = ND_STRING RLOCT = STRING_LOC ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING STRNM = 'ND_STRING' STRNG = ND_STRING STRLN = ND_STRING_LENGTH FIELD = LOCAL_TCID_TAB-FLDNA LOCAT = STRING_LOC DELIM = TCIS-DELIM
IMPORTING RSTRG = ND_STRING RLOCT = STRING_LOC ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING STRNM = 'ND_STRING' STRNG = ND_STRING STRLN = ND_STRING_LENGTH FIELD = LOCAL_TCID_TAB-DBLEN LOCAT = STRING_LOC DELIM = TCIS-DELIM
IMPORTING RSTRG = ND_STRING RLOCT = STRING_LOC ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING STRNM = 'ND_STRING' STRNG = ND_STRING STRLN = ND_STRING_LENGTH FIELD = LOCAL_TCID_TAB-FLDLN LOCAT = STRING_LOC DELIM = TCIS-DELIM
IMPORTING RSTRG = ND_STRING RLOCT = STRING_LOC ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
FILL_TABLE CALL FUNCTION 'FILL_TABLE' EXPORTING STRNG = ND_STRING STRLN = ND_OCC_LENGTH LOCAT = CADOUT_LOC TBLEN = CADOUT_LENGTH
IMPORTING RLOCT = CADOUT_LOC
TABLES TABLE = CADOUT.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING STRNM = 'ND_STRING' STRNG = ND_STRING STRLN = ND_STRING_LENGTH FIELD = ENTRY_TAB-OBJT1 LOCAT = STRING_LOC DELIM = TCIS-DELIM
IMPORTING RSTRG = ND_STRING RLOCT = STRING_LOC ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING STRNM = 'ND_STRING' STRNG = ND_STRING STRLN = ND_STRING_LENGTH FIELD = ENTRY_TAB-OBJT2 LOCAT = STRING_LOC DELIM = TCIS-DELIM
IMPORTING RSTRG = ND_STRING RLOCT = STRING_LOC ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING STRNM = 'ND_STRING' STRNG = ND_STRING STRLN = ND_STRING_LENGTH FIELD = ENTRY_TAB-OBJT3 LOCAT = STRING_LOC DELIM = TCIS-DELIM
IMPORTING RSTRG = ND_STRING RLOCT = STRING_LOC ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING STRNM = 'ND_STRING' STRNG = ND_STRING STRLN = ND_STRING_LENGTH FIELD = ENTRY_TAB-OBJT4 LOCAT = STRING_LOC DELIM = TCIS-DELIM
IMPORTING RSTRG = ND_STRING RLOCT = STRING_LOC ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING STRNM = 'ND_STRING' STRNG = ND_STRING STRLN = ND_STRING_LENGTH FIELD = ENTRY_TAB-OBJT5 LOCAT = STRING_LOC DELIM = TCIS-DELIM
IMPORTING RSTRG = ND_STRING RLOCT = STRING_LOC ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
FILL_STRING CALL FUNCTION 'FILL_STRING' EXPORTING STRNM = 'ND_STRING' STRNG = ND_STRING STRLN = ND_STRING_LENGTH FIELD = ENTRY_TAB-DESCR LOCAT = STRING_LOC DELIM = TCIS-DELIM
IMPORTING RSTRG = ND_STRING RLOCT = STRING_LOC ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
FILL_TABLE CALL FUNCTION 'FILL_TABLE' EXPORTING STRNG = ND_STRING STRLN = ND_OCC_LENGTH LOCAT = CADOUT_LOC TBLEN = CADOUT_LENGTH
IMPORTING RLOCT = CADOUT_LOC
TABLES TABLE = CADOUT.
WRITE_MESSAGE CALL FUNCTION 'WRITE_MESSAGE' EXPORTING MSGTY = MSGTY MSGID = MSGID MSGNO = MSGNO MSGV1 = SPACE MSGV2 = SPACE MSGV3 = SPACE MSGV4 = SPACE MSGV5 = SPACE
IMPORTING ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
WRITE_MESSAGE CALL FUNCTION 'WRITE_MESSAGE' EXPORTING MSGTY = MSGTY MSGID = MSGID MSGNO = MSGNO MSGV1 = 'TCIM' MSGV2 = CADSYS MSGV3 = PCODE MSGV4 = UCODE MSGV5 = DIREC
IMPORTING ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
WRITE_MESSAGE CALL FUNCTION 'WRITE_MESSAGE' EXPORTING MSGTY = MSGTY MSGID = MSGID MSGNO = MSGNO MSGV1 = 'TCID' MSGV2 = TCIM-SETNM MSGV3 = FNAME MSGV4 = SPACE MSGV5 = SPACE
IMPORTING ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
WRITE_MESSAGE CALL FUNCTION 'WRITE_MESSAGE' EXPORTING MSGTY = MSGTY MSGID = MSGID MSGNO = MSGNO MSGV1 = 'TCIU' MSGV2 = TCIM-SETNM MSGV3 = FNAME MSGV4 = SPACE MSGV5 = SPACE
IMPORTING ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
DOCU_INIT CALL FUNCTION 'DOCU_INIT' EXPORTING ID = DOKHL-ID LANGU = DOKHL-LANGU OBJECT = DOKHL-OBJECT TYP = DOKHL-TYP
IMPORTING FOUND = DOCU_FOUND XDOKIL = DOKIL.
DOCU_READ CALL FUNCTION 'DOCU_READ' EXPORTING ID = DOKHL-ID LANGU = DOKHL-LANGU OBJECT = DOKHL-OBJECT TYP = DOKHL-TYP VERSION = DOKHL-DOKVERSION
IMPORTING DOKTITLE = TITLE HEAD = THEAD
TABLES LINE = TEXT_TAB.
TEXT_INCLUDE_REPLACE CALL FUNCTION 'TEXT_INCLUDE_REPLACE' EXPORTING ALL_LEVEL = 'X' ENDLINE = ENDLINE HEADER = THEAD STARTLINE = STARTLINE
IMPORTING CHANGED = CHANGED ERROR_TYPE = ERROR NEWHEADER = THEAD
TABLES LINES = TEXT_TAB.
CONVERT_TEXT CALL FUNCTION 'CONVERT_TEXT' EXPORTING CODEPAGE = TCP02-CPCODEPAGE DIRECTION = 'EXPORT' FORMATWIDTH = '70' FORMAT_TYPE = 'ASCII' HEADER = THEAD SSHEET = SPACE WITH_TAB = SPACE WORD_LANGU = SY-LANGU
IMPORTING NEWHEADER = THEAD
TABLES FOREIGN = TEXT_TAB ITF_LINES = TEXT_TAB.
CONVERT_TEXT CALL FUNCTION 'CONVERT_TEXT' EXPORTING CODEPAGE = TCP02-CPCODEPAGE DIRECTION = 'EXPORT' FORMATWIDTH = '70' FORMAT_TYPE = 'ASCII' HEADER = THEAD SSHEET = SPACE WITH_TAB = SPACE WORD_LANGU = SY-LANGU
IMPORTING NEWHEADER = THEAD
TABLES FOREIGN = TITLE_TAB ITF_LINES = TITLE_TAB.
CLSE_SELECT_CABN_VIA_NAME CALL FUNCTION 'CLSE_SELECT_CABN_VIA_NAME' EXPORTING CHARACTERISTIC = G_CCHAR KEY_DATE = SY-DATUM BYPASSING_BUFFER = NO_BUFFER
IMPORTING AMBIGUOUS_OBJ_CHARACTERISTIC = AMBIGUOUS
TABLES T_CABN = CABN_TAB
EXCEPTIONS NO_ENTRY_FOUND = 04.
WRITE_MESSAGE CALL FUNCTION 'WRITE_MESSAGE' EXPORTING MSGTY = MSGTY MSGID = MSGID MSGNO = MSGNO MSGV1 = MSGV1 MSGV2 = SPACE MSGV3 = SPACE MSGV4 = SPACE MSGV5 = SPACE
IMPORTING ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
READ_TEXT CALL FUNCTION 'READ_TEXT' EXPORTING ID = TEXT_HEADER-TDID LANGUAGE = TEXT_HEADER-TDSPRAS NAME = TEXT_HEADER-TDNAME OBJECT = TEXT_HEADER-TDOBJECT
IMPORTING HEADER = TEXT_HEADER
TABLES LINES = TEXT_TAB
EXCEPTIONS ID = 04 LANGUAGE = 08 NAME = 12 NOT_FOUND = 16 OBJECT = 20 REFERENCE_CHECK = 24.
WRITE_MESSAGE CALL FUNCTION 'WRITE_MESSAGE' EXPORTING MSGTY = MSGTY MSGID = MSGID MSGNO = MSGNO MSGV1 = SPACE MSGV2 = SPACE MSGV3 = SPACE MSGV4 = SPACE MSGV5 = SPACE
IMPORTING ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
FIELDHELP_CREATE CALL FUNCTION 'FIELDHELP_CREATE' EXPORTING DE_ZUSATZ = SHLPOBJ-DE_ZUSATZ DYNPRO = TSTC-DYPNO FIELDNAME = DFIES-FIELDNAME KEYWORD = DFIES-SCRTEXT_L KZ_ANZEIGE = 'S' LANGU = SY-LANGU PROGRAMM = D301T-DDNAME TABNAME = DFIES-TABNAME
IMPORTING DE_NAME = ROLLNAME HEADER = THEAD
TABLES LINES = TEXT_TAB
EXCEPTIONS DE_NOT_FOUND = 04 DEDOKU_NOT_FOUND = 08.
WRITE_MESSAGE CALL FUNCTION 'WRITE_MESSAGE' EXPORTING MSGTY = MSGTY MSGID = MSGID MSGNO = MSGNO MSGV1 = SPACE MSGV2 = SPACE MSGV3 = SPACE MSGV4 = SPACE MSGV5 = SPACE
IMPORTING ERROR = ERROR_FLAG MESSG = MESSAGE MSGLN = MESSAGE_LENGTH.
TEXT_INCLUDE_REPLACE CALL FUNCTION 'TEXT_INCLUDE_REPLACE' EXPORTING ALL_LEVEL = 'X' ENDLINE = ENDLINE HEADER = THEAD STARTLINE = STARTLINE
IMPORTING CHANGED = CHANGED ERROR_TYPE = ERROR NEWHEADER = THEAD
TABLES LINES = TEXT_TAB.
CONVERT_TEXT CALL FUNCTION 'CONVERT_TEXT' EXPORTING CODEPAGE = TCP02-CPCODEPAGE DIRECTION = 'EXPORT' FORMATWIDTH = '70' FORMAT_TYPE = 'ASCII' HEADER = THEAD SSHEET = SPACE WITH_TAB = SPACE WORD_LANGU = SY-LANGU
IMPORTING NEWHEADER = DUMMY_THEAD
TABLES FOREIGN = TEXT_TAB ITF_LINES = TEXT_TAB.
CONVERT_TEXT CALL FUNCTION 'CONVERT_TEXT' EXPORTING CODEPAGE = TCP02-CPCODEPAGE DIRECTION = 'EXPORT' FORMATWIDTH = '70' FORMAT_TYPE = 'ASCII' HEADER = THEAD SSHEET = SPACE WITH_TAB = SPACE WORD_LANGU = SY-LANGU
IMPORTING NEWHEADER = THEAD
TABLES FOREIGN = TITLE_TAB ITF_LINES = TITLE_TAB.
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 MCCADF40 or its description.