Glenn,
I honestly don't know if we have DYNAM/T, but I already had tried // TLBL TAPEOUT,'OUTPUT.503643',5,,,,,02 and the cobol close and it didn't unload the tape.
But I do have some good news (place geico insurance joke here) When I came in today someone from work familiar with my...
I Apologize again for being so slow in getting back to everyone. We did eventually get this to run. This is the code that worked
FILE-CONTROL.
SELECT TAPE-IN ASSIGN TO SYS006-JOSHUA
ACCESS IS SEQUENTIAL...
Our option here for that looks like this
// TLBL TAPEOUT,'OUTPUT.503643',5,FIOPT=(RUN)
with run being the command that unloads the tape. But I tried that and it doesn't unload the tape.
I also tried the close reel/unit for removal option, but that, just like the close with lock, unloaded the...
Sorry it took me so long to get back on this. The card table is working great, here's what it looks like
INPUT-OUTPUT SECTION.
FILE-CONTROL.
*
SELECT CARDSIN ASSIGN TO SYS003.
and in the JCL
// ASSGN...
Hi I'm on IBM VSE using Cobol. My program is supposed to have tha ability to read multiple input tapes on the same unit. It works ok, but when I respond that I have another input, the same tape stays up and reads again. If I manually unload the tape and load up the next one its fine, but this...
Here's how I have one of my COBOL tape files handled:
// TLBL KMMRMBT,'HQ3.KM100.KMMRMMT',,,,,,02
would HQ3 represent the tape unit assignment ? also what does KM100 and the ,,,,,,,'s represent ?
Thanks
darby
Glenn,
I added the TEST (NONE, SYM) to my CBL card and this did generate additional information which I’m trying to interpret now.
We are using DYN and not EPIC is there a big difference between the 2?
As far as the tape file description and the JCL, yes that is how they are coded...
Hello,
I have a question for anyone familiar with cobol on VSE. I’m coding a program that reads a 3490 tape in. The job compiles fine, but won't run, it fails with this message “permanent i/o error file name = sys006 . ccb=x"2e9092000c400106"
from compile unit c503051 at entry...
Thank You all for input. I especially want to thank you Glenn for going into such detail. It's very reassuring and comforting to know that not only are you guy’s experts, but that you’re willing to share your knowledge with a complete rookie like myself.
I also want to apologize for not...
SELECT CARDIN
ASSIGN SYS004 "-UR-2540R-S".
Thanks for the post Glenn. I understand everything except the end that’s in quotes. I thought maybe it's one of those funky type things you see on license plates. You know like UR-2 is like you are too (my feeble brain get stuck at this...
Thank You Lunker for your help. I haven't started coding the program at all yet, so it will be a bit before I can tell you how things went. I'm sure it will work out fine though.
Darby
Thank You very much for your reply. Where I work everyone uses assembler language, so we're kinda in the dark here. Will I be able to access the cards in the table (when executing of course) by making an assignment in the file-control section like this (SELECT cardsin ASSIGN TO SYS003)
then...
Hello. I have to load a table into a cobol Mainframe job. The only problem is the information for the table is in the form of input cards on the actual jcl. How can I compile with information that won't be available at the time of the compilation ? Thank You very much
P.S. I'm completely new...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.