__SQL_GET_INTEGER(id_js_code,"
SELECT E.id_js_code FROM co_%s_spreadsheet_cevent E,
co_%s_cevent_type ET
WHERE (E.event_type_id=ET.id)
AND (E.spreadsheet_id=%d)
AND (E.column_id=%d OR E.column_id=0)
AND (E.row_id=%d OR E.row_id=0)
AND (ET.type='%s')
ORDER BY E.row_id DESC,E.column_id DESC",par_area,par_area,par_id,column_id,row_id,event_name);
if (ok)
{
prolog = ap_psprintf( p,
"var context = new Object();\n"
"context.id_spreadsheet=%d;\ncontext.id_column=%d;\ncontext.id_row=%d;\n",
par_id, column_id, row_id);
@co_call(par_area,'"js_code"','evaluate',par_area=>par_area,par_class=>'"js_code"',par_id=>id_js_code,prolog=>prolog,asp=>0);
}