Before you run the CICS sample programs, you must log on to CICS using a LOGMODE of 32702. This is because the sample programs have been written to use a 3270 mode 2 screen.
To prepare a sample application that runs in the CICS environment, perform the following steps:
For the Queue Attributes sample application, you could use one or more of the queues that are supplied for the other sample applications. Alternatively, you could use your own queues. However, note that in the form that it is supplied, this sample works only with queues that have the characters CSQ4SAMP in the first eight bytes of their name.
When the CICS sample applications supplied with WebSphere MQ for z/OS use MQI calls, they do not test for the return codes that indicate that the queue manager is not available. If the queue manager is not available when you attempt to run one of the CICS samples, the sample abends with the CICS abend code QLOP. If this happens, you must connect your queue manager to your CICS system before you attempt to start the sample application again. For information about starting a connection, see WebSphere MQ for z/OS System Administration Guide.
The source and JCL files that are supplied for each of the sample CICS
applications are listed in the following tables:
Put and Get samples | Table 50 |
Queue attributes sample | Table 51 |
Mail Manager (CICS) sample | Table 52 |
Credit Check (CICS) sample | Table 53 |
Table 50. Source and JCL for the Put and Get samples
Member name | For language | Description | Supplied in library |
---|---|---|---|
CSQ4CCK1 | C | Source program | SCSQC37S |
CSQ4CCJ1 | C | Source program | SCSQC37S |
CSQ4CVJ1 | COBOL | Source program | SCSQCOBS |
CSQ4CVK1 | COBOL | Source program | SCSQCOBS |
CSQ4S100 | independent | CICS system definition data set | SCSQPROC |
Table 51. Source for the Queue Attributes sample
Member name | For language | Description | Supplied in library |
---|---|---|---|
CSQ4CVC1 | COBOL | Source program | SCSQCOBS |
CSQ4VMSG | COBOL | Message definition | SCSQCOBC |
CSQ4VCMS | COBOL | BMS screen definition | SCSQMAPS |
CSQ4CAC1 | Assembler | Source program | SCSQASMS |
CSQ4AMSG | Assembler | Message definition | SCSQMACS |
CSQ4ACMS | Assembler | BMS screen definition | SCSQMAPS |
CSQ4CCC1 | C | Source program | SCSQC37S |
CSQ4CMSG | C | Message definition | SCSQC370 |
CSQ4CCMS | C | BMS screen definition | SCSQMAPS |
CSQ4S100 | independent | CICS system definition data set | SCSQPROC |
Table 52. Source and JCL for the Mail Manager (CICS) sample (COBOL only)
Member name | Description | Supplied in library |
---|---|---|
CSQ4CVD | WebSphere MQ for z/OS object definitions | SCSQPROC |
CSQ4CVD1 | Source for Menu program | SCSQCOBS |
CSQ4CVD2 | Source for Get Mail program | SCSQCOBS |
CSQ4CVD3 | Source for Display Message program | SCSQCOBS |
CSQ4CVD4 | Source for Send Mail program | SCSQCOBS |
CSQ4CVD5 | Source for Nickname program | SCSQCOBS |
CSQ4VDMS | BMS screen definition source | SCSQMAPS |
CSQ4S100 | CICS system definition data set | SCSQPROC |
CSQ4VD0 | Data definition | SCSQCOBC |
CSQ4VD3 | Data definition | SCSQCOBC |
CSQ4VD4 | Data definition | SCSQCOBC |
Table 53. Source and JCL for the Credit Check CICS sample
Member name | For language | Description | Supplied in library |
---|---|---|---|
CSQ4CVB | independent | WebSphere MQ object definitions | SCSQPROC |
CSQ4CCB | independent | WebSphere MQ object definitions | SCSQPROC |
CSQ4CVB1 | COBOL | Source for user-interface program | SCSQCOBS |
CSQ4CVB2 | COBOL | Source for credit application manager | SCSQCOBS |
CSQ4CVB3 | COBOL | Source for checking-account program | SCSQCOBS |
CSQ4CVB4 | COBOL | Source for distribution program | SCSQCOBS |
CSQ4CVB5 | COBOL | Source for agency-query program | SCSQCOBS |
CSQ4CCB1 | C | Source for user-interface program | SCSQC37S |
CSQ4CCB2 | C | Source for credit application manager | SCSQC37S |
CSQ4CCB3 | C | Source for checking-account program | SCSQC37S |
CSQ4CCB4 | C | Source for distribution program | SCSQC37S |
CSQ4CCB5 | C | Source for agency-query program | SCSQC37S |
CSQ4CB0 | C | Include file | SCSQC370 |
CSQ4CBMS | C | BMS screen definition source | SCSQMAPS |
CSQ4VBMS | COBOL | BMS screen definition source | SCSQMAPS |
CSQ4VB0 | COBOL | Data definition | SCSQCOBC |
CSQ4VB1 | COBOL | Data definition | SCSQCOBC |
CSQ4VB2 | COBOL | Data definition | SCSQCOBC |
CSQ4VB3 | COBOL | Data definition | SCSQCOBC |
CSQ4VB4 | COBOL | Data definition | SCSQCOBC |
CSQ4VB5 | COBOL | Data definition | SCSQCOBC |
CSQ4VB6 | COBOL | Data definition | SCSQCOBC |
CSQ4VB7 | COBOL | Data definition | SCSQCOBC |
CSQ4VB8 | COBOL | Data definition | SCSQCOBC |
CSQ4BAQ | independent | Source for VSAM data set | SCSQPROC |
CSQ4FILE | independent | JCL to build VSAM data set used by CSQ4CVB3 | SCSQPROC |
CSQ4S100 | independent | CICS system definition data set | SCSQPROC |