MCH01F01 SAP ABAP INCLUDE - Include MCH01F01
MCH01F01 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 MCH01F01 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 MCH01F01. "Basic submit
SUBMIT MCH01F01 AND RETURN. "Return to original report after report execution complete
SUBMIT MCH01F01 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Title: Include MCH01F01
INCLUDES used within this REPORT MCH01F01
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:
POPUP_TO_CONFIRM * CALL FUNCTION 'POPUP_TO_CONFIRM' * EXPORTING * TITLEBAR = 'Save Document'(008) ** DIAGNOSE_OBJECT = ' ' * TEXT_QUESTION = 'The contents in the document have changed, *DO YOU WANT TO SAVE THE CHANGES?'(009) ** TEXT_BUTTON_1 = 'Ja'(001) ** ICON_BUTTON_1 = ' ' ** TEXT_BUTTON_2 = 'Nein'(002) ** ICON_BUTTON_2 = ' ' ** DEFAULT_BUTTON = '1' * DISPLAY_CANCEL_BUTTON = '' ** USERDEFINED_F1_HELP = ' ' ** START_COLUMN = 25 ** START_ROW = 6 ** POPUP_TYPE = * IMPORTING * ANSWER = USER_SAVE_RESPONSE.
POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING * DEFAULTOPTION = 'Y' TEXTLINE1 = 'The contents in the document have changed'(017) TEXTLINE2 = 'Do you want to save the Changes?'(018) TITEL = 'Save Document'(008) * START_COLUMN = 25 * START_ROW = 6 CANCEL_DISPLAY = '' IMPORTING ANSWER = USER_SAVE_RESPONSE.
BAPI_CLASS_GET_CHARACTERISTICS * CALL FUNCTION 'BAPI_CLASS_GET_CHARACTERISTICS' * EXPORTING * CLASSNUM = RMCLS-CLASS * CLASSTYPE = RMCLS-KLART * LANGU_INT = CABNT-SPRAS * KEY_DATE = CHSTRUCTURE-VALIDDATE * IMPORTING * RETURN = RECODE * TABLES * CHARACTERISTICS = TAB_CHAR * CHAR_VALUES = TAB_VAL.
CLME_FEATURE_ATTR_OF_CLASS CALL FUNCTION 'CLME_FEATURE_ATTR_OF_CLASS' EXPORTING CLASS = classnum CLASSTYPE = classtype LANGUAGE = cabnt-spras KEY_DATE = chstructure-validdate WITH_VALUES = '' TABLES TFEATURES = tab_char * TVALUES = EXCEPTIONS CLASS_NOT_FOUND = 1 NO_AUTHORITY = 2 OTHERS = 3.
DP_CREATE_URL_FROM_TABLE CALL FUNCTION 'DP_CREATE_URL_FROM_TABLE' EXPORTING TABNAME = SPACE TABLES DATA = EXCEL_TABLE_FOR_CLIPBOARD CHANGING URL = ITEM_URL EXCEPTIONS DP_ERROR_TAB = 1 DP_ERROR_CREATE_URL = 2 OTHERS = 3.
CACL_OBJECT_VALIDATION_MAINT CALL FUNCTION 'CACL_OBJECT_VALIDATION_MAINT' EXPORTING OBJECT_TYPE = 'MARA' CLASS_TYPE = T_CLASS_TABLE-KLART CLASS = T_CLASS_TABLE-CLASS TABLES OBJECT_IDENTIFICATION = OBJECT_IDENTI_TABLE VALIDATION_MAINT = VALIDATION_MAINT_TABLE EXCEPTIONS ERROR = 1 WARNING = 2 OTHERS = 3.
CALO_LOG_READ_MESSAGES * CALL FUNCTION 'CALO_LOG_READ_MESSAGES' * TABLES: MESSAGES_AND_PARAMETERS = MESSAGES_TABLE * EXCEPTIONS: WARNING = 01 * ERROR = 02.
CACL_CLASSIFICATION_SAVE CALL FUNCTION 'CACL_CLASSIFICATION_SAVE' EXPORTING I_COMMIT = 'X' I_WAIT = 'X' I_NO_UPD_TASK = 'X' * EXCEPTIONS * error = 1 * OTHERS = 2.
CV120_DOC_GET_APPLICATION CALL FUNCTION 'CV120_DOC_GET_APPLICATION' EXPORTING PF_DOKAR = DRAW-DOKAR PF_DOKNR = DRAW-DOKNR PF_DOKVR = DRAW-DOKVR PF_DOKTL = DRAW-DOKTL * PF_APPTP = '1' * PF_HOSTNAME = IMPORTING * PSX_APPLICATION = PSX_FILE = PSX_FILE PFX_FCODE = CANCEL_FLAG EXCEPTIONS NOT_FOUND = 1 NO_AUTH = 2 ERROR = 3 OTHERS = 4 .
DOCUMENT_ORIGINAL_PATH * CALL FUNCTION 'DOCUMENT_ORIGINAL_PATH' * EXPORTING * appnr = '1' * dokar = draw-dokar * doknr = draw-doknr * dokvr = draw-dokvr ** DTTRG = draw-dttrg ** FILEP_IN = ' ' * tldok = draw-doktl ** DRAW_FROM_WA = ' ' * IMPORTING * pfad = filename.
BAPI_DOCUMENT_CHECKOUTMODIFY * CALL FUNCTION 'BAPI_DOCUMENT_CHECKOUTMODIFY' * EXPORTING * DOCUMENTTYPE = DRAW-DOKAR * DOCUMENTNUMBER = DRAW-DOKNR * DOCUMENTPART = DRAW-DOKTL * DOCUMENTVERSION = DRAW-DOKVR ** ORIGINALTYPE = '1' ** originalpath = ' ' * DOCUMENTFILE = 'C:/users/my documents/internal/test1.xls'
C_PDM_ADD_OBJECT_TO_STACK CALL FUNCTION 'C_PDM_ADD_OBJECT_TO_STACK' EXPORTING OBJTYP = ROOT_OBJECT_TYPE OBJECT_FIELDS = ROOT_OBJECT_KEYFIELDS_TABLE.
BROWSE_OIMODE_OBJECT_STRUCTURE CALL FUNCTION 'BROWSE_OIMODE_OBJECT_STRUCTURE' EXPORTING ROOT_OBJECT_KEYFIELDS = ROOT_OBJECT_KEYFIELDS_TABLE ROOT_OBJECT_TYPE = ROOT_OBJECT_TYPE VALIDFROM = CHSTRUCTURE-VALIDDATE DOCKING_CONTAINER = DOCK_CONT_1 * OFFICE_DOCUMENT = DOCUMENT * OFFICE_TABLE_COLLECT = TABLE_COLLECT * TABLE_NAME = 'charactable' PROGRAM_NAME = PROGRAM_NAME " 'SAPMCH01' FORM_ROUTINE = ROUTINE_NAME " 'MACRO_NAME_PROCESS' TRANSACTION_NAME = TRANSACTION_NAME.
CLAF_CLASSIFICATION_OF_OBJECTS CALL FUNCTION 'CLAF_CLASSIFICATION_OF_OBJECTS' EXPORTING * CLASS = ' ' * CLASSTEXT = 'X' CLASSTYPE = '001' * CLINT = ' ' * FEATURES = 'X' LANGUAGE = CABNT-SPRAS OBJECT = AUSPOBJEK OBJECTTABLE = 'MARA' * KEY_DATE = SY-DATUM * INITIAL_CHARACT = 'X' * NO_VALUE_DESCRIPT = * CHANGE_SERVICE_CLF = 'X' * INHERITED_CHAR = ' ' * CHANGE_NUMBER = ' ' TABLES T_CLASS = T_CLASS_TABLE T_OBJECTDATA = T_OBJECTDATA_TABLE * I_SEL_CHARACTERISTIC = * T_NO_AUTH_CHARACT = EXCEPTIONS NO_CLASSIFICATION = 1 NO_CLASSTYPES = 2 INVALID_CLASS_TYPE = 3 OTHERS = 4.
WS_FILENAME_GET CALL FUNCTION 'WS_FILENAME_GET' EXPORTING DEF_FILENAME = CURRENT_EXTENSION DEF_PATH = CURRENT_DIRECTORY MASK = STRING_MASK *MASK = ',Word Documents (*.doc),*.doc,Excel Work Sheets (*.xls)'
CONTROL_EXIT * CALL FUNCTION 'CONTROL_EXIT'.
WS_QUERY CALL FUNCTION 'WS_QUERY' EXPORTING * ENVIRONMENT = * complete_filename = QUERY = 'CD' * WINID = IMPORTING RETURN = CURRENT_DIRECTORY.
CTMS_OBJECT_HAS_STANDARDCLASS CALL FUNCTION 'CTMS_OBJECT_HAS_STANDARDCLASS' EXPORTING OBJECT = AUSPOBJEK TABLE = 'DRAW' * CLASSTYPE = * WITH_TEXT = 'X' * DATE_OF_CHANGE = SY-DATUM IMPORTING * CLASS = * CLASSTEXT = CLASSTYPE = CLASSTYPE * CLINT = * NOT_A_STANDARDCLASS = EXCEPTIONS NO_CLASSIFICATION = 1 TABLE_NOT_ALLOWED = 2 INTERNAL_ERROR = 3 OTHERS = 4.
CLAF_CLASSIFICATION_OF_OBJECTS
CALL FUNCTION 'CLAF_CLASSIFICATION_OF_OBJECTS' EXPORTING * CLASS = ' ' * CLASSTEXT = 'X' CLASSTYPE = CLASSTYPE * CLINT = ' ' * FEATURES = 'X' LANGUAGE = CABNT-SPRAS OBJECT = AUSPOBJEK OBJECTTABLE = 'DRAW' * KEY_DATE = SY-DATUM * INITIAL_CHARACT = 'X' * NO_VALUE_DESCRIPT = * CHANGE_SERVICE_CLF = 'X' * INHERITED_CHAR = ' ' * CHANGE_NUMBER = ' ' TABLES T_CLASS = T_CLASS_TABLE T_OBJECTDATA = T_OBJECTDATA_TABLE * I_SEL_CHARACTERISTIC = * T_NO_AUTH_CHARACT = EXCEPTIONS NO_CLASSIFICATION = 1 NO_CLASSTYPES = 2 INVALID_CLASS_TYPE = 3 OTHERS = 4.
CTMS_OBJECT_HAS_STANDARDCLASS * CALL FUNCTION 'CTMS_OBJECT_HAS_STANDARDCLASS' * EXPORTING * OBJECT = AUSPOBJEK * TABLE = 'IFLOT' ** CLASSTYPE = ** WITH_TEXT = 'X' ** DATE_OF_CHANGE = SY-DATUM * IMPORTING ** CLASS = ** CLASSTEXT = * CLASSTYPE = CLASSTYPE ** CLINT = ** NOT_A_STANDARDCLASS = * EXCEPTIONS * NO_CLASSIFICATION = 1 * TABLE_NOT_ALLOWED = 2 * INTERNAL_ERROR = 3 * OTHERS = 4.
CLAP_DDB_GET_CLASSIFICATION CALL FUNCTION 'CLAP_DDB_GET_CLASSIFICATION' EXPORTING OBJECT = OBJECT_KEY OBTAB = OBJECT_TABLE * STANDARD_TYPE_ONLY = ' ' * OBJECT_EQ_CLASS = ' ' * SPRAS = SY-LANGU * ONLY_VARKLART = ' ' * POBTAB = ' ' * DATE_OF_CHANGE = * CHANGE_SERVICE_NUMBER = * CLASSTYPE = * READ_ONLY = ' ' * CALLED_FROM_API = ' ' * IMPORTING * ERROR_STATU = TABLES ALLOCATIONS = CLASS_ALLOCATIONS EXCEPTIONS NO_ALLOCATION = 1 SET_AENNR = 2 CHANGE_NR_NOT_EXIST = 3 DATE_IN_PAST = 4 ERROR_CLASS = 5 ERROR_DATE_RESTRICTION = 6 ERROR_STATUS = 7 OTHERS = 8.
CLAF_CLASSIFICATION_OF_OBJECTS CALL FUNCTION 'CLAF_CLASSIFICATION_OF_OBJECTS' EXPORTING CLASS = CLASS_ALLOCATIONS-CLASS * CLASSTEXT = 'X' CLASSTYPE = CLASS_ALLOCATIONS-KLART * CLINT = ' ' * FEATURES = 'X' LANGUAGE = CABNT-SPRAS OBJECT = AUSPOBJEK * OBJECTTABLE = 'IFLOT' KEY_DATE = CHSTRUCTURE-VALIDDATE * INITIAL_CHARACT = 'X' * NO_VALUE_DESCRIPT = * CHANGE_SERVICE_CLF = 'X' * INHERITED_CHAR = ' ' * CHANGE_NUMBER = ' ' TABLES T_CLASS = T_CLASS_TABLE T_OBJECTDATA = T_OBJECTDATA_TABLE * I_SEL_CHARACTERISTIC = * T_NO_AUTH_CHARACT = EXCEPTIONS NO_CLASSIFICATION = 1 NO_CLASSTYPES = 2 INVALID_CLASS_TYPE = 3 OTHERS = 4.
CTBP_CONVERT_VALUE_EXT_TO_INT CALL FUNCTION 'CTBP_CONVERT_VALUE_EXT_TO_INT' EXPORTING CHARACTNAME = T_OBJECTDATA_TABLE-ATNAM VALUE_EXTERNAL = T_OBJECTDATA_TABLE-AUSP1 IMPORTING VALUE_FROM = VALUE_FROM VALUE_TO = VALUE_TO VALUE_RELATION = VALUE_RELATION EXCEPTIONS NO_AUTHORITY = 1 CHARACT_NOT_FOUND = 2 WRONG_DATA_TYPE = 3 WRONG_VALUE = 4 OTHERS = 5.
BAPI_CHARACT_GETLONGTEXT CALL FUNCTION 'BAPI_CHARACT_GETLONGTEXT' EXPORTING CHARACTNAME = T_OBJECTDATA_TABLE-ATNAM VALUE_CHAR = VALUE_CHAR VALUE_FROM = VALUE_FROM VALUE_TO = VALUE_TO VALUE_RELATION = VALUE_RELATION * CHANGENUMBER = KEYDATE = CHSTRUCTURE-VALIDDATE LANGUAGE_INT = CABNT-SPRAS * LANGUAGE_ISO = TABLES LONGTEXT = LONGTEXTTABLE RETURN = RETURN .
CTMV_TEXT_VALUE_GET * CALL FUNCTION 'CTMV_TEXT_VALUE_GET' * EXPORTING * CHARACT = T_OBJECTDATA_TABLE-ATNAM * VALUE = T_OBJECTDATA_TABLE-AUSP1 * KEY_DATE = CHSTRUCTURE-VALIDDATE ** CHANGE_NUMBER = * LANGUAGE = CABNT-SPRAS * TABLES * TEXT = LONGTEXTTABLE * EXCEPTIONS * VALUE_NOT_FOUND = 1 * NO_TEXT_FOUND = 2 * ERROR = 3 * OTHERS = 4.
CVAPI_DOC_CHECKOUTVIEW CALL FUNCTION 'CVAPI_DOC_CHECKOUTVIEW' EXPORTING PF_DOKAR = DRAW-DOKAR PF_DOKNR = DRAW-DOKNR PF_DOKVR = DRAW-DOKVR PF_DOKTL = DRAW-DOKTL * PF_FTP_DEST = ' ' * PF_HOSTNAME = ' ' * PF_CONTENT_PROVIDE = ' ' * PS_API_CONTROL = IMPORTING PSX_MESSAGE = LSX_MESSAGE TABLES PT_FILES = PSX_FILES.
CVAPI_DOC_GETDETAIL CALL FUNCTION 'CVAPI_DOC_GETDETAIL' EXPORTING * PF_BATCHMODE = ' ' * PF_HOSTNAME = ' ' PF_DOKAR = DRAW-DOKAR PF_DOKNR = DRAW-DOKNR PF_DOKVR = DRAW-DOKVR PF_DOKTL = DRAW-DOKTL * PF_READ_DRAD = ' ' * PF_READ_DRAP = ' ' * PF_ACTIVE_FILES = ' ' * PF_READ_COMP = ' ' IMPORTING PSX_DRAW = DRAW_DETAILS * PFX_DESCRIPTION = * TABLES * PT_FILES = pt_files_details * PT_COMP = * PT_DRAP = * PT_DRAD = * PT_DRAT = EXCEPTIONS NOT_FOUND = 1 NO_AUTH = 2 ERROR = 3 OTHERS = 4 .
DOCUMENT_WAS_RELEASED CALL FUNCTION 'DOCUMENT_WAS_RELEASED' EXPORTING DOKAR = DRAW-DOKAR DOKNR = DRAW-DOKNR DOKVR = DRAW-DOKVR DOKTEIL = DRAW-DOKTL IMPORTING * RELEASED_STATUS = * REVISION_USAGE = DOCUMENT_ACTUAL_RELEASED = DOCRELEASE_INDICATOR * MARKED_FOR_DELETE = EXCEPTIONS DOCUMENT_NOT_RELEASED = 1 OTHERS = 2.
CV200_DB_TDWS_SELECT * CALL FUNCTION 'CV200_DB_TDWS_SELECT' * EXPORTING * PF_USE_BUFFER = ' ' * PF_DOKAR = DRAW-DOKAR * PF_DOKST = DRAW_DETAILS-DOKST ** PF_LANG = SY-LANGU * IMPORTING * PSX_TDWS = PSX_TWDS_DETAILS ** PFX_STABK = ** PFX_DESCRIPTION = * EXCEPTIONS * NOT_FOUND = 1 * OTHERS = 2 * .
POPUP_TO_CONFIRM * CALL FUNCTION 'POPUP_TO_CONFIRM' * EXPORTING * TITLEBAR = 'Confirm Display'(002) ** DIAGNOSE_OBJECT = ' ' * TEXT_QUESTION = 'The status of the document does not allow Change *DO YOU WISH TO OPEN IN DISPLAY MODE?'(001) ** TEXT_BUTTON_1 = 'Ja'(001) ** ICON_BUTTON_1 = ' ' ** TEXT_BUTTON_2 = 'Nein'(002) ** ICON_BUTTON_2 = ' ' ** DEFAULT_BUTTON = '1' * DISPLAY_CANCEL_BUTTON = '' ** USERDEFINED_F1_HELP = ' ' ** START_COLUMN = 25 ** START_ROW = 6 ** POPUP_TYPE = * IMPORTING * ANSWER = USER_DISPLAY_RESPONSE.
POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING * DEFAULTOPTION = 'Y' TEXTLINE1 = 'The status of the document does not allow'(015) TEXTLINE2 = 'Do you wish to open in Display mode?'(016) TITEL = 'Confirm Display'(002) * START_COLUMN = 25 * START_ROW = 6 CANCEL_DISPLAY = '' IMPORTING ANSWER = USER_DISPLAY_RESPONSE.
CVAPI_DOC_CHECKOUTMODIFY CALL FUNCTION 'CVAPI_DOC_CHECKOUTMODIFY' EXPORTING PF_DOKAR = DRAW-DOKAR PF_DOKNR = DRAW-DOKNR PF_DOKVR = DRAW-DOKVR PF_DOKTL = DRAW-DOKTL * PS_DOC_STATUS = * PF_FTP_DEST = ' ' * PF_HOSTNAME = ' ' * PS_API_CONTROL = IMPORTING PSX_MESSAGE = LSX_MESSAGE TABLES PT_FILES = PSX_FILES .
CVAPI_DOC_CHANGE CALL FUNCTION 'CVAPI_DOC_CHANGE' EXPORTING PS_DRAW = DRAW * PF_STATUSLOG = ' ' * PF_REVLEVEL = * PS_API_CONTROL = API_CONTROL * PF_FTP_DEST = 'SAPFTP' * PF_HOSTNAME = ' ' IMPORTING PSX_MESSAGE = LSX_MESSAGE * TABLES * PT_DRAD_X = * PT_DRAT_X = * PT_FILES_X = * PT_COMP_X = .
CARD_CHARACTERISTIC_READ ** CALL FUNCTION 'CARD_CHARACTERISTIC_READ' ** EXPORTING ** CHARACTERISTIC = T_OBJECTDATA_TABLE-ATNAM *** DATE = *** CHANGE_NO = *** LANGUAGE = ' ' *** WITH_VALUES = 'X' *** WITH_VALUE_DESCRIPTIONS = 'X' ** IMPORTING ** ALL_ATTRIBUTES = CHAR_DETAILS *** WARNING = ** TABLES ** DESCRIPTIONS = DESCRIPTIONS ** ALLOWED_VALUES = ALLOWED_VALUES ** VALUE_DESCRIPTIONS = VALUE_DESCRIPTIONS ** RESTRICT_USAGE_IN_CLASS_TYPE = RESTRICT_USAGE ** REFERENCE_TO_TABLE = REFERENCE_TABLE ** EXCEPTIONS ** WARNING = 0 ** ERROR = 0 ** OTHERS = 0.
CVAPI_DOC_CHANGE * CALL FUNCTION 'CVAPI_DOC_CHANGE' * EXPORTING * PS_DRAW = DRAW_DETAILS ** PF_STATUSLOG = ' ' ** PF_REVLEVEL = * PS_API_CONTROL = API_CONTROL ** PF_FTP_DEST = 'SAPFTP' ** PF_HOSTNAME = ' ' * IMPORTING * PSX_MESSAGE = LSX_MESSAGE ** TABLES ** PT_DRAD_X = ** PT_DRAT_X = ** PT_FILES_X = ** PT_COMP_X = * .
CVAPI_DOC_CREATE * CALL FUNCTION 'CVAPI_DOC_CREATE' * EXPORTING * PS_DRAW = DRAW_DETAILS ** PF_STATUSLOG = ' ' ** PF_REVLEVEL = * PS_API_CONTROL = API_CONTROL ** PF_FTP_DEST = 'SAPFTP' ** PF_HOSTNAME = ' ' * IMPORTING * PSX_MESSAGE = LSX_MESSAGE ** PFX_DOKAR = ** PFX_DOKNR = ** PFX_DOKVR = ** PFX_DOKTL = ** TABLES ** PT_DRAD_X = ** PT_DRAT_X = ** PT_FILES_X = ** PT_COMP_X = * .
CVAPI_DOC_CHECK_FUNCTION CALL FUNCTION 'CVAPI_DOC_CHECK_FUNCTION' EXPORTING PF_DOKAR = DRAW-DOKAR PF_DOKNR = DRAW-DOKNR PF_DOKVR = DRAW-DOKVR PF_DOKTL = DRAW-DOKTL * PS_DOC_STATUS = PF_CHECK_CREATE = CHR_X * PF_CHECK_CHANGE = ' ' * PF_CHECK_CHECKOUT = ' ' * PF_SET_LOCK = ' ' IMPORTING PSX_MESSAGE = LSX_MESSAGE * TABLES * PT_FILES = .
CVAPI_DOC_CREATE * CALL FUNCTION 'CVAPI_DOC_CREATE' * EXPORTING * PS_DRAW = DRAW_DETAILS ** PF_STATUSLOG = ' ' ** PF_REVLEVEL = * PS_API_CONTROL = API_CONTROL ** PF_FTP_DEST = 'SAPFTP' ** PF_HOSTNAME = ' ' * IMPORTING * PSX_MESSAGE = LSX_MESSAGE ** PFX_DOKAR = ** PFX_DOKNR = ** PFX_DOKVR = ** PFX_DOKTL = ** TABLES ** PT_DRAD_X = ** PT_DRAT_X = ** PT_FILES_X = ** PT_COMP_X = * .
POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING DEFAULTOPTION = 'N' TEXTLINE1 = TEXTDISPLAY1 TEXTLINE2 = TEXTDISPLAY2 TITEL = 'Save Document'(008) * START_COLUMN = 25 * START_ROW = 6 CANCEL_DISPLAY = CHR_X IMPORTING ANSWER = USER_SAVE_RESPONSE.
CVAPI_DOC_CHANGE CALL FUNCTION 'CVAPI_DOC_CHANGE' EXPORTING PS_DRAW = DRAW_DETAILS * PF_STATUSLOG = ' ' * PF_REVLEVEL = PS_API_CONTROL = API_CONTROL * PF_FTP_DEST = 'SAPFTP' * PF_HOSTNAME = ' ' IMPORTING PSX_MESSAGE = LSX_MESSAGE * TABLES * PT_DRAD_X = * PT_DRAT_X = * PT_FILES_X = * PT_COMP_X = .
CVAPI_DOC_CREATE CALL FUNCTION 'CVAPI_DOC_CREATE' EXPORTING PS_DRAW = DRAW_DETAILS * PF_STATUSLOG = ' ' * PF_REVLEVEL = PS_API_CONTROL = API_CONTROL * PF_FTP_DEST = 'SAPFTP' * PF_HOSTNAME = ' ' IMPORTING PSX_MESSAGE = LSX_MESSAGE * PFX_DOKAR = * PFX_DOKNR = * PFX_DOKVR = * PFX_DOKTL = * TABLES * PT_DRAD_X = * PT_DRAT_X = * PT_FILES_X = * PT_COMP_X = .
CVAPI_DOC_CHECK_FUNCTION * CALL FUNCTION 'CVAPI_DOC_CHECK_FUNCTION' * EXPORTING * PF_DOKAR = DRAW-DOKAR * PF_DOKNR = DRAW-DOKNR * PF_DOKVR = DRAW-DOKVR * PF_DOKTL = DRAW-DOKTL ** PS_DOC_STATUS = ** PF_CHECK_CREATE = ' ' ** PF_CHECK_CHANGE = ' ' * PF_CHECK_CHECKOUT = CHR_X ** PF_SET_LOCK = ' ' * IMPORTING * PSX_MESSAGE = LSX_MESSAGE ** TABLES ** PT_FILES = * .
CVAPI_DOC_CHECKOUTMODIFY * CALL FUNCTION 'CVAPI_DOC_CHECKOUTMODIFY' * EXPORTING * PF_DOKAR = DRAW-DOKAR * PF_DOKNR = DRAW-DOKNR * PF_DOKVR = DRAW-DOKVR * PF_DOKTL = DRAW-DOKTL ** PS_DOC_STATUS = ** PF_FTP_DEST = ' ' ** PF_HOSTNAME = ' ' ** PS_API_CONTROL = * IMPORTING * PSX_MESSAGE = LSX_MESSAGE * .
CVAPI_DOC_CHANGE ** CALL FUNCTION 'CVAPI_DOC_CHANGE' ** EXPORTING ** PS_DRAW = DRAW_DETAILS *** PF_STATUSLOG = ' ' *** PF_REVLEVEL = *** PS_API_CONTROL = *** PF_FTP_DEST = 'SAPFTP' *** PF_HOSTNAME = ' ' ** IMPORTING ** PSX_MESSAGE = LSX_MESSAGE *** TABLES *** PT_DRAD_X = *** PT_DRAT_X = *** PT_FILES_X = *** PT_COMP_X = ** .
CV120_DOC_GET_APPLICATION CALL FUNCTION 'CV120_DOC_GET_APPLICATION' EXPORTING PF_DOKAR = DRAW-DOKAR PF_DOKNR = DRAW-DOKNR PF_DOKVR = DRAW-DOKVR PF_DOKTL = DRAW-DOKTL * PF_APPTP = '1' * PF_HOSTNAME = IMPORTING * PSX_APPLICATION = PSX_FILE = PSX_FILE PFX_FCODE = CANCEL_FLAG * EXCEPTIONS * NOT_FOUND = 1 * NO_AUTH = 2 * ERROR = 3 * OTHERS = 4 .
CVAPI_DOC_GETDETAIL CALL FUNCTION 'CVAPI_DOC_GETDETAIL' EXPORTING * PF_BATCHMODE = ' ' * PF_HOSTNAME = ' ' PF_DOKAR = DRAW-DOKAR PF_DOKNR = DRAW-DOKNR PF_DOKVR = DRAW-DOKVR PF_DOKTL = DRAW-DOKTL * PF_READ_DRAD = ' ' * PF_READ_DRAP = ' ' * PF_ACTIVE_FILES = ' ' * PF_READ_COMP = ' ' IMPORTING PSX_DRAW = DRAW_DETAILS * PFX_DESCRIPTION = * TABLES * PT_FILES = pt_files_details * PT_COMP = * PT_DRAP = * PT_DRAD = * PT_DRAT = EXCEPTIONS NOT_FOUND = 1 NO_AUTH = 2 ERROR = 3 OTHERS = 4 .
PC_SPLIT_COMPLETE_FILENAME CALL FUNCTION 'PC_SPLIT_COMPLETE_FILENAME' EXPORTING COMPLETE_FILENAME = COMPLETE_FILENAME_VALUE * CHECK_DOS_FORMAT = IMPORTING DRIVE = DRIVE_VALUE EXTENSION = EXTENSION_VALUE * NAME = * NAME_WITH_EXT = PATH = PATH_VALUE * EXCEPTIONS * INVALID_DRIVE = 1 * INVALID_EXTENSION = 2 * INVALID_NAME = 3 * INVALID_PATH = 4 * OTHERS = 5 .
PC_SPLIT_COMPLETE_FILENAME CALL FUNCTION 'PC_SPLIT_COMPLETE_FILENAME' EXPORTING COMPLETE_FILENAME = COMPLETE_FILENAME_VALUE * CHECK_DOS_FORMAT = IMPORTING DRIVE = DRIVE_VALUE EXTENSION = EXTENTSION_VALUE NAME = NAME_VALUE NAME_WITH_EXT = NAME_WITH_EXT_VALUE PATH = PATH_VALUE * EXCEPTIONS * INVALID_DRIVE = 1 * INVALID_EXTENSION = 2 * INVALID_NAME = 3 * INVALID_PATH = 4 * OTHERS = 5 .
CV200_DB_TDWA_SELECT CALL FUNCTION 'CV200_DB_TDWA_SELECT' EXPORTING: PF_DOKAR = DRAW-DOKAR IMPORTING: PSX_TDWA = LS_TDWA EXCEPTIONS: NOT_FOUND = 1 OTHERS = 2.
CV115_DOCVERSION_CHECK CALL FUNCTION 'CV115_DOCVERSION_CHECK' EXPORTING: PF_TRANSACTION = CHR_CV01 PS_TDWA = LS_TDWA IMPORTING: PFX_CREATE_NEW = LF_CREATE_NEW PFX_DOKVR_LAST = LF_LAST_VERSION PFX_DOKVR_NEW = LF_NEW_VERSION CHANGING: PSX_DRAW = DRAW EXCEPTIONS: ERROR = 1 OTHERS = 2.
BALW_BAPIRETURN_GET2 * CALL FUNCTION 'BALW_BAPIRETURN_GET2' * EXPORTING: TYPE = 'I' * CL = '26' * NUMBER = '127' * PAR1 = LF_MSG1 * PAR2 = LF_MSG2 * PAR3 = LF_MSG3 * PAR4 = LF_MSG4 * IMPORTING : RETURN = LS_RETURN.
POPUP_TO_CONFIRM CALL FUNCTION 'POPUP_TO_CONFIRM' EXPORTING: TITLEBAR = 'New Version'(022) TEXT_QUESTION = TEXTDISPLAY TEXT_BUTTON_1 = 'Continue'(023) ICON_BUTTON_1 = 'ICON_CHECKED' TEXT_BUTTON_2 = 'Cancel'(024) ICON_BUTTON_2 = 'ICON_CANCEL' DEFAULT_BUTTON = '1' DISPLAY_CANCEL_BUTTON = '' USERDEFINED_F1_HELP = 'DMS-NEWVERSION' START_COLUMN = 10 START_ROW = 6 POPUP_TYPE = 'ICON_MESSAGE_INFORMATION' IMPORTING: ANSWER = LF_ANSWER EXCEPTIONS: TEXT_NOT_FOUND = 1 OTHERS = 2.
CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING INPUT = P_DRAW_OBJ-DOKNR IMPORTING OUTPUT = P_DRAW_OBJ-DOKNR.
BAPI_DOCUMENT_EXISTENCECHECK CALL FUNCTION 'BAPI_DOCUMENT_EXISTENCECHECK' EXPORTING DOCUMENTTYPE = P_DRAW_OBJ-DOKAR DOCUMENTNUMBER = P_DRAW_OBJ-DOKNR DOCUMENTPART = P_DRAW_OBJ-DOKTL DOCUMENTVERSION = P_DRAW_OBJ-DOKVR IMPORTING * DOCUMENTISDELETED = DOCUMENTEXISTS = FLAG_DOCUMENTEXITS.
CLAF_CLASSIFICATION_OF_OBJECTS * CALL FUNCTION 'CLAF_CLASSIFICATION_OF_OBJECTS' * EXPORTING ** CLASS = ' ' ** CLASSTEXT = 'X' * CLASSTYPE = '001' ** CLINT = ' ' ** FEATURES = 'X' * LANGUAGE = CABNT-SPRAS * OBJECT = AUSPOBJEK * OBJECTTABLE = 'MARA' ** KEY_DATE = SY-DATUM ** INITIAL_CHARACT = 'X' ** NO_VALUE_DESCRIPT = ** CHANGE_SERVICE_CLF = 'X' ** INHERITED_CHAR = ' ' ** CHANGE_NUMBER = ' ' * TABLES * T_CLASS = T_CLASS_TABLE * T_OBJECTDATA = T_OBJECTDATA_TABLE ** I_SEL_CHARACTERISTIC = ** T_NO_AUTH_CHARACT = * EXCEPTIONS * NO_CLASSIFICATION = 1 * NO_CLASSTYPES = 2 * INVALID_CLASS_TYPE = 3 * OTHERS = 4.
CTMS_OBJECT_HAS_STANDARDCLASS * CALL FUNCTION 'CTMS_OBJECT_HAS_STANDARDCLASS' * EXPORTING * OBJECT = AUSPOBJEK * TABLE = 'DRAW' ** CLASSTYPE = ** WITH_TEXT = 'X' ** DATE_OF_CHANGE = SY-DATUM * IMPORTING ** CLASS = ** CLASSTEXT = * CLASSTYPE = CLASSTYPE ** CLINT = ** NOT_A_STANDARDCLASS = * EXCEPTIONS * NO_CLASSIFICATION = 1 * TABLE_NOT_ALLOWED = 2 * INTERNAL_ERROR = 3 * OTHERS = 4.
CLAF_CLASSIFICATION_OF_OBJECTS * CALL FUNCTION 'CLAF_CLASSIFICATION_OF_OBJECTS' * EXPORTING ** CLASS = ' ' ** CLASSTEXT = 'X' * CLASSTYPE = CLASSTYPE ** CLINT = ' ' ** FEATURES = 'X' * LANGUAGE = CABNT-SPRAS * OBJECT = AUSPOBJEK * OBJECTTABLE = 'DRAW' ** KEY_DATE = SY-DATUM ** INITIAL_CHARACT = 'X' ** NO_VALUE_DESCRIPT = ** CHANGE_SERVICE_CLF = 'X' ** INHERITED_CHAR = ' ' ** CHANGE_NUMBER = ' ' * TABLES * T_CLASS = T_CLASS_TABLE * T_OBJECTDATA = T_OBJECTDATA_TABLE ** I_SEL_CHARACTERISTIC = ** T_NO_AUTH_CHARACT = * EXCEPTIONS * NO_CLASSIFICATION = 1 * NO_CLASSTYPES = 2 * INVALID_CLASS_TYPE = 3 * OTHERS = 4.
CTMS_OBJECT_HAS_STANDARDCLASS * CALL FUNCTION 'CTMS_OBJECT_HAS_STANDARDCLASS' * EXPORTING * OBJECT = AUSPOBJEK * TABLE = 'IFLOT' ** CLASSTYPE = ** WITH_TEXT = 'X' ** DATE_OF_CHANGE = SY-DATUM * IMPORTING ** CLASS = ** CLASSTEXT = * CLASSTYPE = CLASSTYPE ** CLINT = ** NOT_A_STANDARDCLASS = * EXCEPTIONS * NO_CLASSIFICATION = 1 * TABLE_NOT_ALLOWED = 2 * INTERNAL_ERROR = 3 * OTHERS = 4.
CLAF_CLASSIFICATION_OF_OBJECTS * CALL FUNCTION 'CLAF_CLASSIFICATION_OF_OBJECTS' * EXPORTING ** CLASS = ' ' ** CLASSTEXT = 'X' * CLASSTYPE = CLASSTYPE ** CLINT = ' ' ** FEATURES = 'X' * LANGUAGE = CABNT-SPRAS * OBJECT = AUSPOBJEK * OBJECTTABLE = 'IFLOT' ** KEY_DATE = SY-DATUM ** INITIAL_CHARACT = 'X' ** NO_VALUE_DESCRIPT = ** CHANGE_SERVICE_CLF = 'X' ** INHERITED_CHAR = ' ' ** CHANGE_NUMBER = ' ' * TABLES * T_CLASS = T_CLASS_TABLE * T_OBJECTDATA = T_OBJECTDATA_TABLE ** I_SEL_CHARACTERISTIC = ** T_NO_AUTH_CHARACT = * EXCEPTIONS * NO_CLASSIFICATION = 1 * NO_CLASSTYPES = 2 * INVALID_CLASS_TYPE = 3 * OTHERS = 4.
INVOKE_BROWSER_FUNCTION CALL FUNCTION 'INVOKE_BROWSER_FUNCTION' EXPORTING * CREATE_WORKITEM = ' ' GET_SELECTED_OBJECTS = CHR_X * HIGHLIGHT_IDENT_OBJS = ' ' * MOVE_TO_OBJECTFOLDER = ' ' * OBJECT_HANDLE = * OBJECT_TYPE = * RFCDEST = * SEND_OBJECT = ' ' * SHOW_FILTER = ' ' * NEW_ROOT = ' ' * UPDATE_DOCUMENTS = ' ' TABLES * UPD_DOCUMENT_DATA = OBJECT_LIST = OBJECTS_TOTAL_RECORD EXCEPTIONS NO_OBJECT_IN_TREE = 1 OTHERS = 2.
INVOKE_BROWSER_FUNCTION CALL FUNCTION 'INVOKE_BROWSER_FUNCTION' EXPORTING * CREATE_WORKITEM = ' ' GET_SELECTED_OBJECTS = CHR_X * HIGHLIGHT_IDENT_OBJS = ' ' * MOVE_TO_OBJECTFOLDER = ' ' * OBJECT_HANDLE = * OBJECT_TYPE = * RFCDEST = * SEND_OBJECT = ' ' * SHOW_FILTER = ' ' * NEW_ROOT = ' ' * UPDATE_DOCUMENTS = ' ' TABLES * UPD_DOCUMENT_DATA = OBJECT_LIST = OBJECTS_TOTAL_RECORD EXCEPTIONS NO_OBJECT_IN_TREE = 1 OTHERS = 2.
CH_CONVERT_UNITS CALL FUNCTION 'CH_CONVERT_UNITS' EXPORTING PROFILE = TCH02-PROF TABLES VALUES = VALUES EXCEPTIONS PROFILE_NOT_FOUND = 1 OTHERS = 2.
CVAPI_DOC_CHECK_FUNCTION CALL FUNCTION 'CVAPI_DOC_CHECK_FUNCTION' EXPORTING PF_DOKAR = DRAW-DOKAR PF_DOKNR = DRAW-DOKNR PF_DOKVR = DRAW-DOKVR PF_DOKTL = DRAW-DOKTL * PS_DOC_STATUS = * PF_CHECK_CREATE = ' ' * PF_CHECK_CHANGE = ' ' PF_CHECK_CHECKOUT = CHR_X * PF_SET_LOCK = ' ' IMPORTING PSX_MESSAGE = LSX_MESSAGE * TABLES * PT_FILES = .
CLSE_SELECT_CABN_VIA_NAME CALL FUNCTION 'CLSE_SELECT_CABN_VIA_NAME' EXPORTING CHARACTERISTIC = F4_HELP_TABLE-ATNAM * KEY_DATE = SY-DATUM * BYPASSING_BUFFER = ' ' * WITH_PREPARED_PATTERN = ' ' * IMPORTING * AMBIGUOUS_OBJ_CHARACTERISTIC = TABLES T_CABN = T_CABN EXCEPTIONS NO_ENTRY_FOUND = 1 OTHERS = 2.
CTMS_CHAR_VALUE_F4 CALL FUNCTION 'CTMS_CHAR_VALUE_F4' EXPORTING IMP_CHARACTERISTIC = T_CABN-ATINN * IMP_MODE = ' ' * IMP_DISPLAY = ' ' IMP_LANGUAGE = CABNT-SPRAS IMP_DATE = CHSTRUCTURE-VALIDDATE TABLES EXP_VALUES = CHAR_SEEKING_F4_HELP.
CLSE_SELECT_USR01 CALL FUNCTION 'CLSE_SELECT_USR01' "get decimal sign IMPORTING DECIMAL_SIGN = G_DECIMAL_SIGN.
CTCV_SYNTAX_CHECK CALL FUNCTION 'CTCV_SYNTAX_CHECK' EXPORTING ATTRIBUT = LWA_CABN-ATNAM BASEUNIT = LWA_CABN-MSEHI DECIMALS = LWA_CABN-ANZDZ DEC_PRESENTATION = G_DECIMAL_SIGN EXPONENT = LWA_CABN-ATDIM EXPONENT_ART = LWA_CABN-ATDEX FORMAT = LWA_CABN-ATFOR INTERVAL = 'X' LANGUAGE = CABNT-SPRAS LENGTH = LWA_CABN-ANZST LOWERCASE = LWA_CABN-ATKLE MASK = LWA_CABN-ATSCH * MASK_ALLOWED = ' ' NEGATIV = LWA_CABN-ATVOR SCREEN_NAME = SPACE SINGLE_SELECTION = LWA_CABN-ATEIN STRING = CHAR_VALUE * VALUE_SEPERATOR = ';' * CLASSTYPE = ' ' * IMPORTING * STRING_IS_MASKED = TABLES TSTRG = LIT_STRG EXCEPTIONS CURRENCY_CHECK = 1 DATE_CHECK = 2 FORMAT_CHECK = 3 ILLEGAL_INTERNAL_BASEUNIT = 4 INTERVAL_CHECK = 5 PATTERN_CHECK = 6 TIME_CHECK = 7 UNIT_CHECK = 8 NO_VALID_DIMENSION = 9 INTERVAL_NOT_ALLOWED = 10 OTHERS = 11.
INVOKE_BROWSER_FUNCTION CALL FUNCTION 'INVOKE_BROWSER_FUNCTION' EXPORTING * CREATE_WORKITEM = ' ' GET_SELECTED_OBJECTS = CHR_X * HIGHLIGHT_IDENT_OBJS = ' ' * MOVE_TO_OBJECTFOLDER = ' ' * OBJECT_HANDLE = * OBJECT_TYPE = * RFCDEST = * SEND_OBJECT = ' ' * SHOW_FILTER = ' ' * NEW_ROOT = ' ' * UPDATE_DOCUMENTS = ' ' TABLES * UPD_DOCUMENT_DATA = OBJECT_LIST = OBJECTS_TOTAL_RECORD EXCEPTIONS NO_OBJECT_IN_TREE = 1 OTHERS = 2.
CLCV_CONVERT_OBJEK_TO_TABLE CALL FUNCTION 'CLCV_CONVERT_OBJEK_TO_TABLE' EXPORTING I_OBJECT = AUSPOBJEK I_OBTAB = TABLE_TYPE TABLES T_FIELD_TAB = OBJECT_IDENTI_TABLE EXCEPTIONS ERROR = 1 OTHERS = 2.
CACL_OBJECT_VALIDATION_MAINT CALL FUNCTION 'CACL_OBJECT_VALIDATION_MAINT' EXPORTING OBJECT_TYPE = TABLE_TYPE CLASS_TYPE = EXCEL_TABLE-KLART CLASS = EXCEL_TABLE-CLASS TABLES OBJECT_IDENTIFICATION = OBJECT_IDENTI_TABLE VALIDATION_MAINT = VALIDATION_MAINT_TABLE EXCEPTIONS ERROR = 1 WARNING = 2 OTHERS = 3.
CACL_CLASSIFICATION_SAVE CALL FUNCTION 'CACL_CLASSIFICATION_SAVE' EXPORTING I_COMMIT = 'X' I_WAIT = 'X' I_NO_UPD_TASK = 'X'.
INVOKE_BROWSER_FUNCTION CALL FUNCTION 'INVOKE_BROWSER_FUNCTION' EXPORTING * CREATE_WORKITEM = ' ' GET_SELECTED_OBJECTS = CHR_X * HIGHLIGHT_IDENT_OBJS = ' ' * MOVE_TO_OBJECTFOLDER = ' ' * OBJECT_HANDLE = * OBJECT_TYPE = * RFCDEST = * SEND_OBJECT = ' ' * SHOW_FILTER = ' ' * NEW_ROOT = ' ' * UPDATE_DOCUMENTS = ' ' TABLES * UPD_DOCUMENT_DATA = OBJECT_LIST = OBJECTS_TOTAL_RECORD EXCEPTIONS NO_OBJECT_IN_TREE = 1 OTHERS = 2.
CVAPI_DOC_CHANGE CALL FUNCTION 'CVAPI_DOC_CHANGE' EXPORTING PS_DRAW = DRAW * PF_STATUSLOG = ' ' * PF_REVLEVEL = PS_API_CONTROL = API_CONTROL * PF_FTP_DEST = 'SAPFTP' * PF_HOSTNAME = ' ' IMPORTING PSX_MESSAGE = LSX_MESSAGE TABLES PT_DRAD_X = OBJECT_LINK_RECORD * PT_DRAT_X = * PT_FILES_X = * PT_COMP_X = .
INVOKE_BROWSER_FUNCTION CALL FUNCTION 'INVOKE_BROWSER_FUNCTION' EXPORTING GET_SELECTED_OBJECTS = CHR_X TABLES OBJECT_LIST = OBJECTS_TOTAL_RECORD EXCEPTIONS NO_OBJECT_IN_TREE = 1 OTHERS = 2.
CH_READ_KLFB CALL FUNCTION 'CH_READ_KLFB' TABLES INP_KLFB = itab_klfb OUT_KLFB = itab_klfb.
POPUP_TO_DECIDE_LIST CALL FUNCTION 'POPUP_TO_DECIDE_LIST' EXPORTING TEXTLINE1 = 'Hier koennte noch ein Text rein' "#EC NOTEXT TITEL = text-026 TABLES T_SPOPLI = t_spopli EXCEPTIONS NOT_ENOUGH_ANSWERS = 1 TOO_MUCH_ANSWERS = 2 TOO_MUCH_MARKS = 3 OTHERS = 4.
INVOKE_BROWSER_FUNCTION CALL FUNCTION 'INVOKE_BROWSER_FUNCTION' EXPORTING get_selected_objects = chr_x TABLES object_list = objects_total_record EXCEPTIONS no_object_in_tree = 1 OTHERS = 2.
CLAP_DDB_GET_CLASSIFICATION CALL FUNCTION 'CLAP_DDB_GET_CLASSIFICATION' EXPORTING object = object_key obtab = object_table TABLES allocations = class_allocations EXCEPTIONS no_allocation = 1 set_aennr = 2 change_nr_not_exist = 3 date_in_past = 4 error_class = 5 error_date_restriction = 6 error_status = 7 OTHERS = 8.
INVOKE_BROWSER_FUNCTION CALL FUNCTION 'INVOKE_BROWSER_FUNCTION' EXPORTING get_selected_objects = chr_x TABLES object_list = objects_total_record EXCEPTIONS no_object_in_tree = 1 OTHERS = 2.
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 MCH01F01 or its description.