Execute an operator command via JCL

  • Post category:JCL
  • Reading time:1 mins read

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'  

Executing operator command froms batch – using Rexx and SDSF

  • Post category:JCLRexxSDSF
  • Reading time:2 mins read

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 
/* 
//

Go fix it while it ain’t broken yet – modernize the mainframe

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.

The big free mainframe curriculum

  • Post category:EducationGeneral
  • Reading time:10 mins read

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

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

Developer topics

IBM System z Tech Video’s

IBM Z Systems tech zone

  • Application Discovery ADDI
  • Application Delivery Foundation for z Systems ADFz
  • zD&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.)

COBOL 60 by one of the early adopters, Wim Ebbinkhuijsen

  • Post category:COBOL
  • Reading time:1 mins read

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.