ca.portal.admin

Re: Copy IBM/IDMS files

Discussion created by ca.portal.admin on Apr 18, 2008
Here is what I use:

//COPY0001 EXEC PGM=IDCAMS,REGION=0M,COND=(0,LT)
//IDS DD DSN=IDMS.CV05.AAUTOPK,DISP=SHR,DCB=BUFNO=100
//ODS DD DSN=IDMS.CV04.AAUTOPK,DISP=SHR,DCB=BUFNO=100
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
REPRO IFILE(IDS) -
OFILE(ODS)
/*

William M. Allen, Jr.
ARCH Consulting Associates, Ltd.
(704) 641-0296

Outcomes