<?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='\
Почему то не доступна кнопка «Сформировать». В чем может быть причина?
Нужно пройти авторизацию.
Имена таблиц бы
Тебе зачем? У тебя есть Enterprise Integrator 🙂
Но можно подумать.
(4) на такой то красоты!! в Enterprise Integrator нет 🙂
Добавил возможность вывода имен таблиц SQL.
Плюсую.
А расшифровка то почему не работает?
Открывай модуль. Или стесняешься? =)
Расшифровка не получилась 🙁
Толи из-за строковых измерений, толи лыжи не едут.
По поводу расшифровки попробуй так
ДанныеРасшифровки = Неопределено; КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных; МакетКомпоновки = КомпоновщикМакета.Выполнить(СхемаКомпоновкиДанных, КомпоновщикНастроек.Настройки, ДанныеРасшифровки); ПроцессорКомпоновки = Новый ПроцессорКомпоновкиДанных; ПроцессорКомпоновки.Инициализировать(МакетКомпоновки, Новый Структура("Данные", ТЗ), ДанныеРасшифровки);Показать полностью
Хорошая вешь.
(8) Так и было. Но при нажатии на ячейку выдавал непонятные цифры. Поэтому и убрал.
(11) Да. Я сейчас тоже проверил и происходит то же самое. Будем разбираться.
Добавил расшифровку.
c PostgreSQL не работает 🙁
PostgreSQL ни разу не видел.
А для 8.0 такого нельзя?
В 8.1.9 не работает, ругается на расшифровку. В 8.1.12 работает. Спасибо за полезную обработку.
Очень наглядно. Спасибо
Давно искал такую обработку, Спасиба огромное
Спасибо
Автору «+». То, что нужно.
Спасибо, супер
какой пароль на модуль? в чем проблема, чего стиснятся? Что там есть такое чего другие не смогут написать?:)
(23) Там менять нечего 🙂
Или что-то не работает?
Просто код хотел посмотреть, не более того
что использовано, как написано, стиль, логику…что в этом такого???
если не трудно пришли на supervisor2004@mail.ru
Автору огромное спасибо! Очень классный продукт сделал, хоть вначале чуть помучился с авторизацией — но оно того стоит!
Респект и уважуха
Обработка хорошая, но можно ли добавить поддержку PostgreSQL и DB2? Или откройте код плизз, чтобы другие дописали
Спасибо за обработку
Интересно, но что такое Размер и Неиспользовано в шапке отчета? У меня как то на порядок разница размер ИБ с общим размером данных базы.
(32) Ответ на этот вопрос дает «sp_spaceused»
А по дате почему отбор не работает?
По всем регистрам накопления. Ввожу хоть с 01.01.09 по 12.10.09 хоть с 01.01.09 по 01.03.09 резалт один и тот же..
при выводе отчёта выдаёт ошибку:
{ВнешнийОтчет.СтатистикаИБ(102)}: Ошибка при вызове метода контекста (Open): Произошла исключительная ситуация (Microsoft OLE DB Provider for ODBC Drivers): [Microsoft][ODBC SQL Server Driver][SQL Server]The object ‘_Task7795.VT7910’ does not exist in database ‘base2’ or is invalid for this operation. по причине: Произошла исключительная ситуация (Microsoft OLE DB Provider for ODBC Drivers): [Microsoft][ODBC SQL Server Driver][SQL Server]The object ‘_Task7795.VT7910’ does not exist in database ‘base2’ or is invalid for this operation.и ещё вопрос: как с помощью этого отчёта отследить какая таблица занимает больше 4 гигов? Смотреть на колонку «Общий размер»?
регулярно использую эту обработку
Огромное спасибо!!!
Вот и нашел причину тормозов создания начального образа для РБД
В SQL конечно, эти отчеты тоже можно получить, но в таком виде, наверное, удобно.
Как на счет открыть модуль?
Неясно зачем период, чтобы я не выбрал данные одинаковые, это баг или фича такая?
Период для анализа количества документов.
💡
Добавил «Количество записей в документах и регистрах за период.»
Есть подсчет записей остатков по месяцам в регистрах накопления, но не совсем сходится 😉
Маленькая наколка: вылетает по ошибке типа:
{(12, 3)}: Неоднозначное поле «Документ.Дата»
<<?>>Документ.Дата МЕЖДУ &ДатаНач И &ДатаКон
И всё оттого, что у одного документа есть реквизит, незамысловато названный Документ…
(Тут кто-то уверял, что, мол, исправлять там в модуле неча…)
Автор, исправь, пожайлуста!
Скачивал обработку 15.12.2010, возникает аналогичная ошибка, что и в комментарии по №35: типо таблицы в БД нету…
В связи с чем это может быть?
(42) эээээээээх код бы посмотреть……
может пошлешь на anjovner тратата yandex.ru?
Огромное спасибо!!!
Вот и нашел причину тормозов создания начального образа для РБД
Поясни, как именно нашел?
🙁 под 8.2 бы…
(47) Так возьми и сконвертируй в конфигураторе 8.2. Делов меньше минуты.
Так возьми и сконвертируй в конфигураторе 8.2. Делов меньше минуты.
Сделала, обработка выдает ошибку при запуске
«{ВнешнийОтчет.СтатистикаИБ.МодульОбъекта}: Переменная с указанным именем уже определена (Connection)»
а код обработки под паролем 👿
У меня нет такой ошибки. 1С:Предприятие 8.2 (8.2.14.460). Тоже сконвертированная обработка.
(49) У вас в конфигурации уже есть наверное Connection…по всей видимости глобальный, зачем-то…меняйте у себя название, либо вскрывайте обработку, меняйте там.
У вас в конфигурации уже есть наверное Connection…по всей видимости глобальный, зачем-то…меняйте у себя название, либо вскрывайте обработку, меняйте там.
знать бы еще как ея вскрывать 😳
(52) Правильно, не знайте. Я знаю, но не скажу.
(52) поищите, была ветка, и к моему удивлению кто-то ответил.
Спасибо за добрые советы! ❗
но у меня вылезли новые грабли
«{ВнешнийОтчет.СтатистикаИБ.МодульОбъекта(27)}: Ошибка при вызове метода контекста (Выполнить)
Возврат Запрос.Выполнить().Выгрузить()[0];
по причине:
по причине:
{(12, 3)}: Неоднозначное поле «Документ.Дата»
<<?>>Документ.Дата МЕЖДУ &ДатаНач И &ДатаКон
»
ругается на самый обычный документ «Сторно» 😐
Заработалооооо!!!! 😀
А можешь доработать чтобы и Агрегаты понимало или пароль сказать, я покапаюсь и пришлю тебе для выкладывания?
(57) simol, Агрегаты в УТ11 есть?
(58)У меня только УПП Укр. Я не знаю есть ли, но если их нет то могу прислать cf, где они будут, что-бы тебе было на чем откатать.
(58) У меня только УПП Укр. Я не знаю есть ли, но если их нет то могу прислать cf, где они будут, что-бы тебе было на чем откатать.
я так понимаю проект забросили и добавление Postgresql не будет. а жаль, сейчас как раз очень бы пригодилось
Спасибо за обработку. Только не понимаю зачем надо модуль паролить.Все равно кому надо, пароль убрали.. А кому не надо и не смотрели в код..
Обработка хорошая, полезная. Но, зря закрыли код, это да. Можно свою написать, а эту за основу взять. Надо будет заняться, как свободное время появится
Полезная вещь. Часто требуется предоставить информацию по количеству документов, введенных бухгалтерами в систему.
спасибо. пригодилось
Спасибо, шикарный отчет!
А есть ли что-нибудь подобное для файловой(не SQL-ной) базы?
Платформа 8.2.13, SQL Server 2008
Кидает ошибку:
{ВнешнийОтчет.СтатистикаИБ.МодульОбъекта(212)}: Ошибка при вызове метода контекста (Open)
RS.Open(«sp_spaceused ‘» + ИмяТаблицыХранения + «‘», Connection);
по причине:
Произошла исключительная ситуация (Microsoft OLE DB Provider for ODBC Drivers): [Microsoft][ODBC SQL Server Driver][SQL Server]Объект «_Reference60_VT9277» не существует в базе данных «1cv82TEST», или недопустимо его использование в данной операции.
Отчет запускал из одной базы и подключался к другой, думал проблема в этом (различные метаданные), но нет — ругается также, только уже на задачи пользователя:
{ВнешнийОтчет.СтатистикаИБ.МодульОбъекта(212)}: Ошибка при вызове метода контекста (Open)
RS.Open(«sp_spaceused ‘» + ИмяТаблицыХранения + «‘», Connection);
по причине:
Произошла исключительная ситуация (Microsoft OLE DB Provider for ODBC Drivers): [Microsoft][ODBC SQL Server Driver][SQL Server]Объект «_Task14.VT8175» не существует в базе данных «1cv82», или недопустимо его использование в данной операции.
Остальные объекты скушал нормально. В чем может быть причина?
Спасибо за отчет!
Удобная вещь!
Очень удобно! Спасибо!
спасибо, то что нужно!
спасиба!!!!
Спасибо.
А у кого была попроще, но типа того для файловой ?
Очень понравилось. Но не понятно, размер в чем указывается ? в байтах, кб ??? было бы не плоходединицу измерения размера где-нить указать
Я извиняюсь. Сразу не нашел. Размер указа в КБайтах
Предлагаю в форму метаданных добавить:
Процедура ОбойтиУзел(УзелДерева,Пометка)
Для Каждого СтрокаУзла Из УзелДерева.Строки Цикл
СтрокаУзла.Пометка = Пометка;
ОбойтиУзел(СтрокаУзла,Пометка);
КонецЦикла;
КонецПроцедуры
Процедура КоманднаяПанель1кнВыделитьВсе(Кнопка)
ОбойтиУзел(Дерево,1);
КонецПроцедуры
Процедура КоманднаяПанель1кнУбратьВсе(Кнопка)
ОбойтиУзел(Дерево,0);
КонецПроцедуры
А то каждый раз приходится, все галочки по метаданным проставлять
Спасибо, классная вещь, сразу увидели, где в нашей самописной конфе слабые места и нашли объекты, которые вообще не используются.
Большое спасибо! очень полезная и нужная обработка!
бывает что SQL-ная база после выгрузки в dt-формат, в файловый вариант не загружается, пишет что какие-то внутренние файлы привысили максимальный объем… так с этой обработкой думаю можно будет узнать какие объекты имеют слишком большой объем ))
спасибо
Спасибо, пригодилась
ОГРОМЕННОЕ СПАСИБО — ВЫСШИЙ ПИЛОТАЖ!!!!
{ВнешнийОтчет.СтатистикаИБ.МодульОбъекта(26)}: Ошибка при вызове метода контекста (Выполнить)
по причине:
{(12, 3)}: Неоднозначное поле «Документ.Дата»
<<?>>Документ.Дата МЕЖДУ &ДатаНач И &ДатаКон
MSSQL, 8.2.19.116, УТ 10.3 слегка допиленная.
(82) kvagabest, Рискну ответить за автора, который, возможно, уже не занимается поддержкой и тем более развитием этой обработки.
Во-первых, встречный вопрос: Вам точно нужна регистрация изменений? (то есть статистика изменений объема таблиц хранения документов и периодических регистров за указанный период)
Если не нужна — то есть нужны только данные о текущем объеме таблиц хранения — тогда нажмите на кнопку Настройка и поставьте галочку «Не включать регистрацию изменений».
Во-вторых, внимательнее посмотрите на структуру Ваших метаданных. Предположительно, в каком-то из документов есть реквизиты «Дата» и «Документ».
Тихий восторг. Автору респектище!
Восторг!! Спасибо!!
Спасибо за обработку по Статистике ИБ
помогите пройти аутентификацию.
При попытке сбора данных по регистру накопления «Авансовые платежи иностранцев по НДФЛ» возникает ошибка
{ВнешнийОтчет.СтатистикаИБ.МодульОбъекта(172)}: Ошибка при вызове метода контекста (Выполнить)
по причине:
{(6, 11)}: Поле не найдено «Регистр.ФизЛицо»
Регистр.<<?>>ФизЛицо,
При попытке сбора данных по регистру накопления «Партии материалов в эксплуатации (бухгалтерский учет)» возникает ошибка
{ВнешнийОтчет.СтатистикаИБ.МодульОбъекта(172)}: Ошибка при вызове метода контекста (Выполнить)
по причине:
{(6, 11)}: Поле не найдено «Регистр.Подразделение»
Регистр.<<?>>Подразделение,
Регистры на поддержке, поля (реквизиты) в наличии. Конфигурация УПП (1.3.75.2) доработанная.