Author: Andy Davies
Posted: 2006-11-08 at 10:38:56
comments please (I haven\'t tried this yet - I thought I\'d pass it by the
higher minds on the list first <s>)
DEFINE CLASS busObj as Custom
PROCEDURE init
PARAMETERS pnHndl && PARAMETERS oDE
SQLEXEC(pnHndl,[select * from foo f join bah b on f.idBah = b.id where
1=2],\'curMT\')
* or && select (oDE.initailselectedalias)
SCATTER NAME this additive
this.addproperty(\'nHndl\', pnHndl)
ENDPROC
* form controls bound to properties of oBusObj (=fields from
oDE.initailselectedalias)
PROCEDURE savefoo
SQLEXEC(this.nHndl,[select * from foo where 1=2],\'curFooMT\')
makeupdateable() && only for spt cursors
append blank
GATHER NAME this
tableupdate()
ENDPROC
ENDDEFINE
Andrew DaviesÃÂ MBCS CITP
ÃÂ - AndyDÃÂ ÃÂ ÃÂ ÃÂ ÃÂ ÃÂ ÃÂ 8-)#
**********************************************************************
This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the system manager.
This footnote also confirms that this email message has been swept by MIMEsweeper for the presence of computer viruses.
Please contact internet.administrators@manchester.gov.uk with any queries.
**********************************************************************