This page shows a list of some of our Assembler programs (and samples)
that we want to make available.
Some of them will need tailoring to meet your own site requirements.
As ever you are free to use this code but please read our disclaimers and copyright
information.
| Name |
Description | |
|---|---|---|
| TSO command processor to list the VTOC of the passed volume. This program is distributed as a TSO TRANSMIT file. The program is distributed as OCO (Object Code Only). The file will need to be transferred to a z/OS system in binary format and then RECEIVED. Link to information page click here. Link to the program manual click here. The program assembly and link information can be accessed by clicking here. | ||
|
| ||
| This program waits on an ECB that will never be posted. This can be used to emulate a long running task. The source code is available within the XMI file. This program is distributed as a TSO TRANSMIT file. The source code is included in the SOURCE PDS. The file will need to be transferred to a z/OS system in binary format and then RECEIVED. Link to information page click here. Link to the program manual click here. The program assembly and link information can be accessed by clicking here. | ||
|
| ||
| IEFBR14 'replacement' with the added ability to wait, fail and/or issue messages. This program is distributed as a TSO TRANSMIT file. The program is distributed as OCO (Object Code Only). The file will need to be transferred to a z/OS system in binary format and then RECEIVED. Link to information page click here. Link to the program manual click here. The program assembly and link information can be accessed by clicking here. | ||
|
| ||
| Sample of how to check for a DD card and how to scan the TIOT. The program assembly and link information can be accessed by clicking here. | ||
|
| ||
| ENQWATCH is a functional replacement for IBM's ISGECMON program. Unlike ISGECMON, ENQWATCH responds immediately to operator requests (including the shutdown command). Additionally, the ENQWATCH has the 'CYCLE' operator command which will force the program to execute the logic immediately. This adds flexibility to allow the program to have a long wait time and it allows any system automation to send a TSO notify to the offending programmer rather than wait for the time limit. ENQWATCH will also cut SMF records so that a history of dataset ENQs is maintained. The SMF records (if SMF recording is allowed within the program) will always be cut even if the internal table limits are exceeded. Link to information page click here. Link to the program manual click here. The program assembly and link information can be accessed by clicking here. | ||
|
| ||
| This is a SMF exit that gets invoked when the system switches the SMF dataset. It will issue a start command for SMFDUMP Link to information page click here. The program assembly and link information can be accessed by clicking here. | ||
|
| ||
| Issues a WTOR with the passed message text and waits for a reply from the operators. The source code is available within the XMI file.For installation instructions click the button below. This program is distributed as a TSO TRANSMIT file. The program is distributed as OCO (Object Code Only). The file will need to be transferred to a z/OS system in binary format and then RECEIVED. Link to information page click here. Link to the program manual click here. The program assembly and link information can be accessed by clicking here. | ||
|
| ||
| This assembler program will display all of the MQ systems that are defined to a z/OS system. It will show the status of the systems (i.e Active or Inactive), the MQ version and the PTF level. MQVERC is the Cobol equivalent to the MQVER program. The PTF level will be that of the Early Load program, CSQ3EPX. The output from MQVER is a series of WTO (Write To Operator) messages. It will look similar to this:
This program is distributed as a TSO TRANSMIT file. The source code is included in the SOURCE PDS. The file will need to be transferred to a z/OS system in binary format and then RECEIVED. | ||
|
| ||
| QMGRWAIT is a little assembler program that can be called whenever an MQ enabled program detects a MQ Reason code of 2161 (Queue Manager is Quiescing) is returned from a MQ API (Application Program Interface) call. All well-behaving MQ enabled programs must handle non-zero return codes in a manner that applies to the application requirements, but a return code of 2161 requires special handling. QMGRWAIT will issue a write to operator with reply (WTOR) letting the operator know that the calling job is trying to access a queue manager that is quiescing (closing down). However, if you don't want a WTOR to be issued in can issue a non-delete write to operator (WTO) instead. The options available are:
This program is distributed as a TSO TRANSMIT file. The program is distributed as OCO (Object Code Only). The file will need to be transferred to a z/OS system in binary format and then RECEIVED. Link to the program manual click here. The program assembly and link information can be accessed by clicking here. | ||
|
| ||
| Replacement for MQVER with the added ability to return a condition code based on the MQ subsystem status. This program is distributed as a TSO TRANSMIT file. The source code is included in the SOURCE PDS. The file will need to be transferred to a z/OS system in binary format and then RECEIVED. Link to information page click here. The program assembly and link information can be accessed by clicking here. | ||
|
| ||
