*---------*---------------*-----------------*----------------*---------------* | CODE | FACTOR 1 | FACTOR 2 | RESULT | INDICATORS | | | | | FIELD | | *---------*---------------*-----------------*----------------*---------------* | REL | Program | File name | | _ ER _ | | | device | | | | *---------*---------------*-----------------*----------------*---------------*
The REL operation releases the program device specified in factor 1 from the multiple device WORKSTN file specified in factor 2.
In factor 1, specify the program device name. Use either a character field of length 10 or less, a character literal, or a named constant. In factor 2, specify the file name.
You can specify an indicator in positions 56 and 57 that is set on when an error occurs. If you do not specify one and an error occurs, control passes to your INFSR subroutine (if specified) or the default error/exception handler.
When there are no program devices acquired to a WORKSTN file, the next READ-by-file-name or cycle-read gets an end-of-file condition. You must decide what the program does next.
To release a record lock, use the UNLCK operation. See the UNLCK operation for more information about unlocking data areas and releasing record locks for update disk files.
The REL operation is valid only for multiple device WORKSTN files.
(C) Copyright IBM Corporation 1992, 2006. All Rights Reserved.