[Info-vax] Example of random access by record number on an RMS fixed record size, relative organization file?

Arne Vajhøj arne at vajhoej.dk
Wed Sep 20 07:17:34 EDT 2023


On 9/19/2023 11:15 PM, gah4 wrote:
> On Tuesday, September 19, 2023 at 5:46:29 PM UTC-7, Arne Vajhøj wrote:
>> open(unit=1,file='rel.dat',status='new',form='formatted',
>> + organization='relative',recl=512,recordtype='variable',
>> + access='direct')
>   
> OP asked about fixed record size, and traditionally that is
> the way it was done.  I haven't followed that detail of later
> Fortran standards. They have to, at least, allocate to the
> maximum size.

True.

I added a little more for my example.

If I understand the docs correctly then the above
allocates 512 bytes (per recl) for each cell, but
handles actual lengths 0-512 within that cell.

Arne




More information about the Info-vax mailing list