Converting Grid Component Code To UX Component Code

[Davidk]

Re: Converting Grid Component Code To UX Component Code

Check my comments above... I added some...

flag = globalcn.open("::name::connection")

args.set("currentid", val(e._currentID))
args.set("argDate",now())
args.set("argNewCount",newCount)

argNewCount = sql_lookup("::name::connection", "pvv_funny_pet_videos", "id = :currentid", "count", args)
argNewCount = argNewCount + 1

flag = globalcn.execute("UPDATE pvv_funny_pet_videos SET COUNT = :argNewCount, DATEVIEWED = :argDate WHERE id = :currentid",args)

One more thing... I wouldn't structure my code this way. You're creating 2 connections to the server... one on your sql_lookup... and another in globalcn.open... way too much work.

Just use globalcn.open and execute one sql statement...

flag = globalcn.execute("UPDATE pvv_funny_pet_videos SET COUNT = COUNT + 1, DATEVIEWED = :date where pvCommentId = :currentid",args)

No need to go and get the COUNT if you're just going to increase it by 1... let sql do that for you. Your code would be...

flag = globalcn.open("::name::connection")
args.set("currentid", val(e._currentID)); 
args.set("date",now()) 
flag = globalcn.execute("UPDATE pvv_funny_pet_videos SET COUNT = COUNT + 1, DATEVIEWED = :date where pvCommentId = :currentid",args)

[swest]

Re: Converting Grid Component Code To UX Component Code

Almost there, but it is setting the count to 0 for some reason instead of getting the count and adding one. When I debug it argNewCount has the correct count but 0 is getting put into database field for some reason. Here is the code:

function updateCount as v (e as p)

dim globalcn as sql::connection
dim sql as c
dim args as sql::arguments
dim flag as l
dim newCount as n


flag = globalcn.open("::name::connection")
args.set("currentid", val(e._currentID))
args.set("argDate",now())
args.set("argNewCount",newCount)

argNewCount = sql_lookup("::name::connection", "pvv_funny_pet_videos", "id = :currentid", "count", args)
argNewCount = argNewCount + 1


flag = globalcn.execute("UPDATE pvv_funny_pet_videos SET COUNT = :argNewCount, DATEVIEWED = :argDate WHERE id = :currentid",args)
end function

[swest]

Re: Converting Grid Component Code To UX Component Code

Sorry, I re-read what you said and here is the code I have but it isn't updating the count in the database field, it leaves it the same. Here is the code:

function updateCount as v (e as p)

dim globalcn as sql::connection
dim sql as c
dim args as sql::arguments
dim flag as l


flag = globalcn.open("::name::petvv")
args.set("currentid", val(e._currentID))
args.set("argDate",now())


flag = globalcn.execute("UPDATE pvv_funny_pet_videos SET COUNT = COUNT + 1, DATEVIEWED = :date where id = :currentid",args)
end function

[Davidk]

Re: Converting Grid Component Code To UX Component Code

You've no idea how helpful the debugger is. This is what it reports...

One or more argument values were referenced in the SQL query, but were not found in the argument list

So... I know the problem is with the arguments... and... here is what you have...

argDate... :date

The problem with the code you were running with newArgCount is that you were setting the value of the argument... and then trying to add 1 to the argument. It doesn't work that way.

newCount = sql_lookup("::name::connection", "pvv_funny_pet_videos", "id = :currentid", "count", args)
newCount = newCount + 1
args.set("argNewCount",newCount)

Now you can use argNewCount... and it's value is the new count. However, increasing the value in the sql statement is better.