-
Db2 SQL in batch
Read more: Db2 SQL in batchAgain a simple solution for a common problem: how to run a Db2 query from a batch script. Here we use the utility DSNTEP2 that is provided for this purpose with the Db2 installation. In the STEPLIB, specify your names for Db2 runtime libraries. In the SYSTEM (xxxx) clause specify your Db2 subsystem. The SQL…
-
The new mainframe is full of APIs (and has an extension for Docker Containers)
Read more: The new mainframe is full of APIs (and has an extension for Docker Containers)IBM has announced the new mainframe box, not unexpectedly called z15. The z15 is a huge machine and I would summarize this evolution “bigger and better” without being disrespectful.Nevertheless, the accompanying announcement of the new release of the flagship operating system for the z15, z/OS 2.4 is massively interesting. The most eye-catching new feature in…
-
The definition of a user catalog
Read more: The definition of a user catalogOk another short one: just a small JCL script with working example for the definition of a user catalog. This would accompany the example of the alias definition for a user catalog that can be found here. //DEFCAT EXEC PGM=IDCAMS //SYSPRINT…
-
How to copy the contents of a catalog: IDCAMS
Read more: How to copy the contents of a catalog: IDCAMSA very short one, but regularly asked by my mentees: how to copy the contents of a catalog? Just use IDCAMS’ REPRO facility, like you would for a regular VSAM dataset //COPYCAT EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* …
-
Change the volume of the entry for a dataset in a catalog
Read more: Change the volume of the entry for a dataset in a catalogWhen you have defined a dataset in the wrong catalog – in this case a master catalog – and you want to correct this you can use this technique.The DELETE NOSCRATCH option assures only the catalog entry is deleted. If you would omit this, the entire dataset would be deleted, so be cautious. //DEFCAT EXEC PGM=IDCAMS …
-
Allocate a page dataset / page space for new system, in a second master catalog
Read more: Allocate a page dataset / page space for new system, in a second master catalogThis job shows you how you can define a page dataset in another master catalog than the currently active master catalog. This technique is typically used when you are building a new system from a driver system. The master catalog referred to via the CATALOG statement below is the to-be master catalog of the new…
-
Define an ALIAS for your User Catalog
Read more: Define an ALIAS for your User CatalogThis JCL defines an ALIAS in the current master catalog. The alias points to the user catalog named in the RELATE clause. Use a STEPCAT pointing to another master catalog when needed. //DEFCAT EXEC PGM=IDCAMS //* STEPCAT DD DISP=SHR etc when needed //SYSPRINT DD SYSOUT=* //SYSIN DD * DEF ALIAS (NAME(PROD) RELATE(SYS1.USERCAT.PROD)) /* // //Pierre…
-
ABEND Assembler program
Read more: ABEND Assembler programI can not remember why I needed this assembler program – and why it is in assembler – but here it is: the program who’s sole function is to ABEND. ABENDIT CSECT EQUATES SAVE (14,12),,ABENDIT/SPDEPT/&SYSDATE/&SYSTIME/ USING ABENDIT,R11 SET UP BASE ADDRESSABILITY LR R11,R15 LOAD BASE REG WITH ENTRY POINT LA R14,SAVE GET ADDRESS OF REGISTER SAVE ST R13,4(0,R14) SAVE CALLER’S SAVE AREA ADDR…
-
Ways get utc / gmt time zone (offset) versus local time in Rexx on z/OS
Read more: Ways get utc / gmt time zone (offset) versus local time in Rexx on z/OSRegularly we need to compare local time to absolute time UTC (or GMT) programmatically. This can be done in various ways. The cleanest way is to use the static system symbols that z/OS defines. See also section “Static System Symbols” in the z/OS Initialization and Tuning Reference.You can easily use this in a Rexx program.…
