[Расширение] Отключение информации при запуске в базовой БП 3.0




Принцип обмена данными из 1С с сайтом (на MySQL) и выдачи (публикации) этих данных по запросу.
PHP-Скрипт автоматической загрузки данных из файла данных в формате CSV в базу данных сайта работающего на WordPress.

В продолжение моей темы: 1С:Альфа-Авто Автосалон Автосервис: обмен с сайтом.
С помощью данного скрипта можно загружать в автоматическом режиме, по расписанию, данные сервисных книжек (ремонтов авто) из 1С:Альфа-Авто Автосалон Автосервис.
Также можно загружать данные в ручном режиме: для этого делается скрытая страница, где размещается специальная кнопка.
Комментарии размещенные внутри скрипта разъяснят логику и порядок действия.
Комментарии с "/////    echo" использовались для отладки.
Дополнительно создана таблица для журналирования результатов загрузки данных.
Скрипт включает в себя защиту от SQL инъекций (думаю безопасность соблюдена в полной мере).
В кратце:
1. Пишется скрипт, который запускает этот.
2. Создается регламентное задание в WordPress, по которому запускается скрипт из п.1. 
3. Этот скрипт осуществляет проверку на существование файла обмена в папке.
4. Если данные не новые, загрузка не производится.
5. Если данные новые, очищается таблица сервисных книжек.
6. Загружаются новые данные.

Собственно сам скрипт:

<?php // Полная загрузка сервисных книжек, создан 2024-01-05 12:44:55

global $wpdb2;
global $failure;
global $file_hist;

/////  echo '<H2><b>Старт загрузки</b></H2><br>';

$failure=FALSE;
//подключаемся к базе
$wpdb2 = include_once 'connection.php'; ; // подключаемся к MySQL
// если не удалось подключиться, и нужно оборвать PHP с сообщением об этой ошибке
if (!empty($wpdb2->error))
{
/////   echo '<H2><b>Ошибка подключения к БД, завершение.</b></H2><br>';
$failure=TRUE;
wp_die( $wpdb2->error );
}

$m_size_file=0;
$m_mtime_file=0;
$m_comment='';
/////проверка существования файлов выгрузки из 1С
////файл выгрузки сервисных книжек
$file_hist = ABSPATH.'/_1c_alfa_exchange/AA_hist.csv';
if (!file_exists($file_hist))
{
/////   echo '<H2><b>Файл обмена с сервисными книжками не существует.</b></H2><br>';
$m_comment='Файл обмена с сервисными книжками не существует';
$failure=TRUE;
}

/////инициируем таблицу лога
/////если не существует файла то возврат и ничего не делаем
if ($failure){
///включает защиту от SQL инъекций и данные можно передавать как есть, например: $_GET['foo']
/////   echo '<H2><b>Попытка вставить запись в лог таблицу</b></H2><br>';
$insert_fail_zapros=$wpdb2->insert('vin_logs', array('time_stamp'=>time(),'last_mtime_upload'=>$m_mtime_file,'last_size_upload'=>$m_size_file,'comment'=>$m_comment));
wp_die();
/////    echo '<H2><b>Возврат в начало.</b></H2><br>';
return $failure;
}
/////проверка лога загрузки, что бы не загружать тоже самое
$masiv_data_file=stat($file_hist);   ////передаем в массив свойство файла
$m_size_file=$masiv_data_file[7];    ////получаем размер файла
$m_mtime_file=$masiv_data_file[9];   ////получаем дату модификации файла
////создаем запрос на получение последней удачной загрузки
////выбираем по штампу времени создания (редактирования) файла загрузки AA_hist.csv, $m_mtime_file

/////   echo '<H2><b>Размер файла: '.$m_size_file.'</b></H2><br>';
/////   echo '<H2><b>Штамп времени файла: '.$m_mtime_file.'</b></H2><br>';
/////   echo '<H2><b>Формирование запроса на выборку из лога</b></H2><br>';
////препарируем запрос
$text_zaprosa=$wpdb2->prepare("SELECT * FROM `vin_logs` WHERE `last_mtime_upload` = %s", $m_mtime_file);
$results=$wpdb2->get_results($text_zaprosa);

