[Info-vax] DCL: Restrictions to READ loop process?

[JF Mezei]

Robb wrote:
> Hi,
> 
> I'm trying to put a conditional IF-THEN statement in a READ loop that
> triggers a COPY.
> 
> It only seems to work the first time through the loop.

A read loop in VMS generally entails :


$LOOPIN:
$!
$	READ/END=LOOPOUT filesym buffer
$!
$	do your processing here
$GOTO LOOPIN
$!
$!
$LOOPOUT:
$! We have reached end of file , close the file and exit
$CLOSE filesym
$EXIT


You can $SET VERIFY in your procedure and watch which statements get
executed and why it doesn't loop.