<?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С при открытии обработки
(1)Падает как? Что за ошибка, что за платформа? Ну и скрин если можно))))
Падает… без ошибки, даже если ПриОткрытии() закомментировать.
Падает… при открытии, я думал уже сделали, год прошел, а нифига
(4)Добрый день. Скажите версия WINDOWS какая? там используется скрипт, который работал под XP, скорее всего у вас 7 или выше….
Предложение одно…чтобы работало. При открытии в дамп 1С выкидывает. Как справедливо выше писали, даже если при открытии закоментировать… говнописание какое то… так трудно поправить что ли? Пока однозначно жирный минус, XP умерла уже давно… походу эта обработка вместе с ней
Сегодня сделаю, дело в интерфейсе, полностью перерисовывается интерфейс и все работает, руки никак не доходят. По поводу говнописанья, свое сначала смотрите, все кто скачал, вышлю на почту.
если обидел, сорри… но задело отношение, выкладывается решение … в итоге только под XP, год прошел и ничего не изменилось. Я сегодня скачал, результат тот же. В описании тогда указывайте полную инфу, чтобы время не тратить… например, только для XP с открытым кодом, люди будут знать, что скачивая потом самому ковырять придется перелопачивать… и не понял зачем эти сложности со скриптами под конкретную виндовую ось? указал сам путь к базе — 2 строчки кода
да ладно, как хотели так и сказали)))))) там проблема оказалась в списках на форме, падало. По поводу скрипта эксперимент был (напрямую с реестра) и он работал, я сначало и подумал, что винда не та, ан нет, там с интерфейсом беда. По поводу баз, было много баз в списке, лениво было заходить, искать, копировать, вставлять….. Появился нюанс, если винда 64 битная, то нужно выполнить манипуляции из этой инструкции .
P.S. Про отношение прошу прощение, все никак не мог силами собраться…. но вот ничто так не двигает вперед, как хороший пинок под зад)))))
Так можно сделать и когда много баз (скриптом) и когда одна и руками путь прописать, чтобы оба варианта было. А то у кого мало баз, инструкции читать, время тратить… смотреть 64 разрядная или нет, простой пользователь закроет сразу эту обработку.
А на счет кто скачал на почту отправите? Или обновили и еще раз скачивать?
(10)Да, конечно, мылом в личку кидаете.
Хорошо подошла обработка для моих целей, исправил то, что нужно, много времени с экономил.
Но в коде есть ошибка, на для СпискаЗначений «ЦенаРозницаИсточник» на форме — не правильно указана процедура события, нужно «ЦенаРозницаИсточникПриИзмененииФлажка»;
(12)Беда в том, что после какого то релиза платформы обработка стала падать, пришлось удалять все с формы и делать новую, проверил функциональность основных окон и перезалил, а эту штуку видимо пропустил.
(13) не переживай, это не самое страшное в твоем коде, а вот лихорадочная зависимость от типа СписокЗначений — это было что-то 🙂 пережитки прошлого с 77 понимаю. 🙂 Всё равно спасибо.
так это когда было…. давно и не правда)))))