#!/usr/bin/perl -w use CGI qw(:cookie); use CGI qw(:param); use DBI; #use CGI::Carp 'fatalsToBrowser'; $SSID=cookie('ssid'); $sqldriver="mysql"; $sqldatabase="b75346"; $sqlhostname="78.108.81.230"; $sqluser="u75346"; $sqlpassword="2015xlitmysql"; @rec=(); $dbh= DBI->connect("DBI:mysql:$sqldatabase;host=$sqlhostname",$sqluser,$sqlpassword) || die "can't connect to $sqldatabase"; if ($SSID) { $sth=$dbh->prepare( "SELECT * from sns WHERE ssid='$SSID\'" ); $sth->execute; @rec=$sth->fetchrow_array; } @tasks_importances=("","Маловажно","Средне","Важно!"); @visits_status=('Нерассмотрен','Подтвержден','Неподтвержден'); $session_expire=$rec[4]; if(@rec>0) { if ($rec[4] < time()) #session has expired { $template_data="Истекло время Вашей сессии. Войдите повторно"; $template_title="XL IT-Service :: Личный кабинет :: Сессия истекла"; require("./prepare_template"); print $template; die; } } $sth=$dbh->prepare( "SELECT * from usr WHERE login='@rec[2]\'" ); $sth->execute; @c_rec=$sth->fetchrow_array; if ($c_rec[12]==1) { @tasks_progress=("Не рассмотрена","В обработке","Сообщение","Жду ответа","ожидает подверждения","Завершена","Отменена"); $sth=$dbh->prepare( "SELECT name from org GROUP BY name ORDER BY added" ); $sth->execute; $inorg_options=''; while(@org_rec=$sth->fetchrow_array) { $inorg_options.=""; } $template_data="
Сессия активна до ".localtime($session_expire)." LOGOUT

Личный кабинет XL IT-Service

"; $template_data.='
Текущая организация: Добавить

Заявки по организации Только активные

Визиты по организации | Добавить визит

Оборудование | Добавить оборудование
Полный отчет эвереста(имя файла - инв.номером ПК):

'; $sth=$dbh->prepare( "SELECT * FROM tasks WHERE status=0 ORDER BY date DESC, org ASC, importance DESC;" ); $sth->execute; if ($sth->errstr eq '') { $template_data.='Общий Список заявок Скрыть'; while(@t_arr=$sth->fetchrow_array) { $sth_usr=$dbh->prepare( "SELECT * FROM usr WHERE login='$t_arr[11]\';" ); $sth_usr->execute; @usr_arr=$sth_usr->fetchrow_array; $accepted_user=''; if (@usr_arr>0) { $accepted_user="$usr_arr[3] $usr_arr[4]"; } @t_date=localtime($t_arr[4]); $template_data.=' '; } $template_data.='
Дата Организация Заголовок Приоритет Категория Статус Исполнитель
'.($t_date[3]).'.'.($t_date[4]+1).'.'.($t_date[5]+1900).' '.$t_arr[2].' '.$t_arr[1].' '.$tasks_importances[$t_arr[7]].' '.$t_arr[5].' '.$tasks_progress[$t_arr[10]].' '.$accepted_user.'
'; } } elsif($c_rec[12]==2) { @tasks_progress=("Размещена","В обработке","Собщение отправлено","Сообщение","НЕОБХОДИМО ПОДТВЕРДИТЬ!","Завершена","Отменена"); $template_data=' '; $template_data.="
Сессия активна до ".localtime($session_expire)." LOGOUT

Личный кабинет

"; $template_data.='
Информация о текущих активных заявках | Показать | Добавить заявку
'; $sth=$dbh->prepare( "SELECT * FROM tasks WHERE status=0 AND org='$c_rec[6]\' ORDER BY date DESC, importance DESC;" ); $sth->execute; if ($sth->errstr eq '') { while(@t_arr=$sth->fetchrow_array) { if($t_arr[10]==4) { $done_link="\"Подтвердить"; } else { $done_link=''; } @t_date=localtime($t_arr[4]); $template_data.=' '; } } $template_data.=''; $template_data.='
Информация о визитах | Показать '; $sth=$dbh->prepare( "SELECT * FROM visits WHERE org='$c_rec[6]\' ORDER BY vtime DESC;" ); $sth->execute; if ($sth->errstr eq '') { while(@t_arr=$sth->fetchrow_array) { @t_date=localtime($t_arr[1]); $task_caption=''; $sth_task=$dbh->prepare( "SELECT * FROM tasks WHERE id='$t_arr[4]\';" ); $sth_task->execute; if ($sth_task->errstr eq '') { @task_arr=$sth_task->fetchrow_array; if($task_arr[10]=='4') { $task_caption="$task_arr[1]"; } elsif($task_arr[10]=='5') { $task_caption="$task_arr[1]"; } elsif($task_arr[10]=='5') { $task_caption="$task_arr[1]"; } else { $task_caption="$task_arr[1]"; } }#TASK CONTENT $visitor_name=''; $sth_visitor=$dbh->prepare( "SELECT * FROM usr WHERE login='$t_arr[3]\';" ); $sth_visitor->execute; if ($sth_visitor->errstr eq '') { @visitor_arr=$sth_visitor->fetchrow_array; $visitor_name="$visitor_arr[3] $visitor_arr[4]"; }#VISITOR DATA $template_data.=' '; } } $template_data.=''; } else { $template_data.='

Недостаточно прав для работы с системой.

Обратитесь к администратору сайта'; require("./prepare_template"); print $template; die; } $template_data.=' '; $template_title="XL IT-Service :: Личный кабинет :: $c_rec[3] $c_rec[4] $c_rec[5] :: $c_rec[6] "; require("./prepare_template"); print $template;