RSTXCPAG SAP ABAP Report - Upload/Download of Character Set Definitions(Code Pages) in Old Format

Selection Text: UPDATE = Update/delete when uploading
Selection Text: LISTOLD = List old character set
Selection Text: LISTNEW = List new character set
Selection Text: FS_SERV = File System: Server
Selection Text: FS_GUI = File System: GUI
Selection Text: DATASET = File Name
Selection Text: CODEPAGE = Character Set Number
Title: Upload/Download of Character Set Definitions(Code Pages) in Old Format
Text Symbol: 071 = Format error: No TCP00 line
Text Symbol: 070 = File import terminated.
Text Symbol: 069 = The format of this codepage file contains errors!
Text Symbol: 068 = Incorrect line in file was ignored:
Text Symbol: 067 = Spooler informed of the change
Text Symbol: 066 = The code page is already in the new format
Text Symbol: 065 = could not be opened for reading
Text Symbol: 064 = could not be opened for writing
Text Symbol: 063 = Error, the file
Text Symbol: 062 = No entries exist in TCP07 for
Text Symbol: 061 = Current entries in TCP07:
Text Symbol: 060 = No entries exist in TCP03 for
Text Symbol: 059 = Current entries in TCP03:
Text Symbol: 058 = No entries exist in TCP02 for
Text Symbol: 057 = Current entries in TCP02:
Text Symbol: 056 = No entry exists in TCP00 for
Text Symbol: 055 = Current entry in TCP00:
Text Symbol: 054 = Character set not used up to now.
Text Symbol: 053 = whether the character set is suitable for these device types.
Text Symbol: 052 = Please check with the spool administration transaction
Text Symbol: 051 = Several device types use the character set.
Text Symbol: 072 = Format error: No lines TCP02 and TCP03 and TCP07
Text Symbol: 073 = Format error: Contains not a single character
Text Symbol: 074 = Format error: Code length 0 is not allowed
Text Symbol: 075 = Line from uploaded file:
Text Symbol: 076 = The last &1 characters of the TCP00 entry are ignored
Text Symbol: 077 = Not all characters were exported from code page &1
Text Symbol: 078 = Transport with RSCP0025
Text Symbol: 079 = Upload (File -> R/3)
Text Symbol: 080 = In older releases, many code pages contained

Text Symbol: 081 = OCR characters, print control char,
Text Symbol: 082 = outline characters, SAP symbols or SAP icons,
Text Symbol: 083 = which are often not contained in this release.
Text Symbol: 084 = Before importing in target system,
Text Symbol: 085 = view a similar code page with transaction
Text Symbol: 086 = SPAD or report RSTCPAG.
Text Symbol: 087 = Enter a character set number
Text Symbol: 090 = In older releases, a value would
Text Symbol: 091 = not be understood.
Text Symbol: 092 = Therefore, field is exported empty.
Text Symbol: 093 = Release Status of Target Sys
Text Symbol: 094 = Options
Text Symbol: 025 = Manufacturer :
Text Symbol: 024 = Character set :
Text Symbol: 023 = contains data for character set
Text Symbol: 022 = Error, the file
Text Symbol: 021 = lines from file
Text Symbol: 020 = Read:
Text Symbol: 019 = Error, file is empty:
Text Symbol: 018 = Following file will be loaded:
Text Symbol: 017 = End!
Text Symbol: 016 = lines in file
Text Symbol: 015 = Saved:
Text Symbol: 014 = failed in line
Text Symbol: 013 = Error, writing to file
Text Symbol: 012 = characters of length 5..126 bytes
Text Symbol: 011 = characters of length 2..4 bytes
Text Symbol: 010 = characters of length 1 byte
Text Symbol: 009 = has
Text Symbol: 008 = Character set
Text Symbol: 007 = does not exist
Text Symbol: 006 = Error, the character set
Text Symbol: 005 = Character Set (Code Page)
Text Symbol: 004 = Character set may not be overwritten
Text Symbol: 003 = overwrite this code page?
Text Symbol: 002 = Do you want to upload and
Text Symbol: 001 = Upload Code Page
Text Symbol: 050 = The following device types use the character set:
Text Symbol: 049 = No old entries in TCP07 for



Text Symbol: 048 = Delete old entries from TCP07:
Text Symbol: 047 = No old entries in TCP03 for
Text Symbol: 046 = Delete old entries from TCP03:
Text Symbol: 045 = No old entries in TCP02 for
Text Symbol: 044 = Delete old entries from TCP02:
Text Symbol: 043 = No old entries in TCP00 for
Text Symbol: 042 = Delete old entries from TCP00:
Text Symbol: 041 = Uploading of the character set was terminated
Text Symbol: 040 = Error, report parameters incorrectly set!
Text Symbol: 039 = Character set not saved!
Text Symbol: 038 = Please check with transaction SPAD
Text Symbol: 037 = Character set saved!
Text Symbol: 036 = Hex Codes:
Text Symbol: 035 = Length:
Text Symbol: 034 = Hex Code:
Text Symbol: 033 = Character Number:
Text Symbol: 032 = Code Page:
Text Symbol: 031 = Version :
Text Symbol: 030 = Comment :
Text Symbol: 029 = Code Page ID :
Text Symbol: 028 = Extension method:
Text Symbol: 027 = Byte indicator :
Text Symbol: 026 = Encoding :

RSPO_CODEPAGE_FLUSH
    CALL FUNCTION 'RSPO_CODEPAGE_FLUSH'
       EXPORTING
            CODEPAGE         = CODEPAGE
       EXCEPTIONS
            CALL_ERROR       = 0  "1
            OPERATION_FAILED = 0  "2
            OTHERS           = 0. "3.

POPUP_TO_CONFIRM_STEP
CALL FUNCTION 'POPUP_TO_CONFIRM_STEP'
  EXPORTING TEXTLINE1 = TEXT-002
            TEXTLINE2 = TEXT-003
            TITEL     = TEXT-001
  IMPORTING ANSWER    = ANSWER.