MFmainframe-rea
WS carddemo · 26f629ef

jcl · 47 lines · sha256 0f849b796a3005ffsamples/jcl/BMSCMP.jcl

1//CBLDBMS JOB 'Compile BMS Map',CLASS=A,MSGCLASS=H,
2// MSGLEVEL=(1,1),REGION=0M,NOTIFY=&SYSUID,TIME=1440
3//*********************************************************************
4//* Change CICSMAP to your map name everywhere
5//*-----> C CICSMAP xyz all <--------
6//* set HLQ to your high level qualifier
7//*********************************************************************
8//* Copyright Amazon.com, Inc. or its affiliates.
9//* All Rights Reserved.
10//*
11//* Licensed under the Apache License, Version 2.0 (the "License").
12//* You may not use this file except in compliance with the License.
13//* You may obtain a copy of the License at
14//*
15//* http://www.apache.org/licenses/LICENSE-2.0
16//*
17//* Unless required by applicable law or agreed to in writing,
18//* software distributed under the License is distributed on an
19//* "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND,
20//* either express or implied. See the License for the specific
21//* language governing permissions and limitations under the License
22//*********************************************************************
23//**** Sample Assembler BMS Compile JCL ******
24//**** Check with your Administrator for ******
25//**** JCL suitable to your environment ******
26//*********************************************************************
27//**** Compile CICS BMS to generate Copybook ******
28//*********************************************************************
29//* ---------------------------
30//* Set Parms for this compile:
31//* ---------------------------
32// SET HLQ=AWS.M2
33//*
34//*********************************************************************
35//* Add Proclib Reference
36//*********************************************************************
37//CCLIBS JCLLIB ORDER=&HLQ..CARDDEMO.PRC.UTIL
38//STEP1 EXEC BUILDBMS,MAPNAME=CICSMAP,HLQ=&HLQ
39//*********************************************************************
40//**** CICS commands in batch to Execute NEWCOPY ******
41//*********************************************************************
42//SDSF1 EXEC PGM=SDSF
43//ISFOUT DD SYSOUT=*
44//CMDOUT DD SYSOUT=*
45//ISFIN DD *
46 /MODIFY CICSAWSA,'CEMT SET PROG(CICSMAP) NEWCOPY'
47/*