You might have blanks lines in input. Stem . It stops the writing of the stem
to dataset. Try changing null lines to blanks.
ITschak
נשלח מה-iPad שלי
ב-31 בדצמ׳ 2015, בשעה 00:25, Ze'ev Atlas
<0000004b34e7c98a-dmarc-requ...@listserv.ua.edu> כתב/ה:
> Hi AllI have a Rexx program and here is the relevant snippet:
> THEMEMBER = THEPDS || "(" || MEMBER || ")" /*say themember */
> "alloc shr file(input) dataset(" THEMEMBER ")" "execio
> * diskr input (stem input. finis)" IF RC \= 0 THEN
> call DIE 'READ MEMBER failed' RC say member
> input.0 "LINES READ" "free file(input)"
> "EXECIO" input.0 "DISKW XXOUT (STEM INPUT." IF RC \= 0 THEN
> call DIE 'WRITE MEMBER failed' RC
> Originally, I had "EXECIO * DISKW XXOUT (STEM INPUT."
> but that would work only for members that had statistics (i.e. have been
> updated). When I changed the '*' to input.0 it works fine. Is that a normal
> behavior? (I ran on z/OS 2.2! Ze'ev Atlas
>
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
