I personally would be satisfied for the runtime logic to just raise an LE error 
condition and dump for any sort of conversion-stopping error.  So long as 
normal “character not defined in the requested EBCDIC CCSID so make it SUB in 
the output” issues are just done without asking, I am perfectly willing to scan 
the result for SUB characters myself and use application-dependent error logic 
to handle or ignore the result as needed.

Peter

From: IBM Mainframe Discussion List <[email protected]> On Behalf Of 
Paul Gilmartin
Sent: Friday, January 2, 2026 4:06 PM
To: [email protected]
Subject: Re: Please vote for COBOL "idea" for reverse character translation


On Fri, 2 Jan 2026 18:56:13 +0000, Farley, Peter wrote:



>Currently Enterprise COBOL allows PIC X alphanumeric EBCDIC group and 
>elementary items to MOVE to UTF-8 (PIC U) and NATIONAL (PIC N) group and 
>elementary items with automatic character set translation, but the reverse 
>MOVE is not allowed. �There is no technical reason why the reverse MOVE should 
>not be allowed, since the character set translation logic is already in place 
>for a PIC X MOVE into PIC U and PIC N.

>    ...

I suspect this uses internally something similar to:

<https://urldefense.com/v3/__https://www.ibm.com/docs/en/zos/3.2.0?topic=functions-iconv-code-conversion__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!NzuEevsmRyfuCCUzvyhYE7tHfiOcQAU6aIW6Sw4kxtuwlt1FCMF4cbrEs6SrR5uROHu8jnsphCcNtnpe7nmR-wafwLmVgRQltatQWt_q$<https://urldefense.com/v3/__https:/www.ibm.com/docs/en/zos/3.2.0?topic=functions-iconv-code-conversion__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!NzuEevsmRyfuCCUzvyhYE7tHfiOcQAU6aIW6Sw4kxtuwlt1FCMF4cbrEs6SrR5uROHu8jnsphCcNtnpe7nmR-wafwLmVgRQltatQWt_q$>>



How should COBOL handle/report all the errors described there,

some of which occur only in the "reverse" (from U)  direction?



>I have a bit more detail on the subject in the "idea" summary, please read 
>those details at the "ideas" page and vote for it.

>

>https://urldefense.com/v3/__https://ideas.ibm.com/ideas/COBOLVUE-I-427__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!NzuEevsmRyfuCCUzvyhYE7tHfiOcQAU6aIW6Sw4kxtuwlt1FCMF4cbrEs6SrR5uROHu8jnsphCcNtnpe7nmR-wafwLmVgRQltfu4m5K4$<https://urldefense.com/v3/__https:/ideas.ibm.com/ideas/COBOLVUE-I-427__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!NzuEevsmRyfuCCUzvyhYE7tHfiOcQAU6aIW6Sw4kxtuwlt1FCMF4cbrEs6SrR5uROHu8jnsphCcNtnpe7nmR-wafwLmVgRQltfu4m5K4$>

>

>TIA for your votes.



--

This message and any attachments are intended only for the use of the addressee 
and may contain information that is privileged and confidential. If the reader 
of the message is not the intended recipient or an authorized representative of 
the intended recipient, you are hereby notified that any dissemination of this 
communication is strictly prohibited. If you have received this communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.


----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to