From Xbasic Function to component

[Olaf Schubert]

I am uploading a document using the standard xbasic function. The function works well however I need to store the path and doc name created within the function in a field called completeFileName to a component called doc_loc. I am a new user and do not know (and cannot find) the code to let doc_loc = completeFileName from within the function. It must be dead simple for all you old hands.

[-Jinx-]

Re: From Xbasic Function to component

In the File Upload action there should be an option called "On Stored filename compute Xbasic function". You can create an xbasic function to name it whatever you want and put it wherever you want.

The Xbasic for something like this looks similar to this:

function FileName as v (e as p)
'This function is called to compute the filename for the uploaded file.
'The e object that is passed in contains:

'e.targetFileName = the filename for the uploaded file. This is computed based on the setting for the upload folder and the name of the file on the client machine
'e.imageBinaryData = binary data that was uploaded


'In addition, the e object contains
'e.tmpl  - the Grid definition
'e.rtc - a pointer variable that is passed to all server side events
'e.__si - state information
'e.ops = misc properties that were defined in the builder for the image upload action

'Your code can change the value of e.targetFileName. If you do change this value, the uploaded image will be stored in the filename specified by the new value in e.targetFileName
'IMPORTANT: The transformation expression (defined in Action Javascript at design time) will be applied to whatever value is in e.targetFilename. So, if your event handler
'changes the value in e.targetFilename, the transformation expression is applied to this new value.


'Optional - your code can set a value for e.storedValue property in the e object
'If you set the e.storedValue property, this value will be stored in the target field in the record (and the transformation expression will be ignored)
debug(1)

dim pfx as c = e.formData.V.R1.RQID
dim fnm as c = e.ops._fileOriginalName
dim fld as c = e.ops._uploadFolder

dim nwn as c = fld + chr(92) + pfx + "-" +fnm

e.targetFileName = nwn
	
end function

Within that function you could also use SQL to store that field somewhere else (I'm not sure exactly what you are describing when you asay that "doc_loc" is a separate component?

If it's just a seperate field, you can easily put it into that field with some javascript client side or by making the calculated field expression equal to whatever your attached filename field is.

There are quite a few ways to do this but to solve your issue we will need a lot more information.

[Olaf Schubert]

Re: From Xbasic Function to component

Thanks Jinx,


The Xbasic function uploads an applicants resume (which works well). The field in the function is completeFileName = "C:\Tracker_Moama\Tracker_moama_data\All_Documents\Applicants" + chr(92) + fileNameOnServer (this is all good).

I simply wish to place this Xbasic function field ("completeFileName") into a field in the UX component called "doc_loc" so when I save my file to the SQL database it includes the full address of the applicants resume that they uploaded. The question is what is the code to let Doc_loc = completeFileName.

Thanks Olaf

[-Jinx-]

Re: From Xbasic Function to component

I'm on my phone at the moment but something like this:

 YourFunctionName = "{dialog.object}.setValue('Doc_Loc','"+completeFileName+"');"
end function

At the end of your xbasic should work assuming that completeFileName is the name of the variable with your xbasic-computed file path. You can return JavaScript back to the client in this manner.

If you are using the built-in action JavaScript for a file upload though, this should be even easier as you can bind the file upload "field" in your UX.

If you don't solve it by then, I'll show you when I get back to work tomorrow.

[Olaf Schubert]

Re: From Xbasic Function to component

Jinx,
I am still not seeing it.

I simply need to set a value from a field called completefilename in the Xbasic function to a field on the client side called doc_loc from within the function. The code is

function xb_afterUpload as v (e as p)
'This function is called after the file(s) selected in the Upload Files dialog have been uploaded to the server.
'The function is responsible for processing each uploaded file.
'debug(1)

dim fileNameOnServer as c = ""
if eval_valid("e.formData.V.R1.FILENAMEONSERVER") then
fileNameOnServer = e.formData.V.R1.FILENAMEONSERVER
end if

dim extension as c
extension = file.filename_parse(e.fileArray[1].filename,"e")
if fileNameOnServer = "<default>" then
fileNameOnServer = e.fileArray[1].filename
else
fileNameOnServer = file.filename_parse(fileNameOnServer,"N") + extension
end if

dim completeFileName as c
completeFileName = "C:\Tracker_Moama\Tracker_moama_data\All_Documents\Applicants" + chr(92) + fileNameOnServer

file.filename_parse(ext,"N") = completeFileName

let e.data.doc_loc = completeFileName
file.From_blob(completeFileName,e.fileArray[1].data)


e.javascript = "alert('Uploaded file was saved on the server to: " + js_escape(completeFileName) + "');"
'code from jinx

'{dialog.object}.setValue('Doc_Loc','"+completeFileName+"');'I just need to set the value in the client field Doc_Loc
end function

[-Jinx-]

Re: From Xbasic Function to component

Ah, posting your code helps.... With alpha, there are so many ways to skin the proverbial cat that it's hard to understand without the actual code. What I wrote above returns JavaScript to the client. So can the e.javascript variable.

Try this:

e.javascript = "alert('Uploaded file was saved on the server to: " + js_escape(completeFileName) + "');{dialog.object}.setValue('Doc_Loc','"+completeFileName+"');"

Hopefully the syntax is right. I'm on my phone instead of a computer.

[Olaf Schubert]

Re: From Xbasic Function to component

Thanks Jinx,
Your last bit of code prefixed by window.parent.{dialog.object}.setValue('Doc_Loc','"+completeFileName+"');" did the trick
Many Thanks
Olaf