Hi Scot.
It appears that EZACIE2A and EZACIA2E are aliases for EZACICTR.A, which is
described in
http://www-01.ibm.com/support/docview.wss?uid=swg21256665
This isn't really a COBOL answer, but it seems to me you could replace the
table names in EZACICTR from "US", "CANADIAN", "DUTCH"... to the codepage names
supplied in the comments:
TRFIRST DS 0A
DC CL8'AUSGER',A(AUSGER) Austrian/German CECP 273
DC CL8'BELGIAN',A(BELGIAN) Belgian (New) CECP 500
DC CL8'CANADIAN',A(CANADIAN) Canadian Bilingual CECP 037
...
DC CL8'TELNETSE',A(TELNETSE)
DC CL8'UK',A(UK) English (UK) CECP 285
DC CL8'US',A(US) English (US) CECP 037
TREND EQU *
This doesn't help identify the codepage, but when you have it, it would allow
you to pass the codepage number instead of the table name.
It also appears that EZACICTR allows you to pass a complete table instead of
the table name, if that would somehow be easier:
* ***************************************************************
* * MULTIPLE mode calls
* ***************************************************************
* MOVE 'US' to TABLE-NAME.
* CALL 'EZACIE2A' USING OUT-BUFFER LENGTH TABLE-NAME
* RETURNING RET-CODE.
* CALL 'EZACIA2E' USING OUT-BUFFER LENGTH TABLE-NAME
* RETURNING RET-CODE.
*
* ***************************************************************
* * Optional call valid for either mode
* ***************************************************************
* CALL 'EZACICTR' USING OUT-BUFFER LENGTH TRANSLATE-TABLE
* RETURNING RET-CODE.
hth,
Wendell Lovewell
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
