Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
IF TABLEUPDATE(< insert appropriate parameters >)
REQUERY(< insert view name >)
ELSE
AERROR(laDataError)
* Check the content of array to determine problem
ENDIF
CREATE SQL VIEW V_CHARGES2VIAVE AS ;
SELECT charges2.ccode, ;
charges2.cdescript, ;
charges2.nvalue;
FROM testproblems!charges2 ;
WHERE charges2.ccode like ?vp_ccode
* View Properties
DBSetProp("V_CHARGES2VIAVE", 'View', 'UpdateType',1)
DBSetProp("V_CHARGES2VIAVE", 'View', 'WhereType',3)
DBSetProp("V_CHARGES2VIAVE", 'View', 'FetchMemo',.T.)
DBSetProp("V_CHARGES2VIAVE", 'View', 'SendUpdates',.T.)
DBSetProp("V_CHARGES2VIAVE", 'View', 'UseMemoSize',255)
DBSetProp("V_CHARGES2VIAVE", 'View', 'FetchSize',100)
DBSetProp("V_CHARGES2VIAVE", 'View', 'MaxRecords',-1)
DBSetProp("V_CHARGES2VIAVE", 'View', 'Tables',[testproblems!charges2])
DBSetProp("V_CHARGES2VIAVE", 'View', 'Comment',[])
DBSetProp("V_CHARGES2VIAVE", 'View', 'BatchUpdateCount',1)
DBSetProp("V_CHARGES2VIAVE", 'View', 'ShareConnection',.F.)
DBSetProp("V_CHARGES2VIAVE", 'View', 'Prepared',.F.)
DBSetProp("V_CHARGES2VIAVE", 'View', 'CompareMemo',.T.)
DBSetProp("V_CHARGES2VIAVE", 'View', 'FetchAsNeeded',.F.)
DBSetProp("V_CHARGES2VIAVE", 'View', 'RuleExpression',[])
DBSetProp("V_CHARGES2VIAVE", 'View', 'RuleText',[])
DBSetProp("V_CHARGES2VIAVE", 'View', 'ParameterList',[vp_cCode,'C'])
* View Field Properties
DBSetProp("V_CHARGES2VIAVE.ccode",'Field','KeyField',.T.)
DBSetProp("V_CHARGES2VIAVE.ccode",'Field','Updatable',.T.)
DBSetProp("V_CHARGES2VIAVE.ccode",'Field','UpdateName',[testproblems!charges2.ccode])
DBSetProp("V_CHARGES2VIAVE.ccode",'Field','DataType',[C(5)])
DBSetProp("V_CHARGES2VIAVE.ccode",'Field','Caption',[])
DBSetProp("V_CHARGES2VIAVE.ccode",'Field','DefaultValue',[])
DBSetProp("V_CHARGES2VIAVE.ccode",'Field','RuleExpression',[])
DBSetProp("V_CHARGES2VIAVE.ccode",'Field','RuleText',[])
DBSetProp("V_CHARGES2VIAVE.cdescript",'Field','KeyField',.F.)
DBSetProp("V_CHARGES2VIAVE.cdescript",'Field','Updatable',.T.)
DBSetProp("V_CHARGES2VIAVE.cdescript",'Field','UpdateName',[testproblems!charges2.cdescript])
DBSetProp("V_CHARGES2VIAVE.cdescript",'Field','DataType',[C(30)])
DBSetProp("V_CHARGES2VIAVE.cdescript",'Field','Caption',[])
DBSetProp("V_CHARGES2VIAVE.cdescript",'Field','DefaultValue',[])
DBSetProp("V_CHARGES2VIAVE.cdescript",'Field','RuleExpression',[])
DBSetProp("V_CHARGES2VIAVE.cdescript",'Field','RuleText',[])
DBSetProp("V_CHARGES2VIAVE.nvalue",'Field','KeyField',.F.)
DBSetProp("V_CHARGES2VIAVE.nvalue",'Field','Updatable',.T.)
DBSetProp("V_CHARGES2VIAVE.nvalue",'Field','UpdateName',[testproblems!charges2.nvalue])
DBSetProp("V_CHARGES2VIAVE.nvalue",'Field','DataType',[N(9,2)])
DBSetProp("V_CHARGES2VIAVE.nvalue",'Field','Caption',[])
DBSetProp("V_CHARGES2VIAVE.nvalue",'Field','DefaultValue',[])
DBSetProp("V_CHARGES2VIAVE.nvalue",'Field','RuleExpression',[])
DBSetProp("V_CHARGES2VIAVE.nvalue",'Field','RuleText',[])