Vax Ada text_io.create + RMS $FLUSH. How?

Vax Ada text_io.create + RMS $FLUSH. How?

[paul]

VAX ADA & RMS:

I have an Ada program which opens a sequential disk file (TEXT_IO) for one
writer many readers. All works well and the readers can see the latest record
written. Unfortunately the records seem to be cached in memory because if the
machine should crash, the last few records disappear ie are not on the disk
after the reboot. 

I feel I should call the RMS service $FLUSH at convenient times. Unfortunately,
it wants a RAB parameter and as I opened the file using text_io.create, I have
no RAB to give it... 

a) Am I taking the right approach?
b) How would I persuade Ada to tell me the RAB to give to $FLUSH?

Thanks for your help.

Paul Burkimsher