<?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='\
Интересная идея. Еще можно в запрос динамического списка добавить поле ПОДСТРОКА(Наименование,1,1) КАК ПерваяБукваФИО и по нему делать группировку получится как то так… подругому
Нормально! 💡
Отличная идея! Мне понравилась .. возьму на вооружение! 💡
(3) данная идея уже существует в рарусовских конфах еще на 7.7 с 2003 года 100%.
также «Все» и буквы … через закладки страниц
увы, но идея старая
Алфавит = «АБВ ГДЕ ЁЖЗ ИЙК ЛМН ОПР СТУ ФХЦ ЧШЩ ЪЫЬ ЭЮЯ»;
Форма.ИспользоватьЗакладки(1);
Форма.Закладки.ДобавитьЗначение(«Все»);
ИерархическийСписок(1);
Для К = 1 ПО 43 Цикл
Форма.Закладки.ДобавитьЗначение(Сред(Алфавит,К,3));
К = К + 3;
КонецЦикла;
…
(4) хм, надо же какое совпадение. Из рарусовских видел только УАТ на восьмерке. Там этого точно нет. Такая штука была у нас в старой корпоративной базе на MS Access. Вот пользователи и запросили, чтоб как раньше. Не хотел я плагиатить, чесслово.
(1) Типовая БП. Рабочая места кадровика. Все сотрудники тоже сгруппированы по первым буквам алфавита
(5) решение отличное, без вопросов, а вот тем кто про идею, это уже старое решение 🙂 лично я использую в своих конфах с 2003 года, на 7.7, 8.0, 8.1, 8.2 … (надеюсь)
Почему цифр нет? У меня справочник с контрагентами где есть какая то 1С. 😀
А так +1
(8) Потому что это всего лишь пример 😉 . А ведь можно еще и латиницу прикрутить или вообще вот так:
Супер! Удобный, без проблем встраиваемый код!
Интересно как это будет работать на китайском языке 😮
(9) Такая же мысль в голову пришла 🙂
Можно еще чтобы не нарушать алфавит добавить обязательные буквы алфавита (как у автора: без Ё,Й,Ъ,Ь), и сделать ПОЛНОЕ СОЕДИНЕНИЕ с запросом.
Тогда быквы, не найденные в справочнике, можно будет сделать недоступными и кроме того быть уверенным, что попадут все первые буквы названий
Armando, привет!
Идея стара, но ее реализация академична.
Меня больше свего впечатляет как ты оформил публикацию.
Напиши отдельную статью как красиво оформить публикацию: как вставлять куски кода с прокруткой, как вставлять картинки и прочее. Или ссылку если такие уже есть. Буду безмерно признателен.
(13) Привет!
Сам не понял откуда там прокрутка взялась. С первого раза даже не разобрался как от нее избавиться)))
Здравствуйте, я решила установить даный модуль в список Контактные лица, после чего с начала исчезли все колонки в списке кроме ФИО, помучавшись над возвращением колонок, я решила вернуть так как было… и теперь вообще когда выибираешь справочник Контактные лица — программа вылетает ((((( ❓
(13) А это не то?
(15) Ужасть просто. Извините, а вы руки вы.., то есть я хотел сказать, делали всё по инструкции?
Да, если выше перечисленный текст — это инструкция…. Хотя не могу назвать себя профи )), но этого момента начего подобного не случалось и при том справочник Контрагенты — работает нормально… Хотя я из него тоже после установки, удалила эту обработку