From: jim.giner@suny.edu   
      
   During your trial and error(s), you probably have a "hidden" report on your   
   desktop. Remove the hide parm of the load and debug your script - that way   
   you'll know if you have something still open on that table.   
   "Kenneth" wrote in message   
   news:gjkmt4tapc4qkaq35ht3mt05rgpmqbqins@4ax.com...   
   > On 6 Apr 2009 17:03:39 -0400, "Jim Moseley"   
   > wrote:   
   >   
   >>   
   >>Kenneth,   
   >>   
   >>You need to test the result of the Save().   
   >>   
   >>But, really, why are you saving the report? Since you used Load(), you   
   >>can   
   >>adjust it however you want, then directly Run() it.   
   >>   
   >>Also, if this is a multi-user application, you might be overwriting each   
   >>other's report.   
   >>   
   >>Here's my suggested fix:   
   >>   
   >>;r.save() ; <- do not need   
   >>;if not r.close() then; ; <- do not need   
   >>; errorShow() ; <- do not need   
   >>;return ; <- do not need   
   >>;endIf ; <- do not need   
   >>   
   >>if not r.run() then ; <- add   
   >> errorShow() ; <- add   
   >> return ; <- add   
   >>endif ; <- add   
   >>   
   >>if not r.print(":MONEY:Invoice") then   
   >> errorShow()   
   >> return   
   >>endIf   
   >>   
   >>   
   >>HTH,   
   >>Jim Moseley   
   >   
   > Hi Jim,   
   >   
   > I'm making progress (of a sort), but the report still won't   
   > print.   
   >   
   > Here's the current code:   
   >   
   >   
   > 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()   
   > sleep(2000)   
   > 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   
   >   
   > if not r.run()   
   > then   
   > errorShow()   
   > return   
   > endIf   
   >   
   > if not r.print(":MONEY:Invoice") then   
   > errorShow()   
   > return   
   > endIf   
   >   
   >   
   > When I run the code, I get an error on the query telling me   
   > that it can't run because its destination table,   
   > :MONEY:INVOICE.DB, is "in use."   
   >   
   > Nothhing anywhere else points to that table, so I am having   
   > trouble understand how it could be "in use." (And, when I   
   > try to open it manually, it opens properly, and appears   
   > empty.)   
   >   
   > What might be an appropriate next step in sorting this out?   
   >   
   > Many thanks, as before,   
   > --   
   > Kenneth   
   >   
   > If you email... Please remove the "SPAMLESS."   
      
   --- SoupGate-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)   
|