Remote View instead of a table (AutoComp.dbf)

Level Extreme platform

Subscription

Corporate profile

Products & Services

Support

Legal

Français

Remote View instead of a table (AutoComp.dbf)

Message

From

29/05/2009 14:57:51

Bhavbhuti Nathwani
Venus Software Operations
Rajkot, India

All

General information

Forum:

Visual FoxPro

Category:

Classes - VCX

Title:

Remote View instead of a table (AutoComp.dbf)

Environment versions

Visual FoxPro:

VFP 9 SP1

Database:

Firebird

Application:

Desktop

Miscellaneous

Thread ID:

01402668

Message ID:

01402668

Views:

315

Hi all

AutoComplete in textboxes is interesting but how do you make it client-server? I don't want to allow the users to have their own local pet AutoComp.dbf.

To this end I created a table with the structure that AutoComp.dbf has, created a RV in VFP. In the Form.Grd.Col.Txt.Init() I popluated the property thus:

This.AutoCompTable = DBF("v_autocomp")
RETURN DODEFAULT()

But sadly the remote view stays empty Form.Grd.Col.Txt.LostFocus()

SELECT v_autocomp
BROWSE norm
RETURN DODEFAULT()

let alone send it back to the backend the cursor is not populated at all. Is such a nice feature only meant for minor applications? Has anyone successfully done CS with this feature?

Please advise

Thanks and regards.

I went on to try by adding a cUnqID fields (default: SYS(2015)) just in case I can satisfy the WhereType of the RV but no luck (data is not populating in the first place)

CREATE SQL VIEW RV_AUTOCOMP REMOTE CONNECTION C19_Data_FB AS ;
SELECT * ;
	FROM AutoComp AutoComp


* View Properties
DBSetProp("RV_AUTOCOMP", 'View', 'UpdateType',1)
DBSetProp("RV_AUTOCOMP", 'View', 'WhereType',3)
DBSetProp("RV_AUTOCOMP", 'View', 'FetchMemo',.T.)
DBSetProp("RV_AUTOCOMP", 'View', 'SendUpdates',.T.)
DBSetProp("RV_AUTOCOMP", 'View', 'UseMemoSize',255)
DBSetProp("RV_AUTOCOMP", 'View', 'FetchSize',100)
DBSetProp("RV_AUTOCOMP", 'View', 'MaxRecords',-1)
DBSetProp("RV_AUTOCOMP", 'View', 'Tables',[AUTOCOMP])
DBSetProp("RV_AUTOCOMP", 'View', 'Comment',[])
DBSetProp("RV_AUTOCOMP", 'View', 'BatchUpdateCount',1)
DBSetProp("RV_AUTOCOMP", 'View', 'ShareConnection',.F.)
DBSetProp("RV_AUTOCOMP", 'View', 'Prepared',.F.)
DBSetProp("RV_AUTOCOMP", 'View', 'CompareMemo',.T.)
DBSetProp("RV_AUTOCOMP", 'View', 'FetchAsNeeded',.F.)
DBSetProp("RV_AUTOCOMP", 'View', 'RuleExpression',[])
DBSetProp("RV_AUTOCOMP", 'View', 'RuleText',[])
DBSetProp("RV_AUTOCOMP", 'View', 'ParameterList',[])

