<?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='\
Спасибо, добрый человек! А то я тоже измучился, думая как же это прокрутить.
отсутствует ф-ия ПроверитьЗаполнение()
странно, это ведь метод формы…
попробуйте написать ЭтаФорма.ПроверитьЗаполнение()
или вообще это можно убрать, это всего лишь проверка на заполнение полей Коэф. деноминации и Дата деноминации
спасибо за ответ
да это понятно, все прозрачно ибо тут и полей кот наплакал, но странно что у меня не подхватился этот метод — синтаксическую ошибку выдает
а вот с добавлением ЭтаФорма.ПроверитьЗаполнение() проверка проходит ОК.
Добрый день.
А в регистрах бухгалтерии разве не может быть валютных сумм в белорусских рублях, которые тоже надо деноминировать?
Добрый день. А в каких случаях это может быть?
Мне сложно сказать. Но теоретически можно сделать проводку по счету 60.11 и выбрать валюту белорусский рубль. В проводках же есть ВалютаДт, ВалютаКт, СуммаВВалютеДт, СуммаВВалютеКт.
Проверил по бух.счетам. Корректно заработала, когда добавил фильтр Организация = &Организация в запрос .
Спасибо за обработку по деноминации Бух8 1.6
Скачали, будем пробовать! Франчи белорусские не радуют 🙁 до сих пор никаких новостей по этой конфе, даже нет описания будующего алгоритма, чтобы к новой интеграции подготовится заранее
Добавь правки в КнопкаВыполнитьНажатие
при переоценке вал счетов (хозрасчетных) вопервых валюную сумму списывать не надо, во вторых надо указывать валюту (ДТ или кредит) которую заполнять в провдке
предлагаю
Показать
А зачем разницей делать. Может проще уже сумму с копейками сразу вводить. Ну чтобы в одной базе были только деноминированные суммы.
Т.е так Обрезка — Деноминация — Старые доки обрезки удаляем.
Добрый день.
при выполнении выдало ошибку:
{Форма.Форма.Форма(434)}: Ошибка при вызове метода контекста (Записать) ДокументКорректировки.Записать(); по причине: Запись не верна! Поле «Валютная сумма» должно быть пустым! (Регистр бухгалтерии: Журнал проводок (бухгалтерский учет); Номер строки: 2)Конфигурация: Бухгалтерия для Беларуси. УСН, редакция 1.6.65.1
Ошибка связанна с тем что со счета 000 пытается списаться валютная сумма.
Так же есть грубая ошибка при округлении малоценки. Согласно инструкциям по деноминации суммы которые после деленяи на 10 000 дают результат меньше чем 0.01, приравниваются к наименьшей денежной единице. т.е. к одной копейке (0.01)
что с этим делать?
начиная со строки 338 подправить надо
заменить вот это:
на вот это: