Utility Routines

CALL EPUREF (LUNIT)

Returns internal reference number for logical unit in LREF in the common block /EPCOMM/. If LUNIT is invalid or there are no units open, then LREF=0.

Input parameters:

LUNIT

logical unit number

CALL EPDEFU (LUNIT,CHNAME,IERR*)

Allows to specify a file name other than the EPIO default name.

Input parameters:

LUNIT

logical unit number

CHNAME

Character variable, specifying the file name.

Output parameters:

IERR

error flag. See separate list.

• Get Status Words
• Set Status Words
• Print Overall Status