Re: RECFM=VBA and no JCL

2011-12-09 Thread Shmuel Metz (Seymour J.)
In , on 12/08/2011 at 12:47 PM, Mike Schwab said: >Don't forget the length fields. You are only getting 9 records per >block. That depends on the block size and on the records actually written. Some of the records could be as short as 6 bytes. -- Shmuel (Seymour J.) Metz, SysProg and

Re: RECFM=VBA and no JCL

2011-12-08 Thread Mike Schwab
Don't forget the length fields. You are only getting 9 records per block. On Thu, Dec 8, 2011 at 11:43 AM, Shmuel Metz (Seymour J.) wrote: > In <1323355038.81290.yahoomail...@web65513.mail.ac4.yahoo.com>, on > 12/08/2011 >   at 06:37 AM, Scott Ford said: > >>3.   Alloc dd(sysprint) to disk >>  

Re: RECFM=VBA and no JCL

2011-12-08 Thread Shmuel Metz (Seymour J.)
In <1323355038.81290.yahoomail...@web65513.mail.ac4.yahoo.com>, on 12/08/2011 at 06:37 AM, Scott Ford said: >3.   Alloc dd(sysprint) to disk >  Using BPXWDYN  - Lrecl = 133 , Recfm=vb, dsorg=ps Does the program change that to VBA? >10. Read file   the output is unreadable. What does

Re: RECFM=VBA and no JCL

2011-12-08 Thread Scott Ford
om: Tom Marchant To: IBM-MAIN@bama.ua.edu Sent: Thursday, December 8, 2011 10:22 AM Subject: Re: RECFM=VBA and no JCL On Thu, 8 Dec 2011 06:37:18 -0800, Scott Ford wrote: >3.   Alloc dd(sysprint) to disk >  Using BPXWDYN  - Lrecl = 133 , Recfm=vb, dsorg=ps >4.   Call program

Re: RECFM=VBA and no JCL

2011-12-08 Thread Tom Marchant
On Thu, 8 Dec 2011 06:37:18 -0800, Scott Ford wrote: >3.   Alloc dd(sysprint) to disk >  Using BPXWDYN  - Lrecl = 133 , Recfm=vb, dsorg=ps >4.   Call program >5.   Close sysin >6.   Close sysprint >7.   Free sysin >8.   Free sysprint >9.   Open #3 file from above as Optional in Cobol with Rec

Re: RECFM=VBA and no JCL

2011-12-08 Thread Scott Ford
om: Tom Marchant To: IBM-MAIN@bama.ua.edu Sent: Thursday, December 8, 2011 8:23 AM Subject: Re: RECFM=VBA and no JCL On Wed, 7 Dec 2011 19:45:58 -0800, Scott Ford wrote: >I have the following situation: I'm having trouble parsing your post.  Do you mind if I pick it apart? >I am

Re: RECFM=VBA and no JCL

2011-12-08 Thread McKown, John
> -Original Message- > From: IBM Mainframe Discussion List > [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Scott Ford > Sent: Wednesday, December 07, 2011 9:46 PM > To: IBM-MAIN@bama.ua.edu > Subject: RECFM=VBA and no JCL > > All: >   > I have the following situation: >   > I am calling a pr

Re: RECFM=VBA and no JCL

2011-12-08 Thread Tom Marchant
On Wed, 7 Dec 2011 19:45:58 -0800, Scott Ford wrote: >I have the following situation: I'm having trouble parsing your post. Do you mind if I pick it apart? >I am calling a program via Cobol You have a Cobol program? >and the output is RECFM=VBA,LRECL=133,BLKSIZE=1330 (only an example) >The

Re: RECFM=VBA and no JCL

2011-12-08 Thread Sambataro, Anthony (NIH/NBS) [E]
Wouldn't you just define the values via the FD in the COBOL program? For example: FD INPUT-FILE RECORDING MODE IS V RECORD IS VARYING IN SIZE FROM 1 TO 133 BLOCK CONTAINS 10 RECORDS DATA RECORD I

Re: RECFM=VBA and no JCL

2011-12-08 Thread Binyamin Dissen
On Wed, 7 Dec 2011 19:45:58 -0800 Scott Ford wrote: :>I am calling a program via Cobol and the output is RECFM=VBA,LRECL=133,BLKSIZE=1330 (only an example) :>The actual allocations are done dynamically via BPXWDYN and work fine no problem. :>I then close the file and free it and re-allocate it