SAP Reports / Programs | Production Planning and Control | Capacity Requirements Planning | Capacity Evaluations(PP-CRP-ALY) SAP PP

Home SAP Development ABAP Coding SAP Fiori SAP Training SAP Tables SAP Objects...

MC65AFE1 SAP ABAP INCLUDE - FORM Routines That Start With E

SAP T-Codes / Example ABAP code
ABAP OO / SAP Function Modules
ABAP reports / SAP Error Messages
SAP Tables / SAP Video Training

MC65AFE1 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 MC65AFE1 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 MC65AFE1. "Basic submit
SUBMIT MC65AFE1 AND RETURN. "Return to original report after report execution complete
SUBMIT MC65AFE1 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement

Text pool values

Title: FORM Routines That Start With E

INCLUDES used within this REPORT MC65AFE1

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:

WS_QUERY CALL FUNCTION 'WS_QUERY' EXPORTING QUERY = 'WS' IMPORTING RETURN = WS_RETURN EXCEPTIONS INV_QUERY = 01.

CY_CUT_TEXT CALL FUNCTION 'CY_CUT_TEXT' EXPORTING INTEXT = TEXT-120 "// 'EXCEL-Dateiname' IMPORTING OUTTEXT = TITLE.

PC_INIT_ERRORTAB CALL FUNCTION 'PC_INIT_ERRORTAB' EXPORTING * CHECK_WITH_EXTENSION = 'X' ERRFIELD = FIELDS-FIELDNAME ERRTAB = 'CYEXPROF' MSGID = 'CY' MSGNO = 162 MSGTY = 'E'.

CY_CENTER_WINDOW CALL FUNCTION 'CY_CENTER_WINDOW' EXPORTING DYNPRO_HEIGHT = HEIGHT DYNPRO_WIDTH = WIDTH IMPORTING WINX1 = WINX1 WINY1 = WINY1.

POPUP_GET_VALUES_USER_CHECKED CALL FUNCTION 'POPUP_GET_VALUES_USER_CHECKED' EXPORTING FORMNAME = 'PC_CHECK_FILENAME_USER_EXIT' POPUP_TITLE = TITLE PROGRAMNAME = 'SAPLC0PC' START_COLUMN = WINX1 START_ROW = WINY1 IMPORTING RETURNCODE = RETURN TABLES FIELDS = FIELDS EXCEPTIONS ERROR_IN_FIELDS = 01.

PC_BUILD_COMPLETE_FILENAME CALL FUNCTION 'PC_BUILD_COMPLETE_FILENAME' EXPORTING EXTENSION = 'SLK' NAME = LISPROFIL-EX_UDAT PATH = LISPROFIL-EX_PFAD IMPORTING COMPLETE_FILENAME = FILE EXCEPTIONS FILENAME_TOO_LONG = 01 INVALID_DRIVE = 02 INVALID_EXTENSION = 03 INVALID_NAME = 04 INVALID_PATH = 05 MISSING_FILENAME = 06.

PC_BUILD_COMPLETE_FILENAME CALL FUNCTION 'PC_BUILD_COMPLETE_FILENAME' EXPORTING EXTENSION = 'SLK' NAME = LISPROFIL-EX_DDAT PATH = LISPROFIL-EX_PFAD IMPORTING COMPLETE_FILENAME = FILE EXCEPTIONS FILENAME_TOO_LONG = 01 INVALID_DRIVE = 02 INVALID_EXTENSION = 03 INVALID_NAME = 04 INVALID_PATH = 05 MISSING_FILENAME = 06.

PC_BUILD_COMPLETE_FILENAME CALL FUNCTION 'PC_BUILD_COMPLETE_FILENAME' EXPORTING EXTENSION = 'SLK' NAME = LISPROFIL-EX_VDAT PATH = LISPROFIL-EX_PFAD IMPORTING COMPLETE_FILENAME = FILE EXCEPTIONS FILENAME_TOO_LONG = 01 INVALID_DRIVE = 02 INVALID_EXTENSION = 03 INVALID_NAME = 04 INVALID_PATH = 05 MISSING_FILENAME = 06.

WS_QUERY CALL FUNCTION 'WS_QUERY' EXPORTING FILENAME = FILE QUERY = 'FE' IMPORTING RETURN = RETURN EXCEPTIONS INV_QUERY = 01.

POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING TEXTLINE1 = TEXT-121 "//Bestehende Datei überschreiben?' TITEL = TITLE IMPORTING ANSWER = RETURN.

