From: usenet@soleSPAMLESSassociates.com   
      
   Howdy,   
      
   Running P9 with XP   
      
   I have a button with several blocks of code on it.   
      
   Usually, all works well.   
      
   The portion below runs a query, loads a report, and prints   
   the report.   
      
   Sometimes however, the report fails to print.   
      
   It generates no errors, and if it fails to print, and I then   
   view the report manually, it looks fine, and manually prints   
   properly.   
      
   I have had problems with code to print reports in the past,   
   and for many of them, have gone to Microsoft Word for the   
   actual printing.   
      
   I could do that for this purpose, but before I do, thought   
   to ask:   
      
   Might you see a problem with the code below?   
      
      
   qInv = Query   
      
   ANSWER: :MONEY:INVOICE.DB   
      
   :MONEY:INVOICES.DB | Num   | InvNumber  | Replaces | Last | First  |   
   						 | Check _join1 | Check ~newInvNumber | Check |   
   Check as LastNameField  | Check  |   
      
   :MONEY:INVOICES.DB | Adr    | Purpose | InvDate | DueDate | DUE    | RECEIVED |   
   						 | Check  | Check   | Check   | Check   | Check   
   | Check    |   
      
   :MONEY:INVOICES.DB | Balance | Tag    | Comment | ReplaceNote |   
   						 | Check   | Check  | Check   | Check       |   
      
   ADDRESS.DB | Num    | L7     | L6     | L5     | L4     | L3   
   | L2     |   
   			  | _join1 | Check  | Check  | Check  | Check  | Check   
   | Check  |   
      
   ADDRESS.DB | L1     | City   | State  | Zip    | Inv  |   
   			  | Check  | Check  | Check  | Check  | True |   
      
   EndQuery   
      
   	if not executeQBE(qInv) then   
   		errorShow()   
   		return   
   	endIf   
      
   if not r.load(":MONEY:Invoice",winStyleHidden) then   
   	errorShow()   
   return   
   endIf   
      
   r.pastDueText.visible=FALSE   
   r.pastDueBox.visible=FALSE   
   r.balanceLabel.visible=FALSE   
   r.balance.FONT.COLOR=WHITE   
   r.receivedLabel.visible=FALSE   
   r.received.FONT.COLOR=WHITE   
   r.matures.visible=true   
   r.line.visible=false   
   r.save()   
   if not r.close() then   
   	errorShow()   
   return   
   endIf   
      
   if not r.print(":MONEY:Invoice") then   
   	errorShow()   
   	return   
   endIf   
      
      
   Sincere thanks,   
   --   
   Kenneth   
      
   If you email... Please remove the "SPAMLESS."   
      
   --- SoupGate-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)