Копирование документов




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

25 Comments

  1. zalst

    Позволяет копировать один произвольный документ в другой с сохранением одинаковых реквизитов

    Перейти к публикации

    Reply
  2. Ёпрст

    Еще одна нерабочая нетленка…

    Reply
  3. vasilykushnir

    (1) Что не сработало?

    Беру док ПриходОтПоставщика, копирую в ВозвратПоставщику. Создала новый документ возврата. Все четко по описанию. А то, что не подтянула реквизиты, которых и близко нет в типовых — автор честно предупредил. Другое дело, что у меня Возврат можно создавать на основнии Прихода не умаляет ценности работы, проделаной автором. Посему быстрее плюс, чем минус.

    Reply
  4. Abadonna

    (1)Глянул мельком код — должно работать.

    (0) А вот с ТЧ зачем же так сложно? 😉

    ДокИ.ВыгрузитьТабличнуюЧасть(ТЗ)

    ДокП.ЗагрузитьТабличнуюЧасть(ТЗ) // и всё!, оно само там встанет, где совпадает

    Reply
  5. tango
    Код
    ДокП.ЗагрузитьТабличнуюЧасть(ДокИ.ВыгрузитьТабличнуюЧасть());

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

    Reply
  6. zalst

    так сложно только по одной причине :), она делалась для других задач(лишний код убрал, а оптимизаций не делал :))

    Reply
  7. Ёпрст

    Работает говорите ? Ну-ну..

    Автор видать открыл для себя als по метаданным… и сразу очередной шедевр 🙂

    ЗЫ: Облом реквизитами неопределенного типа.

    Reply
  8. vasilykushnir

    (6) Оп-па! Сейчас проверю.

    Reply
  9. Abadonna

    (6) На неопределенных может и не сработать, потому как там для начала надо НазначитьТип делать

    Reply
  10. Ёпрст

    (8) Об чем собственно и речь в (1)… А так, и в книге знаний валяется на мисте давно…и тоже не рабочий код..И такого добра — навалом.

    ЗЫ: И ни разу не удобно это всё.

    Гораздо удобней повесить на «горячие» кнопки вызов копирования…и хранить желательно еще где-то…Хотя бы в переменной глобальника (или в файле, если надолго надо 🙂 )

    Т.е в одном документе запомнил…захотел — вставил…хоть в 100 документов ну и т.д….

    Reply
  11. zalst

    для ёпрста:

    1. с метаданными работаю давно и в курсе указанной проблемы

    2. обработка писалась не для хваставства красоты кода или мнимых рейтингов, и даже не для оценки ёпрстами!!! а для реальной задачи, в последствии часть кода вырезалась (поэтом и нет там выгрузитьтабличнуючасть, о которой я хорошо знаю :))

    3. кому она пригодится — думаю им главное чтобы работало :), в конце концов можно доработать — не так сложно :), а на конкурс лучшего кода я не претендую

    4. все равно спасибо за критику, так как если бы задачи пересекались с указанной тобой проблемой — мне бы это очень помогло 🙂

    Reply
  12. zalst

    вместо послесловия: ёпрст, обвинять проще, а чем ты реально помог людям :)? много выложил мега зачетных кодовых вещей???

    Reply
  13. Abadonna

    Во всяком случае выложено безо всяких там «плюсуйте рейтинг», «тут супер-пупер», а просто и скромно «позволяет копировать один произвольный документ в другой, с сохранением одинаковых реквизитов». Лично я одобряю хотя бы сам подход к публикации

    Reply
  14. Ёпрст

    (10) Никогда не понимал людей выкладывающих прописные истины…еще и не работающие..еще и раз по 100 опубликованные под разными обёртками.

    (11) Никогда ничего не выкладывал… Хочешь пообщаться в эфире — топай на кубань или мисту я там чаще постю.

    ЗЫ: Ничего личного.

    Reply
  15. zalst

    ёпрст, ничего личного, твою мысль уже все поняли :), плохая — значит будет невостребованной валяться, в чем проблема. не работает? будет критики много. о чем мы спорим?!!! нет у меня желания на мисте оправдываться

    Reply
  16. Abadonna

    (14) Зато он её тебе все время топике держит (прямой эфир)

    Так что нет худа без добра :))))

    Reply
  17. zalst

    это конечно классно, но я ж говорю — мне рейтинг фиолетов, я вообще не собирался выкладывать, но друзья — знакомые сказали что часто бы таким пользовались, вот я и решил выложить — может еще кому надо 🙂

    в любом случае Abadonna — спасибо за теплые слова и критику

    Reply
  18. Ёпрст

    (14) Не кипятитесь… Просто мысли вслух..

    Всё это давно реализовано…

    Просто пользоваться в таком виде, а именно вызов обработки в ней выбор документа, выбор другово документа — не комильфо.

    Гораздо приятнее в открытой форме нужного документа, нажать к примеру F12… данные сохранились (либо в переменной, либо в файле, смотря для каких целей…) в любом другом документе — нажимаешь кнопочку F11, например, вставились значения…

    Или в Журнале документов — нажал кнопку — далее либо открыл новую (любую) форму документа с исходными данными, либо запомнил Это где-то…

    Именно такое решение более приемлемо, чем что-то выбирать…

    Всё, имхо.

    Reply
  19. zalst

    очень может быть, но я не рылся и не знаю сколько таких же 🙂

    по поводу быстрых кнопок, да, если это нужно постоянно!!!! а мне кажется эта обработка нужна время от времени :).. да и не претендует она на чтото сверх полезное, оригинальное и т.п. :), так же как не снимает рейтинги :)… но и места много не просит :), а вот чем больше их — тем проще найти!!!

    Reply
  20. sirius77

    Уобная шкука.

    Reply
  21. ladybi

    а мне, как пользователю, очень даже подходит 🙂

    спасибо, всё работает и понятно как без инструкций — это действительно главное!

    Reply
  22. бубух

    +за оригинальность и работоспособность. в хояйстве сгодится.

    Reply
  23. antoninayuf80

    Отличная обработка. Жалко только, что в моем случае не получается одну графу скопировать, а именно копирую из Отгрузки на сторону в приходную накладную — копируется всё, кроме количества. Испробовала все варианты изменения самих документов и всё равно графа «Количество» остается незаполненной. А очень нужно. Может быть, можно как-то доработать?! С надеждой и благодарностью автору.

    Reply
  24. 1C_SISTEMA-YKT

    Может что то не то спрашиваю, а для какой версии данная обработка 8? или 7? не понял, и открывается в 8-ке как текст

    Reply
  25. zalst

    (24) 7.7

    Reply

Leave a Comment

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