<?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='\
Разработка была не время остановлена, теперь выложил снова.
В комплекте идут демо для 7.7 и 8.1
можно глупый вопрос))?
a, r, g, b, Прозрачность — в чем разница между а и Прозрачность?
я думал, что в модели argb альфа-канал — это и есть прозрачность..
(3) Это так работает фреймворк 3.5 😉 Там есть такой параметр.
(3) Видимо это свойство используется, когда на объект текстура накладывается, у которой нет альфа-канала.
(1) А расширение функционала какое-нить планируется в перспективе?
(6) В перспективе — да. Есть ряд задумок, которые будут добавлены.
Одна из них — визуальная дефрагментация 😉
(7) А насколько близка сия перспектива?
визуальная дефрагментация — what is it?
(8) Складская логистика.
Близка? Как начнется практическое внедрение, тогда… Думаю, что не в этом году, хотя кто знает…
А текстуры прикрутить не думал? и на сколько это сложно?
(10) Текстуры можно, и, в принципе, не сложно.
Нуууу… тогда ждем-с 🙂
(12) Вопрос в производительности… Я сознательно упростил формирование стеллажей, т.к. собирать из коробок — и несколько тысяч ячеек — тормозило довольно прилично. А если еще и текстуры коробок налепить… 😉
Конечно, можно оптимизировать, но для этого придется уйти в эту технологию с головой, а времени у меня столько нет.
Коллега. А ваше решение можно прикрутить не к 1С. А к WMS. Что бы по адресному пространству описанному в БД системы. можно было загрузить модель. На модели используя поисковик по критериям находить объекты сподсвечиванием нахождения товара или группы товаров
(14) Прикрутить можно к тем программам, которые используют ActivX технологию.
Коллега, а можете мне написать на iliasay@list.ru о возможности сотрудничества. Хотелось бы с Вами пообщаться вне рамок форума.
Коллега приветствую. Я вам на ваш мейл письмо переслал. Посмотрите плиз
Очень интересно, но нужно добавить функциональности, иначе малоприменимо.
Расположение, количество стеллажей;
Свойства стеллажа, ячейки — (МОЛ, дата последнего обновления, тип продукции);
поиск товара по подсвеченной ячейке
(18) Это не для бесплатной разработки 🙂
(19) Абсолютно согласен
Супер реализация!
мне склад не нужен, но вот посмотреть заголовочные файлы и оснастку для c# было бы очень интересно. Можно исходник вызова просто графического окна с желательно d3d в виде active-X компонента ?
графики можно как красиво делать, всякие объемные опять же….
Для получения демо-версии или покупки обращайтесь по контактам, указанным в профиле.
сколько стоит не демо?
respect
и сколько же стоит? Где ответ?
(25) Ни сколько. Это — демонстрация возможности создания 3д-склада.
Кинозал 3D, сделанный biv75 на этой компоненте
Понравилось! 🙂
{Форма.Форма(80)}: Ошибка при вызове метода контекста (УстановитьПозициюКамеры): Произошла исключительная ситуация (mscorlib): Попытка деления на нуль.
ЭлементыФормы.ЭлементУправления1.УстановитьПозициюКамеры(КамераX, КамераY, КамераZ);
по причине:
Произошла исключительная ситуация (mscorlib): Попытка деления на нуль.
(28) Это при каких действиях?
И всю трассировку мне не надо 😉 Достаточно описания ошибки.
Это открываю демку, долго долго открывает и сразу как открыл бегунок с прозрачностью решил подвинуть
а потом камера Ось Х
Прозрачность на середину и бегунком оси икс влевоправо и вылетает
(32) Может видюха не тянет, у меня из-за видюхи вылетало
по поводу трассировки у меня это привело к зависанию 1ски в результате jit стартовал зачем-то 🙂
ага в Hl2 играть тянет а 3 коробки показать нет 🙂
Доброго времени суток!
Хочу прикрепить к своей базе внешнюю обработку, но никак не получается. Обработка написана для 7.7 и 8.1. Я пытаюсь на 8.1 (Ошибка: Внешняя обработка не может быть прочитана данной версией программы. У меня 8.1.15.14) и 8.2 (Ошибка: отсутствуют модули некоторых процедур).
Обработку добавляю:
Конфигурация->Обработки->Вставить внешнюю обработку отчет.. ->Склад3D
Подскажите как решить проблему эту? (Желательно с указанием четких инструкций).
Очень интересно, честно не ожидал что можно делать такое в 1С
Аналогичная ошибка:
{Форма.Форма(80)}: Ошибка при вызове метода контекста (УстановитьПозициюКамеры): Произошла исключительная ситуация (mscorlib): Попытка деления на нуль.
ЭлементыФормы.ЭлементУправления1.УстановитьПозициюКамеры(КамераX, КамераY, КамераZ);
по причине:
Произошла исключительная ситуация (mscorlib): Попытка деления на нуль.
(40) Васи больше нет, так что уже никто не исправит …
В каком смысле нет? Больше никто этой темой (3D в 1С) не занимается?
(42) в живых его больше нет
🙁
Жалко, интересные вещи делал….
Ссылка на кинотеатр не открывается, есть ли возможность ее разблокировать?
Где можно найти исходники? Я бы с радостью продолжил работу Василия.
А у меня ситуация вот какая:
1) Скачал демку,
2) Microsoft .NET Framework 3.5 установил
3) Зарегистрировал компоненты на Windows XP;
4) Перезапустил компьютер;
5) Запустил обработку Склад3D.epf под 1С 8.2
Посыпались ошибки:
{Форма.Форма.Форма(СОРОК ТРИ)}: Метод объекта не обнаружен (ДобавитьГоризонтальнуюПанель) Склад3Д.ДобавитьГоризонтальнуюПанель(«Основной склад», КоордX, КоордY, КоордZ, ШиринаПола, ГлубинаПола, 255, 192, 192, 192, ПрозрачностьПола);Жаль, но методы не обнаружены. Помогите разобраться с проблемой. Все начиналось, так хорошо!
ПОнимаю, что поздно, но мало ли..может быть кто-нибудь ответит.
Не работает zoom, в чем может быть причина?