UX List Drag and Drop

[Kerry Jackson]

Can not get the ux_list_drag and drop to work. Will not tap and drag? Can someone help. Thanks

[Kerry Jackson]

Re: UX List Drag and Drop

It appears that the new javascript library is not included with the new Alpha Anywhere update or full install. How can we download the new javascript libraries?

[Ken Tjia]

Re: UX List Drag and Drop

Hi Kerry,

are you able to get this feature to work.
I downloaded the sample UX and have tested working well.

Although I found it not too responsive in both dragging & dropping
hopefully there will be future update with difference experience.

[Kerry Jackson]

Re: UX List Drag and Drop

I have not tried again. will try tonight and let you know.

[dantum]

Re: UX List Drag and Drop

Where can I find the sample app guys?

Okay I found it

http://downloads.alphasoftware.com/A...easenotes.html

It needs pre-release version to run I imagine.

[Ken Tjia]

Re: UX List Drag and Drop

yes correct ....
full detail and sample component

http://alphasoftware.net/the-alpha-a...rop-functions/

[lilmofo812]

Re: UX List Drag and Drop

So I am curious if there is a way to change a value of one of the elements with in the data {} object that is being moved, i.e. if you move something from a main list to list one, some how changing the a list_id value to 1 so that when you save the entire dialog (including saving all of the list data for each list) and come back it will know to populate list1 with the data in the table that has list_id = 1 and list2 with the data in the same table that has list_id = 2 and so forth. Or is the only way to accomplish this to have each list tied to its own table in the mysql data base so that the dialog will know to save each lists data into its own table? Thanks!

[Michael1954]

Re: UX List Drag and Drop

You could use localstorage but this only works for the machine that did the original dragging.

Say it was a todo list that applied to the person working on that machine then local storage works.

However if the server needs to know, Hotel booking or duty roster then you need to save it back to the database.

[Laks007]

Re: UX List Drag and Drop

If I need to insert X many rows to a database table based on the items in the list, how can I accomplish that? Do I need to do via XBasic?

[lilmofo812]

Re: UX List Drag and Drop

Yes you will need to use xbasic to either

1) loop through the list items and insert the necessary values from each row (I went this route)
2) if you were only looking at sending back a single value from each row in the list I know someone built an array and passed it back to a stored procedure to do the insert (not sure if this would work for multiple values in each row)

[Laks007]

Re: UX List Drag and Drop

Josh,

Do you know any videos or sample application that I can study how to do this with xbasic?

Laksiri

[lilmofo812]

Re: UX List Drag and Drop

The first function is javascript and is what initially is used to grab the raw data of the list (in my case "list1"). Create a button with an ajax callback and in the property that says "additional data to submit" is where you will put the javascript function getDataOne(). The second bit of code is the xbasic function used to go through the passed in "__listData" and grab the values into sql arguments to that you can execute an sql statement and send the data to your database. You loop through the "p" variable that is an object and you can get to every value of each row in the list that is submitted back to the server. Hopefully you are able to dissect my code and reverse engineer it for you particular use.

        function getDataOne() { 
	var lobj = {dialog.object}.getControl('list1');
	var _d = lobj._rData;
	var _data = JSON.stringify(_d);
	var returnData = A5.ajax.buildURLParam('__listData',_data)
	return returnData;
}

function xb as c (e as p)

        dim listData as c 
	listData = e.__listData
	dim p as p
	dim list_id as n
	dim customer_id as n
	dim id as n
	dim order_num as n
	dim msg as c = ""
	if listData <> "" then 
		dim myargs as sql::arguments
  		dim cnn as sql::Connection
  		cnn.Open("::name::eTruck")
		p = json_parse(listData)
		count = p.size()
		for i = 1 to p.size()
			'sql_update_one = "UPDATE test_list SET list_id = :list_id Where ID = :id"
			sql_update = "UPDATE orders SET order_num = :order_num, list_id = :list_id Where order_id = :id"
			id = p[i].order_id
			list_id = p[i].list_id
			'customer_id = p[i].customer_id
			order_num = i
			'msg = msg + crlf() + id + "," + order + "," + list_id + "," + customer_id
			myargs.clear()
  			myargs.add("list_id",list_id)
  			myargs.add("id",id)
  			myargs.add("order_num",order_num)
'  			flag_1 = cnn.Execute(sql_update_one,myargs)
'		if flag_1 then
'			msg = "First one worked"
'			xb = "alert('" + js_escape(msg) + "');"
'		else
'			'there was an error - close the connection and exit
'			cnn.Close()
'			dim msg as c 
'			msg = "Could not execute the query. Error reported was: " + cnn.CallResult.text
'			msg = js_escape(msg)
'			dim jscmd as c 
'			jscmd = "alert('" + msg + "');"
'			ProcessJSON = jscmd
'		end if 
			flag = cnn.Execute(sql_update,myargs)
		if flag then
			'msg = "Second one worked"
			'xb = "alert('" + js_escape(msg) + "');"
		else
			'there was an error - close the connection and exit
			cnn.Close()
			dim msg as c 
			msg = "Could not execute the query. Error reported was: " + cnn.CallResult.text
			msg = js_escape(msg)
			dim jscmd as c 
			jscmd = "alert('" + msg + "');"
			ProcessJSON = jscmd
		end if 
		 
   			
			
			next i
			'msg = "Number of rows submitted:" + count
			
	else
		msg = "No data was submitted"
		xb = "alert('" + js_escape(msg) + "');"
	end if 
	cnn.Close()
	dim js as c
	js = "{dialog.object}.refreshListData('list1');"+crlf()
	js = js + "{dialog.object}.refreshListData('list2');"+crlf()
	js = js + "{dialog.object}.refreshListData('list3');"+crlf()
	js = js + "{dialog.object}.refreshListData('list4');"
	xb = js
end function

[Laks007]

Re: UX List Drag and Drop

Thanks Josh. I'll give it a try.