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

[Johnny Billquist]

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.)

   Johnny