Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Bugs: create views
Message
De
09/09/2005 03:51:37
Aaron K. Y. Chu
Health & Care Co. Ltd.
Hong Kong, Hong Kong
 
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Base de données, Tables, Vues, Index et syntaxe SQL
Versions des environnements
Visual FoxPro:
VFP 9
OS:
Windows XP SP2
Network:
Windows 2000 Pro
Database:
MySQL
Divers
Thread ID:
01047236
Message ID:
01047997
Vues:
13
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!

********************************************************
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform