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 link will take
you to a file that contains the z/OS load library containing the
Q2VSAM program. This file should be unzipped and the TSO
transmit file (Q2VSAM.XMI) should be transferred to the z/OS
system using a file transfer program. The file must be
transferred as a BINARY file. Once the file is on z/OS it will have
to be received. To do this you use the TSO RECEIVE command.
The exact details on how to transfer this file are contained within
the readme.txt file in the XMI file. |
||
|
|
||
| This
link will display program assembly and link information for Q2VSAM. |
||
|
|
||
Installation Instructions
For installation instructions click the button below.
This material has been used successfully by Abbydale Systems LLC. and to the best of our knowledge this material and any system(s) of which it is a part are operational as of the service level or date stated in the body of this material (if so stated). However, NO warranty is given or implied as to the accuracy of this material or any related material or systems, and no responsibility is assumed for any effect or modification directly or indirectly caused by the use of this material.
It is the responsibility of any user of this material to evaluate its usefulness to the user's environment.
Abbydale Systems LLC. does not guarantee to keep this or any related material current, nor does it guarantee to provide any corrections or extensions described by any users of this material or any corrections or extensions made in the future by Abbydale Systems LLC. itself.
