There are those times when it is necessary to unload a partitioned data set. The unloaded PDS can the be used in a subsequent restore. [codesyntax lang=”text”] //AMBMVS JOB (SYS), ‘BROOKS COMPUTING SYSTEMS,LLC’,CLASS=A,MSGCLASS=A, // MSGLEVEL=(1,1) //PDSUNLD PROC //SETP0001 EXEC PGM=IEBCOPY //SYSPRINT DD SYSOUT=* //SYSUT1 DD DISP=SHR,DSN=AMBMVS.PDS.&LLQ //SYSUT2 DD DISP=(,CATLG,DELETE),DSN=AMBMVS.&LLQ..OUT, // UNIT=3390,SPACE=(TRK,(1,2),RLSE),VOL=SER=USR003 //SYSIN DD DISP=SHR,DSN=AMBMVS.PDS.CNTL(UNLD1) // […]