Editing a field in a list control when a single or multiple rows are selected

[Jay Talbott]

Re: Editing a field in a list control when a single or multiple rows are selected

Have you run the debugger in Chrome Developer tools?
Jay

[bob9145]

Re: Editing a field in a list control when a single or multiple rows are selected

Brushing up on manipulating the list thanks for your help!

[bob9145]

Re: Editing a field in a list control when a single or multiple rows are selected

So after much toil, I found that I can get this to work in a few different ways when the list is based on static data. Once I switch to basing the list on a backend sql table the value
returned from the selection is empty. I tried returning a field, and a primary key from the list, neither works. Am I missing a setting in the list? The list renders fine, rows are selected, but the returned values aren't there. However in this case the commas are returned depending on the number of rows that are selected so the correct number of placeholders are there but not the value.

var lObj = {dialog.Object}.getControl('list1'); //targeting list control
var emailArray = [];

for(i=0;i<lObj.selectionData.length;i++){
emailArray.push(lObj.selectionData[i].somecontrol);
}

var emailStr = emailArray.join(',');
{dialog.object}.setValue('Value',emailStr);

Put Dave K's code from another post, on a button and returned the value to a label control. Again all works well with a static list but not with a table from a database. I was battling the javascript
when it seems the problem is with the list, or so it seems.
Thanks,
Bob

[bob9145]

Re: Editing a field in a list control when a single or multiple rows are selected

This is Jay's example with some modifications in the xbasics. Had trouble getting the args to work with a variable containing multiple values so added a for next loop and parsed the array into multiple args. Looped through them updating a table field for each selected row. Used json_parse() to convert the json passed from the client to a dot variable. Then used the loop to extract each value to set the args and execute the sql statement. This ux will allow me to edit multiple records in the list control by using the data from selected rows. Learned much from this exercise.

Button on click or touch

var mySelection = getSelectedRows();

{dialog.Object}.ajaxCallback('','','updateSQL','','_paymentToUpdate=' + mySelection);

javascript function

function getSelectedRows(){
var lObj = {Dialog.object}.getControl('pay');// getting pionter to the list
var len = lObj.selectionData.length; //number of the selected rows
debugger;
var arr = [];
for (i=0;i<len;i++){
arr[i] = lObj.selectionData[i].PAY_Id //populates arr with the PAY_Id from the selected rows
// If this field (PAY_Id) comes from a sql table case matters and must match the table column
}
return JSON.stringify(arr) //sends the arr to the call back in json formated string
}
{
}

xbasic function

function updateSQL as c (e as p)
'uncomment debug(1) to step through using the debbuger
'debug(1)

DIM cn AS sql::Connection
DIM args AS sql::Arguments
DIM sqlUpdate AS c =""
DIM flag1 as l
DIM flag2 as l
DIM response as p
DIM pay_id as c

flag1 = cn.Open("::Name::someconnection")'add your connection string

IF flag1 = .f. THEN
updateSQL = "alert('SQL connection failed');"
end
END IF

'e._paymenttoUpdate contains the PAY_Id from the selected rows passed from the client side to the server side by the ajax callback
e.control.Payment_Numbers = e._paymenttoUpdate 'setting a control so you can view the contents of e._paymenttoUpdate

'e._paymenttoUpdate variable parsed into a p .variable
response = json_parse(e._paymenttoUpdate)
e.control.How_Many = response.size() 'setting a control so you can view the number of rows selected

'for loop goes through each value in the p variable response (for loop will stop at the last variable and loop will stop)
for i = 1 to response.size()

pay_id = response[i]'populates pay_id with an single value from response

args.Set("r1",pay_id) 'Sets the arg value
'update statement will be run for each value in the response p variable
sqlUpdate = "UPDATE payment SET pay = 1 WHERE PAY_Id IN (:r1) "

flag2 = cn.Execute(sqlUpdate,args)

next i
cn.close()
IF flag2 = .f. THEN
updateSQL = "alert('Records were not updated');"

end
ELSE
updateSQL = "alert('Records were updated successfully');"
end
END IF

end function

Any further corrections, or suggestions are always appreciated. Thanks again to Jay, and also Dave. I absconded the for next loop from a related post response of his.
https://forum.alphasoftware.com/show...p+dot+variable