Submitting Dialog Builder to a table

[JH10]

I have built a Dialog Builder component with a submit button.
I am hoping to be able to submit the contents to a table "registration.dbf" but cannot see how this is done.
The ID is RegID

I have this in the After Validate FormEvent
t = table.open("registration.dbf")
t.enter_begin()
t.Regid = alltrim(currentform.controls.name.value)
t.enter_end(.t.)
t.close()
In a live preview I get the error

Errors in: event.AfterValidate code:
Property not found
currentform.controls.name subelement not found.
Can anyone say how I can do this please?
Thanks
john

[Pat Bremkamp]

Re: Submitting Dialog Builder to a table

John,

This indicates that you have a control in your dialog named "name". Generally, it is not a good idea to use control names that are reserved words or words that are commonly used in programming. So, my first suggestion is to change the field name to vName or name1 or fullname or something other than "name". Similarly, if you have a date field, don't name it "date".

Second, if you are going to be publishing this to a server, you should create a path alias for the table, and then the line would be

t = table.open("[PathAlias.ADB_Path]\registration.dbf")

That will help you avoid a future problem.

Third, I wouldn't use the person's name for the regid. What if you have two people named "John Smith"? Usually, you would create an autoincrement field for the id.

Other than that, your after validate script looks fine.

Pat

[ColinJD]

Re: Submitting Dialog Builder to a table

First off,
I have always had to add the declaration

Dim t AS P
before
t = table.open("registration.dbf")
-
But if you don't need it great,
Also generally either a Path or Alias before "registration.dbf"

Ok
currentform.controls.name subelement not found.
means on this form you do not have a control expliciltly with a name ID of "name"
Is this correct?
If so use the name of the control,
-
Also the code makes the assumption, that t.Regid is a
simple character type field that can be written to and not lets say an autoincrimented field

For a simple Test
Change
t.Regid = alltrim(currentform.controls.name.value)
to
t.Regid = "TEST Return"
and see the result

Regards

[JH10]

Re: Submitting Dialog Builder to a table

Thanks amd My apologies for not coming back sooner. I will get back to this soon. Been delayed
Regards
John

[JH10]

Re: Submitting Dialog Builder to a table

The code is now:
Dim t AS P
t = table.open("registration.dbf")
t.enter_begin()
t.Regid = "TEST Return"
t.enter_end(.t.)
t.close()
The error is now:
Errors in: event.AfterValidate code:
Data value cannot fit into a numeric field of size
t.Regid subproperty cannot be assigned to

Field rules for Regid field is numeric, auto increment

[MikeC]

Re: Submitting Dialog Builder to a table

John,

Regid field is numeric, auto increment

Nice bit of new info---changes how solutions will be given for sure---

For instance--by definition an auto-incremented field is not a user entered one and cannot be changed as such.

Also you now have divulged that the Regid is numeric so the troubleshooting suggested cannot work---setting a numeric field to a character value cannot be done.

My contention is that you cannot do as you want in your first post--to change an auto-increment to something of your choosing....and begs the question as to why would you ever want/need to??

[JH10]

Re: Submitting Dialog Builder to a table

Thanks Mike
I understand what is being said about auto increment.

I am new to alpha5 and am trying to understand how to submit a record from the dialog builder component.
I found the original script and tried to understand what it is doing and how to adapt it to my needs. Obviously didnt do too well.

Perhaps you know of an article somewhere which will help me understand.

[ColinJD]

Re: Submitting Dialog Builder to a table

John, we will get there !!
Lets say in the Registration.dbf table,
You were to make a new 'character' type field 'RegTest'
And another new Numeric type field 'RegNum'
then modify to :--

Dim t AS P
t = table.open("registration.dbf")
t.enter_begin()
t.RegTest = "TEST Return"
t.RegNum = 89
t.enter_end(.t.)
t.close()

I'm doing this so that you have something that works, rather than the right answer.

--
To elaborate on MIkeC's input
An autoincriment(ed) field maybe either "Character" or "Numeric", In both cases Assigning a Value to the field I have never seen work,
Also Calculated fields are 'similar' to AutoIncriment in this.
-
There is no reason why you should not use two ID fields
eg The AutoIncriment and your own RegID field
A good idea is to "never ever" use the Record Number as any form of persistent ID
Also for search capabilities I have found that Making all ID fields type character will make things easier later.

The Format, you used
t.Regid = alltrim(currentform.controls.name.value)
is good for type 'CHARACTER' fields and controls
but
t.Regid = Val(currentform.controls.name)
for 'NUMERIC' fields and controls

[JH10]

Re: Submitting Dialog Builder to a table

Thanks Colin
Sorry I am being so thick on this. I did as you suggested and ammended the FormEvents code to
Dim t AS P
t = table.open("registration.dbf")
t.enter_begin()
t.RegTest = "TEST Return"
t.RegNum = 89
t.enter_end(.t.)
t.close() and this caused a new record to be added with the two fields
RegTest and RegNum showing correctly inthe table.
However none of the other field collect the data from the form, so these are left blank in the table
I attach the present table.
Cheers

[ColinJD]

Re: Submitting Dialog Builder to a table

No Problems John,
-
Ok please be aware that we have two separate 'objects'
One being Field Names eg Regfname and Reglname
and these will generally map to Controls with quite possibly different names
-
I'm unsure what you have chosen but it could be FirstName and LastName

in this case your code would look something like

Dim t AS P
t = table.open("registration.dbf")
t.enter_begin()
t.Regfname = alltrim(currentform.controls.FirstName.value)
t.Reglname = alltrim(currentform.controls.LastName.value)
t.enter_end(.t.)
t.close()

so just Correct what Should be FirstName and LastName

here,
The editor has an autocomplete / Auto Suggest feature and if your code is correct when typing t. or CurrentForm.Controls.
will suggest what the Fiel or Controls names are
your Date Field will probably be best using the VAL() syntax to get the value.


Good luck

[peteconway]

Re: Submitting Dialog Builder to a table

Without getting to involved...

CONVERT_TYPE() converts variables from one data type to another, preserving the data if possible.

Everything in the dialog is text. You need to tell the dialog how it should be saved.

[JH10]

Re: Submitting Dialog Builder to a table

Very many thanks for all the replies and help in getting the submit button sorted out.
I have finally managed to understand some of the answers and the submit button is now working.
I did not realise that a submit button in a dialog used xbasic!
Regards
John