On Wed, 30 Dec 2015 19:03:22 -0600, Ze'ev Atlas wrote:
>You have it right
>There is no error message, the lines are just not written!
>ZA
>
WAD. Did your input contain empty records?
HEX on in ISPF BROWSE (*not* VIEW; *not* EDIT) will manifest empty records.
A dismaying example:
RC = BPXWDYN( 'alloc dsn('userid()'.TEMP.NULLS) shr rtddn(DD) msg(WTP)' )
line.1 = 'First '
line.2 = ''
drop line.3 /* WTF!? */
line.4 = 'Fourth.'
address 'MVS' 'EXECIO 4 DISKW' DD '(finis stem LINE.'
creates (note line 3!):
**************************************** Top of Data *******************
.
.
-----------------------------------------------------------------------
First
.
C89AA44444
.
6992300000
.
---------------------------------------------------------------------
.
.
.
---------------------------------------------------------------------
LINE.3
.
DCDC4F
.
3955B3
.
---------------------------------------------------------------------
Fourth.
.
C9A9A84
.
664938B
.
---------------------------------------------------------------------
*************************************** Bottom of Data ***************
IIRC:
o CMS filesystems do not support empty records (possibly excepting
the new-fangled BFS.)
o CMS EXEC2 does not distingushed uninitialized variables from
variables set to null string.
It appears that EXECIO on z/OS attempts to emulate the worst design features
of EXEC2 on CMS.
Rexx on CMS lately supports Rexx standard I/O. Rexx on z/OS is hardly there
yet:
o I believe compiled Rexx supports Rexx standard I/O. but only for legacy data
sets.
o Rexx under OMVS has a function package for much of Rexx standard I/O,
but only for UNIX files, and it does not provide SIGNAL ON NOTREADY.
Sigh,
gil
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
