Can I call Xbasic function through javascript ?

[satyanarayana]

Can I call Xbasic function through javascript ?

I want to retrieve data from database in xbasic when we click on button..And I want to use the retrieved data in javascript immediately..

[Clipper87]

Re: Can I call Xbasic function through javascript ?

Read all about ajax callbacks & see the videos; that is what you are looking for

[kingcarol]

Re: Can I call Xbasic function through javascript ?

This is what worked for me when doing an ajax callback from a Javascript Function. Maybe something about this will help?

function jsFunctionName() {
{Grid.object}.ajaxCallback('G','{grid.rownumber}','xbFunctionName');
}

[satyanarayana]

Re: Can I call Xbasic function through javascript ?

Thank You very much.. I will go through it.

[jbrooks99]

Re: Can I call Xbasic function through javascript ?

I am trying to do something similar in a dialog within a repeating section. I tried using

{grid.Object}.ajaxCallback('G',rowNum,'GetPostalCode');

and also

var rowNum = {Dialog.Object}._selectedRow;
{dialog.Object}.ajaxCallback('','rowNum','GetPostalCode','','');

I get errors on both. Is there a different way in dealing with this when working with a repeating section. If I hard code the rownumber I can make the xBasic function call. How do I define the rownumber (placeholder) in for the repeating sectin

[kingcarol]

Re: Can I call Xbasic function through javascript ?

I remembered dealing with calling an Xbasic function on a repeating row dialog so looked in my notes and found the following. My issue had to do with trying to use the OnChange event on an Edit Combo lookup field on a repeating row, so I don't know if this will help you, but maybe there will be some clue in here...

My Notes:
The OnChange event is not good to use for a field with an Edit Combo lookup. Instead, use the AfterSelect property in the edit combo genie to call an Xbasic function (if that's what you are doing). Here is an example of calling an Xbasic function using AfterSelect:

BIG NOTE!!! to use the value captured in the AfterSelect event, will need to use e._currentValue and NOT e.DataSubmitted !!!!!!

{grid.Object}.ajaxCallback('G','{Grid.RowNumber}:all','AP_VENDOR_CODE_OnChange','','_currentvalue=' + this.value);

[madtowng]

Re: Can I call Xbasic function through javascript ?

omg...Carol, that last bit of advice is something I can use.

I'm gonna play with afterSelect now.

[sergegharib]

Re: Can I call Xbasic function through javascript ?

Hello, I am new to alpha and so far I like it a lot.
My issue is that, I have a UX called "payment", where each time I click on the "new record" button, I want to go to my table in SQL and get the max(reference) and add +1 to it and automatically fill the "reference" field in the UX.
I created scripts, functions which I am sure they are working, however I cannot get the value after I run the function.
Can anyone help me on this ?

[GGandhi]

Re: Can I call Xbasic function through javascript ?

two things:
1> why do you want to do that? the reference field probably has no use for the user, only to the programmer. you can always find it.
2> can you post your working script, so that it is possible to just tweak a little to get you where you want to be.

[sergegharib]

Re: Can I call Xbasic function through javascript ?

Hello Gandhi, Thank you for your interest in helping.
the "reference" field is actually a field that the user would use in order to create payment receipts.
what I want to do is to create a function that goes to the table called "payment" and select the max(reference+1) and fill it in the "reference" field every time the user clicks on "new payment" button.
Here's the working function, however I can't get the resulting value to my UX.

FUNCTION max_ref AS N ( )
'Execute a query on a SQL database
'DIM a connection variable
DIM cn as SQL::Connection
dim flagResult as l
flagResult = cn.open("::Name::SQL")
if flagResult = .f. then
ui_msg_box("Error","Could not connect to database. Error reported was: " + crlf() + cn.CallResult.text)
end
end if

'Specify if you are using Portable SQL syntax, or not
cn.PortableSQLEnabled = .t.
dim sqlStatement as c
sqlStatement = <<%sql%
SELECT Max(reference + 1) AS max_ref FROM payment
%sql%
'Execute the Query
flagResult = cn.Execute(sqlStatement)
if flagResult = .f. then
ui_msg_box("Error",cn.CallResult.text)
cn.close()
end
end if
dim rs as sql::resultset
rs = cn.ResultSet
'Now, dump the contents of the ResultSet to a variable
dim max_ref as c
max_ref = rs.ToString()

'Now, close the connection
cn.close()

END FUNCTION

[GGandhi]

Re: Can I call Xbasic function through javascript ?

okay i understand this.
if you are using sql and the id, if set to auto increment then, when you save the ux the auto increment will increment by 1, and you can always harvest that data without any problem. the user need not set it.
but if you want to do your way, for some reason, then you have the value in max_ref, then in order to set the value in the dialog/ux
you use the command
on the button onClick event you create an ajaxcallback let's call that xb
that xb will have a command
e._set.reference.value = max_ref()
test it and see if it works.
edit:
see below:

https://www.screencast.com/t/iMlczwaZx

[GGandhi]

Re: Can I call Xbasic function through javascript ?

i see you wanted to call the function via javascript then
var j1 = {Dialog.Object}.ajaxCallback('','','max_ref','','');
{dialog.object}.setValue('reference', j1);
should work

[sergegharib]

Re: Can I call Xbasic function through javascript ?

Hello Gandhi,
I tried your piece of code, it didn't work its giving me the error :" 'max_ref' is undefined "
Any comments about that?
Btw thanks for helping.

[GGandhi]

Re: Can I call Xbasic function through javascript ?

your xbasic construct is wrong
here is a screen cast to show how it needs to be.
https://www.screencast.com/t/hIHZPs4wJ

FUNCTION max_ref AS c (e as p )
'Execute a query on a SQL database
'DIM a connection variable
DIM cn as SQL::Connection
dim flagResult as l 
flagResult = cn.open("::Name::SQL")
if flagResult = .f. then 
ui_msg_box("Error","Could not connect to database. Error reported was: " + crlf() + cn.CallResult.text)
end 
end if

'Specify if you are using Portable SQL syntax, or not
cn.PortableSQLEnabled = .t. 
dim sqlStatement as c 
sqlStatement = <<%sql%
SELECT Max(reference + 1) AS max_ref FROM payment
%sql%
'Execute the Query
flagResult = cn.Execute(sqlStatement)
if flagResult = .f. then 
ui_msg_box("Error",cn.CallResult.text)
cn.close()
end 
end if 
dim rs as sql::resultset
rs = cn.ResultSet
'Now, dump the contents of the ResultSet to a variable
dim max_ref as c 
max_ref = rs.ToString()

'Now, close the connection 
cn.close()
e._set.reference.value = max_ref
END FUNCTION

this is corrected code, see if it works.

[sergegharib]

Re: Can I call Xbasic function through javascript ?

THANK YOU so much Gandhi, It worked, but now I am facing a different problem which I thought about and I will be glad to share with you.
What I want to do was, to get the max(reference) ACCORDING TO THE YEAR, which means I probably must send an argument in my function in order for the argument to be replaced in the where clause of the sql query and get me back the max(reference) according to the year which the user has entered.
Can you help?