PROCEDURE DIVISION

 
CALL 'CBLDCUTL' USING unique-name-1 unique-name-1 unique-name-1
 

DATA DIVISION

 
01 unique-name-1.
   02 data-name-A PIC X(8)  VALUE 'CNVCLS  '.
   02 data-name-B PIC X(5).
   02 FILLER     PIC X(3).
   02 data-name-C PIC S9(9) COMP VALUE ZERO.
   02 data-name-D PIC S9(9) COMP.
 

Terminates character code conversion to free an area in the memory for allocating a code mapping table.

• data-name-A
  Set VALUE 'CNVCLSDD ' as the request code for indicating the termination of character code conversion.
  
• data-name-C
  Set 0.
  
• data-name-D
  Specify the handle of the control table acquired by CBLDCUTL ('CNVOPN ') for converting a character code.
  

• data-name-B
  A status code returned with only five-digit number.
  

Status code	Meaning
00000	Normal termination
02501	Invalid value for the data name. The request code (data-name-A) may be invalid.
02504	Insufficient memory

Specify three unique names 1 for the USING clause in the CALL statement.

• The use of this function requires a CommuniNet code mapping table. Before using this function, create a code mapping table using the CommuniNet code mapping utility.
• You cannot use a code mapping table unless you save the table using the CommuniNet code mapping utility after the installation of CommuniNet. Before using this function, save a code mapping table using the CommuniNet code mapping utility.
• The filename of a CommuniNet code mapping table must be CMAPEX.TBL. Store the code mapping table under a Windows directory before using this function.
• The processing by the character code converter does not reflect changes made in a code mapping table by the CommuniNet code mapping utility during the use of this function.
• This function does not save error logs and UAP trace information.
• Issue the function for starting character code conversion (CBLDCUTL('CNVOPN ')) only once for code conversion (CBLDCUTL('CNVEXEC ')). Do not issue the function for starting character code conversion more than once to prevent memory shortage. If you issue two or more functions, issue one function for terminating character code conversion (CBLDCUTL('CNVCLS ')) for each of the issued functions.