I appreciate the suggestion, but I'm not much interested in efficiency. I want a program that does lots of I/O and calculations to see what benefit we could get from ABO. This is the Before picture to be compared with the After picture. Running with an input of 300 records and iteration of 3,000, I'm using a little under 6 seconds of CPU time while creating two 6,000 cylinder output files. It's a good start.
. . . J.O.Skip Robinson Southern California Edison Company Electric Dragon Team Paddler SHARE MVS Program Co-Manager 323-715-0595 Mobile 626-302-7535 Office [email protected] -----Original Message----- From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of Bill Woodger Sent: Thursday, March 31, 2016 5:14 PM To: [email protected] Subject: (External):COBOL Rookie Problem And change the PARM= to 00001 if you want to define it as a five-byte numeric in your program. X'0001F1????' where the ? have the numeric as 0, gives you your 01100 in iterate, once it has been packed (prior to becoming binary) to use in the TIMES. Unless you are going to use very large files only a small number of iteration times, I'd use one OPEN-process-CLOSE for the input, where the records are stored. Lots of OPEN and CLOSE are very slow. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
