|
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: 1056
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 |
|
|
|
|
