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 lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to