if ($results)
{   foreach ( $results as $r)
{
////если штамп времени и размер файла совпадают, возврат
if (($r->last_mtime_upload==$m_mtime_file) && ($r->last_size_upload==$m_size_file))
{////echo '<H2><b>Возврат в начало, т.к. найдена запись в логе.</b></H2><br>';
$insert_fail_zapros=$wpdb2->insert('vin_logs', array('time_stamp'=>time(),'last_mtime_upload'=>$m_mtime_file,'last_size_upload'=>$m_size_file,'comment'=>'Загрузка отменена, новых данных нет, т.к. найдена запись в логе.'));
wp_die();
return $failure;
}
}
}
////если данные новые, пишем в лог запись о начале загрузки
/////echo '<H2><b>Попытка вставить запись о начале загрузки в лог таблицу</b></H2><br>';
$insert_fail_zapros=$wpdb2->insert('vin_logs', array('time_stamp'=>time(),'last_mtime_upload'=>0, 'last_size_upload'=>$m_size_file, 'comment'=>'Начало загрузки'));

////очищаем таблицу
$clear_tbl_zap=$wpdb2->prepare("TRUNCATE TABLE %s", 'vin_history');
$clear_tbl_zap_repl=str_replace("'","`",$clear_tbl_zap);
$results=$wpdb2->query($clear_tbl_zap_repl);
/////   echo '<H2><b>Очистка таблицы сервисных книжек</b></H2><br>';
if (empty($results))
{
/////   echo '<H2><b>Ошибка очистки таблицы книжек, завершение.</b></H2><br>';
//// если очистка не удалась, возврат
$failure=TRUE;
wp_die();
return $failure;
}

////загружаем данные
$table='vin_history';         // Имя таблицы для импорта
//$file_hist Имя CSV файла, откуда берется информация     // (путь от корня web-сервера)
$delim=';';          // Разделитель полей в CSV файле
$enclosed='"';      // Кавычки для содержимого полей
$escaped='\

