Scripts (версия 3.xx)/Отправка SMS

Первая часть скрипта подготавливает классы и объекты, необходимые для работы скрипта. Описание дано в комментариях к каждой строке за исключением класса Script, который отвечает за непосредственное выполнение скрипта.

eval (GetFileContent ('Common\\Classes\\Script.js'));             // необходимо для работоспособности сценария
var Script = new Script ();                                       // необходимо для работоспособности сценария

// =================== Подключение модулей ===================

eval (Script.GetFileContent ('Common\\Classes\\Database.js'));                   // База данных
eval (Script.GetFileContent ('Common\\Classes\\Time.js'));                       // Расписание
eval (Script.GetFileContent ('Common\\Classes\\Device.js'));                     // Устройство
eval (Script.GetFileContent ('Common\\Classes\\SMS.js'));                        // Обработка SMS
eval (Script.GetFileContent ('Common\\Classes\\DataRead.js'));                   // Чтение данных

// локальные модули для конкретного решения
eval (Script.GetFileContent ('Solutions\\Basic\\SendSMS\\Info.js'));             // Информация и статистика
eval (Script.GetFileContent ('Solutions\\Basic\\SendSMS\\CDataWriteSMS.js'));    // Запись данных
eval (Script.GetFileContent ('Solutions\\Basic\\SendSMS\\COptions.js'));         // Расширенные настройки

// =================== Начало работы сценария ===================

Командой Script.SetDebug включается/отключается режим вывода дополнительных отладочных сообщений во время работы сценария. Как правило, это излишняя информация. Включать данный параметр рекомендуется только в случае, если сценарий выполняется некорректно и надо отправить разработчикам журнал с большим количеством информации. Без передачи параметра (true/false) функция включает режим отображения так, как установлено в конфигурации.

Script.SetDebug ();

Команда Script.InLogInfo позволяет выводить информацию в журнал в интерфейсе программы и одновременно записывать её в системный журнал. В данном случае будет отметка о том, что сценарий загрузил все необходимые данные и запустился.

Script.InLogInfo ('Старт');

try {

Далее определяется переменная Device класса CDevice, отвечающая за управление нашим устройством рассылки сообщений (модем, SMS-шлюз). Используется метод Open для устройства с проверкой успешности.

   var Device   = new CDevice ();

   if (Device.Open ()) {                                    // Если устройство открыто успешно

      Script.InLogDebug ('Устройство открыто успешно');

Определяется переменная Options класса COptions, отвечающая за управление нашим устройством рассылки сообщений (модем, SMS-шлюз). Используется метод Open для устройства с проверкой успешности.

Устанавливается в единицу переменная CycleCount, отвечающая за количество сеансов обзвона.

      var Options = new COptions ();

      var CycleCount = 1;

Определяется переменная DataRead класса CDataRead, отвечающая за получение данных из базы данных, проверяется переменная CycleCount на превышение значения. Если переменная не превышает значения, записанного в конфигурации, пишется сообщение в журнал о порядковом номере цикла рассылки в текущем сеансе.

      var DataRead = new CDataRead ();

      while (DataRead.CheckCycle (CycleCount)) {                           // Проверка количества попыток обзвона в сеансе

         Script.InLogInfo ('Цикл рассылки <b>%s</b>', CycleCount);

Определяется переменная Database класса CDatabase, отвечающая за работу с источником данных. Проверяется соединение с базой данных.

         var Database = new CDatabase ();

         if (Database.Open ()) {                                           // Если соединение с базой данных успешное

Определяется переменная Info класса CInfo, отвечающая за отображение статистики во вкладке «Журнал». Проводится первый подсчёт статистики на основе выбранных в конфигурации параметров (учитывать/не учитывать отправку сообщений ранее, количество попыток отправки и т.д.)

            var Info = new CInfo ();

            if (Info.Count (Database, DataRead)) {

Определяется переменная Record, содержащая набор методов и свойств работы с выборкой запроса, делается проверка на её корректность.

               var Record = Database.Query (DataRead.Query ());            // Выбор записей в базе данных
               if (Record) {

                  var DataWriteSMS = new CDataWriteSMS ();

                  if (DataRead.CheckFields  (Record) &&
                      DataWriteSMS.CheckFields (Record)) {

                     while (Record.Fetch ()) {

                        Script.WaitPause ();                               // Ожидание, если нажали на Паузу

                        Info.DataShow (Record);

                        var Time = new CTime ();

                        if (Time.CheckTime ()) { // Проверка расписания

                           var Status = '';

                           var Phone = DataRead.GetPhone (Record);

                           if (!empty (Phone)) {   // Если номер телефона не пуст

                              if (!DataRead.CheckIsOK (Record)) { // Если статус - не прозвонен
                                                                  // и не достигнут предел количества попыток
                                 try {

                                    for (var i in Phone) {

                                       if (DataRead.WaitBeforeCall ()) {    // Ожидание перед звонком

                                          var SMS = new CSMS ();

                                          var TextSMS = SMS.GetText (Record);

                                          if (!empty (TextSMS)) {

                                             var PhoneStatus = 'OK';

                                             switch (Device.SendSMS (Phone[i], TextSMS, SMS.GetSender ())) {
                                                case 0:  Script.InLogInfo ('Сообщение по номеру %s отправлено успешно', Phone[i]); break;
                                                case 4:  PhoneStatus = 'Отправка сообщения прервана пользователем'; break;
                                                case 5:  PhoneStatus = 'Истекло время ожидания отправки сообщения абоненту ' + Phone[i]; break;
                                                default: PhoneStatus = 'Ошибка отправки сообщения'; break;
                                             }

                                             if (Status != 'OK') Status = PhoneStatus; // Статус записи

                                             if (DataRead.IsRemaining (PhoneStatus)) break; // Если удачный дозвон
                                                                                            // и не включен параметр звонить
                                                                                            // по оставшимся номерам в ячейке
                                             if (Script.IsStop ()) break;

                                          } else Script.StopError ('Отсутствует текст сообщения. Выполнение сценария прервано.');

                                          if (!Record.SetStatus (Status)) break;

                                       }

                                       if (Script.IsStop ()) break;
                                    }

                                    if (Script.IsStop ()) break;
                                 }
                                 catch (Err) {
                                    Status = Err.description;
                                    Script.StopError ('Ошибка в процессе отправки сообщений. ' + Err.description);
                                 }

                                 DataWriteSMS.SetStatus (Record, DataRead.GetPhone (Record, true), Status); // Запись результата звонка
                                 Info.Update (Status);
                              }
                           } else Script.StopError ('Номер телефона пуст.');
                        } else Device.Wait (1000);

                        if (Script.IsStop ()) break;

                         Record.Next ();
                     }

                     if (Script.IsStop ()) break;
                  } // Отсутствуют необходимые поля базы данных

                  Record.Close ();
                  if (Script.IsStop ()) break;
               } else Script.InLogError ('Ошибка получения данных для отправки сообщения');
            } else Script.InLogInfo ('Отсутствуют кандидаты на отправку SMS');

            Database.Close ();
         }

         CycleCount++;

         if (Script.IsStop ()) break;
      }

      Device.Close ();
   }
}
catch (Err) {
   Script.InLogError ('Ошибка при работe сценария. %s. Код ошибки: %s', Err.description, Err.number);
   if (Database) Database.Close ();
   if (Device  ) Device.Close ();
}

Script.InLogInfo ('Стоп');