CY_GET_PERIOD_STRUCTURE CALL FUNCTION 'CY_GET_PERIOD_STRUCTURE' EXPORTING INDEX = IND IMPORTING PERIODLINE = PERIODLINE EXCEPTIONS WRONG_INDEX = 01.

SYLK_WRITE_FIELD CALL FUNCTION 'SYLK_WRITE_FIELD' EXPORTING FIELD = PERIODLINE-DATUV EXCEPTIONS INCOMPATIBLE_FORMAT = 01 INVALID_ALIGNMENT = 02 INVALID_COLOUR = 03 INVALID_FORMAT = 04 INVALID_FRAME = 05 MAX_COLUMN_REACHED = 06 MAX_ROW_REACHED = 07.

SYLK_WRITE_FIELD CALL FUNCTION 'SYLK_WRITE_FIELD' EXPORTING FIELD = EXPERIODE EXCEPTIONS INCOMPATIBLE_FORMAT = 01 INVALID_ALIGNMENT = 02 INVALID_COLOUR = 03 INVALID_FORMAT = 04 INVALID_FRAME = 05 MAX_COLUMN_REACHED = 06 MAX_ROW_REACHED = 07.

CY_GET_PERIOD_STRUCTURE CALL FUNCTION 'CY_GET_PERIOD_STRUCTURE' EXPORTING INDEX = IND IMPORTING PERIODLINE = PERIODLINE EXCEPTIONS WRONG_INDEX = 01.

SYLK_WRITE_FIELD

CALL FUNCTION 'SYLK_WRITE_FIELD' EXPORTING FIELD = PERIODLINE-DATUV FMT = 5 EXCEPTIONS INCOMPATIBLE_FORMAT = 01 INVALID_ALIGNMENT = 02 INVALID_COLOUR = 03 INVALID_FORMAT = 04 INVALID_FRAME = 05 MAX_COLUMN_REACHED = 06 MAX_ROW_REACHED = 07.

SYLK_INIT CALL FUNCTION 'SYLK_INIT' EXPORTING * COLORED_NEGATIVES = E01 NUMBER_OF_DECIMALS = 2 * NUMBER_OF_PERCENT_DECIMALS = E03 EXCEPTIONS INVALID_NUMBER_OF_DECIMALS = 01.

SYLK_DATA_EXISTS CALL FUNCTION 'SYLK_DATA_EXISTS' IMPORTING DATA_EXISTS = DATEX.

SYLK_DOWNLOAD CALL FUNCTION 'SYLK_DOWNLOAD' EXPORTING FNAME = FILE EXCEPTIONS FILE_OPEN_ERROR = 01 FILE_WRITE_ERROR = 02 UNKNOWN_ERROR = 03.

SYLK_WRITE_FIELD
  CALL FUNCTION 'SYLK_WRITE_FIELD'     "// Leerzeile ausgeben
       EXPORTING
*           ALIGN = E01
            COLOUR = 3
            FIELD = SPACE
*           FMT = E04
*           FRAME = E05
            NEW_LINE = 'X'
       EXCEPTIONS
            INCOMPATIBLE_FORMAT = 01
            INVALID_ALIGNMENT = 02
            INVALID_COLOUR = 03
            INVALID_FORMAT = 04
            INVALID_FRAME = 05
            MAX_COLUMN_REACHED = 06
            MAX_ROW_REACHED = 07.

SYLK_WRITE_FIELD
    CALL FUNCTION 'SYLK_WRITE_FIELD'   "// Beschreibung des Kriteriums
         EXPORTING
*             ALIGN = E01
              COLOUR = 3
              FIELD = SORT_KENNZAHLEN-SCRTEXT_M
*             FMT = E04
*             FRAME = E05
*             NEW_LINE = 'X'
    EXCEPTIONS
         INCOMPATIBLE_FORMAT = 01
         INVALID_ALIGNMENT = 02
         INVALID_COLOUR = 03
         INVALID_FORMAT = 04
         INVALID_FRAME = 05
         MAX_COLUMN_REACHED = 06
         MAX_ROW_REACHED = 07.

SYLK_WRITE_FIELD CALL FUNCTION 'SYLK_WRITE_FIELD' "// Ausprägung des Kriteriums EXPORTING * ALIGN = E01 COLOUR = 3 FIELD = * FMT = E04 * FRAME = E05 NEW_LINE = 'X' EXCEPTIONS INCOMPATIBLE_FORMAT = 01 INVALID_ALIGNMENT = 02 INVALID_COLOUR = 03 INVALID_FORMAT = 04 INVALID_FRAME = 05 MAX_COLUMN_REACHED = 06 MAX_ROW_REACHED = 07.

