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

[Arne Vajhøj]

On 9/22/2023 6:23 AM, Johnny Billquist wrote:
> On 2023-09-22 03:12, Arne Vajhøj wrote:
>> BTW, my basic code has a difference from the other languages as
>> I was not able to put leading zeroes in the 4 digits line number.
>> How does one get an integer formatted to a given width with leading
>> zeros in VMS basic??
> 
> BASIC2
> 
> print format$(1, "Line _#<0>####_!")
> 
> 
> Line #00001!
> 
> BASIC2
> 
> 
> (See HELP STA PRIN USI NUM for more details, I think...)
> (And yes, I used BASIC+2 and not VMS BASIC. But as far as I can 
> remember, they are the same in this, and most other things.)

Works great. Thanks.

Arne