As ever, you use this free program at your own risk.
Feel free to use the free software on this site but please honor the copyright.
Q2VSAM is really a couple of COBOL programs that are intended to
demonstrate how to use WebsphereMQ™ to update records in a VSAM KSDS.
One program, Q2VSAM, reads messages that are written to the target queue.
The other. QUEPUT puts messages onto the queue for processing by
Q2VSAM.
As the Q2VSAM program is using a local queue then messages could be sent
to that queue from any other connected queue manager of any other platform.
These programs are only intended to be used as examples of some of the MQ
techniques available and are not designed to be used in a production environment.
The techniques, however, are suitable for use in any environment but may need to
be tweaked to suit.
Q2VSAM is controlled by 'commands' specified in the MQ message. These
must start in column 1 and be followed by a space then the record number.
By default the record number should be 12 bytes long. The SHUT command does not
require a record number.
Q2VSAM recognizes the following commands:
| Action Command |
Command Description |
|---|---|
|
ADD |
This will cause the program to add a record to the VSAM file with the record number that follows the ADD. |
|
DEL |
This will cause the program to delete the specified record from the VSAM file. |
LIST |
This will cause the program to list, in the output file, the VSAM record specified. |
SHUT |
This will cause the program to shutdown. Unless this command is issued, or a zero length message is read from the message queue, the program will run indefinitely. (Additionally some site CPU time caps may result in a time out). |
UPD |
This will cause the program to update the specified record in the VSAM dataset. |
| Link |
Description |
|---|---|
| This button will take
you to a TSO TRANSMIT file that containing the collateral for the
Q2VSAM and QLOAD programs. This file should be
transferred to the z/OS system using a file transfer program. |
|
|
|
|
| This
link will display program assembly and link information for Q2VSAM. |
|
|
|
|
Abbydale Systems LLC Lic. 802696149. All rights reserved.