PROGRAM TEST1 ( )

Source file:dcltest.f
I/O Operations:
Unit ID  Unit No       Access  Form   Operation
      *                   SEQ  FMTD           W  

Operation codes A=rewind,B=backspace,C=close,E=endfile
                I=inquire,O=open,R=read,W=write
Parameter Variables Used
character*6        STRING1            (STRING1 = 'abc123')
character*(6)      STRING2            (STRING2 = 'xyz789')