<?php // Полная загрузка сервисных книжек, создан 2026-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) Что переделать, чтобы стало читаемо?
(3) Купить вместо БАЗОВОЙ версии версию ПРОФ
(4)
Чтобы читаемо — простой текст- черный
(3) Вынести мозг 1С и франчам… можно просто доказать что программа не работает и вернуть деньги либо потребовать исправления. Можете поискать в инете прецеденты по ПО с ошибками есть. Программа должна выполнять заявленный функционал иначе это можно уже переквалифицировать в другую статью. В общем юрист вам в помощь и вам подарят версию проф или исправят ошибку.
А может и пошлют 1С не любит покупателей которые недовольны…
(6) на самом деле нет. Стандартные цвета были бы лучше. Кроме того, я бы еще добавил форматирование по ширине и убрал бы половину красных выделений. В контексте они читаться будут нормально, а смысла их выделять особо нет, только глаза разбегаться начинают.
ЗЫ: а почему чОрный?
(7) На вкус и цвет…
Меня тоже синий не радует, а слово «чОрный» вообще глаз режет, хоть автор мне ответил, что это специально. Не знаю-не знаю…
+(8) Давно заметил, что проблемы у современной молодежи с «че» и «чо» существуют 😉
Пишут «девчЕнка», когда не надо, и наоборот
Ваши замечания бесценны. Всяко со стороны взгляд свежее. Буду переделывать…
(9) Ну-ну, могу и обидеться, «по-русскому» у меня врожденная грамотность, в школе одни пятерки были.
(+11) Смайлик забыл 😀
ЗЫ. На Абадонну не могу в принципе обидеться — он умный и почти земляк.
(11) Ну так исправь 😉
Не будешь же ты каждому комментарию отвечать
Когда человек пишет «начальНЕГ» — тут однозначно ясно, что прикалывается.
А в данном случае не совсем ясно
А само исследование, думаю, плюсика достойно.
а 1С в курсе этой проблемы? Или не стали беспокоить по мелочам? 😀
Ничё ни понимаю, что за глючный ИС.
А на маил комменты получаю, а здесь их нет (даже после F5) — ответить не могу. Они появляются только тогда когда я какой-нить комент тут напишу — например, этот. 😐
(13) Исправлю завтра — как раз рабочий день будет 🙂 А насчет «чОрный» я почему-то думал, что это норма, т.к. многие известные специалисты (типа Ёпрста и пр.) его давно в таком виде употребляют — и мне лично такое произношение по душе приглянулось, как подчеркивание низменности данного способа программирования.
(15) Думаю, что нет. Так как данный сабж сопровождает 1С:Предпринимателя аж с 2004 года — а релизов с тех пор было немало.
(16) Ну вот, как я и говорил, только после моего поста высветилиь посты ветки, которые я получил как уведомления на маил (надеюсь, за «маил» Абадонна меня не упрекнет в грамотности 😳 )
(15) Да я и не могу лично побеспокоить хотлайн этой проблемой — мой Заказчик не является обладателем лицензионной конфигурации 😥 .
(16)
Контекстное меню, пункт «Очистить кеш публикации (beta)» тебе в помощь.
У меня в Опере так же, пока не нажмешь.
Напомнил ;): в дремучие годы (еще до ПК) знавал проггера, который на полном серьезе (уж не знаю какой язык он учил) называл операторы так: рун, тхен, гото, госуб, элсе.. 😀
(17) «черный запрос» стали писать для явного указания, что запрос выполнен не через объект бухгалтерские итоги, а обычным запросом 1С. А «чорный», не иначе, как кто-то по неграмотности своей стал писать.
Единственный нормальный способ обновить страницу ИС указан в (19), «Очистить кеш публикации (beta)». На тех страницах где этой ссылки нет, например в профиле, большая Ж… , кеш не сбросить.
Превратил народ ИС в большую файлопомойку, вот он и не выдерживает, приходится саппорту извращаться кеширование ставя.
(19) У нас одна девка уже в институте читала на английском «томато» И «потато». Ее так и прозвали Ирка-ТоматоИПотато. А «немцы» (изучавшие немеций) часто говорят, как видят «ретурн», «баскспасе» (backspace). А один бывший учитель математики, ставший проггером, такие перлы выдавал — долго потом все из-под столов вылазили. Хотя при этом программил весьма прилично. Оказалось одно другому не помеха.
(21) «баскспасе» еще куда ни шло. Я раз даже не сразу понял, что такое «баскуп филес»;)