Subject Re: AutoFill_entryfield error
From Ken Mayer <dbase@nospam.goldenstag.net>
Date Sun, 17 May 2020 11:55:49 -0700
Newsgroups dbase.getting-started

On 5/17/2020 11:28 AM, Tom wrote:
> Using the following code:
> *
> ** END HEADER -- do not remove this line
> //
> // Generated on 05/17/2020
> //
> parameter bModal
> local f
> f = new Autofill_EntryfieldForm()
> if (bModal)
>     f.mdi = false // ensure not MDI
>     f.readModal()
> else
>     f.open()
> endif
>
> class Autofill_EntryfieldForm of FORM
>     set procedure to :dUFLP:autofill_entryfield.cc additive
>     with (this)
>        metric = 6    // Pixels
>        colorNormal = "LightGrey"
>        height = 352.0
>        left = 850.0
>        top = 0.0
>        width = 280.0
>        text = ""
>     endwith
>
>     this.DATABASE1 = new DATABASE(this)
>     with (this.DATABASE1)
>        left = 18.0
>        top = 16.0
>        width = 53.0
>        height = 37.0
>        databaseName = "JEREMIAHDATA"
>        active = true
>     endwith
>
>     this.QUERY1 = new QUERY(this)
>     with (this.QUERY1)
>        left = 111.0
>        top = 16.0
>        width = 39.0
>        height = 37.0
>        database = form.database1
>        sql = "Select * from Demodata"
>        requestLive = false
>        active = true
>     endwith
>
>     with (this.QUERY1.rowset)
>        autoEdit = false
>     endwith
> /*
>     this.AUTOFILL_ENTRYFIELD1 = new AUTOFILL_ENTRYFIELD(this)
>     with (this.AUTOFILL_ENTRYFIELD1)
>        onOpen = class::AUTOFILLENTRYFIELD1_ONOPEN
>        dataLink = form.query1.rowset.fields["provider"]
>        height = 22.0
>        left = 41.0
>        top = 46.0
>        width = 196.0
>     endwith
> */
>
>     this.AUTOFILL_ENTRYFIELD21 = new AUTOFILL_ENTRYFIELD2(this)
>     with (this.AUTOFILL_ENTRYFIELD21)
>        onOpen = class::AUTOFILLENTRYFIELD21_ONOPEN
>        dataLink = form.query1.rowset.fields["provider"]
>        height = 22.0
>        left = 41.0
>        top = 190.0
>        width = 196.0
>     endwith
>
>
> /////////////////////////////////////////////////////////////////////////////////////////////////
>
> /*
>     Function AUTOFILLENTRYFIELD1_ONOPEN
>        // values provided from the same table field specified ???
>        this.dataBase := "JEREMIAHDATA"
>        this.tableName := "DemoData"
>        this.fieldName := "Provider"
>     return
>        *
> */
>
>    Function AUTOFILLENTRYFIELD21_ONOPEN
>        // values provided from a separate table list ???
>        this.dataBaseName := "CONTACTSDATA"
>        this.tableName := "zContact"
>        this.fieldName := "FullName"
>        *
>     return
>     *
>
> endclass
>
> I cannot get the form to run. See attached error message.
>
> I understand you cannot run the code since you do not have the same
> tables but, by inspection, do you see what is causing the error?

The code should not be for the autofill_entryfield's onOpen event
handler, but the *FORM*'s onOpen event handler. Check the instructions
for the control carefully ...

The object references are not going to make sense if done the way you
did it.

Ken

--
*Ken Mayer*
Ken's dBASE Page: http://www.goldenstag.net/dbase
The dUFLP: http://www.goldenstag.net/dbase/index.htm#duflp
dBASE Books: http://www.goldenstag.net/dbase/Books/dBASEBooks.htm
dBASE Tutorial: http://www.goldenstag.net/dbase/Tutorial/00_Preface.htm