[Date Prev][Date Next][Thread Prev][Thread Next]
[Author Index] [Date Index] [Thread Index]
[SQR-USERS Info] [SQRUG Home Page]

Re: SQRWP printing - version 4.0.1 to version 4.3



I have the reports all specifying the HP printer option.  I had tried
LinePrinter, but got even worse print results.  It would only print
portrait format.  With HP specified it switches based on the report.

THe reports also have alter-printer options in use.  The headers are in
16pt, some text in the report is 10pt, most of the report is in 8pt.  It
properly changes the font size, but not the font spacing.

Some of the data is numeric, that prints properly. The data that is alpha
is what prints strangely.  I have both on the same line, the numbers print
as 8 pt and 16.6 CPI, but the characters (which are really the account
number, etc) print at 8pt and 10CPI.  What I need is for the whole thing to
print at 16.6CPI.

The other thing that is weird is that the columns start in the correct
places.  Here is the code I have for the printer
begin-setup

   declare-printer hp_laser
       type=HP
       font=3
       point-size=8
   end-declare

   declare-layout hp_default
       paper-size=(11,8.5)
       formfeed=NO
       orientation=LANDSCAPE
       left-margin=0.75
       right-margin=0.25
       top-margin=0.25
       bottom-margin=0.25
   end-declare

   declare-report newmess
       layout=hp_default
       printer-type=hplaserjet
   end-declare
end-setup

Then the page is laid out for where the columns should be:

begin-procedure initialize_vars

   move 1  to #col1  !00             Status
   move 4  to #col2  !00000          CSN
   move 09 to #col3  !9999           Auto#
   move 14 to #col4  !999999         SEQ#
   move 19 to #col5  !xx-xx-xxxx     tran date
   move 27 to #col6  !xx:xx:xx       tran time
   move 35 to #col7  !               Personal
   move 50 to #col8  !               Description
   move 69 to #col9  !99,999,990.00  Credit
   move 82 to #col10 !99,999,990.00  Debit
   move 59 to #col11 !               Finish

   move 'empty string' to $adj_reason
   move 'YES' to $firsttime
end-procedure ! initialize_vars

The alter-printers look like this
   alter-printer
       point-size=8

The first four columns are properly spaced, columns 9 and 10 are properly
spaced.

All the data in between is spaced much too widely.

The spaces between columns are spaced too widely as well. (Example col1 and
col2 have a single space between them.  This space is printing much wider
that a 16.6 CPI space).  This is driving me crazy.