28 Comments

  1. Brawler

    Отказ = Истина;

    Reply
  2. Alex_E

    (1) Brawler, Согласен, изменил на Отказ = Истина в процедуре ПриСозданииНаСервере. Спасибо!!!

    Reply
  3. jobkostya1c8

    Вот это дельная вещь, задолбали рекламой. Но…Не такие они и простые эти разработчики типовых конфигураций. Они каждый раз будут менять процедуры запуска чтоб Вы запарились решать проблемы с правкой расширения.

    Reply
  4. Alex_E

    (3) kostyaomsk, Вызов они пусть меняют как хотят, здесь реклама не в выове отключается, а при попытки открыть обработку, которая её показывает, так что, если не будут каждый раз писать новую, будет работать — ПриСозданииНаСервере форма пропустить не может 🙂

    Reply
  5. vikad
    ограничений для использование расширений для базовых вроде нет?

    судя по последней строке в п. 32.1 http://its.1c.ru/db/v83doc#bookmark:dev:TI000001516 и по по последней строке на стр 3 в http://fs.kursypo1c.ru/free/1C-Administration/02-How-2-use-extentions-in-8.3.6.pdf ограничения все-таки есть(

    Reply
  6. Alex_E

    (5) vikad, Написано, что не поддерживается, но в случае, когда базовая версия работает на платформе с ключем ПРОФ расширение подключилось и работает. Проверить, кода работает ТОЛЬКО базовая пока не могу, как получится — отпишусь, или кто — нибудь тут напишет, надеюсь…

    Reply
  7. premierex

    А не проще написать простенькую обработку, которая для всех пользователей установит настройку ДатаБлижайшегоПоказа в какое-то о-о-чень далёкое от сегодняшнего дня значение, 01.01.2500 г., например, и не париться с подключением расширения?

    Reply
  8. Alex_E

    (7) premier, Конечно проще, уже написал (http://infostart.ru/public/333876/), только Вы невнимательно прочитали

    разработчики сделали вывод окна «Информация при запуске» для базовой версии БП 3.0, как говорится «добровольно принудительным».

    В базовой версии пофиг даты — до них просто код не доходит 🙂

    Reply
  9. premierex

    К тому же перезапись настройки «ДатаБлижайшегоПоказа» происходит при закрытии формы. А откроется она очень даже не скоро )))

    Reply
  10. premierex

    (8) а там что, код запуска отличается? Просто базовой БП под руками нет, чтобы проверить.

    Reply
  11. Alex_E

    (9) premier, Откройте базовую, найдите там галку «не показывать»…

    По поводу внешней обработки, в публикации (см. выше) так и сделал внешнюю, но даже в своей базе (не базовой) как то забывается её запускать, расширение. ИМХО, более красивый выход из положения — для ПРОФ просто встроил обработку в расширение, и запускаю её при появлении окна «Информация при запуске» — теперь забыть не получится 🙂

    Reply
  12. Alex_E

    (9) premier, Уууууу, как всё запущено… Я же код привёл в статье — Вы совсем не смотрите?

           Если Метаданные.Обработки.ИнформацияПриЗапуске.Макеты.Количество() = 0 Тогда
    Настройки.Показывать = Ложь;
    ИначеЕсли Не СтандартныеПодсистемыСервер.ЭтоБазоваяВерсияКонфигурации() Тогда
    // Отключение информации в ПРОФ версии если пользователь отключил флажок.
    ФлажокПользователя = ОбщегоНазначения.ХранилищеОбщихНастроекЗагрузить(«ИнформацияПриЗапуске», «Показывать», Истина);
    Если Не ФлажокПользователя Тогда
    ДатаБлижайшегоПоказа = ОбщегоНазначения.ХранилищеОбщихНастроекЗагрузить(«ИнформацияПриЗапуске», «ДатаБлижайшегоПоказа»);
    Если ДатаБлижайшегоПоказа <> Неопределено
    И ДатаБлижайшегоПоказа > ТекущаяДатаСеанса() Тогда
    Настройки.Показывать = Ложь;
    КонецЕсли;
    КонецЕсли;
    КонецЕсли;

    Показать

    Reply
  13. premierex

    (12) я же писал в (10), базовой под руками нет, теперь понятно, что там ФлажокПользователя всегда будет принимать значение Истина. Перемудрили, конечно 1С-ники со своей рекламой навязчивой.

    Reply
  14. Alex_E

    (13) premier, ИМХО, базовая — дёшево и сердито — смотрите рекламу 🙂

    Reply
  15. zvERP1c

    А что такое «базовая версия платформы»?

    насколько я знаю Платформа одна, а вот ключ и конфигурация может быть Базовой и ПРОФ.

    или я что-то путаю?

    Reply
  16. Alex_E

    (15) 3BEPb777, Не, ничё не путаете, я неправильно выразился. имеется ввиду, что когда платформа активирована базовой лицензией.

    Платформа одна, но ключ ПРОФ может быть на компе, когда есть конфигурации ПРОФ (ну хоть у меня есть ключ, но базовые версии на нём остаются базовыми). В общем то пока работает (хотя что будет дальше, с развитием платформы ХЗ) — уже проверил, хоть и нет «Расширения» в интерфейсе базовой БП, но через «Все функции» ставится и работает…

    Reply
  17. zvERP1c

    1С:Предприятие 8.3 (8.3.7.1845)

    Бухгалтерия предприятия, редакция 3.0 (3.0.43.100)

    &НаКлиенте
    Процедура еаю_ПриСозданииНаСервере(Отказ)
    Отказ = Истина;
    КонецПроцедуры

    Не работает.

    Надо так

    &НаСервере
    Процедура еаю_ПриСозданииНаСервере(Отказ)
    Отказ = Истина;
    КонецПроцедуры
    Reply
  18. Alex_E

    (17) 3BEPb777, Круто, а в чём отличие?

    Reply
  19. zvERP1c

    (18) НаКлиенте не срабатывает

    Reply
  20. Alex_E

    (19) 3BEPb777, Конечно на сервере, а что, выложено на клиенте? вообще то это предопределённая процедура, на клиенте ПриОткрытии()

    Reply
  21. Alex_E

    (17) 3BEPb777, Вау, и правда, исправил, спасибо!!!!

    Reply
  22. ASV085

    Спасибо!!! На проф версии , было замечено вообще при снятии этой галки, окно появлялось постоянно. Мои пользователи теперь довольны, как слоны!

    Reply
  23. Alex_E

    (22) ASV085, Пожалуйста! Рад, что пригодилось)))

    Reply
  24. Alex_E

    (22) ASV085, Вообще то для ПРОФ есть более продвинутая штука http://infostart.ru/public/333876/. Тут не только информация при запуске отключается, но и много чего ещё…

    Reply
  25. zvERP1c

    (16) на самом деле есть БАЗОВАЯ платформа.

    Мой мир больше не будет прежним. (с)

    Reply
  26. Alex_E

    (25) 3BEPb777, И что это меняет с точки зрения этой публикации?

    ЗЫ Базовая платформа…ссылочкой не поделитесь, откуда скачать?

    Reply
  27. duck

    По поводу подключения расширения к базовой версии. Проверял недавно.

    На компе установлена 1С Розница базовая. И только она. Активирована лицензия базовой розницы.

    В результате при входе в конфигуратор раздела с Расширениями нет в принципе.

    При входе в режим предприятия в меню Все функции — Стандартные — Управление расширениями можно добавить расширение, но оно не работает.

    Скорее всего с другими базовыми конфигурациями будет то же самое.

    Если же на компьютере активирована обычная лицензия от проф версии любой из конфигурации, то расширения начинают работать и на базовых конфигурациях.

    Reply
  28. Alex_E

    (27) duck, А платформа какая?

    Reply

Leave a Comment

Ваш адрес email не будет опубликован. Обязательные поля помечены *