Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum 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: 19254
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: 1161
Location: Vilnius, Lithuania

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 COBOL -DB2 SQL code to have GROUP BY ... vinu78 DB2 2 Wed Oct 23, 2019 7:00 pm
No new posts Parsing single liner XML into readabl... rohanthengal COBOL Programming 1 Fri Oct 18, 2019 8:41 pm
No new posts proc step return code to override in ... Aaryaa JCL & VSAM 3 Tue Aug 20, 2019 4:32 pm
No new posts Difference between GE and GB return c... Poha Eater IMS DB/DC 8 Fri Jul 12, 2019 12:59 pm
No new posts S0C4 Reason Code 10 cz016m COBOL Programming 1 Thu May 02, 2019 7:13 am

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