FUNCTION closqlif

COMMON qlistuff,aflun,qlif,ql_times

qlifstat=FSTAT(aflun)
qlifbytes=qlifstat.SIZE
CLOSE,aflun & FREE_LUN,aflun	; close still-open ASSOC file

RETURN,qlifbytes
END