I found out that IEBGENER can change the LRECL on output. So I didn’t need to write a COBOL program to do that, like I mentioned in a previous post One million records!. Truncation to get rid of the last byte turned out to be easy after many unsuccessful attempts. Thank God for Google because …
Monthly Archives: October 2019
Handy dandy Hercules submit script
Well doesn’t exactly submit, but makes it much easier to do so. Since I prefer to code locally, I wrote Python CLI program ‘toherc’ that takes a file name and depending on file extention (jcl, cob, asm, aws) creates the correct devinit command and automatically places it into the clipboard, ready to paste into the …
Working locally on the mainframe!
Currently keeping all my MVS JCL, which includes programs wrapped in JCL, in a local Linux directory. Not only is editing files much easier, but the local file names can be long and descriptive. Such as IEBPTPCH-PRINT.JCL and IEBPTPCH-PUNCH.JCL. File names limited to 8 characters in TSO are so…limiting, especially while learning. Obviously people come …
Report Writer
I had recently typed my MVT COBOL Report Writer source into a Linux file I intended to compile with gnuCOBOL when that feature becomes available. Currently it’s optionally available. At the time, I thought…why am I spending so much time manually typing this in and visually trying to line things up. I’m glad I did …
One million records!
None of these dinky test datasets for Dr Evil. I wanted to see MVS running in TK4- do some real work…with one million records! So I created an empty 3350 to test load a AWSTAPE containing one million 163 byte records. The records are 164 bytes on tape because of the added line end character, …
MVS COBOL Sort Program
Successfully ported a working gnuCOBOL Sort program, that I probably ported from a DOS/VSE COBOL sort program I had written in the past, to MVS COBOL. At first, after fixing gnuCOBOL differences, I got “sort capacity exceeded” while trying to sort 50,000 records. I haven’t looked at why yet. Perhaps it is the 2314 DASD …
Copy local Linux Programs and JCL to MVS
Was looking for a way to get my local Linux Programs and JCL to a MVS PDS. So I could edit & submit from there if I wanted. I could use x3280 File Transfer (IND$FILE)…I guess. But I find it a little tedious, there’s no file selector box and you can’t even paste into the …
PRIMCOB1
I changed 3 lines in the Cobol program in the tk4 PDS SYS2.JCLLIB(PRIMCOB1) which fixes the jumbled output.
Reflecting on my MVS COBOL success
Yesterday…completing 2 basic MVS COBOL programs, was very satisfying. I’ve done a fair amount of DOS COBOL, admittedly many years ago, and other than the SELECT statement’s in the ENVIRONMENT DIVISION it’s very similar. After I had 95% convinced myself that IEBGENER was the correct program to load my virtual tape to a MVS DASD …
MVS COBOL Success
Wrote my 1st MVS Cobol (see comment about this) below program that successfully read a dasd file and wrote a new dasd file. Then wrote my 2nd MVS Cobol program that successfully read a virtual tape (AWSTAPE) file and wrote a new dasd file. It should be obvious now, although I admit it wasn’t completely …