On Thu, May 11, 2023 at 12:50:12PM -0500, Pierre Fichaud wrote:
> I'm back onto this problem.
> I wrote a proof-of-concept program and it works.
> I've modified an existing z/OS product and my changes don't work.
This is the first we've heard that all the related code wasn't
yours (or part of
/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Pierre Fichaud [pr...@videotron.ca]
Sent: Thursday, May 11, 2023 1:50 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Unlike data sets concatenation - revised 4
I'm back onto
I'm back onto this problem.
I wrote a proof-of-concept program and it works.
I've modified an existing z/OS product and my changes don't work.
Only DSNAME and DISP are coded on the DD statements.
1st file is VB with LRECL=200
2nd file is VB with LRECL=230
3rd file is FB with LRECL=1000.
On Mon, May 01, 2023 at 08:26:42AM -0500, Pierre Fichaud wrote:
> I have provided the DCB in source and dumped it just before the OPEN.
> . 000183 INFILE DCB DDNAME=INFILE,
>*00164000 .
> . 000184
On Mon, May 01, 2023 at 08:26:42AM -0500, Pierre Fichaud wrote:
> I have provided the DCB in source and dumped it just before the OPEN.
> 1st data set in the concatenation :
> The JCL has just the DSN and DISP.
> .
>
> .
I don't see a question, so I'm responding to what I think you want.
It has long been true that BUFSIZE defaults to the largest
available BLKSIZE The requirement was written in the 1980s. (It might
depend on your access method.) So, I very much doubt the the BLISIZE
difference is the problem.
I have provided the DCB in source and dumped it just before the OPEN.
1st data set in the concatenation :
Data Set Name . . . . : PIERRE.VB200.
.
.
On Sat, 29 Apr 2023 10:06:08 -0500, Michael Oujesky wrote:
>Interesting. When transferring to ASCII platforms, the BDW and RDW
>are stripped off, though RDW can be retained with a SITE command.
>
Depends on too many things. FTP. sftp. FTP from DDNAME. Rocket sftp
FTP from DDNAME allocated
Interesting. When transferring to ASCII platforms, the BDW and RDW
are stripped off, though RDW can be retained with a SITE command.
So RECFM=V could be included as a like attribute file for concatenation.
Michael
At 07:36 PM 4/28/2023, Paul Gilmartin wrote:
On Fri, 28 Apr 2023 18:55:47
On Fri, 28 Apr 2023 18:55:47 -0500, Michael Oujesky wrote:
>Note that RECFM=V is missing the "B" (i.e. block descriptor
>word). RECFM=V is almost the equivalent of RECFM=U, exceptt that the
>data block is prefixed by a half-word length (limited to 32767) and "BB".
>
This says otherwise:
Note that RECFM=V is missing the "B" (i.e. block descriptor
word). RECFM=V is almost the equivalent of RECFM=U, exceptt that the
data block is prefixed by a half-word length (limited to 32767) and "BB".
BTW, a VBS record can be as long as 16,777,215 bytes,
Michael
At 12:40 PM 4/28/2023,
On Fri, Apr 28, 2023 at 12:53:46PM -0500, Pierre Fichaud wrote:
> These are existing datasets so it's just DSNAME and DISP in the concatenation.
OK, but what is in the source coded on the DCB? Does it specify BLKSIZE
and/or LRECL.
Please provide the DCB from the source of the program.
Also
On Fri, 28 Apr 2023 12:53:46 -0500, Pierre Fichaud wrote:
>These are existing datasets so it's just DSNAME and DISP in the concatenation.
>
It's possible to override attributes of an existing data set in JCL DD,
DYNALLOC, or DCB.
If the OPEN is only for READ overriding attributes will be
These are existing datasets so it's just DSNAME and DISP in the concatenation.
Pierre.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
On Fri, 28 Apr 2023 12:20:29 -0500, Michael Oujesky wrote:
>Would not think "V" could be included. "...
>
Why not? If I create a VBS data set; write a single logical record which
happens
not to be segmented, then close it, the content is identical to that of a RECM=V
data set. RECFM=VBS must
On Fri, Apr 28, 2023 at 11:18:43AM -0500, Pierre Fichaud wrote:
> I set DCBOFPPC before the OPEN.
> DCB after open
> 000224D8 01D0 00F43026 002FE5A2 05025C70
> 4000 00027E08 * }...4 . Vs * .. .. = *
> 000224F8 02010580 5000 00A44848
Would not think "V" could be included. "VBS" is just a variation of
"VB" where the RDW is treated as a SDW where X'' in the "BB"
field indicates a non-segmented (i.e full variable length record" in
the buffer).
Another approach would be to not open the file as concatenated, but
treat
I set DCBOFPPC before the OPEN.
DCB after open
000224D8 01D0 00F43026 002FE5A2 05025C70
4000 00027E08 * }...4 . Vs * .. .. = *
000224F8 02010580 5000 00A44848 008C4064 1AE30E68 00CA99F8
0A018240 020903E8 *&u .T . r8 b
On Fri, Apr 28, 2023 at 08:51:22AM -0500, Pierre Fichaud wrote:
> I thought that the 2nd display of the DCB would show the lrecl to be
> 230 and the blksize to be 1150.
As did others, which is why a dump of the DCB was requested to see
the actual values.
> I'm reading the documentation for the
I thought that the 2nd display of the DCB would show the lrecl to be 230 and
the blksize to be 1150.
I'm reading the documentation for the umpteenth time and can't see what I've
missed or done wrong.
08.51.43 JOB12479 +Ptr to SYNAD exit placed in DCB
08.51.43 JOB12479 +reread off, OFPPC on
On Thu, 27 Apr 2023 13:54:18 -0500, Michael Oujesky wrote:
>Presuming the program is assembler, I would suggest trying
>hard-coding for RECFM=VBS, LRECL=32767, BLKSIZE=32760, BFTEK=A.
>
>And presuming all the files are RECFM=VBS.
>
In fact, can't any mixture of RECFM=V, VB, and VBS be overriden
Presuming the program is assembler, I would suggest trying
hard-coding for RECFM=VBS, LRECL=32767, BLKSIZE=32760, BFTEK=A.
And presuming all the files are RECFM=VBS.
If you do your own segmented record, LRECL=X ought to work.
Michael
At 08:00 AM 4/26/2023, Pierre Fichaud wrote:
Seymour's
Fair enough .
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
Seymour J Metz
Sent: 27 April 2023 11:25
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Unlike data sets concatenation - revised
ObPedant For lo these many years the DASD "physical record" has act
__
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Lennie Dymoke-Bradshaw [032fff1be9b4-dmarc-requ...@listserv.ua.edu]
Sent: Thursday, April 27, 2023 3:58 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Unlike data sets concatenation - revis
ame Discussion List On Behalf Of
Mike Schwab
Sent: 27 April 2023 00:43
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Unlike data sets concatenation - revised
A DASD record is a physical block. Contents of the block depend on the RECFM=,
i.e. U for load modules, VB for variable blocked, FB for Fixed
To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Unlike data sets concatenation - revised
>
> On Wed, 26 Apr 2023 13:44:21 -0700, Michael Stein wrote:
>
> >> 000234D0 E6D9D5C7 4BD3C5D5 4BD9C5C3 D6D9C46B | WRNG.LEN.RECORD,
> >> |
> >
> >A likely r
: Wednesday, April 26, 2023 6:08 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Unlike data sets concatenation - revised
On Wed, 26 Apr 2023 13:44:21 -0700, Michael Stein wrote:
>> 000234D0 E6D9D5C7 4BD3C5D5 4BD9C5C3 D6D9C46B | WRNG.LEN.RECORD, |
>
>A likely result from reading a
...@wkyr.net]
Sent: Wednesday, April 26, 2023 6:29 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Unlike data sets concatenation - revised
Isn't this the result of a CCW that does not have the wrong
length Record suppression bit on (I think that is what it is
called, been a long time since I did any CCWs
[charl...@mcn.org]
Sent: Wednesday, April 26, 2023 6:26 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Unlike data sets concatenation - revised
+1
Storage is a lot cheaper than programmer time writing exits and bit-twiddling
DCBs.
Isn't there a BUFL parameter that accomplishes the same thing and can
Isn't this the result of a CCW that does not have the wrong
length Record suppression bit on (I think that is what it is
called, been a long time since I did any CCWs and SSCH commands).
Steve Thompson
On 4/26/2023 6:08 PM, Paul Gilmartin wrote:
On Wed, 26 Apr 2023 13:44:21 -0700, Michael
+1
Storage is a lot cheaper than programmer time writing exits and bit-twiddling
DCBs.
Isn't there a BUFL parameter that accomplishes the same thing and can be used
without regard to actual BLKSIZE (in the case of RECFM=FB)?
CM
On Wed, 26 Apr 2023 17:08:54 -0500, Paul Gilmartin wrote:
>On
On Wed, 26 Apr 2023 13:44:21 -0700, Michael Stein wrote:
>> 000234D0 E6D9D5C7 4BD3C5D5 4BD9C5C3 D6D9C46B | WRNG.LEN.RECORD, |
>
>A likely result from reading a block larger than the blksize.
>
Why does it say "RECORD" if it means "Block"?
>...
>What does the *SOURCE* DCB & JCL
@LISTSERV.UA.EDU
Subject: Re: Unlike data sets concatenation - revised
Seymour,
SYNAD msg
00023475 008000 7C00 0260 |
.@- |
00023480 6003E840 40404040 40404040 40404040 | -.Y |
00023490.:02349F. LENGTH(X'10')--All bytes
> 000234D0 E6D9D5C7 4BD3C5D5 4BD9C5C3 D6D9C46B | WRNG.LEN.RECORD, |
A likely result from reading a block larger than the blksize.
> DCB
>
> 000224D8.:0224DF. LENGTH(X'08')--All bytes contain X'00'
> 000224E0 01D1 00F43026 002FE5A2 05025C70 | .J...4Vs..*. |
>
Seymour,
SYNAD msg
00023475 008000 7C00 0260 |
.@- |
00023480 6003E840 40404040 40404040 40404040 | -.Y |
00023490.:02349F. LENGTH(X'10')--All bytes contain X'40', C' '
000234A0 40404040 40406BE3 C8F1F2F7
: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Michael Stein [m...@zlvfc.com]
Sent: Wednesday, April 26, 2023 11:31 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Unlike data sets concatenation - revised
On Wed, Apr 26, 2023 at 08:00:07AM -0500, Pierre Fichaud wrote
On Wed, Apr 26, 2023 at 08:00:07AM -0500, Pierre Fichaud wrote:
> Seymour's response made me realize that my post was incomplete.
Yes, source? JCL? I/O error info (CSW IOB stuff, sense data..)
DCB contents: LRECL/BLKSIZE/RECFM?
It's some sort of I/O error but what?
. incorrect length (caused
Seymour's response made me realize that my post was incomplete.
I'm trying to read a concatenation of unlike data sets using QSAM.
The first dataset is VBS with LRECL=200,BLKSIZE=1000
The second dataset is VBS with LRECL=230,BLKSZIE= 1150.
I've coded a DCB OPEN exit that sets a re-read flag.
I
38 matches
Mail list logo