Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Deleting a record from a multitable view
Message
From
05/08/2007 22:51:54
 
General information
Forum:
Visual FoxPro
Category:
Databases,Tables, Views, Indexing and SQL syntax
Environment versions
Visual FoxPro:
VFP 9
OS:
Windows XP
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01246019
Message ID:
01246070
Views:
36
Interestingly, this is happening only within the form. On the stand alone view there are no problems. Besides, it is not allowing edits also, giving the same message.

My code:
SELECT Stockbook.ddate, Stockbook.nlotid, Items.cname,;
  Itemhead.citemhead, Stockbook.cdetails, Stockbook.ncompcode,;
  Stockbook_a.ncost, Stockbook.nqtyin, Stockbook.nqtyout,;
  IIF(Stockbook.nqtyin>Stockbook.nqtyout,Stockbook.nqtyin*Stockbook_a.ncost,Stockbook.nqtyout*Stockbook_a.ncost) AS value,;
  Stockbook.copr, Stockbook.clocation, Stockbook.ntransid;
 FROM ;
     accounts!stockbook ;
    INNER JOIN accounts!items ;
   ON  Stockbook.nitemcode = Items.nitemcode ;
    LEFT OUTER JOIN accounts!stockbook Stockbook_a ;
   ON  Stockbook.nlotid = Stockbook_a.nlotid;
   AND  Stockbook_a.lnew == ( .T. ) ;
    INNER JOIN accounts!itemhead ;
   ON  Items.nsubitcode = Itemhead.nitemcode;
 ORDER BY Stockbook.ddate, Stockbook.nitemcode

DBSetProp(ThisView,"View","SendUpdates",.T.)
DBSetProp(ThisView,"View","BatchUpdateCount",1)
DBSetProp(ThisView,"View","CompareMemo",.T.)
DBSetProp(ThisView,"View","FetchAsNeeded",.F.)
DBSetProp(ThisView,"View","FetchMemo",.T.)
DBSetProp(ThisView,"View","FetchSize",100)
DBSetProp(ThisView,"View","MaxRecords",-1)
DBSetProp(ThisView,"View","Prepared",.F.)
DBSetProp(ThisView,"View","UpdateType",1)
DBSetProp(ThisView,"View","UseMemoSize",255)
DBSetProp(ThisView,"View","Tables","accounts!stockbook")
DBSetProp(ThisView,"View","WhereType",2)

DBSetProp(ThisView+".ddate","Field","DataType","D")
DBSetProp(ThisView+".ddate","Field","UpdateName","accounts!stockbook.ddate")
DBSetProp(ThisView+".ddate","Field","KeyField",.F.)
DBSetProp(ThisView+".ddate","Field","Updatable",.T.)

DBSetProp(ThisView+".nlotid","Field","DataType","N(10)")
DBSetProp(ThisView+".nlotid","Field","UpdateName","accounts!stockbook.nlotid")
DBSetProp(ThisView+".nlotid","Field","KeyField",.F.)
DBSetProp(ThisView+".nlotid","Field","Updatable",.T.)

DBSetProp(ThisView+".cname","Field","DataType","C(40)")
DBSetProp(ThisView+".cname","Field","UpdateName","accounts!items.cname")
DBSetProp(ThisView+".cname","Field","KeyField",.F.)
DBSetProp(ThisView+".cname","Field","Updatable",.F.)

DBSetProp(ThisView+".citemhead","Field","DataType","C(20)")
DBSetProp(ThisView+".citemhead","Field","UpdateName","accounts!itemhead.citemhead")
DBSetProp(ThisView+".citemhead","Field","KeyField",.F.)
DBSetProp(ThisView+".citemhead","Field","Updatable",.F.)

DBSetProp(ThisView+".cdetails","Field","DataType","C(25)")
DBSetProp(ThisView+".cdetails","Field","UpdateName","accounts!stockbook.cdetails")
DBSetProp(ThisView+".cdetails","Field","KeyField",.F.)
DBSetProp(ThisView+".cdetails","Field","Updatable",.T.)

DBSetProp(ThisView+".ncompcode","Field","DataType","N(5)")
DBSetProp(ThisView+".ncompcode","Field","UpdateName","accounts!stockbook.ncompcode")
DBSetProp(ThisView+".ncompcode","Field","KeyField",.F.)
DBSetProp(ThisView+".ncompcode","Field","Updatable",.T.)

DBSetProp(ThisView+".ncost","Field","DataType","N(10,2)")
DBSetProp(ThisView+".ncost","Field","UpdateName","accounts!stockbook.ncost")
DBSetProp(ThisView+".ncost","Field","KeyField",.F.)
DBSetProp(ThisView+".ncost","Field","Updatable",.F.)

DBSetProp(ThisView+".nqtyin","Field","DataType","N(10,2)")
DBSetProp(ThisView+".nqtyin","Field","UpdateName","accounts!stockbook.nqtyin")
DBSetProp(ThisView+".nqtyin","Field","KeyField",.F.)
DBSetProp(ThisView+".nqtyin","Field","Updatable",.T.)

DBSetProp(ThisView+".nqtyout","Field","DataType","N(10,2)")
DBSetProp(ThisView+".nqtyout","Field","UpdateName","accounts!stockbook.nqtyout")
DBSetProp(ThisView+".nqtyout","Field","KeyField",.F.)
DBSetProp(ThisView+".nqtyout","Field","Updatable",.T.)

DBSetProp(ThisView+".value","Field","DataType","N(20,4)")
DBSetProp(ThisView+".value","Field","KeyField",.F.)
DBSetProp(ThisView+".value","Field","Updatable",.F.)

DBSetProp(ThisView+".copr","Field","DataType","C(3)")
DBSetProp(ThisView+".copr","Field","UpdateName","accounts!stockbook.copr")
DBSetProp(ThisView+".copr","Field","KeyField",.F.)
DBSetProp(ThisView+".copr","Field","Updatable",.T.)

DBSetProp(ThisView+".clocation","Field","DataType","C(4)")
DBSetProp(ThisView+".clocation","Field","UpdateName","accounts!stockbook.clocation")
DBSetProp(ThisView+".clocation","Field","KeyField",.F.)
DBSetProp(ThisView+".clocation","Field","Updatable",.T.)

DBSetProp(ThisView+".ntransid","Field","DataType","I")
DBSetProp(ThisView+".ntransid","Field","UpdateName","accounts!stockbook.ntransid")
DBSetProp(ThisView+".ntransid","Field","KeyField",.T.)
DBSetProp(ThisView+".ntransid","Field","Updatable",.T.)
Steve
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform