Hi
Works for me, what about the other stuff?
Seems oclass.2 is "V" here.
Are you sure the stem is correct before the loop ?
On 26.02.2013 12:57, Sebastian Welton wrote:
I have a need to get how many lines are on the output queue for a certain class
and couldn't find a JES2 or other command to provide me with this information
so looked at other avenues. One way is to use SDSF with REXX and the ISFTLINE
variable will give me this information:
OUTPUT CLS V ALL FORMS LINES 1,127
This is just what I require but maybe I want to see more classes so the code
looks like this to get this information:
oclass.1 = 'V'
oclass.2 = 'X'
oclass.0 = 2
...(other stuff required for SDSF REXX) ...
Do i = 1 To oclass.0
output_class = oclass.i
cmd = 'O'!!output_class
Address sdsf 'ISFEXEC' cmd
Parse Var isftline . . . . . . . lines .
Say 'Output class' output_class 'has' lines ,
'lines of output on the spool.'
End
But this doesn't work as when it goes through the second iteration, the stem
oclass. does not change so it always stays as 'V':
first iteration -
Do i = 1 To oclass.0
"1"
"2"
output_class = oclass.i
"OCLASS.1"
"V"
cmd = 'O'!!output_class
"O"
"V"
"OV"
Address sdsf 'ISFEXEC' cmd
"ISFEXEC"
"OV"
"ISFEXEC OV"
second iteration -
Do i = 1 To oclass.0
output_class = oclass.i
"OCLASS.2"
"V"
cmd = 'O'!!output_class
"O"
"V"
"OV"
Address sdsf 'ISFEXEC' cmd
"ISFEXEC"
"OV"
"ISFEXEC OV"
Is there something special needs to be done with SDSF/REXX as I couldn't see anything in the manuals (only for special variables) or am I missing something?
Many thanks
Sebastian.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
