Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Bugs: create views
Message
From
09/09/2005 03:51:37
Aaron K. Y. Chu
Health & Care Co. Ltd.
Hong Kong, Hong Kong
 
General information
Forum:
Visual FoxPro
Category:
Databases,Tables, Views, Indexing and SQL syntax
Environment versions
Visual FoxPro:
VFP 9
OS:
Windows XP SP2
Network:
Windows 2000 Pro
Database:
MySQL
Miscellaneous
Thread ID:
01047236
Message ID:
01047997
Views:
14
1. You can see the semi-colon in table ";"... in view designer, this will be mistakenly assume it is a cross join

2. the Datatype is wrong, especially true in case mySQL's varchar, in where the view will recognise it is character, but most importantly, the length are wrong.
SELECT Appt_master.Appt_ID, Appt_master.ApptTime1,;
  Appt_master.ApptTime2, Appt_master.TxRemark, Appt_master.case_no,;
  Appt_master.pt_name, Appt_master.Sex, Appt_master.ApptRemark,;
  Appt_master.Ref_ID, Appt_master.Status, Appt_master.Operator,;
  Appt_master.Clinic;
 FROM ;
     appt_master Appt_master;
 WHERE  Appt_master.ApptTime1 BETWEEN ?getDate1 AND ?getDate2;
 ORDER BY Appt_master.ApptTime1

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","ShareConnection",.F.)
DBSetProp(ThisView,"View","AllowSimultaneousFetch",.F.)
DBSetProp(ThisView,"View","UpdateType",1)
DBSetProp(ThisView,"View","UseMemoSize",255)
DBSetProp(ThisView,"View","Tables","appt_master")
DBSetProp(ThisView,"View","WhereType",2)

DBSetProp(ThisView+".appt_id","Field","DataType","I")
DBSetProp(ThisView+".appt_id","Field","UpdateName","appt_master.Appt_ID")
DBSetProp(ThisView+".appt_id","Field","KeyField",.T.)
DBSetProp(ThisView+".appt_id","Field","Updatable",.F.)

DBSetProp(ThisView+".appttime1","Field","DataType","T")
DBSetProp(ThisView+".appttime1","Field","UpdateName","appt_master.ApptTime1")
DBSetProp(ThisView+".appttime1","Field","KeyField",.F.)
DBSetProp(ThisView+".appttime1","Field","Updatable",.T.)

DBSetProp(ThisView+".appttime2","Field","DataType","T")
DBSetProp(ThisView+".appttime2","Field","UpdateName","appt_master.ApptTime2")
DBSetProp(ThisView+".appttime2","Field","KeyField",.F.)
DBSetProp(ThisView+".appttime2","Field","Updatable",.T.)

DBSetProp(ThisView+".txremark","Field","DataType","C(5)")
DBSetProp(ThisView+".txremark","Field","UpdateName","appt_master.TxRemark")
DBSetProp(ThisView+".txremark","Field","KeyField",.F.)
DBSetProp(ThisView+".txremark","Field","Updatable",.T.)

DBSetProp(ThisView+".case_no","Field","DataType","C(6)")
DBSetProp(ThisView+".case_no","Field","UpdateName","appt_master.case_no")
DBSetProp(ThisView+".case_no","Field","KeyField",.F.)
DBSetProp(ThisView+".case_no","Field","Updatable",.T.)

DBSetProp(ThisView+".pt_name","Field","DataType","C(6)")
DBSetProp(ThisView+".pt_name","Field","UpdateName","appt_master.pt_name")
DBSetProp(ThisView+".pt_name","Field","KeyField",.F.)
DBSetProp(ThisView+".pt_name","Field","Updatable",.T.)

DBSetProp(ThisView+".sex","Field","DataType","I")
DBSetProp(ThisView+".sex","Field","UpdateName","appt_master.Sex")
DBSetProp(ThisView+".sex","Field","KeyField",.F.)
DBSetProp(ThisView+".sex","Field","Updatable",.T.)

DBSetProp(ThisView+".apptremark","Field","DataType","C(17)")
DBSetProp(ThisView+".apptremark","Field","UpdateName","appt_master.ApptRemark")
DBSetProp(ThisView+".apptremark","Field","KeyField",.F.)
DBSetProp(ThisView+".apptremark","Field","Updatable",.T.)

DBSetProp(ThisView+".ref_id","Field","DataType","I")
DBSetProp(ThisView+".ref_id","Field","UpdateName","appt_master.Ref_ID")
DBSetProp(ThisView+".ref_id","Field","KeyField",.F.)
DBSetProp(ThisView+".ref_id","Field","Updatable",.T.)

DBSetProp(ThisView+".status","Field","DataType","I")
DBSetProp(ThisView+".status","Field","UpdateName","appt_master.Status")
DBSetProp(ThisView+".status","Field","KeyField",.F.)
DBSetProp(ThisView+".status","Field","Updatable",.T.)

DBSetProp(ThisView+".operator","Field","DataType","C(2)")
DBSetProp(ThisView+".operator","Field","UpdateName","appt_master.Operator")
DBSetProp(ThisView+".operator","Field","KeyField",.F.)
DBSetProp(ThisView+".operator","Field","Updatable",.T.)

DBSetProp(ThisView+".clinic","Field","DataType","C(4)")
DBSetProp(ThisView+".clinic","Field","UpdateName","appt_master.Clinic")
DBSetProp(ThisView+".clinic","Field","KeyField",.F.)
DBSetProp(ThisView+".clinic","Field","Updatable",.T.)
Best regards,

Aaron Chu

********************************************************

Working with Visual FoxPro is a lot of FUN!

********************************************************
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform