<?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) «банки как и прежде думают только о себе»
— о да, помню как отсылал этому банку нередактируемый ПДФ вместо экселя
А у меня долго обрабатывает а потом вылетает сама программа 1С !!!
Что это, А?
(4) В какой версии? Платформа/конфигурация?
(4) Думаю, что как минимум стоит попробовать сделать тестирование и исправление базы.
(5) 1С: Бухгалтерия 7.7
(7) Дома попробую на 7-ке. Если не забуду. Раньше работало.
А что если формировать не все отчёты?
Давайте будем помогать банкам в их тяжелом и неблагодарном труде. Бедные они, совсем несчастные. У них ведь «финансовый кризис в мозгах».
👿
(7) Проверил. Работает. МС Офис 2007 + Бухгалтерия 7.70.433. Я в ней веду учёт личных финансов
(9) Ну этот-то отчёт помогает не только банку. Я вспомнил о нём из-за тьмы публикаций о работе с экселем. Очередное поветрие.
Этот отчёт можно рассматривать как пример того что тупое формирование таблиц кодом может быть весьма результативным. На мой взгляд решение очень правильное. Использование xls шаблонов только бы усложнило использование и программный код.
а что еще банки дают кредиты? 😮
(12) Дают. И без особых затыков. Правда о Пробизнесбанке ничего сказать не могу.
МОЛОДЦЫ!!!
Это действительно упрощает работу бухгалтера и финансиста.
Данные отчеты интересны не только (или даже совсем не) банку, а очень полезны в текущей работе, подготовке отчетов акционерам и т.д.
Проверено на семерке.
Выводит данные, правда долго, но завораживает построение срок.
Может пригодится.
Спасибо
А для 8.2 и 8.3 это сработает?
(16) Zabava_, должно работать. Там ничего экзотического нет.
На 8.2 не работает
(18) жаль. Но исправлять мне лень.