Here is what I am trying to do:
In the OnChange Event of a drop-down box, I need to get the current value of the component
Use that value as a variable in a SQL Query that returns two new values
Update two different text box controls on the UX with the two values returned by the SQL Query
Here is what I have so far:
Javascript:
var DeedID = {dialog.Object}.getValue('DeedId');
{dialog.object}.setValue('DeedId2',+ DeedID);
/* serversidexbasic */
{dialog.object}.ajaxCallback('','{Grid.RowNumber}:all','serverside_bce157aa34934047b1aee1cfbc884f1d','','_getData=true');
XBasic:
function serverside_bce157aa34934047b1aee1cfbc884f1d as c (e as p)
'debug(1)
DIM DeedID AS N
DeedID = e.dataSubmitted.DeedID2
DIM cn AS SQL::Connection
DIM rs AS SQL::ResultSet
DIM arg AS SQL::Arguments
DIM js AS C
DIM qry AS C
DIM flag as L
flag = cn.Open("::Name::RMSConnection")
if flag = .f. then
js = "alert('Error Connecting to Database);"
e.javascript = js
Exit function
end if
qry = "SELECT RMS_Members.MemberID, RMS_Members.FullName FROM RMS_Members WHERE RMS_Members.DeedID = :DeedID "
arg.Set("DeedID", DeedID)
flag = cn.Execute(qry,arg)
if flag = .f. then
js = "alert('Error executing query');"
e.javascript = js
exit function
end if
rs = cn.ResultSet
DIM MemberID AS C
MemberID = rs.Data(1)
MemberID = "{dialog.object}.setValue(MemberID','"+ MemberID+"');"
DIM FullName AS C
FullName = rs.Data(2)
FullName = "{dialog.object}.setValue(Payer','"+ FullName+"');"
serverside_bce157aa34934047b1aee1cfbc884f1d = "{dialog.object}.setValue(MemberID','"+ MemberID+"'); {dialog.object}.setValue(Payer','"+ FullName+"');"
cn.close()
end function
When I run this in Live Preview I get 'e' is undefined script error.
What am I doing wrong?
In the OnChange Event of a drop-down box, I need to get the current value of the component
Use that value as a variable in a SQL Query that returns two new values
Update two different text box controls on the UX with the two values returned by the SQL Query
Here is what I have so far:
Javascript:
var DeedID = {dialog.Object}.getValue('DeedId');
{dialog.object}.setValue('DeedId2',+ DeedID);
/* serversidexbasic */
{dialog.object}.ajaxCallback('','{Grid.RowNumber}:all','serverside_bce157aa34934047b1aee1cfbc884f1d','','_getData=true');
XBasic:
function serverside_bce157aa34934047b1aee1cfbc884f1d as c (e as p)
'debug(1)
DIM DeedID AS N
DeedID = e.dataSubmitted.DeedID2
DIM cn AS SQL::Connection
DIM rs AS SQL::ResultSet
DIM arg AS SQL::Arguments
DIM js AS C
DIM qry AS C
DIM flag as L
flag = cn.Open("::Name::RMSConnection")
if flag = .f. then
js = "alert('Error Connecting to Database);"
e.javascript = js
Exit function
end if
qry = "SELECT RMS_Members.MemberID, RMS_Members.FullName FROM RMS_Members WHERE RMS_Members.DeedID = :DeedID "
arg.Set("DeedID", DeedID)
flag = cn.Execute(qry,arg)
if flag = .f. then
js = "alert('Error executing query');"
e.javascript = js
exit function
end if
rs = cn.ResultSet
DIM MemberID AS C
MemberID = rs.Data(1)
MemberID = "{dialog.object}.setValue(MemberID','"+ MemberID+"');"
DIM FullName AS C
FullName = rs.Data(2)
FullName = "{dialog.object}.setValue(Payer','"+ FullName+"');"
serverside_bce157aa34934047b1aee1cfbc884f1d = "{dialog.object}.setValue(MemberID','"+ MemberID+"'); {dialog.object}.setValue(Payer','"+ FullName+"');"
cn.close()
end function
When I run this in Live Preview I get 'e' is undefined script error.
What am I doing wrong?
Comment