SYLK_WRITE_FIELD CALL FUNCTION 'SYLK_WRITE_FIELD' "// 1. Spalte: Periode

SYLK_WRITE_FIELD CALL FUNCTION 'SYLK_WRITE_FIELD' "// Weitere Spalten EXPORTING * ALIGN = E01 COLOUR = 3 FIELD = AKT_KENNZAHLEN-SCRTEXT_M * FMT = E04 FRAME = '4' * NEW_LINE = E06 EXCEPTIONS INCOMPATIBLE_FORMAT = 01 INVALID_ALIGNMENT = 02 INVALID_COLOUR = 03 INVALID_FORMAT = 04 INVALID_FRAME = 05 MAX_COLUMN_REACHED = 06 MAX_ROW_REACHED = 07.

SYLK_WRITE_FIELD CALL FUNCTION 'SYLK_WRITE_FIELD' "// Falls vorhanden, so wird EXPORTING "// eine Einheitenspalte mit * ALIGN = E01 "// ausgegeben.

SYLK_WRITE_FIELD
  CALL FUNCTION 'SYLK_WRITE_FIELD'     "// Neue Zeile
       EXPORTING
*           ALIGN = E01
            COLOUR = 3
            FIELD = SPACE
*           FMT = E04
*           FRAME = '4'
            NEW_LINE = 'X'
       EXCEPTIONS
            INCOMPATIBLE_FORMAT = 01
            INVALID_ALIGNMENT = 02
            INVALID_COLOUR = 03
            INVALID_FORMAT = 04
            INVALID_FRAME = 05
            MAX_COLUMN_REACHED = 06
            MAX_ROW_REACHED = 07.

SYLK_WRITE_FIELD
    CALL FUNCTION 'SYLK_WRITE_FIELD'
         EXPORTING
*             ALIGN = E01
*             COLOUR = E02
              FIELD = 
*             FMT = E04
*             FRAME = E05
*             NEW_LINE = E06
         EXCEPTIONS
              INCOMPATIBLE_FORMAT = 01
              INVALID_ALIGNMENT = 02
              INVALID_COLOUR = 03
              INVALID_FORMAT = 04
              INVALID_FRAME = 05
              MAX_COLUMN_REACHED = 06
              MAX_ROW_REACHED = 07.

SYLK_WRITE_FIELD CALL FUNCTION 'SYLK_WRITE_FIELD' EXPORTING * ALIGN = E01 * COLOUR = E02 FIELD = * FMT = E04 * FRAME = E05 * NEW_LINE = E06 EXCEPTIONS INCOMPATIBLE_FORMAT = 01 INVALID_ALIGNMENT = 02 INVALID_COLOUR = 03 INVALID_FORMAT = 04 INVALID_FRAME = 05 MAX_COLUMN_REACHED = 06 MAX_ROW_REACHED = 07.

SYLK_WRITE_FIELD
  CALL FUNCTION 'SYLK_WRITE_FIELD'     "// Neue Zeile
   EXPORTING
*       ALIGN = E01
        COLOUR = 3
        FIELD = SPACE
*       FMT = E04
*       FRAME = '4'
        NEW_LINE = 'X'
   EXCEPTIONS
        INCOMPATIBLE_FORMAT = 01
        INVALID_ALIGNMENT = 02
        INVALID_COLOUR = 03
        INVALID_FORMAT = 04
        INVALID_FRAME = 05
        MAX_COLUMN_REACHED = 06
        MAX_ROW_REACHED = 07.

SYLK_INIT CALL FUNCTION 'SYLK_INIT' EXPORTING NUMBER_OF_DECIMALS = 2 EXCEPTIONS INVALID_NUMBER_OF_DECIMALS = 01.

SYLK_DATA_EXISTS CALL FUNCTION 'SYLK_DATA_EXISTS' IMPORTING DATA_EXISTS = DATEX.

SYLK_DOWNLOAD CALL FUNCTION 'SYLK_DOWNLOAD' EXPORTING FNAME = FILE EXCEPTIONS FILE_OPEN_ERROR = 01 FILE_WRITE_ERROR = 02 UNKNOWN_ERROR = 03.

SYLK_WRITE_FIELD
    CALL FUNCTION 'SYLK_WRITE_FIELD'
         EXPORTING
*             ALIGN = E01
*             COLOUR = E02
              FIELD = KAPDATA-BEDARF
*             FMT = E04
*             FRAME = E05
*             NEW_LINE = E06
         EXCEPTIONS
              INCOMPATIBLE_FORMAT = 01
              INVALID_ALIGNMENT = 02
              INVALID_COLOUR = 03
              INVALID_FORMAT = 04
              INVALID_FRAME = 05
              MAX_COLUMN_REACHED = 06
              MAX_ROW_REACHED = 07.

