Define Verb  REFORMAT

  Image  SYS$SYSDEVICE:[VAX84A.NSWC]REFORMAT	! <---------- CHANGE THIS LINE!

    Parameter  P1 , Prompt="From" , Value( Required, Type=$INFILE )

    Parameter  P2 , Prompt="To" , Value( Required, Type=$OUTFILE )

      Qualifier  FORTRAN		!  These
					!   qualifiers
      Qualifier  LIST			!    are
					!     mutually
      Qualifier  NONE			!      exclusive

      Qualifier  CONVERT

      Qualifier  TRUNCATE

      Qualifier  UNTAB

      Qualifier  SHIFT , Value( Required )

      Qualifier  COLUMNS , Value( Required, List )

      Qualifier  FIXED , Value( Required )

      Qualifier  KEY , Value( Required, List )

!
!---------------------------------------------------------!
!							  !
!     ALAN L. ZIRKLE     NAVAL SURFACE WEAPONS CENTER     !
!			 CODE K105			  !
!			 DAHLGREN, VIRGINIA  22448	  !
!							  !
!---------------------------------------------------------!
!