MFmainframe-rea
WS carddemo · 26f629ef

jcl · 68 lines · sha256 c3e72035f1c27f51app/jcl/CBIMPORT.jcl

1//CBIMPORT JOB 'Import CARDDEMO Data',CLASS=A,MSGCLASS=0,
2// NOTIFY=&SYSUID
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//* IMPORT CUSTOMER DATA FROM MULTI-RECORD EXPORT FILE AND SPLIT
20//* INTO SEPARATE NORMALIZED FILES FOR TARGET SYSTEM
21//* *******************************************************************
22//STEP01 EXEC PGM=CBIMPORT
23//STEPLIB DD DISP=SHR,
24// DSN=AWS.M2.CARDDEMO.LOADLIB
25//*
26//* INPUT EXPORT FILE
27//*
28//EXPFILE DD DISP=SHR,
29// DSN=AWS.M2.CARDDEMO.EXPORT.DATA
30//*
31//* OUTPUT NORMALIZED FILES
32//*
33//CUSTOUT DD DISP=(NEW,CATLG,DELETE),
34// DSN=AWS.M2.CARDDEMO.CUSTDATA.IMPORT,
35// UNIT=SYSDA,
36// SPACE=(TRK,(50,25),RLSE),
37// DCB=(RECFM=FB,LRECL=500,BLKSIZE=0)
38//ACCTOUT DD DISP=(NEW,CATLG,DELETE),
39// DSN=AWS.M2.CARDDEMO.ACCTDATA.IMPORT,
40// UNIT=SYSDA,
41// SPACE=(TRK,(50,25),RLSE),
42// DCB=(RECFM=FB,LRECL=300,BLKSIZE=0)
43//XREFOUT DD DISP=(NEW,CATLG,DELETE),
44// DSN=AWS.M2.CARDDEMO.CARDXREF.IMPORT,
45// UNIT=SYSDA,
46// SPACE=(TRK,(25,10),RLSE),
47// DCB=(RECFM=FB,LRECL=50,BLKSIZE=0)
48//TRNXOUT DD DISP=(NEW,CATLG,DELETE),
49// DSN=AWS.M2.CARDDEMO.TRANSACT.IMPORT,
50// UNIT=SYSDA,
51// SPACE=(TRK,(100,50),RLSE),
52// DCB=(RECFM=FB,LRECL=350,BLKSIZE=0)
53//*
54//* ERROR OUTPUT FILE
55//*
56//ERROUT DD DISP=(NEW,CATLG,DELETE),
57// DSN=AWS.M2.CARDDEMO.IMPORT.ERRORS,
58// UNIT=SYSDA,
59// SPACE=(TRK,(10,5),RLSE),
60// DCB=(RECFM=FB,LRECL=132,BLKSIZE=0)
61//*
62//* SYSTEM OUTPUT
63//*
64//SYSOUT DD SYSOUT=*
65//SYSPRINT DD SYSOUT=*
66//*//*
67//* Ver: CardDemo_v2.0-41-g02a5b3e-251 Date: 2025-10-02 13:43:17 CDT
68//*