SYLK_WRITE_FIELD
    CALL FUNCTION 'SYLK_WRITE_FIELD'
         EXPORTING
*             ALIGN = E01
*             COLOUR = E02
              FIELD = KAPDATA-ANGEBOT
*             FMT = E04
*             FRAME = E05
*             NEW_LINE = E06
         EXCEPTIONS
              INCOMPATIBLE_FORMAT = 01
              INVALID_ALIGNMENT = 02
              INVALID_COLOUR = 03
              INVALID_FORMAT = 04
              INVALID_FRAME = 05
              MAX_COLUMN_REACHED = 06
              MAX_ROW_REACHED = 07.

SYLK_WRITE_FIELD
    CALL FUNCTION 'SYLK_WRITE_FIELD'
         EXPORTING
*             ALIGN = E01
*             COLOUR = E02
              FIELD = KAPDATA-BELAST
              FMT = 2
*             FRAME = E05
*             NEW_LINE = E06
         EXCEPTIONS
              INCOMPATIBLE_FORMAT = 01
              INVALID_ALIGNMENT = 02
              INVALID_COLOUR = 03
              INVALID_FORMAT = 04
              INVALID_FRAME = 05
              MAX_COLUMN_REACHED = 06
              MAX_ROW_REACHED = 07.

SYLK_WRITE_FIELD
    CALL FUNCTION 'SYLK_WRITE_FIELD'
         EXPORTING
*             ALIGN = E01
*             COLOUR = E02
              FIELD = KAPDATA-FREI
*             FMT = E04
*             FRAME = E05
*             NEW_LINE = E06
         EXCEPTIONS
              INCOMPATIBLE_FORMAT = 01
              INVALID_ALIGNMENT = 02
              INVALID_COLOUR = 03
              INVALID_FORMAT = 04
              INVALID_FRAME = 05
              MAX_COLUMN_REACHED = 06
              MAX_ROW_REACHED = 07.

SYLK_WRITE_FIELD
    CALL FUNCTION 'SYLK_WRITE_FIELD'
         EXPORTING
*             ALIGN = E01
*             COLOUR = E02
              FIELD = EINH
*             FMT = E04
*             FRAME = E05
              NEW_LINE = 'X'
         EXCEPTIONS
              INCOMPATIBLE_FORMAT = 01
              INVALID_ALIGNMENT = 02
              INVALID_COLOUR = 03
              INVALID_FORMAT = 04
              INVALID_FRAME = 05
              MAX_COLUMN_REACHED = 06
              MAX_ROW_REACHED = 07.

CY_CUT_TEXT CALL FUNCTION 'CY_CUT_TEXT' EXPORTING INTEXT = TEXT-003 IMPORTING OUTTEXT = TEXT.

SYLK_WRITE_FIELD
  CALL FUNCTION 'SYLK_WRITE_FIELD'
       EXPORTING
*           ALIGN = E01
            COLOUR = 3
            FIELD = TEXT
*           FMT = E04
*           FRAME = E05
*           NEW_LINE = 'X'
       EXCEPTIONS
            INCOMPATIBLE_FORMAT = 01
            INVALID_ALIGNMENT = 02
            INVALID_COLOUR = 03
            INVALID_FORMAT = 04
            INVALID_FRAME = 05
            MAX_COLUMN_REACHED = 06
            MAX_ROW_REACHED = 07.

SYLK_WRITE_FIELD
  CALL FUNCTION 'SYLK_WRITE_FIELD'
       EXPORTING
*           ALIGN = E01
            COLOUR = 3
            FIELD = ARBPL_NAME
*           FMT = E04
*           FRAME = E05
*           NEW_LINE = 'X'
       EXCEPTIONS
            INCOMPATIBLE_FORMAT = 01
            INVALID_ALIGNMENT = 02
            INVALID_COLOUR = 03
            INVALID_FORMAT = 04
            INVALID_FRAME = 05
            MAX_COLUMN_REACHED = 06
            MAX_ROW_REACHED = 07.

SYLK_WRITE_FIELD
  CALL FUNCTION 'SYLK_WRITE_FIELD'
       EXPORTING
*           ALIGN = E01
            COLOUR = 3
            FIELD = ARBPL_TEXT
*           FMT = E04
*           FRAME = E05
            NEW_LINE = 'X'
       EXCEPTIONS
            INCOMPATIBLE_FORMAT = 01
            INVALID_ALIGNMENT = 02
            INVALID_COLOUR = 03
            INVALID_FORMAT = 04
            INVALID_FRAME = 05
            MAX_COLUMN_REACHED = 06
            MAX_ROW_REACHED = 07.

