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
 
Declaration & Initialization of HEX in PL/1

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

New User


Joined: 25 Jun 2008
Posts: 13
Location: Bangalooru

PostPosted: Thu Jun 26, 2008 2:24 pm    Post subject: Declaration & Initialization of HEX in PL/1
Reply with quote

Hi,

How to declare & initialize a hexadecimal value in pl/1?

For example: In some language:-
DEFINE ERRHEX 5 H VALUE ='1002' ;

what will be the equivalent of above statement in PL/1?

Thanks in adv...
Back to top
View user's profile Send private message

Garry Carroll

Active Member


Joined: 08 May 2006
Posts: 998
Location: Dublin, Ireland / Edinburgh, Scotland

PostPosted: Thu Jun 26, 2008 3:02 pm    Post subject:
Reply with quote

You can code:

Code:
 DCL    HEX_FIELD    CHAR(1) INIT('05'X);


Garry
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: Thu Jun 26, 2008 8:19 pm    Post subject:
Reply with quote

Hello,

I'm may be misunderstanding something, but how might "VALUE ='1002'" = "INIT('05'X)"?
Back to top
View user's profile Send private message
Garry Carroll

Active Member


Joined: 08 May 2006
Posts: 998
Location: Dublin, Ireland / Edinburgh, Scotland

PostPosted: Thu Jun 26, 2008 8:33 pm    Post subject:
Reply with quote

Sorry,

Read the 5 in the post incorrectly.

Code:
DCL  HEX_FIELD  CHAR(2) INIT('1002'X);

or, for array,
Code:
DCL HEX_FIELD(5) CHAR(2) INIT((5)'1002'X);

 

Garry.
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: Thu Jun 26, 2008 8:51 pm    Post subject: Reply to: Declaration & Initialization of HEX in PL/1
Reply with quote

Quote:
Sorry,
Not a problem icon_smile.gif

Just checking to see what i might have missed. . .

Thanx for the clarification icon_wink.gif

d
Back to top
View user's profile Send private message
Ashokn

New User


Joined: 25 Jun 2008
Posts: 13
Location: Bangalooru

PostPosted: Fri Jun 27, 2008 9:40 am    Post subject: Declaration & Initialization of HEX in PL/1
Reply with quote

Thanks for your answers.It cleard my long awaiting doubt .
==============================================
Garry Carroll wrote:
Sorry,

Read the 5 in the post incorrectly.

Code:
DCL  HEX_FIELD  CHAR(2) INIT('1002'X);

or, for array,
Code:
DCL HEX_FIELD(5) CHAR(2) INIT((5)'1002'X);

 

Garry.
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 Declaration of varchar in cobol s.saranya srinivasan COBOL Programming 6 Fri Sep 25, 2015 11:43 am
No new posts COBOL File Declaration for RECFM=VBS ... thinkmsk COBOL Programming 4 Fri Apr 03, 2015 3:31 pm
No new posts LOAD card with and without column dec... dilpreet DB2 1 Tue Aug 19, 2014 2:24 am
No new posts VSAM File Declaration for PD fields selvaraja CA Products 2 Wed Nov 27, 2013 5:58 am
No new posts % free space issue of the Storage Gro... Pete Wilson JCL & VSAM 6 Fri Feb 15, 2013 6:34 pm

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