MFmainframe-rea
WS carddemo · 26f629ef

proc · 109 lines · sha256 101f8fdb7bf3cd1esamples/proc/BUILDONL.prc

1//*********************************************************************
2//* THIS PROC IS USED TO COMPILE CICS PGMS
3//*********************************************************************
4//* Copyright Amazon.com, Inc. or its affiliates.
5//* All Rights Reserved.
6//*
7//* Licensed under the Apache License, Version 2.0 (the "License").
8//* You may not use this file except in compliance with the License.
9//* You may obtain a copy of the License at
10//*
11//* http://www.apache.org/licenses/LICENSE-2.0
12//*
13//* Unless required by applicable law or agreed to in writing,
14//* software distributed under the License is distributed on an
15//* "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND,
16//* either express or implied. See the License for the specific
17//* language governing permissions and limitations under the License
18//*********************************************************************
19//**** Sample CICS COBOL Compile PROC ******
20//**** Run after related BMS is compiled ******
21//**** Check with your Administrator for ******
22//**** JCL suitable to your environment ******
23//*********************************************************************
24//*
25//BLDONL PROC MEM=,
26// HLQ=,
27// COBLIB=IGY.SIGYCOMP.V63,
28// DFHLOAD=OEM.CICSTS.V05R06M0.CICS.SDFHLOAD,
29// DFHCOB=OEM.CICSTS.V05R06M0.CICS.SDFHCOB,
30// DFHSAMP=OEM.CICSTS.V05R06M0.CICS.SDFHSAMP,
31// CPYBKS=&HLQ..CARDDEMO.CPY,
32// SOURCE=&HLQ..CARDDEMO.CBL,
33// LOADLIB=&HLQ..CARDDEMO.LOADLIB,
34// LISTING=&HLQ..CARDDEMO.LST
35//*
36//* ---------------------------
37//* COBOL PROGRAM COMPILE STEP
38//* ---------------------------
39//COB EXEC PGM=IGYCRCTL,REGION=0M,
40// PARM=(CICS,NODYNAM,RENT,NOSEQ)
41//STEPLIB DD DSN=&COBLIB,DISP=SHR
42// DD DSN=&DFHLOAD,DISP=SHR
43//SYSLIB DD DSN=&CPYBKS,DISP=SHR
44// DD DSN=&DFHCOB,DISP=SHR
45// DD DSN=CEE.SCEESAMP,DISP=SHR
46//*YSPRINT DD SYSOUT=*
47//SYSPRINT DD DSN=&LISTING(&MEM),DISP=SHR
48//SYSIN DD DSN=&SOURCE(&MEM),DISP=SHR
49//SYSLIN DD DSN=&&LOADSET,DISP=(MOD,PASS),
50// UNIT=3390,SPACE=(80,(250,100))
51//SYSUT1 DD SPACE=(80,(10,10),,,ROUND),UNIT=3390
52//SYSUT2 DD SPACE=(80,(10,10),,,ROUND),UNIT=3390
53//SYSUT3 DD SPACE=(80,(10,10),,,ROUND),UNIT=3390
54//SYSUT4 DD SPACE=(80,(10,10),,,ROUND),UNIT=3390
55//SYSUT5 DD SPACE=(80,(10,10),,,ROUND),UNIT=3390
56//SYSUT6 DD SPACE=(80,(10,10),,,ROUND),UNIT=3390
57//SYSUT7 DD SPACE=(80,(10,10),,,ROUND),UNIT=3390
58//SYSUT8 DD SPACE=(80,(10,10),,,ROUND),UNIT=3390
59//SYSUT9 DD SPACE=(80,(10,10),,,ROUND),UNIT=3390
60//SYSUT10 DD SPACE=(80,(10,10),,,ROUND),UNIT=3390
61//SYSUT11 DD SPACE=(80,(10,10),,,ROUND),UNIT=3390
62//SYSUT12 DD SPACE=(80,(10,10),,,ROUND),UNIT=3390
63//SYSUT13 DD SPACE=(80,(10,10),,,ROUND),UNIT=3390
64//SYSUT14 DD SPACE=(80,(10,10),,,ROUND),UNIT=3390
65//SYSUT15 DD SPACE=(80,(10,10),,,ROUND),UNIT=3390
66//SYSMDECK DD SPACE=(80,(10,10),,,ROUND),UNIT=3390
67//* *********************************
68//* REPLICATE LISTING ON SYSOUT
69//* *********************************
70//DISPLIST EXEC PGM=IEBGENER,REGION=0M
71//SYSPRINT DD SYSOUT=*
72//SYSUT1 DD DSN=&LISTING(&MEM),DISP=SHR
73//SYSUT2 DD SYSOUT=*
74//SYSPRINT DD SYSOUT=*
75//SYSIN DD DUMMY
76//* *********************************
77//* COPY LINK STEP
78//* *********************************
79//COPYLINK EXEC PGM=IEBGENER,REGION=0M
80//SYSPRINT DD SYSOUT=*
81//SYSUT1 DD DSN=&DFHSAMP(DFHEILID),DISP=SHR
82//SYSUT2 DD DSN=&&COPYLINK,DISP=(NEW,PASS),
83// DCB=(LRECL=80,BLKSIZE=400,RECFM=FB),
84// UNIT=3390,SPACE=(400,(20,20))
85//SYSPRINT DD SYSOUT=*
86//SYSIN DD DUMMY
87//*
88//* *********************************
89//* LINK-EDIT (BINDER) STEP
90//* *********************************
91//LKED EXEC PGM=HEWL,REGION=0M,PARM='LIST,XREF,LET,MAP,AMODE(31),
92// RMODE(ANY)'
93//*KED EXEC PGM=HEWL,REGION=0M,PARM='LIST,XREF,LET,DCBS,AMODE(31),
94//* RMODE(ANY)'
95//SYSPRINT DD SYSOUT=*
96//SYSLIB DD DSN=&DFHLOAD,DISP=SHR
97// DD DSN=SYS1.LINKLIB,DISP=SHR
98// DD DSN=CSF.SCSFMOD0,DISP=SHR
99// DD DSN=CEE.SCEELKED,DISP=SHR
100// DD DSN=CEE.SCEELKEX,DISP=SHR
101// DD DSN=&LOADLIB,DISP=SHR
102//SYSLIN DD DSN=&&LOADSET,DISP=(OLD,DELETE)
103// DD DSN=&&COPYLINK,DISP=(OLD,DELETE)
104//SYSLMOD DD DSN=&LOADLIB(&MEM),
105//* DISP=(OLD,KEEP),SPACE=(CYL,(10,20,10)),
106//* UNIT=3390,DSNTYPE=LIBRARY
107// DISP=SHR
108//SYSUT1 DD UNIT=3390,DCB=BLKSIZE=1024,SPACE=(1024,(200,20))
109//*