CY_CUT_TEXT CALL FUNCTION 'CY_CUT_TEXT' "46A EXPORTING "46A INTEXT = TEXT-127 "46A IMPORTING "46A OUTTEXT = TEXT. "46A

SYLK_WRITE_FIELD CALL FUNCTION 'SYLK_WRITE_FIELD' "46A EXPORTING "46A * ALIGN = E01 "46A COLOUR = 3 "46A FIELD = TEXT "46A * FMT = E04 "46A * FRAME = E05 "46A * NEW_LINE = 'X' "46A EXCEPTIONS "46A INCOMPATIBLE_FORMAT = 01 "46A INVALID_ALIGNMENT = 02 "46A INVALID_COLOUR = 03 "46A INVALID_FORMAT = 04 "46A INVALID_FRAME = 05 "46A MAX_COLUMN_REACHED = 06 "46A MAX_ROW_REACHED = 07.

SYLK_WRITE_FIELD CALL FUNCTION 'SYLK_WRITE_FIELD' "46A EXPORTING "46A * ALIGN = E01 "46A COLOUR = 3 "46A FIELD = ARBPL_WERKS "46A * FMT = E04 "46A * FRAME = E05 "46A NEW_LINE = 'X' "46A EXCEPTIONS "46A INCOMPATIBLE_FORMAT = 01 "46A INVALID_ALIGNMENT = 02 "46A INVALID_COLOUR = 03 "46A INVALID_FORMAT = 04 "46A INVALID_FRAME = 05 "46A MAX_COLUMN_REACHED = 06 "46A MAX_ROW_REACHED = 07. "46A

CY_CUT_TEXT CALL FUNCTION 'CY_CUT_TEXT' EXPORTING INTEXT = TEXT-022 IMPORTING OUTTEXT = TEXT.

SYLK_WRITE_FIELD
  CALL FUNCTION 'SYLK_WRITE_FIELD'
       EXPORTING
*           ALIGN = E01
            COLOUR = 3
            FIELD = TEXT
*           FMT = E04
*           FRAME = E05
*           NEW_LINE = 'X'
       EXCEPTIONS
            INCOMPATIBLE_FORMAT = 01
            INVALID_ALIGNMENT = 02
            INVALID_COLOUR = 03
            INVALID_FORMAT = 04
            INVALID_FRAME = 05
            MAX_COLUMN_REACHED = 06
            MAX_ROW_REACHED = 07.

SYLK_WRITE_FIELD
  CALL FUNCTION 'SYLK_WRITE_FIELD'
       EXPORTING
*           ALIGN = E01
            COLOUR = 3
            FIELD = RCRKK-KAPAR
*           FMT = E04
*           FRAME = E05
*           NEW_LINE = 'X'
       EXCEPTIONS
            INCOMPATIBLE_FORMAT = 01
            INVALID_ALIGNMENT = 02
            INVALID_COLOUR = 03
            INVALID_FORMAT = 04
            INVALID_FRAME = 05
            MAX_COLUMN_REACHED = 06
            MAX_ROW_REACHED = 07.

SYLK_WRITE_FIELD
  CALL FUNCTION 'SYLK_WRITE_FIELD'
       EXPORTING
*           ALIGN = E01
            COLOUR = 3
            FIELD = RCRKK-KTEXT
*           FMT = E04
*           FRAME = E05
            NEW_LINE = 'X'
       EXCEPTIONS
            INCOMPATIBLE_FORMAT = 01
            INVALID_ALIGNMENT = 02
            INVALID_COLOUR = 03
            INVALID_FORMAT = 04
            INVALID_FRAME = 05
            MAX_COLUMN_REACHED = 06
            MAX_ROW_REACHED = 07.

SYLK_WRITE_FIELD
  CALL FUNCTION 'SYLK_WRITE_FIELD'
       EXPORTING
*           ALIGN = E01
            COLOUR = 3
            FIELD = PERUEB
*           FMT = E04
            FRAME = '4'
*           NEW_LINE = 'X'
       EXCEPTIONS
            INCOMPATIBLE_FORMAT = 01
            INVALID_ALIGNMENT = 02
            INVALID_COLOUR = 03
            INVALID_FORMAT = 04
            INVALID_FRAME = 05
            MAX_COLUMN_REACHED = 06
            MAX_ROW_REACHED = 07.

