Open pathname For Output Input Random Append Binary access locking As # filenum Len= recLen