I don't know if any of the previous responses satisfied your need. Another
approach would be to create a second DCB (PS, BSAM, RECFM=U, and
BLKSIZE=32760). Open the DCB, read the first block, and close the DCB.
Examine the data for whatever attributes you like (such as correct BDW and one
In [EMAIL PROTECTED], on 04/25/2006
at 10:25 AM, Binyamin Dissen [EMAIL PROTECTED] said:
For his needs, only the first had to be checked. I doubt that there
is much he should do if random unlike datasets were concatenated.
Put out an intelligible error message and as nonzero return code.
It
Binyamin Dissen wrote:
:OPEN will not set DCBDSORG.
:If it's 0?
No such thing. DCB macro requires it.
It and the MACRF are required to properly build the DCB and to get the correct
access methods loaded.
Just to be a bit pedantic, he could build his own DCB without using the
macro. In the
Discussion List IBM-MAIN@BAMA.UA.EDU
To
IBM-MAIN@BAMA.UA.EDU
cc
Subject
Re: Reading Variable record with bad BDW/RDW?
Binyamin Dissen wrote:
:OPEN will not set DCBDSORG.
:If it's 0?
No such thing. DCB macro requires it.
It and the MACRF are required to properly build the DCB and to get
Richard Tsujimoto wrote:
You could simply code the DCB with DSORG, and at run-time, reinitialize
the DSORG field. Why would you want to hand-craft a control block?
Who said I wanted to do so? Shmuel asked what would happen if a DCB had
a zero DSORG. Binyamin pointed out that the DCB MACRO
I've got a question for the group-at-large, which I hope
will be obvious to someone deeply in-the-know.
I've got a program that opens a VB PDS (RECFM=VB,BLKSIZE=2550,LRECL=255).
But - note that I said it opens the PDS, not a member of the PDS. That
open succeeds, and presumably, the program
-Original Message-
From: IBM Mainframe Discussion List
[mailto:[EMAIL PROTECTED] On Behalf Of Thomas David Rivers
Sent: Monday, April 24, 2006 1:41 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Reading Variable record with bad BDW/RDW?
I've got a question for the group-at-large, which I
On Mon, 24 Apr 2006 14:40:51 -0400 Thomas David Rivers [EMAIL PROTECTED]
wrote:
:I've got a question for the group-at-large, which I hope
:will be obvious to someone deeply in-the-know.
:I've got a program that opens a VB PDS (RECFM=VB,BLKSIZE=2550,LRECL=255).
:But - note that I said it opens
-Original Message-
From: IBM Mainframe Discussion List
[mailto:[EMAIL PROTECTED] On Behalf Of Thomas David Rivers
Sent: Monday, April 24, 2006 2:19 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Reading Variable record with bad BDW/RDW?
Hi John,
snip
So - I suppose - what's
@BAMA.UA.EDU
cc
Subject
Re: Reading Variable record with bad BDW/RDW?
Hi John,
Yeah... I know the directory portion isn't VB. But, the program
doesn't know that.. it thinks it's simply been given the name
of a sequential VB file that it wants to process
So - it stumbles blindly
In a recent note, Thomas David Rivers said:
Date: Mon, 24 Apr 2006 15:18:39 -0400
So - I suppose - what's the best way to ask Hey - is this at
all a reasonable thing to be trying a VB-read on?
My inclination would be to verify:
o DSORG != PO in the DCB after OPEN. (But DON'T
Use DYNALLOC Information Retrieval for the DSORG.
From: Thomas David Rivers [EMAIL PROTECTED]
Reply-To: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Reading Variable record with bad BDW/RDW?
Date: Mon, 24 Apr 2006 15:18:39 -0400
Hi John,
Yeah... I
In a message dated 4/24/2006 1:41:01 P.M. Central Daylight Time,
[EMAIL PROTECTED] writes:
I've got a program that opens a VB PDS (RECFM=VB,BLKSIZE=2550,LRECL=255).
But - note that I said it opens the PDS, not a member of the PDS. That
open succeeds, and presumably, the program will
Hi Binyamin!
That would work.. the program could avoid even trying the OPEN.
In this case, the OPEN succeeds... and then the subsequent READ (BSAM)
gets some bytes, but they aren't valid...
I tried looking at DCBDSORG after the OPEN, but it has the value
DCBDSGPS (Physical Sequential),
On Mon, 24 Apr 2006 15:42:53 -0400 Thomas David Rivers [EMAIL PROTECTED]
wrote:
: That would work.. the program could avoid even trying the OPEN.
Get the JFCB, use it (DSNAME + VOLUME) to read the DSCB.
The DSCB will indicate whether it is a PDS and what its recorded RECFM and
LRECL are. The
In a recent note, Binyamin Dissen said:
Date: Mon, 24 Apr 2006 22:52:21 +0300
Get the JFCB, use it (DSNAME + VOLUME) to read the DSCB.
I very much deplore it when people do that, then treat any
unexpected result as a failure. It's an unwarranted flouting
of the OS/360 I/O
Hi Bill...
Well - yes - you've hit the nail on the head - the routines are very
confused because they are expecting to see VB-type records (with a BDW
and RDW) and they are not.
The program uses BSAM I/O.
The issue here is that the program expects to not be directed to a PDS,
and when
Thomas David Rivers wrote:
Hi Bill...
Well - yes - you've hit the nail on the head - the routines are very
confused because they are expecting to see VB-type records (with a BDW
and RDW) and they are not.
The program uses BSAM I/O.
The issue here is that the program expects to not be
On Mon, 24 Apr 2006 14:06:11 -0600 Paul Gilmartin [EMAIL PROTECTED]
wrote:
:In a recent note, Binyamin Dissen said:
: Date: Mon, 24 Apr 2006 22:52:21 +0300
: Get the JFCB, use it (DSNAME + VOLUME) to read the DSCB.
:I very much deplore it when people do that, then treat any
In a recent note, Thomas David Rivers said:
Date: Mon, 24 Apr 2006 16:11:15 -0400
Someone else suggested using DYNALLOC to query the organization
of the file before the OPEN... is there a way to accomplish
this after the OPEN?
I would expect DYNALLOC IR to work equally well
In a message dated 4/24/2006 3:12:40 P.M. Central Daylight Time,
[EMAIL PROTECTED] writes:
What I'm looking for is some way for the program to say Hey! This
isn't a sequentional VB file at all.
Make sure the DCB in the program does not specify the file organization.
Then that field
Discussion List IBM-MAIN@BAMA.UA.EDU
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Reading Variable record with bad BDW/RDW?
Date: Mon, 24 Apr 2006 13:35:55 -0600
In a recent note, Thomas David Rivers said:
Date: Mon, 24 Apr 2006 15:18:39 -0400
So - I suppose - what's the best way to ask Hey
IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU wrote on 04/24/2006
04:11:15 PM:
The issue here is that the program expects to not be directed to a PDS,
and when that accidently happens - things go, as you mention,
alarmingly wrong.
What I'm looking for is some way for the program to say
In a recent note, J R said:
Date: Mon, 24 Apr 2006 16:24:54 -0400
Your inclinations assume that:
(a) DCBDSORG will change during OPEN, and
I don't believe (a) ever happens.
I certainly did assume that. Have I misunderstood the
following:
Title: z/OS V1R5.0 DFSMS: Using
I may be wrong but I thought that DSORG
was not optional on the DCB macro.
From: Paul Gilmartin [EMAIL PROTECTED]
Reply-To: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Reading Variable record with bad BDW/RDW?
Date: Mon, 24 Apr 2006 14:40:33 -0600
Hi again Bill...
Yeah - that's a good idea... But - I don't think I'm communicating
something right...
But - in this case, the user specified a file name. OPEN filled in the
DCBRECFM, etc... and the program went merrily on its way trying to
do what the DCB said would work...
This would
J R wrote:
I may be wrong but I thought that DSORG
was not optional on the DCB macro.
RECFM is optional.
--
Edward E Jaffe
Phoenix Software International, Inc
5200 W Century Blvd, Suite 800
Los Angeles, CA 90045
310-338-0400 x318
[EMAIL PROTECTED]
http://www.phoenixsoftware.com/
In a message dated 4/24/2006 4:05:12 P.M. Central Daylight Time,
[EMAIL PROTECTED] writes:
So far, it seems the only way to do that is to get the JFCB, etc...
My first inclination was to answer the same way, since I did that many
decades ago. But that approach may not work now for due
.
From: Paul Gilmartin [EMAIL PROTECTED]
Reply-To: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Reading Variable record with bad BDW/RDW?
Date: Mon, 24 Apr 2006 14:20:55 -0600
In a recent note, Thomas David Rivers said:
Date: Mon, 24 Apr 2006
At 16:33 -0400 on 04/24/2006, Kirk Talman wrote about Re: Reading
Variable record with bad BDW/RDW?:
X_DUMMY DS0A
DCAL1(7),AL3(INFMJFCB)
That should be:
DCXL187,AL3(INFMJFCB)
since as the last/only entry you need the x'80' end-of-list flag
Hello Dave Rivers,
When I first read your post I thought you were asking how to read a PDS
directorybut that isnt what you want to do is it. You want to protect
your VB reading program when it is accidentally handed a PDS.
I cant answer that, coz I am still focused on the read the PDS bit:
In [EMAIL PROTECTED], on 04/24/2006
at 02:40 PM, Thomas David Rivers [EMAIL PROTECTED] said:
OK - admittedly - walking thru the directory entries and trying to
interpret that as VB isn't the best thing in the world... but, what's
a program to do with what the user types.
Google for sanity
In [EMAIL PROTECTED],
on 04/24/2006
at 01:50 PM, McKown, John [EMAIL PROTECTED] said:
The directory of a PDS is not VB. It is
RECFM=F,LRECL=256,BLKSIZE=256,KEYLEN=8.
C '256' '264'
256 is the right number only if you don't read the key.
--
Shmuel (Seymour J.) Metz, SysProg and JOAT
In [EMAIL PROTECTED], on 04/24/2006
at 10:52 PM, Binyamin Dissen [EMAIL PROTECTED] said:
Get the JFCB, use it (DSNAME + VOLUME) to read the DSCB.
1. There may be more than one JFCB. He show fetcdh all into an ARL.
2. Reading a DSCB is not appropriate in all cases.
OPEN will not set
34 matches
Mail list logo