In my previous post I shared a way to execute operator command from a batch job using Rexx and SDSF. That is of course a bit cumbersome if you just want to fire off a fixed operator command. Therefore here the simplest way to execute an operator command: https://github.com/execpgm/execpgm-assets/blob/master/Tools/OperatorCommandJCL.txt //...jobcard //EXECCMD EXEC PGM=IEFBR14 // COMMAND 'D A,L'
One of the many way to execute an operator command from a batch rexx program. With this solution here, with Rexx and SDSF, you can embed the commands in more complex business logic, and use Rexx variables to dynamically establish values for the commands to be issued. By the way I have started a repository on GitHub on which I will share assets in the future. https://github.com/execpgm/execpgm-assets I have added this tool here: https://github.com/execpgm/execpgm-assets/tree/master/Tools Direct link: https://github.com/execpgm/execpgm-assets/blob/master/Tools/OperatorCommandSDSFbatch.txt //GENER EXEC PGM=IEBGENER //SYSPRINT DD SYSOUT=* //SYSIN DD ,BLKSIZE=800,LRECL=80 GENERATE LABELS DATA=ALL /* //SYSUT1 DD * /* REXX / RC=ISFCALLS('ON') YOURSTC = "MYSTC" ADDRESS SDSF "ISFEXEC '/P "YOURSTC"'" ISFDELAY="5" /* REPLY IS IN STEM ISFULOG. */ /* //SYSUT2 DD DSNAME=&&DS1(CMD),DISP=(NEW,PASS), // UNIT=SYSDA,SPACE=(TRK,(5,,2)) //* //RDWRJ EXEC PGM=IKJEFT01 //SYSPRINT DD SYSOUT=* //SYSPROC DD DISP=SHR,DSN=&&DS1 //SYSTSPRT DD SYSOUT=* //SYSTSIN DD * CMD /* //
Reg Harbeck wrote an excellent article in Destination z, Overcoming IBM Z Inertia, in which encourages IBM Z (mainframe) users to take action on modernizing their mainframe. The path of action Harbeck describes is to assign new mainframers (RePro's) with the task to find and document what the current mainframe solutions in place are expected to do, and to work with the organisation to see what needs to retired, replaced or contained. In other words task a new generation with the mainframe portfolio renewal, and not leave this to the old generation, who are "surviving until they retire while rocking the boat as little as possible" (hard words from Harbeck but it is time to get people in action). In additional to the general approach Harbeck describes I think it is important to assure senior management support on a level as high as possible. Doing so you prevent that the priority of this program is too easily watered down by day-to-day priorities and you assure perceived or real "impossibilities" and roadblocks are moved out of the way resolutely. So: Make modernization a senior management priority. Separate it organizationally from task from the KSOR (Keep the Show On the Road) activities, to make sure modernization priorities compete as little as possible with KSOR activities.Appoint a senior management and senior technical exec with a strong Z affiliation to mentor and support and guide the young team from a organisational and strategic perspective.Have a forward thinking, strong and respected senior mainframe specialist support the team, with education and coaching (not to do it for them). It will be an investment and, according to the "survivors" never be as efficient as before, but one very important thing it will be: fit for the future.
Learn mainframe, z/OS and Linux for Z on a shoestring. Let me know if you have any updates or additions to the list. Introduction Here's What Happens When an 18 Year Old Buys a Mainframe https://www.youtube.com/watch?v=45X4VP8CGtk&t=94s z/OS introductory video course http://www.redbooks.ibm.com/redbooks.nsf/redbookabstracts/crse0304.html?Open The ABCs of System Programming redbooks http://www.redbooks.ibm.com/abstracts/sg246981.html?Open IBM z/OS Basic Skills page in Knowledge Center. https://www.ibm.com/support/knowledgecenter/en/zosbasics/com.ibm.zos.zbasics/lcmain.html Introduction to the new mainframe http://www.redbooks.ibm.com/abstracts/sg246366.html?Open RelevantZ site http://relevantz.ibmsystemsmag.com/ibm-systems-relevant-z IBM Z Youtube IBM Z YouTube channel Love mainframe https://lovemainframe.com/ Open source initiatives Zowe https://www.openmainframeproject.org/ Free training offers Cross-technology z/OS Introduction and Workshop http://dtsc.dfw.ibm.com/MVSDS/'HTTPD2.APPS.ZOSCLASS.SHTML(ZOSCLASS)' Master the mainframe: https://www.ibm.com/it-infrastructure/z/education/master-the-mainframe Free training at HPI https://open.hpi.de/courses/mainframes2018 Many tutorials on Mainframetechhelp https://www.mainframestechhelp.com/ Tutorialspoint on mainframe https://www.tutorialspoint.com/mainframe_tutorials.htm Mainframe Playground https://mainframeplayground.neocities.org/ TSO/ISPF Introduction to TSO/ISPF https://www.tutorialbrain.com/mainframe/tso_ispf/ JCL Introduction to JCL https://www.tutorialbrain.com/mainframe/jcl_pgm_parameter/ JCL course https://www.tutorialspoint.com/jcl/jcl_job_statement.htm COBOL Introduction to COBOL https://www.tutorialbrain.com/mainframe/cobol_home/ Free COBOL course from CSIS http://www.csis.ul.ie/cobol/course/ Mainframe playground on COBOL https://mainframeplayground.neocities.org/COBOL.html Books (search for 2nd hand versions) Teach Yourself COBOL In 21 Days Murarch’s Mainframe COBOL CICS Introduction to CICS http://www.redbooks.ibm.com/abstracts/crse0303.html?Open Db2 for z/OS DB2 for z/OS: Data Sharing in a Nutshell Introduction to Db2 z/OS (for programmers) - https://www.tutorialbrain.com/mainframe/db2_tutorial/ MQ for z/OS MQ on z/os concepts https://www.ibm.com/support/knowledgecenter/en/SSFKSJ_8.0.0/com.ibm.mq.pro.doc/q003590_.htm http://share.confex.com/data/handout/share/131/Session_23611_handout_11867_0.pdf VSAM Introduction to VSAM https://www.tutorialbrain.com/mainframe/vsam_tutorial/ Assembler Assembler training https://punctiliousprogrammer.com/ibm-mainframe-assembler/ Developer topics IBM System z Tech Video’s IBM Z Systems tech zone Application Discovery ADDIApplication Delivery Foundation for z Systems ADFzzD&T - mainframe for hobiests on your Intel machine zD&T Access to real mainframe Unfortunately there is no Community mainframe yet. How cool would that be. There is the emulator solution zD&T on which you can run z/OS legitimately (warning: quite cumbersome, slow and expensive.) IBM Z trials https://www.ibm.com/it-infrastructure/z/resources/trial Gives you 3 days access to a trial environment with scripted tutorials.. When you have a software development company, or if you are rich: Remote development programme on Dallas System z http://dtsc.dfw.ibm.com/MVSDS/'HTTPD2.ENROL.PUBLIC.SHTML(ZOSRDP)' (Will cost you something like $550 USD per month.)
This year COBOL was delivered 60 years ago as one of the first general purpose, cross-platform programming languages. On 8 January 1960 the 'COBOL Executive Committee' formally approved the design of the programming language “COBOL 60”. One of the very early adopters of COBOL in the Netherlands, and long time member of the COBOL standard, Wim Ebbinkhuijsen, did a very nice talk at the event organized by Ordina. He went through the history of COBOL through the past 60 years. As a close observer and influencer of the programming language you get a great insight in this recent history of computing. Slides can be found here.