Re: How to flush right ?

[Michael Docteroff <doctoroffm@PT.CYANAMID.COM>]

     THIS LITTLE PROGRAM MAY BE OF SOME HELP.

     begin-report

      let $var1 = 'NEW'
      let $var2 = 'CREDIT CARD'
      do main
     end-report


     begin-procedure main
      LET #V1 = (60 - LENGTH($VAR1))
      LET #V2 = (60 - LENGTH($VAR2))

      PRINT 'ACCOUNT SUMMARY' (1,1)
      PRINT $VAR1             ( 0, #V1 )
      PRINT 'PAYMENTS'        (+1,1)
      PRINT $VAR2             ( 0, #V2 )
     END-PROCEDURE



______________________________ Reply Separator _________________________________
Subject: How to flush right ?
Author:  TLR585J@BAPLAZA.BELL-ATL.COM at GATEWAY
Date:    12/17/96 7:56 PM


     I would like to position columns on the right hand side, if the
     columns increase in width I would like them to be perfectly aligned.

     example.
     Account Summary                    New
     Payments                        Credit

     The following is not what I want if the width increases

     Account Summary                    New
     Payments                        Credit Card