Re: [sqr-users] Printing Images

[Rhonda Hudgins <RHudgins@genencor.com>]

Here is the code I use for printing images.  We seem to have better luck 
using bmp or jpg images.


SHOW 'Report file ' $sqr-report   << -- from the sqr -f parameter  (sqr 
key word)

 unstring $sqr-report by '.' into $rpt_name, $rpt_type

  if upper($rpt_type) = 'PDF' 
          print-image company_logo (1,1) 
                type=jpeg-file  
                source='gci.jpg' 
                image-size=(18,5) 
  else
    print-image company_logo (1,1)  
        type=bmp-file  
        source='gci.BMP' 
        image-size=(18,5) 
  end-if


  Thanks!

Rhonda Hudgins
@}---'----,----
Genencor International, Inc
office - 585/256-5266
rhudgins@genencor.com




"MacLellan, David" <dmaclellan5@tva.gov> 
Sent by: sqr-users-admin@sqrug.org
10/17/2003 09:31 AM
Please respond to
sqr-users@sqrug.org


To
<sqr-users@sqrug.org>
cc

Subject
[sqr-users] Printing Images






SQR/4.3.4
Sun Microsystems Inc.   SunOS 5.6
Oracle 8i
Indus / Empac

I am trying to print a EPS file and encountering some problems. I can
generate the image correctly to a .lis file and send it to the printer
on Unix with no problems. The difficulties come in when I try to create
a .pdf file from the .spf generated. The vendor s/w we use generates a
.lis .spf and .pdf for each report. The user can pick either host or
windows print , windows opens the .pdf in a viewer and allows them to
print it.

Sample code, this program creates the .lis file correctly and prints
fine on the host. I have included some code to make sure image and text
can both be printed on the same page.
BEGIN-SETUP
DECLARE-LAYOUT default
PAPER-SIZE   = (8.27,11)
ORIENTATION  = PORTRAIT
LEFT-MARGIN  = .0
RIGHT-MARGIN = .0
CHAR-WIDTH   = 6.0
MAX-LINES    = 56
END-DECLARE
DECLARE-PRINTER default-hp
POINT-SIZE = 12
PITCH      = 12
FONT       = 3
SYMBOL-SET = 8U
END-DECLARE
DECLARE-REPORT default
LAYOUT       = default
PRINTER-TYPE = postscript
END-DECLARE
END-SETUP
Begin-Program
LET $epsfile = 'sqribe.eps'
Alter-Printer Font=5 Point-Size=12
Print-Image (6,6)
Image-Size = (30,40)
Source = $epsfile
Type = EPS-FILE
DO process_emp
End-Program
Begin-Heading 2
print 'Employee List with no User ID'    (+1)  center
print $current-date                      (,1)  edit 'DD-MON-YYYY'
End-Heading
Begin-Procedure process_emp
print 'NO employees found................' (+1)
End-Procedure !process_emp

I then use SQRP to create a .pdf file
sqrp embed_eps.spf -Fembed_eps.pdf PRINTER:PD

Host print works fine, but viewing the .pdf in Acrobat shows the text
and heading correctly and a shadded rectangle.

I have not been able to find documentation on PRINTER:PD, but this is
what the vendor uses in their s/w, although they do not have images
printed in any of their provided reports.

Any help would be greatly appreciated. Thanks

Dave MacLellan
SP-2A-C
423-751-7734
865-632-3560
800-283-0028 #2941


_______________________________________________
sqr-users mailing list
sqr-users@sqrug.org
http://www.sqrug.org/mailman/listinfo/sqr-users


--------------------------------------------------------------------------
This message (including any attachments) may contain information
which is confidential or privileged. Use, dissemination, distribution, 
or reproduction of this message by unintended recipients is not 
authorized and may be unlawful. If you are not the intended 
recipient, please advise the sender immediately by reply e-mail and 
delete this message and any attachments without retaining a copy.
--------------------------------------------------------------------------

_______________________________________________
sqr-users mailing list
sqr-users@sqrug.org
http://www.sqrug.org/mailman/listinfo/sqr-users