Printing a .GIF in a Letter

[Ted Houghton <THoughto@UNITEDROAD.COM>]

I am attempting unsuccessfully to print a logo at the top of a letter.  This
is the first time I've had to imbed an image........

Currently I declare-image in the setup:

begin-setup
#Include 'setup05A.sqc'   !Printer and page-size initialization
declare-image logo
  type=gif-file
  source='g:\logos\logo1.gif'
  image-size=(10,5)
end-declare
end-setup

Then I call the print-image in the Main Section:

BEGIN-SELECT
p.orig_hire_dt
  let $hire_dt = &p.orig_hire_dt
j.file_nbr
  move &j.file_nbr to $file_nbr
j.empl_status
  move &j.empl_status to $empl_status
..............
  DO logo
  DO letter
  new-page

FROM  ps_job j, PS_PERSONAL_DATA P .....
END-SELECT

Then print the logo:

BEGIN-PROCEDURE logo
   print-image urslogo (1,10)
end-procedure

Finally, I print the letter:

BEGIN-PROCEDURE letter
Begin-document (15,1)
.b
.b
Text letter
End-Document

The logo will not print.  Any assistance would be greatly appreciated!






*************************** N O T I C E **************************************

This message and any attachments is intended only for the individual or company 
to which it is addressed and may contain information which is privileged, 
confidential or prohibited from disclosure or unauthorized use. If the 
recipient of this transmission is not the intended recipient, or the employee 
or agent responsible for delivering such materials to the intended recipient, 
you are hereby notified that any use, any form of reproduction, dissemination, 
copying, disclosure, modification, distribution and/or publication of this 
e-mail message or its attachments other than by it's intended recipient is 
strictly prohibited by the sender. If you have received it in error, please 
notify us immediately and destroy the message and all copies in your possession.

This message has been scanned for viruses by Norton Antivirus.