This appendix provides a sample of a complete system definition for a DC/UCF system.
System Definitions Provided at Installation
During installation, definitions of the following DC/UCF systems can be added to the system dictionary:
Copying Sample System Definitions
You can use the system generation compiler to display the definitions of the systems listed above once they have been added to the data dictionary. Using the COPY statement, you can copy all or part of the base system definition to the site-specific system that you are defining. The COPY statement is described in COPY Statement.
Sample System Definition for SYSTEM 12
The following definition of a DC/UCF system is provided as an example of a complete system definition. The definition is shown as entered by the user rather than as displayed by the compiler. As a result, defaults accepted by the user are not listed.
The sample system is assigned version number 12 and is defined to run under z/OS.
Note: Parameter values in the systems you define will differ from the values shown for the sample system based on site-specific requirements.
************************************************************************
* *
* SYSTEM STATEMENT FOR SAMPLE SYSTEM 12 *
* *
************************************************************************
*
ADD SYSTEM 12
ABEND STORAGE IS 200
ABRU SNAP
CHKUSER TASKS IS 4
CUSHION IS 20
CVNUMBER IS 12
CWA SIZE IS 504
DPE COUNT IS DEFAULT
DUMP
ECB LIST IS DEFAULT
GENERATION ID IS SYS12
INACTIVE INTERVAL IS 300
NOJOURNAL RETRIEVAL
CALL LIMIT FOR ONLINE TASKS IS 1000
DBIO LIMIT FOR ONLINE TASKS IS 500
LIMITS FOR ONLINE ARE ENABLED
LOADLIST IS SYSLOAD
LOG DATABASE
MAXIMUM ERUS IS 4
MAXIMUM TASKS IS 22
NEW COPY IS AUTOMATIC
OPERATING SYSTEM IS MVS
PAGE RELEASE IS YES
PRINT KEY IS PF12
PRINTER CHECKPOINT IS 50
PROGRAM POOL IS 100
NOPROTECT
QUEUE JOURNAL BEFORE
RCE COUNT IS DEFAULT
REENTRANT POOL IS 2200
RELOCATABLE THRESHOLD IS 85
REPORT RETENTION IS 5
RESOURCE TIMEOUT INTERVAL IS 1800 PROGRAM IS RHDCBYE VERSION 1
RETRIEVAL NOLOCK
RLE COUNT IS DEFAULT
RUNAWAY INTERVAL IS 45
RUNUNITS FOR LOADER = 1
RUNUNITS FOR MSGDICT = 1
RUNUNITS FOR QUEUE = 1
RUNUNITS FOR SECURITY = 1
RUNUNITS FOR SIGNON = 1
RUNUNITS FOR SYSTEM/DEST = 1
STACKSIZE IS 1200
STATISTICS INTERVAL OFF LINE TASK WRITE NOUSER TRANSACTION
STORAGE KEY IS 9
STORAGE POOL IS 1500
SVC IS 173
SYSCTL IS SYSCTL
SYSLOCKS IS 1200
SYSTRACE ON ENTRIES = 250
TICKER INTERVAL IS 5
UNDEFINED PROGRAM COUNT IS (23 23) FOR (ALL)
UPDATE NOLOCK
USERTRACE ON ENTRIES = 250
.
************************************************************************
* *
* SECONDARY STORAGE POOLS FOR SYSTEM 12 *
* *
************************************************************************
*
ADD STORAGE POOL 127
SIZE IS 1000
CUSHION IS 12
CONTAINS TYPES (USER USER-KEPT)
RELOCATABLE THRESHOLD IS 85
.
ADD STORAGE POOL 126
SIZE IS 500
CUSHION IS 10
CONTAINS TYPES (SHARED SHARED-KEPT)
RELOCATABLE THRESHOLD IS 85
.
************************************************************************
* *
* PRODUCT STATEMENTS FOR SYSTEM 12 *
* *
************************************************************************
*
ADD ADSO
MAXIMUM LINKS IS 4
PRIMARY POOL IS 4084
SECONDARY POOL IS 4084
RESOURCES ARE RELOCATABLE
DIALOG STATISTICS ON SELECTED
.
ADD OLM
NEW COPY IS YES
PAGING STORAGE IS 50
QUEUE RETENTION IS 60
.
ADD OLQ
REPORT RETENTION IS 7
MAXIMUM REPORT RETENTION IS 60
MAXIMUM REPORT PAGES IS 8
MAXIMUM REPORT COUNT IS 15
MAXIMUM INTERRUPT COUNT IS 500
REPORT DICTNAME IS ASF1DICT
MAXIMUM SORT STORAGE IS 500
BATCH CLASS IS 9.
.
************************************************************************
* *
* KEYS TABLE FOR SYSTEM 12 *
* *
************************************************************************
*
INCLUDE MODULE DC-PFKEY-DEF
.
************************************************************************
* *
* TASK AND PROGRAM STATEMENTS FOR ONLINE COMPONENTS *
* (EXCEPT THE SYSTEM GENERATION COMPILER) *
* *
************************************************************************
*
*
* CA ADS
*
INCLUDE MODULE ADSO
.
*
* AUTOMATIC SYSTEM FACILITY
*
INCLUDE MODULE ASFIDB
.
INCLUDE MODULE ASF
.
*
* ONLINE COMPILERS (EXCEPT SYSGEN)
*
INCLUDE MODULE IDD
.
MODIFY TASK SSC
.
MODIFY TASK SSCT
.
*
* ONLINE MAPPING
*
INCLUDE MODULE ONLINE-MAPPING
.
*
* CA OLQ
*
INCLUDE MODULE ONLINE-QUERY
.
************************************************************************
* TASK AND PROGRAM STATEMENTS FOR SYSTEM TASKS *
* AND THE SYSTEM GENERATION COMPILER *
* *
************************************************************************
*
COPY TASKS FROM SYSTEM 99
.
COPY PROGRAMS FROM SYSTEM 99
.
************************************************************************
* SUBSCHEMA PROGRAM STATEMENTS *
* *
************************************************************************
*
DEFAULT TEMPORARY PROGRAM
SUBSCHEMA
NOPROTECT
NODYNAMIC
.
*
* SUBSCHEMAS FOR CORPDATA
*
ADD PROGRAM PERSS001
.
ADD PROGRAM PERSS002
.
ADD PROGRAM ACCSS001
.
ADD PROGRAM ACCSS002
.
ADD PROGRAM ACCSS003
.
ADD PROGRAM ADVSS001
.
ADD PROGRAM SALSS001
.
*
* SUBSCHEMAS FOR CUSTDATA
*
ADD PROGRAM ADVSSC01
.
ADD PROGRAM SALSSC01
.
ADD PROGRAM SALSSC02
.
DEFAULT TEMPORARY PROGRAM
PROGRAM
PROTECT
DYNAMIC
.
************************************************************************
* TASK AND PROGRAM STATEMENTS FOR CORPORATE APPLICATIONS *
* ── PERSONNEL DEPARTMENT *
* *
************************************************************************
*
*
* EMPLOYEE TRACKING
*
ADD TASK EMPTRK
INVOKES PROGRAM PERP001
.
ADD PROGRAM PERP001
.
ADD PROGRAM PERP002
.
ADD PROGRAM PERP003
.
ADD PROGRAM PERP004
.
ADD PROGRAM PERMP01
MAP
.
ADD PROGRAM PERMP02
MAP
.
ADD PROGRAM PERMP03
MAP
.
*
* SALARY TRACKING
*
ADD TASK EMPSAL
INVOKES PROGRAM PERP030
NOINPUT
.
ADD PROGRAM PERP030
.
ADD PROGRAM PERP031
.
ADD PROGRAM PERMP30
MAP
.
ADD PROGRAM PERMP31
MAP
.
ADD PROGRAM PERMP32
MAP
.
************************************************************************
* *
* TASK AND PROGRAM STATEMENTS FOR CORPORATE APPLICATIONS *
* ── ACCOUNTING DEPARTMENT *
* *
************************************************************************
*
*
* BUDGET PLANNING AND IMPLEMENTATION
*
ADD TASK BUDGET
INVOKES PROGRAM ACCP001
.
ADD PROGRAM ACCP001
.
ADD PROGRAM ACCP002
.
ADD PROGRAM ACCP003
.
ADD PROGRAM ACCMP01
MAP
.
ADD PROGRAM ACCMP02
MAP
.
************************************************************************
* *
* TASK AND PROGRAM STATEMENTS FOR CORPORATE APPLICATIONS *
* ── ADVERTISING DEPARTMENT *
* *
************************************************************************
*
*
* CAMPAIGN TRACKING
*
ADD TASK ADVTRK
INVOKES PROGRAM ADVP001
.
ADD PROGRAM ADVP001
.
ADD PROGRAM ADVP002
.
ADD PROGRAM ADVP003
.
ADD PROGRAM ADVMP01
MAP
.
ADD PROGRAM ADVMP02
MAP
.
************************************************************************
* *
* TASK AND PROGRAM STATEMENTS FOR CORPORATE APPLICATIONS *
* ── SALES AND MARKETING DEPARTMENT *
* *
************************************************************************
*
*
* CUSTOMER TRACKING
*
ADD TASK CUSTRK
INVOKES PROGRAM SALP001
.
ADD PROGRAM SALP021
.
ADD PROGRAM SALP022
.
ADD PROGRAM SALP023
.
ADD PROGRAM SALMP21
MAP
.
************************************************************************
* *
* UTILITY PROGRAMS FOR CORPORATE APPLICATIONS *
* *
************************************************************************
*
ADD PROGRAM COMPQTR
.
ADD PROGRAM CHEKCUST
.
ADD PROGRAM CUSTLOC
TABLE
.
ADD PROGRAM EXP001
LANGUAGE ASSEMBLER
REENTRANT
.
ADD PROGRAM EXP002
LANGUAGE ASSEMBLER
REENTRANT
.
ADD PROGRAM EXP003
LANGUAGE ASSEMBLER
REENTRANT
.
************************************************************************
* *
* TELEPROCESSING NETWORK FOR SYSTEM 12 *
* *
************************************************************************
*
*
* OPERATOR'S CONSOLE
*
ADD LINE CONSOLE
TYPE IS CONSOLE
.
ADD PTERM OPERATOR
TYPE IS OPERATOR
.
ADD LTERM CONSOLE
PRIORITY IS 240
PTERM IS OPERATOR
.
*
* VTAM LINE
*
ADD LINE VTAM12
COMPACT
TYPE IS VTAMLIN
APPLICATION ID IS SYSTEM12
RPL COUNT IS 10
.
ADD PTERM PV12001
TYPE IS V3277
.
ADD LTERM LT12001
.
ADD PTERM PV12002
TYPE IS V3277
.
ADD LTERM LT12002
.
ADD PTERM PV12003
TYPE IS V3277
.
ADD LTERM LT12003
.
ADD PTERM PV12004
TYPE IS V3277
.
ADD LTERM LT12004
.
ADD PTERM PV12005
TYPE IS V3277
.
ADD LTERM LT12005
.
ADD PTERM PV12006
TYPE IS V3277
.
ADD LTERM LT12006
.
ADD PTERM PV12007
TYPE IS V3277
.
ADD LTERM LT12007
.
ADD PTERM PV12008
TYPE IS V3277
.
ADD LTERM LT12008
.
ADD PTERM PV12009
TYPE IS V3277
.
ADD LTERM LT12009
.
ADD PTERM PV12010
TYPE IS V3277
.
ADD LTERM LT12010
.
ADD PTERM PV12011
TYPE IS V3277
.
ADD LTERM LT12011
.
ADD PTERM PV12012
TYPE IS V3277
.
ADD LTERM LT12012
.
ADD PTERM PV12013
TYPE IS V3277
.
ADD LTERM LT12013
.
ADD PTERM PV12014
TYPE IS V3277
.
ADD LTERM LT12014
.
ADD PTERM PV12015
TYPE IS V3277
.
ADD LTERM LT12015
.
ADD PTERM PV12016
TYPE IS V3277
.
ADD LTERM LT12016
.
ADD PTERM PV12017
TYPE IS V3277
.
ADD LTERM LT12017
.
ADD PTERM PV12018
TYPE IS V3277
.
ADD LTERM LT12018
.
ADD PTERM PV12019
TYPE IS V3277
.
ADD LTERM LT12019
.
ADD PTERM PV12020
TYPE IS V3277
.
ADD LTERM LT12020
.
ADD PTERM PV12021
TYPE IS V3277
NAME IS CT112001
.
ADD LTERM LT12021
.
ADD PTERM PV12022
TYPE IS V3277
NAME IS CT084020
.
ADD LTERM LT12022
.
ADD PTERM PV12023
TYPE IS V3277
NAME IS CT084122
.
ADD LTERM LT12023
.
ADD PTERM PV12024
TYPE IS V3277
NAME IS CT064100
.
ADD LTERM LT12024
.
ADD PTERM PV12025
TYPE IS V3277
NAME IS CT112124
.
ADD LTERM LT12025
.
ADD PTERM PV12026
TYPE IS V3277
NAME IS CT084102
.
ADD LTERM LT12026
.
ADD PTERM PRT12001
TYPE IS V3286
ACQUIRE
NAME IS FT064007
FORMFEED
.
ADD LTERM PRT12001
PRINTER NOBANNER CLASS IS (8)
.
ADD PTERM PRT12002
TYPE IS V3286
ACQUIRE
NAME IS CT116015
FORMFEED
.
ADD LTERM PRT12002
PRINTER NOBANNER CLASS IS (10)
.
ADD PTERM PRT12003
TYPE IS V3286
ACQUIRE
NAME IS FT068007
FORMFEED
.
ADD LTERM PRT12003
PRINTER CLASS IS (25)
.
*
* UCF LINE
*
ADD LINE UCFLINE
TYPE IS UCFLINE
MODULE IS RHDCFSTB
.
ADD PTERM UCFPT01
TYPE IS UCFTERM
.
ADD LTERM UCFLT01
.
ADD PTERM UCFPT02
TYPE IS UCFTERM
.
ADD LTERM UCFLT02
.
ADD PTERM UCFPT03
TYPE IS UCFTERM
.
ADD LTERM UCFLT03
.
ADD PTERM UCFPT04
TYPE IS UCFTERM
.
ADD LTERM UCFLT04
.
ADD PTERM UCFPT05
TYPE IS UCFTERM
NAME IS CLASS33
.
ADD LTERM UCFLT05
PRINTER CLASS IS (33 35)
.
*
* DIAL UP CONNECTIONS
*
ADD LINE DIALUP
TYPE IS ASYNC
DDNAME IS DIALUP
.
ADD PTERM TP1262A
SCREEN TYPE IS ADM
TYPE IS ASR33
UNIT IS 037
.
ADD LTERM TL1262A
.
*
* BATCH SIMULATOR LINE
*
ADD LINE S3270Q1
TYPE IS S3270Q
INPUT DDNAME IS SIMIN1
OUTPUT DDNAME IS SIMOUT1
.
ADD PTERM PS3270Q1
PRINTER CLASS IS 10
TYPE IS S3277
.
ADD LTERM LS3270Q1
.
*
* LASER PRINTER
*
ADD LINE LASER
TYPE IS SYSOUTL
DDNAME IS LASERDD
.
ADD PTERM PLASER
TYPE IS SYSOUTT
PAGE LENGTH IS 66
PAGE WIDTH IS 80
.
ADD LTERM LLASER
PRINTER NOBANNER CLASS IS (63)
.
|
Copyright © 2014 CA.
All rights reserved.
|
|