";
global $TABLEBGCOLOUR;
global $TABLEFGCOLOUR;
global $CELLBGCOLOUR;
global $CELLFGCOLOUR;
global $TABLEBORDER;
global $CELLPADDING;
global $CELLSPACING;
global $HEADFONTSIZE;
global $BODYFONTSIZE;
global $LINENUMBERS;
$TABLEBGCOLOUR="#0080C0";
$TABLEFGCOLOUR="WHITE";
$CELLBGCOLOUR="#fffff8";
$CELLFGCOLOUR="BLACK";
$TABLEBORDER=6;
$CELLPADDING=2;
$CELLSPACING=1;
$HEADFONTSIZE=1;
$BODYFONTSIZE=1;
$LINENUMBERS=0;
global $NOSORT;
$NOSORT=1;
if ($prm=='CS_Event_Delete')
{
$sql="update Responses set isDeleted=1 where substring(qID,1,8)='CS_Event' and CaseID='".abs($act)."'";
ExecuteSQL($sql);
}
$Instance=$_SESSION['CaseId'];
$_SESSION['Instance']=$Instance;
$fmt=ShowQueryResultScalar("select fFormat from Forms where fID='CS_Event_Edit'");
$sql="select CaseID as EventId, rValue as Event, concat('') as EditIt, concat('') as DeleteIt from Responses where rInstance=$Instance and qID='CS_Event_Desc'";
ShowQueryResult($sql);
echo "
";
if ($prm=='CS_Event_Create')
{
$UserId=$_SESSION['UserId'];
$CaseId=$_SESSION['CaseId'];
$sql="insert into Responses (qID,rValue,uID,rInstance)" .
" select 'CS_Event_Desc','New Event','$UserId','$CaseId'";
ExecuteSQL($sql);
$ord=ShowQueryResultScalar("select count(*) from Responses where rInstance='$CaseId' and qID='CS_Event_Desc'");
$_SESSION['Instance']=$CaseId;
$inst=$CaseId;
$tId=ShowQueryResultScalar("select max(rUnique) from Responses where rInstance='$CaseId' and qID='CS_Event_Desc'");
ExecuteSQL("update Responses set CaseID='$tId' where rUnique='$tId' and qID='CS_Event_Desc'");
$CaseId=$tId;
$_SESSION['CaseId']=$CaseId;
$sql="insert into Responses (CaseID,qID,rValue,uID,rInstance)" .
" select '$CaseId','CS_Event_Order','$ord','$UserId','$inst'";
ExecuteSQL($sql);
SetForm('CS_Event_Edit');
}
$stat=1;