CY_CUT_TEXT CALL FUNCTION 'CY_CUT_TEXT' EXPORTING INTEXT = TEXT-007 IMPORTING OUTTEXT = TEXT.

SYLK_WRITE_FIELD
  CALL FUNCTION 'SYLK_WRITE_FIELD'
       EXPORTING
*           ALIGN = E01
            COLOUR = 3
            FIELD = TEXT
*           FMT = E04
            FRAME = '4'
*           NEW_LINE = 'X'
       EXCEPTIONS
            INCOMPATIBLE_FORMAT = 01
            INVALID_ALIGNMENT = 02
            INVALID_COLOUR = 03
            INVALID_FORMAT = 04
            INVALID_FRAME = 05
            MAX_COLUMN_REACHED = 06
            MAX_ROW_REACHED = 07.

CY_CUT_TEXT CALL FUNCTION 'CY_CUT_TEXT' EXPORTING INTEXT = TEXT-006 IMPORTING OUTTEXT = TEXT.

SYLK_WRITE_FIELD
  CALL FUNCTION 'SYLK_WRITE_FIELD'
       EXPORTING
*           ALIGN = E01
            COLOUR = 3
            FIELD = TEXT
*           FMT = E04
            FRAME = '4'
*           NEW_LINE = 'X'
       EXCEPTIONS
            INCOMPATIBLE_FORMAT = 01
            INVALID_ALIGNMENT = 02
            INVALID_COLOUR = 03
            INVALID_FORMAT = 04
            INVALID_FRAME = 05
            MAX_COLUMN_REACHED = 06
            MAX_ROW_REACHED = 07.

CY_CUT_TEXT CALL FUNCTION 'CY_CUT_TEXT' EXPORTING INTEXT = TEXT-017 IMPORTING OUTTEXT = TEXT.

SYLK_WRITE_FIELD
  CALL FUNCTION 'SYLK_WRITE_FIELD'
       EXPORTING
*           ALIGN = E01
            COLOUR = 3
            FIELD = TEXT
*           FMT = E04
            FRAME = '4'
*           NEW_LINE = 'X'
       EXCEPTIONS
            INCOMPATIBLE_FORMAT = 01
            INVALID_ALIGNMENT = 02
            INVALID_COLOUR = 03
            INVALID_FORMAT = 04
            INVALID_FRAME = 05
            MAX_COLUMN_REACHED = 06
            MAX_ROW_REACHED = 07.

CY_CUT_TEXT CALL FUNCTION 'CY_CUT_TEXT' EXPORTING INTEXT = TEXT-042 IMPORTING OUTTEXT = TEXT.

SYLK_WRITE_FIELD
  CALL FUNCTION 'SYLK_WRITE_FIELD'
       EXPORTING
*           ALIGN = E01
            COLOUR = 3
            FIELD = TEXT
*           FMT = E04
            FRAME = '4'
*           NEW_LINE = 'X'
       EXCEPTIONS
            INCOMPATIBLE_FORMAT = 01
            INVALID_ALIGNMENT = 02
            INVALID_COLOUR = 03
            INVALID_FORMAT = 04
            INVALID_FRAME = 05
            MAX_COLUMN_REACHED = 06
            MAX_ROW_REACHED = 07.

CY_CUT_TEXT CALL FUNCTION 'CY_CUT_TEXT' EXPORTING INTEXT = TEXT-095 IMPORTING OUTTEXT = TEXT.

SYLK_WRITE_FIELD
  CALL FUNCTION 'SYLK_WRITE_FIELD'
       EXPORTING
*           ALIGN = E01
            COLOUR = 3
            FIELD = TEXT
*           FMT = E04
            FRAME = '4'
            NEW_LINE = 'X'
       EXCEPTIONS
            INCOMPATIBLE_FORMAT = 01
            INVALID_ALIGNMENT = 02
            INVALID_COLOUR = 03
            INVALID_FORMAT = 04
            INVALID_FRAME = 05
            MAX_COLUMN_REACHED = 06
            MAX_ROW_REACHED = 07.

SYLK_WRITE_FIELD CALL FUNCTION 'SYLK_WRITE_FIELD' "// Leerzeile ausgeben EXPORTING * ALIGN = E01 * COLOUR = E02 FIELD = ' ' * FMT = E04 * FRAME = E05 NEW_LINE = 'X' EXCEPTIONS INCOMPATIBLE_FORMAT = 01 INVALID_ALIGNMENT = 02 INVALID_COLOUR = 03 INVALID_FORMAT = 04 INVALID_FRAME = 05 MAX_COLUMN_REACHED = 06 MAX_ROW_REACHED = 07.

