Sorry, I mixed up some things (before the first coffee).
Rewrite:
The BLKSIZE must be 4 more than LRECL for a RECFM=V dataset and 8 for a 
RECFM=VB dataset.
You are right that, although bullet 5 is applicable, it is incorrect or at 
least incomplete. You must be able to SR this.

Thanks,
Kees.

-----Original Message-----
From: Vernooij, Kees (ITOPT1) - KLM 
Sent: 16 December, 2016 8:20
To: 'IBM Mainframe Discussion List' <IBM-MAIN@LISTSERV.UA.EDU>
Subject: RE: 32767?

The reason is (you know, I suppose) that blksize must be 8 (4 for the RDW +4 
for the BDW) less than lrecl for a VB dataset.
Reading the possible errors, you could see that bullet 5 is applicable to you, 
although it says '4' i.s.o. '8'. 4 is for RECFM=V, 8 for RECFM=FB.

Kees.



-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Paul Gilmartin
Sent: 16 December, 2016 1:25
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: 32767?

9       *-*   say BPXWDYN( 'alloc dd(SYSUT1) path(''/etc/services'') 
filedata(TEXT)' ,  
                  'recfm(V,B) LRECL(32760) blksize(32767) reuse msg(WTP)' )
        >>>     "0"
 0
     11 *-*   address 'MVS' 'EXECIO * DISKR SYSUT1 (finis stem JUNK.'
        >>>     "EXECIO * DISKR SYSUT1 (finis stem JUNK."
     12 *-*   say JUNK.0
        >>>     "203"
 203

???

IEBGENER fails (as it should) with the same SYSUT1:

 IEC141I 013-34,IGG0199G,user,$STCTSO1,SYSUT1
 IRX0250E System abend code 013, reason code 00000052.

...  And here I'm dissatisfied.  M&C gives eight possible explanations for 
RC=34.
That's bad.  Each reason should have a distinct reason code rather than 
requiring
the programmer to investigate each of the eight.

And here, none of the eight seems to apply.  If someone can't supply what I fail
to understand, I may go to SR.

And damn Rexx for showing RC in decimal when all the reference material show 
hex!

Postel's law was a bad idea.

-- gil

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
********************************************************
For information, services and offers, please visit our web site: 
http://www.klm.com. This e-mail and any attachment may contain confidential and 
privileged material intended for the addressee only. If you are not the 
addressee, you are notified that no part of the e-mail or any attachment may be 
disclosed, copied or distributed, and that any other action related to this 
e-mail or attachment is strictly prohibited, and may be unlawful. If you have 
received this e-mail by error, please notify the sender immediately by return 
e-mail, and delete this message. 

Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its 
employees shall not be liable for the incorrect or incomplete transmission of 
this e-mail or any attachments, nor responsible for any delay in receipt. 
Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch 
Airlines) is registered in Amstelveen, The Netherlands, with registered number 
33014286
********************************************************
                        


----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to