
366 z/OS Distributed File Service zSeries File System Implementation z/OS V1R11
B.14.2 MOVEAGGR code
Example B-14 displays the contents of MOVEAGGR.
Example: B-14 MOVEAGGR REXX procedure
/* REXX ***************************************************************/
/* Procedure: MOVEAGGR */
/* Description: Move compat mode aggregate to local system or back */
/* Property of IBM (C) Copyright IBM Corp. 2004-2005 */
/* Robert Hering (robert.hering@de.ibm.com) */
/* Format is: moveaggr fsname < Get | Put > */
/**********************************************************************/
Trace O
Parse Source . . myname .
Parse Upper Arg fsname get_put .
get_put = Left(ge ...