IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Declaration & Initialization of HEX in PL/1


IBM Mainframe Forums -> PL/I & Assembler
Post new topic   Reply to topic
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
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

Senior Member


Joined: 08 May 2006
Posts: 1193
Location: Dublin, Ireland

PostPosted: Thu Jun 26, 2008 3:02 pm
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

Moderator Emeritus


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

PostPosted: Thu Jun 26, 2008 8:19 pm
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

Senior Member


Joined: 08 May 2006
Posts: 1193
Location: Dublin, Ireland

PostPosted: Thu Jun 26, 2008 8:33 pm
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

Moderator Emeritus


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

PostPosted: Thu Jun 26, 2008 8:51 pm
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
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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> PL/I & Assembler

 


Similar Topics
Topic Forum Replies
No new posts COBOL file declaration COBOL Programming 2
No new posts COBOL declaration for table DB2 3
No new posts Declaration of varchar in cobol COBOL Programming 6
This topic is locked: you cannot edit posts or make replies. COBOL File Declaration for RECFM=VBS ... COBOL Programming 6
No new posts LOAD card with and without column dec... DB2 1
Search our Forums:

Back to Top