Example of CAZDPAGN Macros

The following illustrates the structure of an assembly source member which defines a DPA table:

1 	CAZUSR01   CAZDPAGN   	PROLOG
2 	CUSTOMER   CAZDPAGN   	GROUP,DESCRP='Customer Programs'
3 	CUSTOMER   CAZDPAGN   	SUBGROUP,GRP=CUSTOMER,DESCRP='Customer Programs'
4             CAZDPAGN 	NAME=SAMP*,DESCRP='CICS Samples',SUBGRP=CUSTOMER
              CAZDPAGN 	NAME=(APPL1*,APPL4*),                                     X
                 DESCRP='Batch Applications',SUBGRP=CUSTOMER,TYPE=USER
5             CAZDPAGN NAME=CICSDB2,SUBGRP=CUSTOMER,                              X
                 DESCRP='DB2 Test Program',TYPE=USER
              CAZDPAGN NAME=MQSAMP1,SUBGRP=CUSTOMER,                              X
                 DESCRP='MQ Test Program',TYPE=USER
6             CAZDPAGN NAME=TDB2,SUBGRP=CUSTOMER,                                 X
                 DESCRP='DB2 Test Trans',TYPE=CICSTXN
              CAZDPAGN NAME=MQS1,SUBGRP=CUSTOMER,                                 X
                 DESCRP='MQ Test Trans',TYPE=CICSTXN
7             CAZDPAGN END
8             END CAZUSR01
Note:
  1. This generates prologue code.
  2. These statements define Program Groups.
  3. These statements define the Sub Groups within the Program Group entries.
  4. This is an example of a wildcard name. Any program name beginning with SAMP will be described as "CICS® samples." In the event that a more exact name match is found, the description associated with that match will prevail.
  5. This is an example of an exact name match entry.
  6. This is an example of a CICS transaction definition.
  7. This marks the end of the table of program entries.
  8. This marks the end of the assembly file.