<?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='\
«В сети для 8-ки я не нашел… Пришлось сделать самому :)))»
как же так в типовых конфигурациях же давно реализовано о_О
Мега полезная функция видимо, если отдельно оформили и выложили ))
Вставьте процедуру прямо в статью. Пока в комментарии не глянешь, не поймешь что это не какая-то «шняга».
(4) wowik, добавил в статью :)))
полезная вещь … но скорее для тупых или слепых бухов …
Не только для тупых. В большом холдинге и в одной большой базе сложнее отследить левых контрагентов. Может не существующий контрагент вам счет выставил.. Оплатив ему деньги будет сложно вернуть. Такие вещи на вооружение могут взять безопасники. Вообще неплохо бы встроить в типовые конфигурации. Если не как запрет, то хотя бы как предпреждение.
К сожалению данная проверка мало чем поможет. Фирма может иметь правильный ИНН, но быть «мусоркой» или «однодневкой». Да и вообще не быть, ИНН есть а фирмы нет. Правильнее заводить контрагента в базу специально обученным человеком который пробьёт её везде где можно, и заодно заполнит все реквизиты.
(3) спасибо. Теперь понятно что делает на самом деле функция.
В типовой есть проверка не только 10 или 12 символов, но и контрольные цифры тоже проверяются.
Бухгалтерия предприятия: Общий модуль РегламетированнаяОтчетность, Функция ИННСоответствуетТребованиям(Знач ИНН, Знач ТипЛица) Экспорт
А если ИНН 9 цифр? Белоруссия
(11) zfobo,Спросите в вашей ИФНС, как у вас расшифровывается ИНН)))
(12) Bukaska, может быть в Беларуси и ИФНС расшифровывается по-другому =) или называется вообще не так.
(11) zfobo, правда, нужно смотреть алгоритм проверки контрольного знака для Ваших реалий. А еще что-то подсказывает, что в «1С Бухгалтерия для Беларуси» уже может быть реализована такая проверка. Проверить, к сожалению, не на чем, но смотреть скорее всего в аналогичном месте — Общий модуль РегламетированнаяОтчетность, Функция ИННСоответствуетТребованиям(Знач ИНН, Знач ТипЛица) Экспорт.
Конечно не жизненно важная проверка, но молодец что сделал и потратил время, чтобы выложить ее сюда.
(8) ну вообщем-то на Исе есть разработка как раз для этих целей — пробивает клиента вовсем доступным открытым базам и в свойдной форме выдает инфу.
Спасибо за информацию, достаточно понятно описан алгоритм.
Обработка хороша, что и говорить,но было бы идеально если бы сразу по всей базе можно было сделать отчет по неправильным ИНН.Причем в иерархии. Пришел бух на работу, где кто то до него нафигачил в базе, воспользовался этой обработкой и «вуаля» сразу все поправил, все ошибки по ИНН и КПП исправлены. На ИС такой обработки не наел, к сожалению. А просто подставлять цифры в поле проверки ИНН неудобно ИМХО. А вот процедура при записи другое дело, хорошая защита от дурака.
А что такое означает фраза «10-ю цифру принимаем за 0» при проверке ИНН физ.лица? Она меня конкретно сбила с толку.