How to create a scart0.zip with PTF's based on CA RS
Article ID: 14725
Updated On:
Products
Issue/Introduction
How can a scart0.zip be created to ensure that it has all the PTF's a specific CA RS levels?
Environment
Component:
Resolution
For preparing the scart0 based on the CARS files. First refer to the individual CARS files. Each file has all the products but for a specific product you could group all the PTF's for a CARS file such as CAR1701 using the product code. Here's a sample:
++ASSIGN SOURCEID(CAR1212) TO (RO32403) /* CAX1F00 ACF2..00200 15.0 */.
++ASSIGN SOURCEID(CAR1212) TO (RO32706) /* CBRMB60 OUTV..00200 11.6 */.
++ASSIGN SOURCEID(CAR1212) TO (RO32744) /* CBRMB70 OUTV..00200 11.7 */.
++ASSIGN SOURCEID(CAR1212) TO (RO33430) /* CEES850 MATUNE00200 8.5 */.
++ASSIGN SOURCEID(CAR1212) TO (RO33474) /* CEES850 MATUNE00200 8.5 */.
++ASSIGN SOURCEID(CAR1212) TO (RO35254) /* CEET850 MATUNE00200 8.5 */.
++ASSIGN SOURCEID(CAR1212) TO (RO35258) /* CEET850 MATUNE00200 8.5 */.
++ASSIGN SOURCEID(CAR1212) TO (RO35693) /* CEET850 MATUNE00200 8.5 */.
You could use the FMID also. Once you have noted all the PTF's you could use then to create your scart0. Here's a JCL to offload the CARS. This is just an example"
//ALOC EXEC PGM=IEFBR14
//DISTLOAD DD DSN=MEN.C5100.CARSID6,
// DISP=(NEW,CATLG,DELETE),UNIT=(3390),
// STORCLAS=stoclass,
// SPACE=(CYL,(1,1,100),RLSE),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=8000)
//FTPINCOM EXEC PGM=FTP,REGION=4096K
//SYSPRINT DD SYSOUT=*
//OUTPUT DD SYSOUT=*
//SYSTCPD DD DISP=SHR,DSN=your.VTAM.TCPIP.TCPIP.DATA
//INPUT DD *
ftp.ca.com 21
anonymous [email protected]
cd /pub/ASSIGNS/
ascii
locsite LR=80 REC=FB BLOCKSI=0
locsite PRI=20 SEC=10 CY
get CAR1701.TXT 'MEN.C5100.CARSID6(CAR1701)' (REPLACE
get CAR1702.TXT 'MEN.C5100.CARSID6(CAR7102)' (REPLACE
get CAR1703.TXT 'MEN.C5100.CARSID6(CAR1703)' (REPLACE
get CAR1704.TXT 'MEN.C5100.CARSID6(CAR1704)' (REPLACE
QUIT
//*
Feedback
