Различия

Здесь показаны различия между двумя версиями данной страницы.

--- abills:docs:development:manual:ru [2018/07/17 09:27]
asmodeus [Работа с БД]
+++ abills:docs:development:manual:ru [2019/02/21 10:57] (текущий)
andriy [Основная часть модуля - вебинтерфейс]
@@ Строка 36: / Строка 36: @@
 |%FORM  |хеш-масив значений переданных на страницу (GET или POST запросом) |
 |$html  |Обьект визуализации (экземпляр класса ''Abills::HTML'') |
-|$users |Менеджер работы с пользователями (экземпляр класса ''Users'') |
+|$users |Менеджер работы с пользователями (экземпляр класса ''Users''). **Использовать только в функциях админ. интерфейса.** |
 |$db    |Соединение с БД |
 |$admin |Менеджер работы с администраторами (экземпляр класса ''Admins'')|
@@ Строка 243: / Строка 243: @@
 Создаем базовую страницу сервиса
+''cgi-bin/hello.cgi''
-  ''cgi-bin/hello.cgi''
 <code>
@@ Строка 268: / Строка 267: @@
     $libpath
   );
-  # Подключение модуля слежения за временем выполнения
-  eval { require Time::HiRes; };
-  our $begin_time = 0;
-  if (!$@) {
-    Time::HiRes->import(qw(gettimeofday));
-    $begin_time = Time::HiRes::gettimeofday();
-  }
 }
 #Модуль конфигурации
 use Conf;
 our (
+  $libpath,
+  %conf,
   %lang,
   $base_dir,
@@ Строка 290: / Строка 282: @@
 # HTML визуализация
+use Abills::HTML;
 my $html = Abills::HTML->new(
   {
@@ Строка 300: / Строка 293: @@
 # Подключение базы
-my $db = Abills::SQL->connect($conf{dbtype}, $conf{dbhost}, $conf{dbname}, $conf{dbuser}, $conf{dbpasswd}, {
+use Abills::SQL;
-  CHARSET => ($conf{dbcharset}) ? $conf{dbcharset} : undef
+my $db = Abills::SQL->connect($conf{dbtype}, $conf{dbhost}, $conf{dbname}, $conf{dbuser}, $conf{dbpasswd}, {
-  });
+  CHARSET => ($conf{dbcharset}) ? $conf{dbcharset} : undef
+});
 # Включение базовых словарей
@@ Строка 313: / Строка 307: @@
 }
+# Подключение модуля работы с шаблонами
+require Abills::Templates;
 # Включение конфигурационного файла
-our $Conf = Conf->new($db, $admin, \%conf);
+Conf->new($db, undef, \%conf);
-$html->header();
+$html->{METATAGS} = templates('metatags_client');
-print $html->message('info', $lang{INFO}, "Hello world");
+print $html->header();
-;
+# Диалоговое окно приветсвия
+print $html->message('info', $lang{INFO}, "Hello world\nSystem name '$conf{WEB_TITLE}'");
+;
 </code>