SYLK_INIT CALL FUNCTION 'SYLK_INIT' EXPORTING * COLORED_NEGATIVES = E01 NUMBER_OF_DECIMALS = 2 * NUMBER_OF_PERCENT_DECIMALS = E03 EXCEPTIONS INVALID_NUMBER_OF_DECIMALS = 01.

CY_GET_COLUMN_DEFINITIONS CALL FUNCTION 'CY_GET_COLUMN_DEFINITIONS' EXPORTING ILIVAR = RC65A-LIVAR TABLES KOMBI = KOMBI ZEIZU = ZEIZU.

CY_FILL_INTSPAL CALL FUNCTION 'CY_FILL_INTSPAL' EXPORTING IINDI = INDI IRC65A = RC65A IMPORTING EINDI = INDI ERC65A = RC65A TABLES IAVER = AVER INTSPAL = INTSPAL KOMBI = KOMBI EXCEPTIONS MISSING_DATA = 01.

CY_GET_PERIOD_KTEXT CALL FUNCTION 'CY_GET_PERIOD_KTEXT' TABLES PERTEXT = PERTEXT.

CY_GET_TCY19 CALL FUNCTION 'CY_GET_TCY19' EXPORTING ILIVAR = RC65A-LIVAR TABLES ETCY19 = ITCY19.

CY_CONV_DATE_TO_PERIOD CALL FUNCTION 'CY_CONV_DATE_TO_PERIOD' EXPORTING IDATE = RC65A-LIDAV IMPORTING EINDPERIOD = INTSPAL_KEY-INDPERIOD EXCEPTIONS NOT_FOUND = 01.

CY_CONV_DATE_TO_PERIOD CALL FUNCTION 'CY_CONV_DATE_TO_PERIOD' EXPORTING IDATE = RC65A-LIDAB IMPORTING EINDPERIOD = INDPERBIS EXCEPTIONS NOT_FOUND = 01.

SYLK_NEXT_CELL CALL FUNCTION 'SYLK_NEXT_CELL' EXPORTING * COLUMN = E01 * NEW_COLUMN = E02 NEW_ROW = 'X' * ROW = E04 EXCEPTIONS INVALID_COLUMN = 01 INVALID_PARAMETER_COMBINATION = 02 INVALID_ROW = 03 MAX_COLUMNS_REACHED = 04 MAX_ROWS_REACHED = 05.

SYLK_WRITE_FIELD CALL FUNCTION 'SYLK_WRITE_FIELD' EXPORTING * ALIGN = E01 * COLOUR = E02 FIELD = ZEILE-WERT * FMT = E04 * FRAME = E05 * NEW_LINE = E06 EXCEPTIONS INCOMPATIBLE_FORMAT = 01 INVALID_ALIGNMENT = 02 INVALID_COLOUR = 03 INVALID_FORMAT = 04 INVALID_FRAME = 05 MAX_COLUMN_REACHED = 06 MAX_ROW_REACHED = 07.

SYLK_WRITE_FIELD CALL FUNCTION 'SYLK_WRITE_FIELD' EXPORTING * ALIGN = E01 * COLOUR = E02 FIELD = ZEILE-ZEICH * FMT = E04 * FRAME = E05 * NEW_LINE = E06 EXCEPTIONS INCOMPATIBLE_FORMAT = 01 INVALID_ALIGNMENT = 02 INVALID_COLOUR = 03 INVALID_FORMAT = 04 INVALID_FRAME = 05 MAX_COLUMN_REACHED = 06 MAX_ROW_REACHED = 07.

SYLK_DATA_EXISTS CALL FUNCTION 'SYLK_DATA_EXISTS' IMPORTING DATA_EXISTS = DATEX.

SYLK_DOWNLOAD CALL FUNCTION 'SYLK_DOWNLOAD' EXPORTING FNAME = FILE EXCEPTIONS FILE_OPEN_ERROR = 01 FILE_WRITE_ERROR = 02 UNKNOWN_ERROR = 03.

CY_CUT_TEXT CALL FUNCTION 'CY_CUT_TEXT' EXPORTING INTEXT = TEXT-098 IMPORTING OUTTEXT = TEXT.

SYLK_WRITE_FIELD
  CALL FUNCTION 'SYLK_WRITE_FIELD'
       EXPORTING
*           ALIGN = E01
*           COLOUR = E02
            FIELD = TEXT
*           FMT = E04
*           FRAME = E05
*           NEW_LINE = E06
       EXCEPTIONS
            INCOMPATIBLE_FORMAT = 01
            INVALID_ALIGNMENT = 02
            INVALID_COLOUR = 03
            INVALID_FORMAT = 04
            INVALID_FRAME = 05
            MAX_COLUMN_REACHED = 06
            MAX_ROW_REACHED = 07.

