Удаление документа из-под самого себя




Принцип обмена данными из 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='\

31 Comments

  1. Ёпрст

    Можно и без ОбработкиОжидания

    http://www.mista.ru/articles1c/hare/article.52.html

    Reply
  2. Abadonna

    (1) Ну я не спорю, что можно. На мисте я б искал час минимум, набросал за 5 минут 😉

    Reply
  3. Ёпрст

    И еще… В сабже говорите о Не записаном документе, а потом вот это ??

    ОткрытьФорму(«Отчет»,ТекущийДокумент(), // ТекущийДокумент() — для незаписанного ничего не даст.

    Reply
  4. Abadonna

    (3)Читай внимательно: «Понятно, что ПолучитьПозицию() для незаписанного документа нельзя», что означает, что для получения позиции я его именно записываю

    А уж потом мочу в зависимости от результата ПолучитьПозицию()

    Reply
  5. Ёпрст

    (4) В сабже как-то мутно написано :))

    Reply
  6. Abadonna

    (5) Щас подправлю чуток :)))

    Reply
  7. Ёпрст

    Вот еще хороший приём для обхода блокировок, очень красиво :

    http://www.sinor.ru/%7Emy1c/knowhow/skpblock.html

    Reply
  8. Abadonna

    По мне ОбработкаОжидания, которая отрабатывает всего один раз — самое то. Я и для других целей ее активно использую. До появления замечательной Формекс использовал как процедуру ПослеОткрытия()

    Reply
  9. Ёпрст

    (8) Я тоже видел удивление в глазах юзверей, когда они открывают модальные окошки и после их закрытия исчезают доки в журнале :))

    Reply
  10. vasilykushnir

    В копилку…

    Reply
  11. Ёпрст

    Чем плохи эти методы — мелкание формы обработки … 🙁

    Reply
  12. Abadonna

    (11)На форме как раз напишу что-то типа «Ты, юзверь, лоханулся, поэтому документик почикаем » ;)))

    Reply
  13. Shaman100M

    Ну, можно и без Обработки ожидания

    Код
    Процедура   ПриЗакрытии() //УдалитьДок()  
       Если ПустоеЗначение(Форма.Параметр)=0 Тогда
         Док=СоздатьОбъект("Документ");        
         Док.НайтиДокумент(Форма.Параметр);
         Док.Удалить(0);
       КонецЕсли;
    КонецПроцедуры
    
    Процедура ПриОткрытии()  
      Форма.Закрыть();
    КонецПроцедуры
    

    Показать полностью

    Выложил по старой памяти, требует проверки.

    Reply
  14. Abadonna

    >Выложил по старой памяти, требует проверки.

    Проверил. При вводе нового Дока сразу модальное окошко «Сохранить документ?»:(

    Reply
  15. Abadonna

    Кстати, в моем конкретно случае появление окошка обработки как раз кстати — оно мне вместо Предупреждение отработает с соответствующей надписью

    Reply
  16. Shaman100M

    (14) это текст открываемой обработки. Судя по вопросу «Сохранить документ?», проверялось в форме документа.

    Reply
  17. Abadonna

    (16) Проверю. Успеет ли док разблокироваться? Так я ему цельную секунду давал.. Тем более там в ПриЗакрытии хрен его знает что еще может выполняться

    Reply
  18. Ёпрст

    (14) спасёт положение вот это:

    Процедура ПриОткрытии()

    Форма.Закрыть(0);

    КонецПроцедуры

    Reply
  19. Ёпрст

    (17) нормально там всё будет, только вот мелькание окошка 🙁

    Reply
  20. Shaman100M

    +(16) проверил, — работает. И обработка не мелькает. 🙂

    Reply
  21. Abadonna

    20.Ну и гуд :))) Заюзаем

    Reply
  22. Shaman100M

    Все же мелькает, но совсем чуть чуть.

    Reply
  23. Ёпрст

    (22) это и есть способ в (1) …всё старо как мир 🙂

    Reply
  24. Abadonna

    Короче, мен все равно надо юзверя попугать/информировать. Так что оставлю ОбработкуОжидания, еще и время увеличу секунд до 3-х 😉

    Reply
  25. Shaman100M

    (23) почитал (1). Уж больно мудрено, открываем обработку, обработка закрывает документ, документ закрывает обработку, обработка в ПриЗакрытии() уже выполняет все что надо. Хотя, главное действие делается в ПриЗакрытии() в модуле обработки в обоих случаях, (13) проще, — просто при закрытии документ открывает обработку, а она уж сама далее…

    Reply
  26. Abadonna

    (25) И я того же мнения 😉 Моего-то кода тут 2 строчки 😉 А ОбработкаОжидания — дело вкуса. Ставил на всяк случай, чтобы уж ЖЕЛЕЗНО док успел закрыться

    Reply
  27. Ёпрст

    (25) Там тот же принцип один в один… просто там меняют Дату/время/ и т.д

    Reply
  28. Abadonna

    (20) Кстати, форма торчит все время пока происходит удаление документа (Док.Удалить). А на приличных доках, двигающих регистры, и с многими строками (ЗаявкаПокупателя, например) происходит далеко не мелькание, а конкретное присутствие формы.

    Так что несчастная ОбработкаОжидания в секунду там погоды не делает

    Reply
  29. artbear

    ИМХО для проверки точного закрытия документа нужно юзать Блокировка(), а уж только потом пытаться закрывать документ.

    В этом случае мы не зависим от времени отработки закрытия документа.

    Reply
  30. artbear

    А вот если юзать ВК ФормЕкс, то возможно сделать закрытие без открытия/мелькания формы 🙂

    Сервис::ОбработкаОжидания или Таймер помогут.

    ЗЫ это для тех, кто не боится юзать сторонние и проверенные в бою внешние компоненты.

    Reply
  31. artbear

    (29+) Чуть опечатался 🙁

    «а уж только потом пытаться закрывать документ» читать как «а уж только потом пытаться удалять документ«

    Reply

Leave a Comment

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