ABAP--关于Unicode的常见错误和解决方法

Unicode

Unicode is the international character encoding standard that allows the systems to handle text data from multiple languages simultaneously and consistently. In fact, more than 5,000 SAP customer installations are already purely Unicode-based, and the relative share of pure Unicode installations is growing rapidly. Many companies are adopting Web services to gain benefits such as greater openness that extends processes to customers and business partners.
Service-oriented architectures (SOAs), including SAP's Enterprise Services Architecture,rely on a set of standards that enable global interoperability across systems, programming languages, and application services.
One of these required standards is Unicode.Much of the enterprise software out there is already completely Unicode-ready.Everything in the Java space and everything based on XML is Unicode by definition.New system installations will have to be Unicode only in future releases and new SAP products will only be offered in Unicode.In fact, SAP NetWeaver Portal and SAP NetWeaver Exchange Infrastructure (XI) are already Unicode-only.Each character has a unique number („Unicode code point")Notation U+nnnn (where nnnn are hexadecimal digits)See http://www.unicode.org for complete code charts

Note:
Unicode flag ( "Unicode checks active") is used as a Program Attribute to control the Unicode enabling procedure

A program without Unicode flag is NOT executable on a Unicode system.　Transaction UCCHECK can be used as tool to analyze customer coding for unicode errors.

Common Unicode Errors and Their Corrections:

1.Error regarding OPEN DATASET:
Before Unicode:
OPEN DATASET P_UNIX FOR OUTPUT IN TEXT MODE.
Resolution:
OPEN DATASET P_UNIX FOR OUTPUT IN TEXT MODE ENCODING NON-UNICODE.
OR
OPEN DATASET P_UNIX FOR OUTPUT IN TEXT MODE ENCODING DEFAULT.
OR
OPEN DATASET P_UNIX FOR OUTPUT IN LEGACY TEXT MODE.
The choice of resolution depends on the kind of data the file contains.The addition ENCODING defines how the characters are represented in the text file.When writing to a text file, the content of a data object is converted to the　representation entered after ENCODING, and transferred to the file.　The same rule is followed for reading files using the OPEN DATASET command.

Before Unicode:
OPEN DATASET P_UNIX FOR OUTPUT IN BINARY MODE.
Resolution:
OPEN DATASET P_UNIX FOR OUTPUT IN LEGACY BINARY MODE.
Note: Some time it is possible that mode has not been specified in old system, then by default system will take it as BINARY mode, We should add LEGACY BINARY mode for such syntax.

2. Error regarding WS_UPLOAD/WS_DOWNLOAD.
Before Unicode:
Parameters: filename (128) lower case.
CALL FUNCTION 'WS_UPLOAD'
EXPORTING
FILENAME = filename
FILETYPE = 'DAT'
TABLES
DATA_TAB = I_INREC
EXCEPTIONS
FILE_OPEN_ERROR = 1
FILE_READ_ERROR = 2
CONVERSION_ERROR = 3
INVALID_TABLE_WIDTH = 4
INVALID_TYPE = 5
NO_BATCH = 6
UNKNOWN_ERROR = 7.

Resolution:
Data:w_filename TYPE STRING.
Field-symbols: type any.
Assign filename to .
Move to w_filename.

CALL FUNCTION 'GUI_UPLOAD'
EXPORTING
FILENAME = w_filename
FILETYPE = 'DAT'
TABLES
DATA_TAB = I_INREC
EXCEPTIONS
FILE_OPEN_ERROR = 1
FILE_READ_ERROR = 2
NO_BATCH = 3
GUI_REFUSE_FILETRANSFER= 4
INVALID_TYPE = 5
NO_AUTHORITY = 6
UNKNOWN_ERROR = 7
BAD_DATA_FORMAT = 8
HEADER_NOT_ALLOWED = 9
SEPARATOR_NOT_ALLOWED = 10
HEADER_TOO_LONG = 11
UNKNOWN_DP_ERROR = 12
ACCESS_DENIED = 13
DP_OUT_OF_MEMORY = 14
DISK_FULL = 15
DP_TIMEOUT = 16
OTHERS = 17.
The Function Modules WS_UPLOAD / WS_DOWNLOAD is obsolete and hence need to be replaced by their new counterparts' viz. GUI_UPLOAD / GUI_DOWNLOAD.

3.Error regarding UPLOAD / DOWNLOAD:
Before Unicode:
DATA: V_FILENAME TYPE STRING value 'c: \test.txt'.
CALL FUNCTION 'DOWNLOAD'
EXPORTING
FILENAME = 'c: \test.txt'
FILETYPE = 'ASC'
TABLES
DATA_TAB = CO_TAB
EXCEPTIONS
INVALID_FILESIZE = 01
INVALID_TABLE_WIDTH = 02
INVALID_TYPE = 03
NO_BATCH = 04
UNKNOWN_ERROR = 05.

Resolution:
data: filename TYPE string.
data: ftab type filetable.
data: wa_ftab TYPE LINE OF filetable.
data: r_code type sy-subrc.
move 'c: \test.txt' to filename .
If filename CA '.'.
Else.
CONCATENATE filename '*' into filename.
endif.
CALL METHOD CL_GUI_FRONTEND_SERVICES=>FILE_OPEN_DIALOG
EXPORTING
DEFAULT_FILENAME = filename
CHANGING
FILE_TABLE = ftab
RC = r_code.
IF NOT ftab[] IS INITIAL.
read table ftab into wa_ftab index 1.
move wa_ftab-filename to filename.
CALL FUNCTION 'GUI_DOWNLOAD'
EXPORTING
FILENAME = filename
FILETYPE = 'ASC'
TABLES
DATA_TAB = CO_TAB
EXCEPTIONS
FILE_WRITE_ERROR = 1
NO_BATCH = 2
GUI_REFUSE_FILETRANSFER = 3
INVALID_TYPE = 4
NO_AUTHORITY = 5
UNKNOWN_ERROR = 6
HEADER_NOT_ALLOWED = 7
SEPARATOR_NOT_ALLOWED = 8
FILESIZE_NOT_ALLOWED = 9
HEADER_TOO_LONG = 10
DP_ERROR_CREATE = 11
DP_ERROR_SEND = 12
DP_ERROR_WRITE = 13
UNKNOWN_DP_ERROR = 14
ACCESS_DENIED = 15
DP_OUT_OF_MEMORY = 16
DISK_FULL = 17
DP_TIMEOUT = 18
FILE_NOT_FOUND = 19
DATAPROVIDER_EXCEPTION = 20
CONTROL_FLUSH_ERROR = 21
OTHERS = 22.
Endif.

The Function Modules UPLOAD / DOWNLOAD is obsolete and hence need to be replaced by their new replacements GUI_UPLOAD / GUI_DOWNLOAD. Along with their counterparts, we need to add the Function Module of F4_Filename to read the filename at runtime.

4.Error regarding WS_EXECUTE
Before Unicode:
CALL FUNCTION 'WS_EXECUTE'
EXPORTING
DOCUMENT = 'SAP SERVICE MARKETPLACE'
EXCEPTIONS
FRONTEND_ERROR = 1
NO_BATCH = 2
PROG_NOT_FOUND = 3
ILLEGAL_OPTION = 4
OTHERS = 5.
Resolution:
CALL METHOD CL_GUI_FRONTEND_SERVICES=>EXECUTE
EXPORTING
DOCUMENT = 'https: //websmp206.sap-ag.de/'
DEFAULT_DIRECTORY = 'SAP SERVICE MARKETPLACE'
EXCEPTIONS
CNTL_ERROR = 1
ERROR_NO_GUI = 2
BAD_PARAMETER = 3
FILE_NOT_FOUND = 4
PATH_NOT_FOUND = 5
FILE_EXTENSION_UNKNOWN = 6
ERROR_EXECUTE_FAILED = 7
SYNCHRONOUS_FAILED = 8
NOT_SUPPORTED_BY_GUI = 9
Others = 10.

5. Converting the hex characters to strings.
CONSTANTS: c_hex (2) TYPE x VALUE '000A'.
DATA: LV_TMP TYPE C.
TRY.
CALL METHOD CL_ABAP_CONV_IN_CE=>UCCP
EXPORTING
UCCP = c_hex
RECEIVING
CHAR = LV_TMP .
CATCH CX_SY_CONVERSION_CODEPAGE.
CATCH CX_PARAMETER_INVALID_TYPE.
CATCH CX_SY_CODEPAGE_CONVERTER_INIT.
ENDTRY.
Note that the hex variable should be of output length 2 for the conversion to take place.

6. Moving contents from one structure to another
Before Unicode:
SRTFDLOM = XSRTFDLOM.
Resolution:
CLASS CL_ABAP_CONTAINER_UTILITIES DEFINITION LOAD.
DATA: LV_TAB(1000) TYPE C.
CALL METHOD CL_ABAP_CONTAINER_UTILITIES=>FILL_CONTAINER_C
EXPORTING
IM_VALUE = XSRTFDLOM
IMPORTING
EX_CONTAINER = LV_TAB

CALL METHOD CL_ABAP_CONTAINER_UTILITIES=>READ_CONTAINER_C
EXPORTING
IM_CONTAINER = LV_TAB
IMPORTING
EX_VALUE = SRTFDLOM.

OR
Before Unicode:
wa_test = upload.

Resolution:
data: cbin TYPE REF TO cl_abap_conv_out_ce,
buffer TYPE xstring,
conv TYPE REF TO cl_abap_conv_in_ce,
view1 TYPE REF TO cl_abap_view_offlen,
view2 TYPE REF TO cl_abap_view_offlen,
view TYPE REF TO cl_abap_view_offlen.
cbin = cl_abap_conv_out_ce=>create( ).
view1 = cl_abap_view_offlen=>create_legacy_view( upload ).
conv = cl_abap_conv_in_ce=>create( ).
iew2 = cl_abap_view_offlen=>create_legacy_view( wa_test ).
Try .
cbin->convert_struc( EXPORTING data = upload view = view1
IMPORTING buffer = buffer).
conv->convert_struc( EXPORTING input = buffer view = view2
IMPORTING data = wa_test ).
CATCH CX_SY_CODEPAGE_CONVERTER_INIT .
CATCH CX_SY_CONVERSION_CODEPAGE .
CATCH CX_PARAMETER_INVALID_TYPE .
CATCH CX_PARAMETER_INVALID_RANGE .
ENDTRY .
Note that in the above resolution FILL_CONTAINER_C can be used to convert contents of a structure to string/character array and READ_CONTAINER_C can be used to move the contents of a string to a structure. Also the convert class methods can be used in a similar fashion by creating shown below:
Before Unicode: (from structure to string)
string = wa_structure.
Resolution:
data: cbout TYPE REF TO cl_abap_conv_out_ce,
convt TYPE REF TO cl_abap_conv_in_ce,
buffer TYPE xstring,
view1 TYPE REF TO cl_abap_view_offlen,
view2 TYPE REF TO cl_abap_view_offlen,
view TYPE REF TO cl_abap_view_offlen.
data: begin of t_out,
output(1000) type c,
end of t_out .
cbout = cl_abap_conv_out_ce=>create( ).
view1 = cl_abap_view_offlen=>create_legacy_view( wa_structure ).
convt = cl_abap_conv_in_ce=>create( ).
view2 = cl_abap_view_offlen=>create_legacy_view( t_out ).
TRY.
cbout->convert_struc( EXPORTING data= wa_structure view = view1
IMPORTING buffer = buffer).
convt->convert_struc( EXPORTING input = buffer view = view2
IMPORTING data = t_out ).
CATCH CX_SY_CODEPAGE_CONVERTER_INIT .
CATCH CX_SY_CONVERSION_CODEPAGE .
CATCH CX_PARAMETER_INVALID_TYPE .
CATCH CX_PARAMETER_INVALID_RANGE .
ENDTRY.
string = t_out-output .
Before Unicode: (from string to structure)
wa_structure = string.
Resolution:
data : cbout TYPE REF TO cl_abap_conv_out_ce,
convt TYPE REF TO cl_abap_conv_in_ce,
buffer TYPE xstring,
view1 TYPE REF TO cl_abap_view_offlen,
view2 TYPE REF TO cl_abap_view_offlen,
view TYPE REF TO cl_abap_view_offlen .
data: begin of t_out,
output(1000) type c,
end of t_out .
t_out-output = string.
cbout = cl_abap_conv_out_ce=>create( ).
view1 = cl_abap_view_offlen=>create_legacy_view( t_out ).
convt = cl_abap_conv_in_ce=>create( ).
view2 = cl_abap_view_offlen=>create_legacy_view( wa_structure ).
TRY.
cbout->convert_struc( EXPORTING data = t_out view = view1
IMPORTING buffer = buffer ).
convt->convert_struc( EXPORTING input = buffer view = view2
IMPORTING data = wa_structure ).

CATCH CX_SY_CODEPAGE_CONVERTER_INIT .
CATCH CX_SY_CONVERSION_CODEPAGE .
CATCH CX_PARAMETER_INVALID_TYPE .
CATCH CX_PARAMETER_INVALID_RANGE .
ENDTRY.

7. Split command using TAB character Error:
Before Unicode:
data: separator type x value '09'.
data: str type string.
Split str at separator.
Resolution:
Split str at CL_ABAP_CHAR_UTILITIES=>HORIZONTAL_TAB.
Note that this works only in case of hex value 0009.


8. Error regarding the FORM AUTHORITY_BEGIN (RSAQEXCE)
Before Unicode:
PERFORM AUTHORITY_BEGIN (RSAQEXCE).
PERFORM AUTHORITY (RSAQEXCE) USING 'PLKO'.
PERFORM AUTHORITY (RSAQEXCE) USING 'PLAS'.
PERFORM AUTHORITY(RSAQEXCE) USING 'PLWP'.
PERFORM AUTHORITY(RSAQEXCE) USING 'PLPH'.
PERFORM AUTHORITY(RSAQEXCE) USING 'PLPO'.
PERFORM AUTHORITY_END (RSAQEXCE).
Resolution:
PERFORM AUTHORITY_BEGIN(RSAQEXCE) using'CL_QUERY_TAB_ACCESS_AUTHORITY'.
PERFORM AUTHORITY(RSAQEXCE) USING 'PLKO' 'CL_QUERY_TAB_ACCESS_AUTHORITY'.
PERFORM AUTHORITY(RSAQEXCE) USING 'PLAS' 'CL_QUERY_TAB_ACCESS_AUTHORITY'.
PERFORM AUTHORITY(RSAQEXCE) USING 'PLWP''CL_QUERY_TAB_ACCESS_AUTHORITY'.
PERFORM AUTHORITY(RSAQEXCE) USING 'PLPH''CL_QUERY_TAB_ACCESS_AUTHORITY'.
PERFORM AUTHORITY(RSAQEXCE) USING 'PLPO''CL_QUERY_TAB_ACCESS_AUTHORITY'.
PERFORM AUTHORITY_END(RSAQEXCE) using'CL_QUERY_TAB_ACCESS_AUTHORITY'.

This is because the FORM AUTHORITY_BEGIN (RSAQEXCE) has 2 parameters from ECC 6.0 onwards.

9. A Cancel option required in GUI_UPLOAD/GUI_DOWNLOAD Function Module:
Before Unicode:
CALL FUNCTION 'UPLOAD'
EXPORTING
FILENAME = d:\Z400.txt
FILETYPE = 'ASC'
IMPORTING
FILESIZE = l_filesize
CANCEL = cancel
ACT_FILENAME = l_filename
ACT_FILETYPE = l_filetype
TABLES
DATA_TAB = itab
EXCEPTIONS
CONVERSION_ERROR = 1
INVALID_TABLE_WIDTH = 2
INVALID_TYPE = 3
NO_BATCH = 4
UNKNOWN_ERROR = 5
GUI_REFUSE_FILETRANSFER = 6
OTHERS = 7.
Resolution:
CLASS cl_gui_frontend_services DEFINITION LOAD.
DATA: v_title TYPE string,
v_fullpath TYPE string,
filename TYPE string,
v_path TYPE string,
v_user_action TYPE i,
v_encoding TYPE abap_encoding.

MOVE: sy-repid TO v_title.
CALL METHOD cl_gui_frontend_services=>file_save_dialog
EXPORTING
window_title = v_title
with_encoding = 'X'
default_file_name = filename
CHANGING
filename = filename
path = v_path
fullpath = v_fullpath
user_action = v_user_action
file_encoding = v_encoding
EXCEPTIONS
cntl_error = 1
error_no_gui = 2
not_supported_by_gui = 3
OTHERS = 4.

IF sy-subrc <> 0.
EXIT.
ENDIF.

IF v_user_action <> cl_gui_frontend_services=>action_ok.
EXIT.
ENDIF.

CALL FUNCTION 'GUI_DOWNLOAD'
EXPORTING
filename = filename
TABLES
data_tab = itab
EXCEPTIONS
file_write_error = 1
no_batch = 2
gui_refuse_filetransfer = 3
invalid_type = 4
no_authority = 5
unknown_error = 6
header_not_allowed = 7
separator_not_allowed = 8
filesize_not_allowed = 9
header_too_long = 10
dp_error_create = 11
dp_error_send = 12
dp_error_write = 13
unknown_dp_error = 14
access_denied = 15
dp_out_of_memory = 16
disk_full = 17
dp_timeout = 18
file_not_found = 19
dataprovider_exception = 20
control_flush_error = 21
OTHERS = 22.

10. Error regarding Do...Varying clause.
Before Unicode:
DATA: BEGIN OF I_0041_DATE OCCURS 0,
DAR LIKE PA0041-DAR01,
DAT LIKE PA0041-DAT01,
END OF I_0041_DATE.
DO 12 TIMES VARYING I_0041_DATE FROM P0041-DAR01 NEXT P0041-DAR02.
Resolution:
DATA: BEGIN OF I_0041_DATE OCCURS 0,
DAR LIKE PA0041-DAR01,
DAT LIKE PA0041-DAT01,
END OF I_0041_DATE.
DO 10 TIMES VARYING I_0041_DATE-dar FROM P0041-DAR01 NEXT P0041-DAR02VARYING I_0041_DATE-dat FROM P0041-DAt01 NEXT P0041-DAt02.

Before Unicode:

DO VARYING ZW_FIELD FROM ZW_FIELD_LINE-F01+1 NEXT ZW_FIELD_LINE-F01+1(1).

Resolution:

DO VARYING ZW_FIELD FROM ZW_FIELD_LINE-F01+1 NEXT ZW_FIELD_LINE-F02+1(1) RANGE ZW_FIELD_LINE-F01.

11. Error regarding the Describe commands
Before Unicode:
Describe field text length len.
Resolution:
Describe field text length len in Character Mode.


12. Error regarding the Function Module POPUP_WITH_TABLE_DISPLAY.
Before Unicode:
POPUP_WITH_TABLE_DISPLAY

Resolution:
POPUP_WITH_TABLE_DISPLAY_OK

13. Error regarding hexadecimal variable comparison
Before Unicode:
data: xf1 type x,
xf2 type x,
xf3 type x.
Concatenate xf1 xf2 to xf3.
If xf1 CS xf3...
Resolution:
data: xf1 type x,
xf2 type x,
xf3 type x.
Concatenate xf1 xf2 to xf3 in byte mode.
If xf1 BYTE-CS xf3...

14. Problems regarding Assignment between Structures

Conversion using includes with group names

Before Unicode:
TYPES: BEGIN OF T_STRUC,
F1 TYPE C,
F2 TYPE C,
F3 TYPE I,
F4 TYPE P,
END OF T_STRUC.

DATA: BEGIN OF STRUC1.
INCLUDE TYPE T_STRUC.
DATA: F5 TYPE X.
DATA: END OF STRUC1.
DATA: BEGIN OF STRUC2.
INCLUDE TYPE T_STRUC.

DATA: F6 TYPE P.
DATA: END OF STRUC2.
STRUC1 = STRUC2. (Unicode error)

In this case, it was assumed that only the content of the includes is to be assigned - that is the components F1 to F4. Until now, it was tolerated that the component F5 is overwritten with a meaningless value.

Resolution:

TYPES: BEGIN OF T_STRUC,
F1 TYPE C,
F2 TYPE C,
F3 TYPE I,
F4 TYPE P,
END OF T_STRUC.

DATA: BEGIN OF STRUC1.
INCLUDE TYPE T_STRUC AS PART1.
DATA: F5 TYPE X.
DATA: END OF STRUC1.
DATA: BEGIN OF STRUC2.
INCLUDE TYPE T_STRUC AS PART1.
DATA: F6 TYPE P.
DATA: END OF STRUC2.

STRUC1-PART1 = STRUC2-PART1.


Conversion Using Offset-Based or Length-Based Accesses
Before Unicode:

DATA: BEGIN OF STRUC1,
F1(10) TYPE C,
F2(20) TYPE C,
F3 TYPE I,
F4 TYPE P,
END OF STRUC1,

BEGIN OF STRUC2,
C1(10) TYPE C,
C2(20) TYPE C,
C3 TYPE X,
C4 TYPE F,
END OF STRUC2.

STRUC1 = STRUC2 (Unicode Error)

In this example, it is assumed that only the content of the first two components C1 and C2 is to be passed to F1 and F2, because the following components F3 and F4 are overwritten by meaningless values.

Resolution

DATA: BEGIN OF STRUC1,
F1 (10) TYPE C,
F2 (20) TYPE C,
F3 TYPE I,
F4 TYPE P,
END OF STRUC1,

BEGIN OF STRUC2,
C1 (10) TYPE C,
C2 (20) TYPE C,
C3 TYPE X,
C4 TYPE F,
END OF STRUC2
STRUC1 (30) = STRUC2 (30).

Since the initial part of the structures relevant for the assignment is purely character-type, the operands of the assignment can be selected using offset-based or length-based accesses. Assignment between Structure and Single Field of Type N
Before Unicode
DATA: BEGIN OF STRUC,
NUMBER(20) TYPE N,
F2 TYPE P,
END OF STRUC,
NUMBER(20) TYPE N.
NUMBER = STRUC. Unicode error

Assignments between a non-character-type structure and a single field of type N are no longer allowed in Unicode programs
Resolution:

DATA: BEGIN OF STRUC,
NUMBER(20) TYPE N,
F2 TYPE P,
END OF STRUC,
NUMBER(20) TYPE N.
NUMBER = STRUC-NUMBER.
Since the first component of the structure is to be assigned to the single field, the code segment can be converted easily by replacing the assignment of the whole structure with an assignment of the first structure component.Assignment and Single Field of Type between Structure D
Before Unicode
DATA: BEGIN OF STRUC,
YEAR (4) TYPE N,
MONTH(2) TYPE N,
DAY(2) TYPE N,
F4 TYPE P,
END OF STRUC,
DATE TYPE D.
DATE = STRUC. (Unicode error)

Assignments between a non-character-type structure and a single field of type D are no longer allowed in Unicode programs.
Resolution:

DATA: BEGIN OF STRUC,
YEAR(4) TYPE N,
MONTH(2) TYPE N,
DAY(2) TYPE N,
F4 TYPE P,
END OF STRUC,
DATE TYPE D.

DATE = STRUC (8).

An offset-based or length-based access to the character-type initial part of the structure enables you to convert the problematic code segment to a Unicode-enabled code.

Source site:https://wiki.sdn.sap.com/wiki/display/Snippets/Common+unicode+errors+and+solutions