John,
I didn't realize that there could be two SELECTS that can reference the same
DDNAME.
I learned something new, well everyday I learn something. I will give this a
try.
Regards,
Scott Ford
www.identityforge.com
From: John McKown
Sent: Monday, February 10, 2014 1:06
IMHO defining two FD's wins the simplicity and clarity medal. However I used
the subroutine method in the (distant!) past to change the DDNAME on the fly:
CLOSE FD-FILE-NAME.
MOVE IN-REGION TO DDNAME-SUFFIX.
CALL 'FDFIXUP' USING FD-FILE-NAME, DDNAME.
OPEN OUTPUT FD-FILE-NAME.
e.g. to write /
. Geissbuehler
Sent: Tuesday, February 11, 2014 9:44 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: file types
IMHO defining two FD's wins the simplicity and clarity medal. However I used
the subroutine method in the (distant!) past to change the DDNAME on the fly:
CLOSE FD-FILE-NAME.
MOVE IN-REGION
All:
I have a Cobol program that can input either RECFM=FB or RECFM=VB and I am
trying to make it easier for our customers to use.
The input file can be either and whats the simplest way to tell the program
that the input is FB OR VB. I was thinking PARM= …
What do you guys/gals think ?
On 2014-02-10 16:16, Scott Ford wrote:
I have a Cobol program that can input either RECFM=FB or RECFM=VB and I am
trying to make it easier for our customers to use.
The input file can be either and whats the simplest way to tell the program
that the input is FB OR VB. I was thinking
Gil,
I wouldn't be opposed to write a Assembler subroutine to do that…
Thank you
Sent from Windows Mail
From: Paul Gilmartin
Sent: Monday, February 10, 2014 12:27 PM
To: IBM Mainframe Discussion List
On 2014-02-10 16:16, Scott Ford wrote:
I have a Cobol program
Scott,
If you write the assembly-language subroutine, make it s generic,
reentrant RECFM-get routine that will be reusable and put the logic
for distinguishing FB and VB (and rejecting other possible values) in
its caller.
John Gilmore, Ashland, MA 01721 - USA
I did a quick test. The simplest way was to simply have two SELECT
sentences which reference the same DD.
FILE-CONTROL.
SELECT FB ASSIGN TO UT-S-INPUT
FILE STATUS IS FB-STATUS-1
.
SELECT VB ASSIGN TO UT-S-INPUT
FILE STATUS IS
Long, long time ago the COBOL FD was just a pointer to the DCB: pass the FD to
a subprogram and map any DCB fields of interest in LINKAGE-SECTION, passing
back any required information to caller. More modern versions of COBOL and LE
may well have clobbered that method but I recall doing a
they are in Enterprise
COBOL V4.1, don't know about V5.1.
*Gr-r-r*
Peter
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf
Of Chambers, David W.
Sent: Monday, February 10, 2014 4:06 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: file types
On Mon, 10 Feb 2014 15:41:53 -0500, John Gilmore wrote:
If you write the assembly-language subroutine, make it [a] generic,
reentrant RECFM-get routine that will be reusable and put the logic
for distinguishing FB and VB (and rejecting other possible values) in
its caller.
My notion of generic
Leave out the FB Record size and you can use variable RECORD-LENGTH to
determine how many bytes are in the record.
On Mon, Feb 10, 2014 at 3:06 PM, John McKown
john.archie.mck...@gmail.com wrote:
I did a quick test. The simplest way was to simply have two SELECT
sentences which reference the
I *think* I can call an assembler sub program to do what you mentioned Gil. I
would rewrite this in assembler, but time doesn't permit. So same ole same ole
I have to determine my best solution , I would prefer writing it once, if you
know what I mean.
Scott ford
www.identityforge.com
from my
Guys,
Thanks guys that occurred to me but my old mind keep saying there's a better
way..
Scott ford
www.identityforge.com
from my IPAD
On Feb 10, 2014, at 5:24 PM, Mike Schwab mike.a.sch...@gmail.com wrote:
Leave out the FB Record size and you can use variable RECORD-LENGTH to
14 matches
Mail list logo