SYLK_WRITE_FIELD
  CALL FUNCTION 'SYLK_WRITE_FIELD'
       EXPORTING
*           ALIGN = E01
*           COLOUR = E02
            FIELD = TCY18-LIVAB
*           FMT = E04
*           FRAME = E05
            NEW_LINE = 'X'
       EXCEPTIONS
            INCOMPATIBLE_FORMAT = 01
            INVALID_ALIGNMENT = 02
            INVALID_COLOUR = 03
            INVALID_FORMAT = 04
            INVALID_FRAME = 05
            MAX_COLUMN_REACHED = 06
            MAX_ROW_REACHED = 07.

CY_CUT_TEXT CALL FUNCTION 'CY_CUT_TEXT' EXPORTING INTEXT = TEXT-099 IMPORTING OUTTEXT = TEXT.

SYLK_WRITE_FIELD
  CALL FUNCTION 'SYLK_WRITE_FIELD'
       EXPORTING
*           ALIGN = E01
*           COLOUR = E02
            FIELD = TEXT
*           FMT = E04
*           FRAME = E05
*           NEW_LINE = E06
       EXCEPTIONS
            INCOMPATIBLE_FORMAT = 01
            INVALID_ALIGNMENT = 02
            INVALID_COLOUR = 03
            INVALID_FORMAT = 04
            INVALID_FRAME = 05
            MAX_COLUMN_REACHED = 06
            MAX_ROW_REACHED = 07.

SYLK_WRITE_FIELD
  CALL FUNCTION 'SYLK_WRITE_FIELD'
       EXPORTING
*           ALIGN = E01
*           COLOUR = E02
            FIELD = RC65A-LIEINH
*           FMT = E04
*           FRAME = E05
            NEW_LINE = 'X'
       EXCEPTIONS
            INCOMPATIBLE_FORMAT = 01
            INVALID_ALIGNMENT = 02
            INVALID_COLOUR = 03
            INVALID_FORMAT = 04
            INVALID_FRAME = 05
            MAX_COLUMN_REACHED = 06
            MAX_ROW_REACHED = 07.

SYLK_WRITE_FIELD
  CALL FUNCTION 'SYLK_WRITE_FIELD'
       EXPORTING
*           ALIGN = E01
            COLOUR = 3
            FIELD = PERUEB
*           FMT = E04
            FRAME = '4'
*           NEW_LINE = 'X'
       EXCEPTIONS
            INCOMPATIBLE_FORMAT = 01
            INVALID_ALIGNMENT = 02
            INVALID_COLOUR = 03
            INVALID_FORMAT = 04
            INVALID_FRAME = 05
            MAX_COLUMN_REACHED = 06
            MAX_ROW_REACHED = 07.

SYLK_NEXT_CELL CALL FUNCTION 'SYLK_NEXT_CELL' EXPORTING COLUMN = 2 * NEW_COLUMN = E02 NEW_ROW = 'X' * ROW = E04 EXCEPTIONS INVALID_COLUMN = 01 INVALID_PARAMETER_COMBINATION = 02 INVALID_ROW = 03 MAX_COLUMNS_REACHED = 04 MAX_ROWS_REACHED = 05.

SYLK_WRITE_FIELD CALL FUNCTION 'SYLK_WRITE_FIELD' EXPORTING * ALIGN = E01 COLOUR = 3 FIELD = SPALT_UEBER-TEXT * FMT = E04 FRAME = '4' * NEW_LINE = E06 EXCEPTIONS INCOMPATIBLE_FORMAT = 01 INVALID_ALIGNMENT = 02 INVALID_COLOUR = 03 INVALID_FORMAT = 04 INVALID_FRAME = 05 MAX_COLUMN_REACHED = 06 MAX_ROW_REACHED = 07.

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

MC65AFE1 - FORM Routines That Start With E
MC65AFD1 - Include Program for SAPMC65A with Form Routines Starting with D
MC65AFC1 - FORM Routines That Start With C
MC65AFB1 - DISST_SET_MAT
MC65AFAT - AT Points in Time
MC65AFA1 - Form Routines that Start with A

KCDLPRBA

J_5KMH_TMZ2_SEL_SCR

MACASELIST_SHL_SELECT_CASELO01

J_3GHBESTAND_SELOPT_STEU

J_1B_SIMULATE_INCO_XML_SC0800

KAPL1F04

LFVSTT08

J_1I_UPDDEPCALPOSTSEL