<?php // Полная загрузка сервисных книжек, создан 2025-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 КАК Ном,
| СУММА(ХозрасчетныйДвиженияССубконто.КоличествоКт) КАК Кол,
| СУММА(ХозрасчетныйДвиженияССубконто.Сумма) КАК Сумма,
| ХозрасчетныйДвиженияССубконто.Период КАК Период
|ИЗ
| РегистрБухгалтерии.Хозрасчетный.ДвиженияССубконто(
| &НачДата,
| &КонДата,
| Регистратор = &Регистратор
| И (НЕ СчетКт = &СчетГТД)) КАК ХозрасчетныйДвиженияССубконто
|
|СГРУППИРОВАТЬ ПО
| ХозрасчетныйДвиженияССубконто.СубконтоКт1,
| ХозрасчетныйДвиженияССубконто.Период»;
Зап.УстановитьПараметр(«Регистратор», СсылкаНаОбъект);
Зап.УстановитьПараметр(«НачДата»,СсылкаНаОбъект.Дата);
Зап.УстановитьПараметр(«КонДата»,СсылкаНаОбъект.Дата);
Зап.УстановитьПараметр(«СчетГТД»,ПланыСчетов.Хозрасчетный.ГТД);
спасибо, у меня в первоначальном варианте расчет был через функцию ПолучитьСуммуСписанияАктивов, а попалась эта выборка на глаза. Хотел я ее приспособить для получения ДатаПоступленияТовара, да не получилось.
Дерзай
Сейчас в модуле количество и сумма расчитываются через функцию ПолучитьСуммуСписанияАктивов из модуля БухгалтерскийУчет.
Должности криво выводятся (справа лишние пробелы, текст сдвинут влево). Надо было либо брать Должность.Наименование, либо делать СокрЛП(Строка(…)).
Не удалось сформировать внешнюю печатную форму!
Метод объекта не обнаружен (ПолучитьСуммуСписанияАктивов)
_________________________________________________________
1С:Предприятие 8.1 (8.1.15.14)
1С: Ликероводочный и винный завод, редакция 1.2 (1.2.32.1)
На базе УПП редакция 1.2 (1.2.32)
_________________________________________________________
dour-dead, значит такой функции в общем модуле Вашей конфигурации нет. Я делал на базе бухгалтерия 8.1, в заголовке это указано. Можно взять ее с Бухгалтерии 8.1 и поместить в модуль обработки.
Скачал давно, но все равно спасибо)
спасибо
Спасибо, очень пригодилось. Это именно то, чтоя искала!
Спасибо за разработку. Остановились на этой форме.
в 1.6 бухе ругается на кусок кода
|ИЗ
| РегистрБухгалтерии.Хозрасчетный.ДвиженияССубконто(
| &НачДата,
| &КонДата,
| Регистратор = &Регистратор
| И (НЕ СчетКт = &СчетГТД)) КАК ХозрасчетныйДвиженияССубконто
|
|СГРУППИРОВАТЬ ПО
| ХозрасчетныйДвиженияССубконто.СубконтоКт1,
| ХозрасчетныйДвиженияССубконто.Период»;
Зап.УстановитьПараметр(«Регистратор», СсылкаНаОбъект);