Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations biv343 on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

view in vfp8 doesnot work in vfp9 why?

Status
Not open for further replies.

Nifrabar

Programmer
Mar 16, 2003
1,343
NL
Hi the view hereunder works fine in VFP8 but V_werkgroep_gesorteerd.werkgroep is displayed as .null.
when used in VFP9.
The strange thing is that in the project-manager (VFP9) the view shows all fields as usual. Once in the DE of a form the error as described above happens.
Any idea?
-Bart
Code:
SELECT Vwledenwerkgroep.vwid, Vwledenwerkgroep.notitie,;
  Vwledenwerkgroep.kontaktper, Vwledenwerkgroep.miv,;
  Vwledenwerkgroep.status, Vwledenwerkgroep.gebruiker,;
  Vwledenwerkgroep.update, Functies.functie,;
  V_werkgroep_gesorteerd.werkgroep, Vwledenwerkgroep.vwwgid;
 FROM ;
     dbwinassist!vwledenwerkgroep ;
    LEFT OUTER JOIN dbwinassist!v_werkgroep_gesorteerd ;
   ON  Vwledenwerkgroep.werkgrpid = V_werkgroep_gesorteerd.werkgrpid ;
    LEFT OUTER JOIN dbwinassist!functies ;
   ON  Vwledenwerkgroep.functieid = Functies.id;
 WHERE  Vwledenwerkgroep.vwid = ( ?gnvwID );
   AND  NOT (DELETED() );
 ORDER BY V_werkgroep_gesorteerd.sortwerkgroep

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","dbwinassist!vwledenwerkgroep")
DBSetProp(ThisView,"View","WhereType",3)

DBSetProp(ThisView+".vwid","Field","DataType","I")
DBSetProp(ThisView+".vwid","Field","UpdateName","dbwinassist!vwledenwerkgroep.vwid")
DBSetProp(ThisView+".vwid","Field","KeyField",.F.)
DBSetProp(ThisView+".vwid","Field","Updatable",.F.)

DBSetProp(ThisView+".notitie","Field","DataType","C(200)")
DBSetProp(ThisView+".notitie","Field","UpdateName","dbwinassist!vwledenwerkgroep.notitie")
DBSetProp(ThisView+".notitie","Field","KeyField",.F.)
DBSetProp(ThisView+".notitie","Field","Updatable",.F.)

DBSetProp(ThisView+".kontaktper","Field","DataType","L")
DBSetProp(ThisView+".kontaktper","Field","UpdateName","dbwinassist!vwledenwerkgroep.kontaktper")
DBSetProp(ThisView+".kontaktper","Field","KeyField",.F.)
DBSetProp(ThisView+".kontaktper","Field","Updatable",.F.)

DBSetProp(ThisView+".miv","Field","DataType","C(50)")
DBSetProp(ThisView+".miv","Field","UpdateName","dbwinassist!vwledenwerkgroep.miv")
DBSetProp(ThisView+".miv","Field","Inputmask","99-99-9999-XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX")
DBSetProp(ThisView+".miv","Field","KeyField",.F.)
DBSetProp(ThisView+".miv","Field","Updatable",.F.)

DBSetProp(ThisView+".status","Field","DataType","I")
DBSetProp(ThisView+".status","Field","UpdateName","dbwinassist!vwledenwerkgroep.status")
DBSetProp(ThisView+".status","Field","KeyField",.F.)
DBSetProp(ThisView+".status","Field","Updatable",.T.)

DBSetProp(ThisView+".gebruiker","Field","DataType","C(20)")
DBSetProp(ThisView+".gebruiker","Field","UpdateName","dbwinassist!vwledenwerkgroep.gebruiker")
DBSetProp(ThisView+".gebruiker","Field","KeyField",.F.)
DBSetProp(ThisView+".gebruiker","Field","Updatable",.F.)

DBSetProp(ThisView+".update","Field","DataType","T")
DBSetProp(ThisView+".update","Field","UpdateName","dbwinassist!vwledenwerkgroep.update")
DBSetProp(ThisView+".update","Field","KeyField",.F.)
DBSetProp(ThisView+".update","Field","Updatable",.F.)

DBSetProp(ThisView+".functie","Field","DataType","C(50)")
DBSetProp(ThisView+".functie","Field","UpdateName","dbwinassist!functies.functie")
DBSetProp(ThisView+".functie","Field","KeyField",.F.)
DBSetProp(ThisView+".functie","Field","Updatable",.F.)

DBSetProp(ThisView+".werkgroep","Field","DataType","C(50)")
DBSetProp(ThisView+".werkgroep","Field","UpdateName","dbwinassist!v_werkgroep_gesorteerd.werkgroep")
DBSetProp(ThisView+".werkgroep","Field","KeyField",.F.)
DBSetProp(ThisView+".werkgroep","Field","Updatable",.F.)

DBSetProp(ThisView+".vwwgid","Field","DataType","I")
DBSetProp(ThisView+".vwwgid","Field","UpdateName","dbwinassist!vwledenwerkgroep.vwwgid")
DBSetProp(ThisView+".vwwgid","Field","KeyField",.T.)
DBSetProp(ThisView+".vwwgid","Field","Updatable",.F.)
 
Hi Jean,
Maybe that helps.
I also good an advice to remove the deleted() strophe.
Deleted seems to work as deleted('someAlias') which me bring unespected results.
-Bart
 
You can't use DELETED() in a query involving more than one table. SET DELETED ON before the query to ensure you only get non-deleted records.

Tamar
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top