Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Overriding the default Code page

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & Assembler
View previous topic :: :: View next topic  
Author Message
rikdeb

New User


Joined: 19 Jan 2009
Posts: 63
Location: hyderabad

PostPosted: Fri Aug 09, 2013 12:12 am    Post subject: Overriding the default Code page
Reply with quote

Hi Everyone..

In cobol we have the functions like NATIONAL-OF, DISPLAY-OF which can be used to override the character code page settings. Can this be done through PL1?. My requirement is to override the code page 277 with default code page 037, so that some characters like Å, ø take the hexcode as defined in US page versions.
Back to top
View user's profile Send private message

dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Fri Aug 09, 2013 1:35 am    Post subject:
Reply with quote

Hello,

Yes, code page(s) can be overridden/changed.

You should talk with your system support people to make sure of what is being done and that your implementation is acceptable for the environment where this will be run.
Back to top
View user's profile Send private message
prino

Senior Member


Joined: 07 Feb 2009
Posts: 1120
Location: Oostende, Belgium

PostPosted: Fri Aug 09, 2013 3:56 pm    Post subject:
Reply with quote

Code:
*process codepage(..);

The CODEPAGE option specifies the code page used for:
  • conversions between CHARACTER and WIDECHAR
  • the default code page used by the PLISAX built-in subroutines
The supported CCSID's are:
01047, 01140, 01141, 01142, 01143, 01144, 01025, 01145, 01146, 01147, 01148, 01149, 00037, 01155, 00273, 00277, 00278, 00280, 00284, 00285, 00297, 00500, 00871, 00819, 00813, 00920

The default CCSID 1140 is an equivalent of CCSID 37 (EBCDIC Latin-1, USA) but includes the Euro symbol.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & Assembler All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Will this code extract 1 byte from fi... pkmurali CLIST & REXX 8 Sat Nov 10, 2018 11:13 pm
No new posts SQL CODE 206 Ashishpanpaliya DB2 12 Wed Oct 10, 2018 9:20 pm
No new posts S0C4-X'11' issue - page translation e... ashek15 JCL & VSAM 8 Wed Aug 15, 2018 4:23 am
No new posts Invoke WebService failing with respon... Ashishpanpaliya CICS 3 Thu Aug 09, 2018 3:14 pm
This topic is locked: you cannot edit posts or make replies. IO-PCB status code AL srinianusuya IMS DB/DC 1 Mon Aug 06, 2018 10:26 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us