<?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)
Результат лучше выложить в описании
а так однозначный +
только жаль что событий элемента управления нет
и всё таки что такое ТК?
ТК — типовая конфигурация
Есть уже вариант который позволяет получать таблицы, колонки,
события на элементах и формах. Выдает только элементы с определенным префиксом.
Но это чуть позже. Надо подумать.
будем следить за разработкой…
Плюсуем !!!
Сначала подумал, что вот оно!
Но теперь посмотрел и понял, что не оно и затея в общем то гиблая.
Добавь на вложенную панель элемент формы любой и поймешь, что нельзя его однозначно воссоздать. У элемента формы нет ссылки на панель, к сожалению.
ну кое что надо и руками
tormozit
вы же это уже занаете
да есть тупички но на что нам наши руки,
а формы объектов типовых конфигураций лучше не трогать
товоя цитата «Если это делать прямо в диалоге формы, то обновление релиза может преподнести неприятные сюрпризы.»
(8) Методы то есть .. но они очень тяжелы
11
Если есть метод определения принадлежности элемента формы панели ли странице панели укажи
добавлю и выложу свежий вариант
(12) можно распарсить саму форму
(12) Используй деструктивный анализ. Удаление страниц панели и проверка существования элемента формы после удаления каждой страницы.
По-хорошему нужно сделать выбор формы через дерево метаданных. Если подобных наработок у тебя в наличии нет, то конечно немного придется попотеть. Зато в итог будет намного большая универсальность.
Строгий алгоритм такого «разворачивания» структуры формы в код должен использовать полное описание всех типов элементов управления вместе с их расширениями. Такое полное описание есть в , правда в отношении элементов форм функционал пока не доведен до ума, но описание всех свойств по типам и расширениям типов элементов управления есть.
(14)
измененной формы не должно быть в конфигурации
Тестовая форма не верно декомпилится. Как минимум ошибка в
Текст.ДобавитьСтроку(Таб + «ЭлементыФормы.»+ЭлементТаблицы.Панель+».ТекущаяСтраница = ЭлементыФормы.»+ЭлементТаблицы.Панель+».»+ЭлементТаблицы.Страница+»;»);
Скобка не нужна на конце, перед ;
Ну и ругается на текущие страницы панели.
(0) Предупредили бы, что префикс максимум из 2-х символов определяется…
А я что-то не так делаю, или парсер не определяет, что я добавил новую страницу на панель?
В модуле обработки заменить строку 180 на:
Текст.ДобавитьСтроку(Таб + «ЭлементыФормы.»+ЭлементТаблицы.Панель+».ТекущаяСтраница = ЭлементыФормы.»+ЭлементТаблицы.Панель+».Страницы.»+ЭлементТаблицы.Страница+»;»);
Иначе неверно формируется обращение к текущей странице
В (18) не вся ошибка исправлена.
Строка 254, заменить на:
Текст.ДобавитьСтроку(Таб + «ЭлементыФормы.»+ЭлементТаблицы.Панель+».ТекущаяСтраница = ЭлементыФормы.»+ЭлементТаблицы.Панель+».Страницы.»+ЭлементТаблицы.Страница+»;»);
Не распарсил кнопку на КП ОсновныеДействияФормы…
Если элемент связан с данными, тип значения нельзя устанавливать.
Например, поле ввода будет создаваться с ошибкой в этом случае.
+(25) поле ввода для табличного поля, связанного с табличной частью.
Сортировка по элементам некорректно работает — командная панель пытается создаться раньше, чем табличное поле, на основании которого она работает.
Для правильно работы КП необходимо условие изменить (по заполнению кнопок)
А как это можно в семёрке сделать? Я обыскался декомпилятор 🙁
(28) gcomp, turbomd
Строка:
пФормаКопия.ЭлементыФормы[ЭлементНастройкиМакета.Имя].Страницы.Удалить(0);
вызывает ошибку, если в модуле формы идет обращение к удаленной странице.
Например:
Если Элемент.Страницы[ТекущаяСтраница] = Элемент.Страницы.ОбщиеЗначения Тогда…
А страницы уже нет.
1. Сложные формы с панелями не обрабатывает, вылетает с ошибкой:
{ВнешняяОбработка.ДекомпиляцияИАнализФорм.МодульОбъекта(428)}: Метод объекта не обнаружен (ПолучитьПривязку)
Элемент.ПолучитьПривязку( Граница, ПервыйЭлемент, ГраницаПервогоЭлемента, ВторойЭлемент,
2. Из чисел можно было сразу убирать Символы.НПП и заменять запятую на точку.
Спасибо за обработку
Очень помогает
хотел скачать — надо какие-то мани
чушь полная платить мани за это
файла 2 — 1 скачался, а 2ой опять просит мани
Трудно понять и оценить обработку, которую не можешь скачать
Обработка бесплатная.
(35) mdSerg, Обработка бесплатная. Видимо Инфостар советую скачать там эта обработка встроена а работать с ней удобнее.