Re: SQR Open and Close of Files

[Don Mellen <donm@ONTKO.COM>]

Well, it was a long time ago, but....

I worked on a Maximo project where we faxed using RightFax.  We were
trying to have a single output that did all the routings.  We found that
the routing codes needed to be in a particular font to be recognized.
Here's the note from the top of that program.

!* FOR RIGHTFAX FAX ROUTING!  User needs font 902 defined as follows
!* "902=Courier,fixed" (without qoutes) in the [FONT] section of the
!* SQR.INI file.  (this defines font 902 as the "printer" courier font).

Also, we used different fax tags.  We ended up using the following...

   let $faxline1 = '<TONAME:' || &contact || '>'
   let $faxline2 = '<TOFAXNUM:' || $fax_num || '>'
   let $faxline3 = '<TOCOMPANY:' || &comp_name || '>'

and then printing like....

   if #page-count = 1
      alter-printer font=902
      position (+1,)
      print $faxline1  (,1)
      position (+1,)
      print $faxline2  (,1)
      position (+1,)
      print $faxline3  (,1)
      alter-printer point-size=9 font=3
   end-if

This was in the begin-heading section after the titles.  The #page-count
was reset for each new thing (PO's in this case), so being page 1 meant it
was the first page for this PO.  The alter-printer at the end was just to
reset to what the report needed.

It seems like we were using Maximo routing to send it, but it was too long
ago for me to be sure.  I also can't remember if there was something we
played with on the RightFax side.  I do know we had to prefix the phone
numbers with a "9," or a "7," to get outside lines for local or long
distance.

We did not, as I recall, print *Both* to a printer and the fax, it was to
one or the other only.

This might not solve your problem, but I hope, at least, it jogs something
lose that will help you.

-----------------------------------------------------------------------
Donald Mellen  | Ray Ontko & Co. - Richmond, IN - http://www.ontko.com/
donm@ontko.com |  "In the beginning, there was nothing, which exploded"