• Registered: 2014-02-17
  • Posts: 365

Topic: Script Not Action In Click Button Event

i set button when click  run sql:update table
but after no action to display 

procedure frm_item_Button2_OnClick (Sender: string; var Cancel: boolean);
begin
SQLExecute(
 'update alldata '+
 'set tm_group = '+
 'case '+
 'WHEN substr(dateservice,6,2) ="01" then "jan" '+
 'WHEN substr(dateservice,6,2) ="02" then "feb" '+
 'WHEN substr(dateservice,6,2) ="03" then "mar" '+
 'WHEN substr(dateservice,6,2) ="04" then "apr" '+
 'WHEN substr(dateservice,6,2) ="05" then "may" '+
 'WHEN substr(dateservice,6,2) ="06" then "jun" '+
 'WHEN substr(dateservice,6,2) ="07" then "jul" '+
 'WHEN substr(dateservice,6,2) ="08" then "aug" '+
 'WHEN substr(dateservice,6,2) ="09" then "sep" '+
 'WHEN substr(dateservice,6,2) ="10" then "oct" '+
 'WHEN substr(dateservice,6,2) ="11" then "nov" '+
 'WHEN substr(dateservice,6,2) ="12" then "dec" '+
 ' end ;'
);
end.

http://s2.postimg.org/jjk14mp9h/2015_06_08_Image_002.jpg
My Project
jintana.zip
Help me please ?

My Visual Database : I Love You
Easy For Beginner Student For Me
  • Registered: 2014-02-14
  • Posts: 10,294

Re: Script Not Action In Click Button Event

You can't write script after "end."


In this case will be better use calculated field.
Fixed project attached

Post's attachments

Attachment icon jintana2.zip 60.44 kb, 537 downloads since 2015-06-08 

Dmitry.