Sample code

All of the programs listed here are fully functional and are freely available for your use. There is no 'official' support for this code, but I will answer any questions about them, how they are installed or how they work.

RXLSTCAT - 01/27/2010

Produces a shortened LSTCAT report and volume summary of a VSAM catalog. The catalog is a parameter provided in the JCL. Optionally the summary can only be produced. This update provides the following changes:

-Changed error handling to print IDCAMS messages when a catalog access problem (eg: bad catalog name) prevents LSTCAT from executing.

-Added timestamp to heading line.

-Fixed problem where space map spans multiple lines and affected the parsing of LSTCAT output.

-Allowed for large file allocations, particularly with BIG and FAT -3390 VSAM device types.

-Changed output listing from many EXECIOs to accumulate output in a stem. Added RECSIZE to EXECIO to allow for wider report.

This README shows how to install and execute RXLSTCAT.

CATRPT - 05/16/2006

Concatenate POWER LST queue entries together into a new queue entry. The criteria for inclusion is any combination reports that can be listed with a single POWER PDISPLAY command.

GETSTOCK - 02/01/2006

Same as GETSTOCK below, but with the addition of the coding necessary to use a Proxy server. Contributed by David Stuart, County of Ventura. The proxy support requires the fix for APAR PK18960. Additionally the program EDCUCNVI needs to be defined in the CEE group as Assembler (there is no APAR yet for this fix).

GETSTOCK - 01/09/2006

GETSTOCK is a COBOL program that will use the SOAP Client support in VSE to access a remote Web Service. It connects to the Xmethods stock Quote service to retrieve a delayed quote from the stock exchange. Invoke the program as a transaction (eg: STOK) with a stock symbol as a parameter (eg: STOK IBM).

RXSYSLOG - 04/15/2005

RXSYSLOG is a syslog daemon for VSE. It is a syslog collector (or server) as defined in RFC 3164. It's sole purpose is to receive syslog messages from a Linux (or any compatible Unix) system. When a message is received it is displayed on the VSE system console. Console automation software can then use the message to trigger an action, for instance, submit a job.

GETTEMP - 04/15/2005

GETTEMP is a COBOL program that will use the SOAP Client support in VSE to access a remote Web Service. It connects to the Xmethods temperature service to retrieve the current temperature for a zip code. Invoke the program with a zip code as a parameter.

SOAPWRAP - 04/16/2005

SOAPWRAP is a COBOL for VSE program that is a 'wrapper' to a SOAP Service on VSE. A SOAP client will access the wrapper, which will call a CICS program on VSE. This way the existing CICS code does not need to change.

getstate.java - 04/16/2005

A java program that uses SOAP to call a Web Service (a CICS program) on VSE. It is used with SOAPWRAP. It requires the following packages: Sun's Javamail and JavaBeans Activation Framework and Apache's SOAP.

COPYRPT

Copy a POWER LST queue entry with different properties (JOBNAME, CLASS, USER, DISP, FORMDEF, etc). Optionally scan a report for certain text to include in the new copy.