No Subject

["Huber, Robert" <RHuber@IMF.ORG>]

I suppose I'm missing something but if not the following should do the job
but I do not have sqr3 to test it:

begin-program

open 'file' as 6 for-writing record=123:vary

move '          ' to $ten_blanks

move 'abc'        to $string

write 6 from $string:3 $ten_blanks:10

end-program

-----Original Message-----
From: Bruce Butterfield [mailto:bbutterfield@WEST.RAYTHEON.COM]
Sent: Thursday, August 24, 2000 11:58 AM
To: SQR-USERS@list.iex.net
Subject:


     Hi my friends


     I am building a text file to send to a purchased application and need
     to append 10 spaces to the end of every line. ( this is required by
     the target application).  I have tried several ways in sqr 3 but have
     not been successful.  I can put the needed spaces on the line if there
     is another character at the end but that makes the file un-readable to
     the target application.




     thanks
     bruce