* View Field Properties
DBSetProp("RV_AUTOCOMP.SOURCE",'Field','KeyField',.F.)
DBSetProp("RV_AUTOCOMP.SOURCE",'Field','Updatable',.T.)
DBSetProp("RV_AUTOCOMP.SOURCE",'Field','UpdateName',[AutoComp.SOURCE])
DBSetProp("RV_AUTOCOMP.SOURCE",'Field','DataType',[C(20)])
DBSetProp("RV_AUTOCOMP.SOURCE",'Field','Caption',[Source])
DBSetProp("RV_AUTOCOMP.SOURCE",'Field','Comment',[Source name of the Textbox control])
DBSetProp("RV_AUTOCOMP.SOURCE",'Field','DefaultValue',[])
DBSetProp("RV_AUTOCOMP.SOURCE",'Field','DisplayClass',[])
DBSetProp("RV_AUTOCOMP.SOURCE",'Field','DisplayClassLibrary',[])
DBSetProp("RV_AUTOCOMP.SOURCE",'Field','Format',[])
DBSetProp("RV_AUTOCOMP.SOURCE",'Field','InputMask',[])
DBSetProp("RV_AUTOCOMP.SOURCE",'Field','RuleExpression',[])
DBSetProp("RV_AUTOCOMP.SOURCE",'Field','RuleText',[])
DBSetProp("RV_AUTOCOMP.DATA",'Field','KeyField',.F.)
DBSetProp("RV_AUTOCOMP.DATA",'Field','Updatable',.T.)
DBSetProp("RV_AUTOCOMP.DATA",'Field','UpdateName',[AutoComp.DATA])
DBSetProp("RV_AUTOCOMP.DATA",'Field','DataType',[C(254)])
DBSetProp("RV_AUTOCOMP.DATA",'Field','Caption',[Value])
DBSetProp("RV_AUTOCOMP.DATA",'Field','Comment',[Data value to display])
DBSetProp("RV_AUTOCOMP.DATA",'Field','DefaultValue',[])
DBSetProp("RV_AUTOCOMP.DATA",'Field','DisplayClass',[])
DBSetProp("RV_AUTOCOMP.DATA",'Field','DisplayClassLibrary',[])
DBSetProp("RV_AUTOCOMP.DATA",'Field','Format',[])
DBSetProp("RV_AUTOCOMP.DATA",'Field','InputMask',[])
DBSetProp("RV_AUTOCOMP.DATA",'Field','RuleExpression',[])
DBSetProp("RV_AUTOCOMP.DATA",'Field','RuleText',[])
DBSetProp("RV_AUTOCOMP.COUNT",'Field','KeyField',.F.)
DBSetProp("RV_AUTOCOMP.COUNT",'Field','Updatable',.T.)
DBSetProp("RV_AUTOCOMP.COUNT",'Field','UpdateName',[AutoComp.COUNT])
DBSetProp("RV_AUTOCOMP.COUNT",'Field','DataType',[I])
DBSetProp("RV_AUTOCOMP.COUNT",'Field','Caption',[Count])
DBSetProp("RV_AUTOCOMP.COUNT",'Field','Comment',[Number of times data item was selected])
DBSetProp("RV_AUTOCOMP.COUNT",'Field','DefaultValue',[""])
DBSetProp("RV_AUTOCOMP.COUNT",'Field','DisplayClass',[])
DBSetProp("RV_AUTOCOMP.COUNT",'Field','DisplayClassLibrary',[])
DBSetProp("RV_AUTOCOMP.COUNT",'Field','Format',[])
DBSetProp("RV_AUTOCOMP.COUNT",'Field','InputMask',[])
DBSetProp("RV_AUTOCOMP.COUNT",'Field','RuleExpression',[])
DBSetProp("RV_AUTOCOMP.COUNT",'Field','RuleText',[])
DBSetProp("RV_AUTOCOMP.WEIGHT",'Field','KeyField',.F.)
DBSetProp("RV_AUTOCOMP.WEIGHT",'Field','Updatable',.T.)
DBSetProp("RV_AUTOCOMP.WEIGHT",'Field','UpdateName',[AutoComp.WEIGHT])
DBSetProp("RV_AUTOCOMP.WEIGHT",'Field','DataType',[I])
DBSetProp("RV_AUTOCOMP.WEIGHT",'Field','Caption',[Weight])
DBSetProp("RV_AUTOCOMP.WEIGHT",'Field','Comment',[Specifies value to use when AutoComplete is set to 4 (Custom)])
DBSetProp("RV_AUTOCOMP.WEIGHT",'Field','DefaultValue',[])
DBSetProp("RV_AUTOCOMP.WEIGHT",'Field','DisplayClass',[])
DBSetProp("RV_AUTOCOMP.WEIGHT",'Field','DisplayClassLibrary',[])
DBSetProp("RV_AUTOCOMP.WEIGHT",'Field','Format',[])
DBSetProp("RV_AUTOCOMP.WEIGHT",'Field','InputMask',[])
DBSetProp("RV_AUTOCOMP.WEIGHT",'Field','RuleExpression',[])
DBSetProp("RV_AUTOCOMP.WEIGHT",'Field','RuleText',[])
DBSetProp("RV_AUTOCOMP.CREATED",'Field','KeyField',.F.)
DBSetProp("RV_AUTOCOMP.CREATED",'Field','Updatable',.T.)
DBSetProp("RV_AUTOCOMP.CREATED",'Field','UpdateName',[AutoComp.CREATED])
DBSetProp("RV_AUTOCOMP.CREATED",'Field','DataType',[T])
DBSetProp("RV_AUTOCOMP.CREATED",'Field','Caption',[Created])
DBSetProp("RV_AUTOCOMP.CREATED",'Field','Comment',[Timestamp when data item first created])
DBSetProp("RV_AUTOCOMP.CREATED",'Field','DefaultValue',[""])
DBSetProp("RV_AUTOCOMP.CREATED",'Field','DisplayClass',[])
DBSetProp("RV_AUTOCOMP.CREATED",'Field','DisplayClassLibrary',[])
DBSetProp("RV_AUTOCOMP.CREATED",'Field','Format',[])
DBSetProp("RV_AUTOCOMP.CREATED",'Field','InputMask',[])
DBSetProp("RV_AUTOCOMP.CREATED",'Field','RuleExpression',[])
DBSetProp("RV_AUTOCOMP.CREATED",'Field','RuleText',[])
DBSetProp("RV_AUTOCOMP.UPDATED",'Field','KeyField',.F.)
DBSetProp("RV_AUTOCOMP.UPDATED",'Field','Updatable',.T.)
DBSetProp("RV_AUTOCOMP.UPDATED",'Field','UpdateName',[AutoComp.UPDATED])
DBSetProp("RV_AUTOCOMP.UPDATED",'Field','DataType',[T])
DBSetProp("RV_AUTOCOMP.UPDATED",'Field','Caption',[Updated])
DBSetProp("RV_AUTOCOMP.UPDATED",'Field','Comment',[Timestamp when data item last updated])
DBSetProp("RV_AUTOCOMP.UPDATED",'Field','DefaultValue',[])
DBSetProp("RV_AUTOCOMP.UPDATED",'Field','DisplayClass',[])
DBSetProp("RV_AUTOCOMP.UPDATED",'Field','DisplayClassLibrary',[])
DBSetProp("RV_AUTOCOMP.UPDATED",'Field','Format',[])
DBSetProp("RV_AUTOCOMP.UPDATED",'Field','InputMask',[])
DBSetProp("RV_AUTOCOMP.UPDATED",'Field','RuleExpression',[])
DBSetProp("RV_AUTOCOMP.UPDATED",'Field','RuleText',[])
DBSetProp("RV_AUTOCOMP.USER",'Field','KeyField',.F.)
DBSetProp("RV_AUTOCOMP.USER",'Field','Updatable',.T.)
DBSetProp("RV_AUTOCOMP.USER",'Field','UpdateName',[AutoComp.USER])
DBSetProp("RV_AUTOCOMP.USER",'Field','DataType',[M])
DBSetProp("RV_AUTOCOMP.USER",'Field','Caption',[User])
DBSetProp("RV_AUTOCOMP.USER",'Field','Comment',[Specifies user information])
DBSetProp("RV_AUTOCOMP.USER",'Field','DefaultValue',[])
DBSetProp("RV_AUTOCOMP.USER",'Field','DisplayClass',[])
DBSetProp("RV_AUTOCOMP.USER",'Field','DisplayClassLibrary',[])
DBSetProp("RV_AUTOCOMP.USER",'Field','Format',[])
DBSetProp("RV_AUTOCOMP.USER",'Field','InputMask',[])
DBSetProp("RV_AUTOCOMP.USER",'Field','RuleExpression',[])
DBSetProp("RV_AUTOCOMP.USER",'Field','RuleText',[])
DBSetProp("RV_AUTOCOMP.CUNQID",'Field','KeyField',.T.)
DBSetProp("RV_AUTOCOMP.CUNQID",'Field','Updatable',.T.)
DBSetProp("RV_AUTOCOMP.CUNQID",'Field','UpdateName',[AutoComp.CUNQID])
DBSetProp("RV_AUTOCOMP.CUNQID",'Field','DataType',[C(10)])
DBSetProp("RV_AUTOCOMP.CUNQID",'Field','Caption',[uid])
DBSetProp("RV_AUTOCOMP.CUNQID",'Field','Comment',[uid])
DBSetProp("RV_AUTOCOMP.CUNQID",'Field','DefaultValue',[SYS(2015)])
DBSetProp("RV_AUTOCOMP.CUNQID",'Field','DisplayClass',[])
DBSetProp("RV_AUTOCOMP.CUNQID",'Field','DisplayClassLibrary',[])
DBSetProp("RV_AUTOCOMP.CUNQID",'Field','Format',[])
DBSetProp("RV_AUTOCOMP.CUNQID",'Field','InputMask',[])
DBSetProp("RV_AUTOCOMP.CUNQID",'Field','RuleExpression',[])
DBSetProp("RV_AUTOCOMP.CUNQID",'Field','RuleText',[])

Regards
Bhavbhuti
___________________________________________
Softwares for Indian Businesses at:
http://venussoftop.tripod.com
___________________________________________
venussoftop@gmail.com
___________________________________________

Map

View

Click here to load this message in the networking platform