<?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='\
Скачавшие, где комментарии ? Неужели все работает и нет никаких вопросов ?
1. Поиск по наименованию — не лучший выбор… номер ПФР — было бы правильней
2. Что происходит если не найдено физ.лицо? Создается новое или пропускается?
3. Правилами обмена данная задача решается гораздо быстрей и эффективней
4. По идентичным базам переносить — вопрос не сильно актуальный и не сложный, а вот из ЗУП 2.5 в ЗУП 3.0 перенести физ лиц с контактной информацией и историей изменения фио — задачка поинтересней и такого решения в интернете не нашел
(2) dbaser,
1. поиск по наименованию И дате рождения.
Это два обязательных поля при вводе физ. лица. Бывают случаи, когда с ПФР ошибаются (вводят чужой) или вообще не заносят. Для контроля при нахождении «дубля» выводится ИНН и ПФР из базы источника и базы получателя.
2. При нахождении «дубля» выводится вопрос пользователю, что делать. Выбор между «Заменить», «Создать новый», «Пропустить». Второй скриншот как раз иллюстрирует случай нахождения «дубля». Пока пользователь не сделает свой выбор, загрузка не будет идти дальше.
3. Правила обмена… Рассматривал такой вариант, но так и не придумал как сделать простой выбор загружаемых физ. лиц. Ведь выбор должен сделать именно кадровик.
Плюс, как при правилах обмена контролировать «дубли» ? При этом опять таки, предоставить выбор именно кадровику!
Правила обмена у нас используются в целях постоянного обмена (имеются специализированные конфигурации). Они удобны для автоматического обмена, без участия пользователя.
4. Несложно — да, согласен. Скорее кропотливо (легко что-то пропустить).
Не актуально… когда у кадровиков встала задача перевести из одной фирмы в другую порядка тысячи человек в кратчайшие сроки, было о-о-о-очень актуально.
Да и сейчас найдутся люди , которым такая обработка пригодится: скачивают — значит нужна.
Перенос из 2.5 в 3.0 еще рано делать: судя по изменениям релизы еще очень сырые. Но и это нам предстоит…
Не работает.
{Форма.ИмпортФизЛиц.Форма(1015)}: Ошибка при вызове конструктора (COMОбъект)
В8 = Новый COMОбъект(«V82.COMConnector»);
по причине:
-2147221005(0x800401F3): Недопустимая строка с указанием класса
(4) apn87, какая у тебя платформа ? судя по ошибке — 8.3.
данная обработка будет работать только только на платформе 8.2
Клевая обработка — сильно выручила!
Под Win XP пришлось подправить путь к файлику баз
Было: «AppDataRoaming1C1CEStartibases.v8i»;
Стало: «Application Data1C1CEStartibases.v8i»;
И закоментил строчки с упоминанием, видимо, специфичных для вашей базы: асуНомерКарты, асуАктивный.
(6) FSerg, Да, точно. значит не выкосил остатки 🙂 Это был изменен регистр хранения банковских карт.
Ну а про WinXP да.. совсем забыл 🙂 уже привык к 7-ке и 8-ке
что-то в декабре очень много скачиваний… может доработать нужно? 🙂
а то обратной связи нет…