<?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='\
А зачем изобретать велосипед, когда в типовых конфигурациях (например БП3.0) в общем модуле ОбщегоНазначения есть функция ЗначенияРеквизитовОбъекта?
(1) metmetmet, не соглашусь. Есть еще нетиповые и кроме того не во всех типовых имеется.
()
(2) amon_ra, Можно же из типовой скопировать и не придумывать ничего дополнительно.
Конечно использовать типовую функцию или писать самому, выбор исключительно каждого, я лишь хотел отметить что аналогичная функция уже присутствует в типовых конфигурация.
У меня примерно такая же была написана, но еще добавлен поиск по дополнительным свойствам.
(5) metmetmet, ну, если велосипед хорош, то можно и изобрести главное, что бы велосипед не превращался в в бульдозер с педалями)
(1) metmetmet, НУ во первых — про них (полезные процедуры и функции) надо знать. Во вторых, у меня несколько самописных конф, в них функции типовых конфигураций не предусмотрены. Да и описанная тут функция немного универсальна, т.к. не надо заполнять обязательный второй параметр (самое того для немного ленивых программистов 😉 ).
Но все же думаю лучше бы использовать стандартную функцию. В ней используется запрос «ВЫБРАТЬ РАЗРЕШЕННЫЕ», а это будет правильнее, когда имеются всякие ограничения доступа по полям объектов.
(1)(6)(7)
не знал про ЗначенияРеквизитовОбъекта, сейчас посмотрел ее в типовой бухгалтерии 2.0
Там нет конструкции ВЫБРАТЬ РАЗРЕШЕННЫЕ и второй параметр обязателен к заполнению. Так что можно считать, что я изобрел облегченный велосипед)
(8) это показывает, что так называемые стандартные функции и процедуры в каждой типовой конфигурации как бы НЕМНОГО свои для своей конфы !! (прикольно сказал !!! )
Вроде в БП не используются ограничения доступа на уровне записей, а в УПП во всю… Я смотрел в УПП 1.3.
Но все же стоит использовать «РАЗРЕШЕННЫЕ», хуже не будет.
Зачем это вне «Если»?
Не все так просто, как кажется.
Во-первых, при многократных вызовах, лучше не обращаться к Метаданные(). В этом плане как раз лучше использовать запрос, как в типовых (кстати, это также гарантирует, что если кто-то изменил объект, пока вы с ним работаете, то вы получите актуальные данные).
Во-вторых, в вашем варианте нельзя (не задав второй параметр) получить РеквизитыАдресации для задач, а также ПризнакиУчета для плана счетов.
В-третьих, для использования Метаданные() у пользователя должны быть определенные права, которые ДАЛЕКО не всегда желательно давать.
1. Зачем в «Если Свойства = «» Тогда» опять, в цикле, проверять «Свойства = ?(Свойства = «», Реквизит.Имя, Свойства + «, » + Реквизит.Имя);»
2. также для получения одного реквизита, ты получаешь весь объект из базы целиком, вместе с его табличными частями.
3. открой для себя «Библиотеку стандартных подсистем», сэкономишь много времени
(5)
А ты все типовые сидишь и внимательно изучаешь, чего они там понапихали?
(13) Abadonna, я лишь подсказал где это уже реализовано, может еще что-то полезное почерпнут из типовых общих модулей. И отвечать мне в хамской манере совершенно не обязательно.
(14) metmetmet, кхм… а что тут хамского? на «ты»? так в форумах так обычно принято.
(13) Abadonna, все типовые и не нужно- есть конфигурация- «Библиотека стандартных подсистем»- ее как раз таки необходимо и достаточно.
(16) kostik_love, дело привычки, но лично мне даже и туда влом лезть… Попадется на глаза — хорошо, не попадется — быстрее самому сварганить. Но, повторюсь — это кому как…
Лично меня еще с 7.7 просто бесит, например, разбор почтового адреса через поиск позиции запятой.
Сразу стал делать Адрес=СтрЗаменить(Адрес,»,»,Символы.ПС) /8.х/
Удобно конечно — но пропадает смысл ручного разделения на клиентский и серверный код
Если бы в 1С хотели — могли бы все функции реализовать путем вызова серверного кода
Т.е. при большом количестве таких функций вполне потом может быть такой код
страшная вещь, так как в случае обращения к любому свойству ссылочного объекта из базы потащится весь объект, в том числе и с табличными частями. Поэтому лучше делать как это реализовано в БСП — через запрос.
1) Если чо, вся функция УстановитьВидимость() должна быть на сервере, а то в одной простой клиентской функции 3 вызова сервера: для получения данных, для получения предопределенного значения и для изменения видимости
2) Давно имею набор модулей, которые реализуют мне методы глРеквизит(), глРеквизиты(), глРеквизитыКэш(), глРеквизитыКэшНаСеанс() — аналог типовой ЗначениеРеквизитаОбъекта(), только с обработкой исключений, возможностью получать через точки, возможностью получать от объекта и еще там чо то…