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

Dave Froble davef at tsoft-inc.com
Fri Sep 22 07:08:38 EDT 2023


On 9/21/2023 9:12 PM, 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??

First, HELP/LIBRARY=SYS$HELP:BASICHELP is your friend.

Then look at "PRINT USING" for capabilities.

print format$(123.45,"<0>###.##")
0123.45


-- 
David Froble                       Tel: 724-529-0450
Dave Froble Enterprises, Inc.      E-Mail: davef at tsoft-inc.com
DFE Ultralights, Inc.
170 Grimplin Road
Vanderbilt, PA  15486



More information about the Info-vax mailing list