View previous topic :: View next topic
|
Author |
Message |
raghavendra_p_sarvade
New User
Joined: 17 Oct 2006 Posts: 32
|
|
|
|
Can someone help me out on how to use 88 level flags in PL/1? |
|
Back to top |
|
|
Phrzby Phil
Senior Member
Joined: 31 Oct 2006 Posts: 1042 Location: Richmond, Virginia
|
|
|
|
I've not done PL/I for over ten years, but I do not recall an analog to COBOL's 88 level. |
|
Back to top |
|
|
Bitneuker
CICS Moderator
Joined: 07 Nov 2005 Posts: 1104 Location: The Netherlands at Hole 19
|
|
|
|
In PL/1 we use the select/when statement.
thing = 1;
select thing;
when (0,1,2)
..........action when thing = 1 or 2 or 3
when (4,5,6)
..........action when thing = 4 or 5 or 6
otherwise
..........action when other value; mostly wrong content |
|
Back to top |
|
|
ashimer
Active Member
Joined: 13 Feb 2004 Posts: 551 Location: Bangalore
|
|
|
|
you can declare flags as follws
dcl eof-file bit (1) init('0') B
as in cobol u cant use set stmt over here ..... |
|
Back to top |
|
|
|