I am getting following error :
REPRO IFILE(DD1) OFILE(DD2) REUSE -
FROMKEY(GFPCMM00420135) TOKEY(GFPCMM00420135)
IDC3302I ACTION ERROR ON TEST.LOAD.FILE
IDC3309I ** RECORD X'C7C6D7C3D4' NOT WRITTEN. LENGTH INVALID
IDC3302I ACTION ERROR ON TEST.LOAD.FILE
IDC3309I ** RECORD X'C7C6D7C3D4' NOT WRITTEN. LENGTH INVALID
IDC3302I ACTION ERROR ON TEST.LOAD.FILE
IDC3309I ** RECORD X'C7C6D7C3D4' NOT WRITTEN. LENGTH INVALID
IDC3302I ACTION ERROR ON TEST.LOAD.FILE
IDC3309I ** RECORD X'C7C6D7C3D4' NOT WRITTEN. LENGTH INVALID
Jcl :
//STEP03 EXEC PGM=IDCAMS
//NFASTVSM DD DUMMY
//SYSPRINT DD SYSOUT=*
//IAMINFO DD SYSOUT=*
//IAMDEBUG DD DUMMY
//SYSABEND DD SYSOUT=*
//DD1 DD DSN=TEST.ABB.CLUSTER,DISP=SHR
//DD2 DD DSN=TEST.LOAD.FILE,DISP=SHR
//SYSIN dd *
REPRO IFILE(DD1) OFILE(DD2) REUSE -
FROMKEY(GFPCMM00420135) TOKEY(GFPCMM00420135)
//*
//NFASTVSM DD DUMMY
//SYSPRINT DD SYSOUT=*
//IAMINFO DD SYSOUT=*
//IAMDEBUG DD DUMMY
//SYSABEND DD SYSOUT=*
//DD1 DD DSN=TEST.ABB.CLUSTER,DISP=SHR
//DD2 DD DSN=TEST.LOAD.FILE,DISP=SHR
//SYSIN dd *
REPRO IFILE(DD1) OFILE(DD2) REUSE -
FROMKEY(GFPCMM00420135) TOKEY(GFPCMM00420135)
//*
My requirement is to copy the data from VSAM cluster to PS file . Could you please help me out .