MFmainframe-rea
WS carddemo · 26f629ef

jcl · 53 lines · sha256 d1e6a1d45659be1dapp/app-authorization-ims-db2-mq/jcl/UNLDGSAM.JCL

1//UNLDGSAM JOB 'M2APP',CLASS=A,MSGCLASS=H,MSGLEVEL=(1,1),
2// REGION=0M,NOTIFY=&SYSUID,TIME=1440
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//*
20//*
21//*
22//**********************************************************************
23//* EXECUTE IMS PROGRAM
24//**********************************************************************
25//*
26//STEP01 EXEC PGM=DFSRRC00,
27// PARM='DLI,DBUNLDGS,DLIGSAMP,,,,,,,,,,,N'
28//STEPLIB DD DISP=SHR,DSN=OEMA.IMS.IMSP.SDFSRESL
29// DD DISP=SHR,DSN=OEMA.IMS.IMSP.SDFSRESL.V151
30// DD DISP=SHR,DSN=AWS.M2.CARDDEMO.LOADLIB
31//DFSRESLB DD DISP=SHR,DSN=OEMA.IMS.IMSP.SDFSRESL
32//*
33//IMS DD DISP=SHR,DSN=OEM.IMS.IMSP.PSBLIB
34// DD DISP=SHR,DSN=OEM.IMS.IMSP.DBDLIB
35//*
36//PASFILOP DD DSN=AWS.M2.CARDDEMO.PAUTDB.ROOT.GSAM,
37// DISP=(OLD,KEEP,KEEP)
38//*
39//PADFILOP DD DSN=AWS.M2.CARDDEMO.PAUTDB.CHILD.GSAM,
40// DISP=(OLD,KEEP,KEEP)
41//*
42//DDPAUTP0 DD DSN=OEM.IMS.IMSP.PAUTHDB,DISP=SHR
43//DDPAUTX0 DD DSN=OEM.IMS.IMSP.PAUTHDBX,DISP=SHR
44//*
45//*FSVSAMP DD DUMMY
46//DFSVSAMP DD DISP=SHR,
47// DSN=OEMPP.IMS.V15R01MB.PROCLIB(DFSVSMDB)
48//IMSLOGR DD DUMMY
49//IEFRDER DD DUMMY
50//SYSPRINT DD SYSOUT=*
51//SYSUDUMP DD SYSOUT=*
52//IMSERR DD SYSOUT=*
53//*