<?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='\
Запускаю на типовой бух-ии sql
УДАЛЕНИЕОБЪЕКТОВ.ERT(156)}: Ошибка типизации поля Владелец $Справочник.Перечни правил отнесения расходов основного производства к прямым.
А компоненту грузил?
Да грузил
ругается не на всех спр-ках
кроме этого как-то медленно ищет, типовая много быстрее
и потом, показывает много объектов, которые и не помеченные вовсе
Просто комментарий.
Сайт глючит и отправить сообщение автору напрямую не получается.
Не смог запустить обработку.
Вылетает из-за ошибки в строке инициализации при подключении к БД:
«Формат строки инициализации не соответствует спецификации OLE DB»
Скачал и установил Microsoft OLE DB Provider for Visual FoxPro 9.0 SP2.
Сам я в ODBC не силён и не знаю чего в этой строке надо подправить.
Хочется услышать какие-то рекомендации автора.
Запускается в среде Windows 2003 RUS. Пробовал на XP — тоже самое.
Мой ICQ: 229624337
переделаю скоро
а пока
Спасибо за оперативный ответ :))
Сам рыл-копал рецепта не нашёл.
Всё замечательно работает. Риспект! )
SP 2 вышел и драйвер к нему
оказалось строка подключения немного не та была
Добавлю свои 5 копеек. Скорее для себя.
Ссылка на драйвер:
1.
2. При текущей строке подключения:
у меня не подключался драйвер, поправил на:
3. Инфу почерпнул отсюда:
(0) Зачем такие сложности? CPP+ «у меня не подключался драйвер»?…
Есть же простые, родные:
1.
НайтиПомеченныеНаУдаление(<?>);
Синтаксис:
НайтиПомеченныеНаУдаление(<Объекты>)
Назначение:
Находит все помеченные на удаление объекты.
Параметры:
<Объекты> — идентификатор объекта типа »СписокЗначений», в который данная процедура помещает найденные объекты.
2.
Синтаксис:
НайтиСсылки(<Объекты>,<Ссылки>)
Назначение:
Находит ссылки на объекты, переданные в списке значений.
Параметры:
<Объекты> — конкретное значение искомого объекта или значение типа »СписокЗначений», в котором данной процедуре передаются объекты, по которым надо найти ссылки.
<Ссылки> — идентификатор объекта типа «ТаблицаЗначений», в который данная процедура помещает найденные ссылки на объекты.
Таблица значений состоит из 3 колонок: 1. объект на который ссылаются; 2. объект, который содержит ссылку; 3. комментарий к ссылке.
И без разницы: скуль или DBF.
той обработке я минус поставил, поставлю и этой
пока не объясните преимущества по сравеннию с этой
(10) и (11) Обработка была доработана в процессе изучения 1с++ в 04.10.2007
Зачем? и кому она нужна? Это уже другой вопрос )
Обработка Poppy проста и понятна ) , кстати выложена в 30.07.2009
Преимущество только 1, сделай замер в отладчике … на «много» объектов разница хоть и небольшая, но она есть.
(10) По поводу встроенных средств, ну неужели вы думаете, что я не читал ЖКК …
Есть люди у кот. 1с++ подключена по умолчанию. А если база DBF то и драйвер уже стоит.
Так что она может быть полезна определенному кругу людей.
(11) Эта обработка больше как пример …
Я даже сам забыл про существование оной )
Если обработка не подходит тебе. Это же не значит, что она не подходит никому.
(12)
Хоть я и сам пишу ВК (для удовольствия), но не менее являюсь ярым противником их применения, особенно когда без них можно обойтись.
CPP для того, чтобы узнать имена таблиц, никогда бы в жизни не применил. DD и DDS парсил спокойно, когда никакой CPP и в помине не было, соответственно и прямые скуль-запросы писал спокойно. А вот тебе пример: пришел ты к моему привилегированному клиенту НВО со своей обработкой, и тебя система послала куда подальше, ибо нет у юзверей локальных админских прав (как и должно быть во взрослых сетках), и никакая ЗагрузитьВнешнююКомпоненту у тебя не пройдет. А обработка poppy отработает на ура.
(другое дело что там вообще никакую внешнюю обработку запустить не получится 😀 )
(13) Да как уже писал, сам этой обработкой и не пользуюсь.
Использую по функционалу похожую на обработку poppy.
И по клиентам уже давненько не бегаю ,)
1C тоже занимаюсь довольно редко …
(14) Ну я ж и не тебя «наезжал», а на принцип 😉
1. Не надо применять ВК там, где можно не применять.
2. При публикации надо смотреть, есть ли уже подобное
3. А вот «изучал», «написал ради интереса» и т.д. — я всеми конечностями ЗА 😉
(15)
Про пункт 2 я уже писал, что автор (и я подправил его обработку) выложил за 2 года до выхода обработки poppy )
(Про стандартные методы нам известно, поэтому я даже удивляюсь почему никто не написал обработки подобной poppy еще на проклабе)
А текущая обработка была полезна мне в плане изучения:
1) «Как сделать универсальную отчет/обработку на 1с++ и для DBF и для SQL» или
2) «Как переделать обработку под SQL и для DBF баз»
Новичку в этом вопросе достаточно взять оригинал из шапки и сравнить с моей обработкой.
Хоть это все есть в FAQ по 1с++, тут можно увидеть наглядно чем и как отличается )
(16)
Написал бы сразу в описании — никто б и вопросов не задал.
Но новичкам я бы не советовал изучать CPP, 8.2 надо изучать 😉
(17) Поправил описание и добавил ПС и ПСПС ,)
По поводу 8.2 да согласен.
Еще бы в нашей «деревне» у контор были деньги на переход с 77 на 8 …
(16)
Про пункт 2 я уже писал, что автор (и я подправил его обработку) выложил за 2 года до выхода обработки poppy )
откуда эта информация?!
(19) Посмотрел не внимательно. Обновлена была в 2009 году.
Ну получается выложены были почти в одно и то же время. Разница 9 дней )
А Оригинальная раньше на столько же )
Ну мы же не «девочки», давайте не будем ссориться кто кого на неделю раньше позже …
да, ссориться не надо 😀
но суть не в этом… ладно, снимаю минус
(18)
Угум. Посмотрел, не поленился: в моем Советском районе Красноярска 265 тыс., у вас (по вики)- 250 тыс. на весь город 😉
(21) Насчет +/- я не переживаю )
Давно вырос из того возраста.
Как говориться, это лишь байтики по ту сторону монитора …
Про суть вопроса я давно понял и прекрасно понимаю о чем вы говорите.
(22) До сих пор находятся новые клиенты по 77!
И блин, облом, скоро 77 с продажи снять обещали совсем.
А так стараюсь уговорить перейти на 8 и отправляю знакомому в его фра.
Ибо работы и так хватает )
А по поводу перехода … главная проблема железо.
Для примера: Оптовая сеть стройматериалов.
Серваки p4(сервачные), клиенты Cel c 256 Мб памяти … машин 50
Покупать сервера и софт получается за мульт. И это без внедрения.
И так все неплохо работает на ТиС, Бух, ЗиК (Вот только ЗиК в последнее время не тот … прямо заставляют переходить на ЗиУП)
А вот на Севере или в предприятиях связанных с «ресурсами» все наоборот.
Но потихоньку переход с 7 на 8 идет, фра с 1С работают над этим вопросом доступно и всерьез.
У знакомого, кот. держит фра раньше было несколько на 8, остальные на 7. А сейчас уже больше половины на 8.
Глядишь скоро и все перейдут.
Аааа…. 1С сколько не дай, все сожрет и не подавится. На НВО сервак на Xeon 3.2 гиги, один фиг притормаживает.
(24) Ну там еще правда распределенка по отделам.
И база отдела на отдельных серваках. Обмен ночью.
Так что все работает нормально )
Как говорят: работает, не трогай.