<?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.6 (1.6.22.4) не дает расшифровку.
{ВнешнийОтчет.ГлавнаяКнигаХозрасчетный(7091)}: Поле объекта не обнаружено (ОборотыСчета)
ФормаРасшифровка = Отчеты[Расшифровка.ИмяОбъекта].ПолучитьФорму(,, Новый УникальныйИдентификатор);
Поправил расшифровку,вроде перезалил,проверяйте
очень понравилось, спасибо, ставлю плюс
ставлю плюс
а можете добавить так же как уже была выложена обработка для 7.7, чтобы были подитоги?
Настройки: установлены флажки по субсчетам, по корсубсчетам, развернутое сальдо, а настройка «период» — По месяцам (при периоде отчета — квартал)
1) при расшифровке «Обороты счета»
{ВнешнийОтчет.ГлавнаяКнигаХозрасчетный(7147)}: Поле объекта не обнаружено (НачалоПериода)
ФормаРасшифровка.НачалоПериода = ПериодС;
Исправил заменой на
ФормаРасшифровка.ДатаНач = ПериодС;
ФормаРасшифровка.ДатаКон = ПериодПо;
2) при расшифровке «Отчет по проводкам»
{ВнешнийОтчет.ГлавнаяКнигаХозрасчетный(7100)}: Поле объекта не обнаружено (СчетДт)
ТиповыеОтчеты.ДобавитьОтбор(ФормаРасшифровка.КомпоновщикНастроек, «СчетДт», Расшифровка.СчетДт, ВидСравненияКомпоновкиДанных.ВИерархии);
Не вдаваясь в код, пользуясь отладкой заменил на следующий текст:
ТиповыеОтчеты.ДобавитьОтбор(ФормаРасшифровка.КомпоновщикНастроек, «СчетДт», Расшифровка.Счет, ВидСравненияКомпоновкиДанных.ВИерархии);
А я плюсик поспешил поставить!! 😀
Так подробно не проверял,расшифровка вообще не надобилась.Исправил по KereberoS. Перезалил.
[6] не планирую,по крайней мере пока.Код открыт,кто возьмется — успехов.
К нам тоже налоговая пришла, т.ч. очень пригодилось. Единственно — по просьбе гл.буха колонки «Сальдо начальное» еще добавили (чтобы форма с типовым отчетом совпадала)
да, тоже пригодилась. В свое время главбух пристал с такой задачей, что ГК должна быть развернута по субсчетам и точка. Правда я сам стандартную книгу подправил — довольно просто делается, но автору все равно респект:)
Спасибо! пользуемся
Спасибо пригодилась. В свое время главбух сказала, что ГК должна быть развернута по субсчетам а менять в распределенной базе было нельзя…так что очень пригодилась….спасибо
Можете бросить на мыло, потому что не могу скачать
Можно еще прикрутить в коментах 🙂
Спасибо за обработку! Главный бухгалтер давно спрашивала, можно ли сделать главную книгу по субсчетам, но у нас большинство баз на семерке и знаний не хватало. Теперь главный бухгалтер довольна-))
очень понравилось, спасибо
пасиба