Subject: pinned data
From: ronald alagar (rfalagar@yahoo.com)
Date: Thu Jul 31 2008 - 09:13:40 EDT
hi can anyone provide the VSE JCL counterpart of the ff: MVS commands below:
CHEKING FOR PINNED TRACKS
//EXMPAAAA JOB (02,02),’PROGRAMMER NAME’,MSGCLASS=X,CLASS=A
//STEP1 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
LISTDATA DSTATUS VOLUME(MVSE70) UNIT(3390)
/*
DISCARDING PINNED DATA
//EXMPDDDD JOB (02,02),’PROGRAMMER NAME’,MSGCLASS=X,CLASS=A
//STEP1 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
SETCACHE VOL(MVSE70) UNIT(3390) DISCARDPINNED
/*
thanks,
ronald
This archive was generated by hypermail 2b25 : Thu Aug 07 2008 - 21:05:09 EDT