oop?

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.

**********************************************************************

©2006 Andy Davies