define type COPY_PROTECTION_KEYWORDS
       keyword   SYSTEM
       keyword   GROUP
       keyword   OWNER
       keyword   WORLD
define verb netcopy
       image sys$system:netcopy
       parameter P1
		 prompt="From "
                 value (required,list,impcat,type=$INFILE)
       parameter P2
		 prompt="To   "
                 value (required,type=$OUTFILE)
       qualifier SUBPROCESS
       qualifier CONTIGUOUS
       qualifier OVERLAY
       qualifier PROTECTION
                 value (required,list,type=COPY_PROTECTION_KEYWORDS)
       qualifier REPLACE
       qualifier LOG
       qualifier VOLUME
		 value (required)
       qualifier TRUNCATE