<?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='\
Хорошая идея!
я бы в функции все же предусмотрел ситуацию (если нет внешней компоненты)
— стандратная процедура нажатия — Документ должен записываться и проводится.
Просто представь ситуацию — сегодня кто-то поставит твою функцию (именно так как ты описываешь) и будет радоваться красоте. через какое то время уже другой кто-то (сделает выгрузку данных или перефирийную базу) и уедет в три туды — где про интернет и не слышали) вот он будет приятно удивлен. Что документ не может провестись — и будет вылетать с ошибкой («Неудачная попытка создать Объект «Сервис») а если он про такой и не слышал….
(2) > а если он про такой и не слышал….
Тогда ему лучше не лезть в производственную базу ручками:)
(3) Для кого писал ?
ЕМУ -му !!! кому ??? я тебе привел ситуацию — один поправил , а его последователь …. быстрее поросячего визга набирает в интернет строке раздел помощь — «помогите у меня в ПУБе документы не проводятся ! И в желтой книге про это ничего нет , аааааааааааа шайтан !»
(3) я работал лет 5 с 7.7 последние годы в основном 8.х иногда на 7.7. чтот делаю. Не использовал ВК. Вообщем согласен с (2) универсально надо делать вы же профи 😉 .
Если я нажимаю кнопку «ОК» у документа, я хочу чтобы он ПЕРЕПРОВЕЛСЯ независимо от того менялся док. или нет. Если же я хочу просто закрыть документ, то нажимаю кнопку с именем «Закрыть» (или Esc).
Мне кажется, что всё это только навредит.
Если в разработке используется ВК, автор должен предупреждать пользователей жирным шрифтом :
Но помни ! ВК — это зло.
Сань допиши…
Функция глКнопкаОкВ_Документе(Конт, Режим=1) Экспорт
Попытка
…дейсвия «Умной кноки для умных челов»
Исключение
СходитьНаСайтКИзобретателюУмнойКнопкиОК();
КонецПопытки;
КонецФункции
и думаю популярности твоего сайта мягкотелые просто обзавидуются
(7) Сам ты зло. Унылое…
(9) Ага. Спасибо.
А как быть если бухгалтер ручками восстанавливает последовательность???
Например, изменили цену в приходе. И теперь бух. как раз и должен открыть каждый документ реализации и без изменения провести…..
JohnyDeath: «Если я нажимаю кнопку «ОК» у документа, я хочу чтобы он ПЕРЕПРОВЕЛСЯ»…
(11) Групповая обработка доков не катит? Или кнопка «Провести»?
(10) Нема за що (укр.)
(12) В итоге, бухгалтеру придется объяснять, для того чтобы проведенный документ перепровести, нужно нажать именно «Провести». «ОК» в данном случае не сработает… Мне кажется это не логично…
(6) Я видел как пользователи жмакают «Да» или «Нет» на предупреждениях не прочитав их:) И закрывают доки кнопкой «Ок»:) А что, говорят они? Ведь док закрывается:)
(8) Специально для тебя дописал:-)
(9)
Тов. Vip.
В данном случае ВК — зло! Т.к. эту задачу можно реализовать и без ВК. А заодно решить вопрос с «бухгалтеру придется объяснять» из (14) сообщения. И если уж вставлять в кнопку другой вызов функций то, думаю, можно вставить и вот это:
ПриЗаписи(1); хПровести(Контекст)
А в модуль формы добавить:
Процедура ПриЗаписи(Т=0)
Если Т=0 Тогда
Предупреждение(«Жми «»ОК»»…»);
СтатусВозврата(0);
Возврат;
КонецЕсли;
…
КонецПроцедуры
Другое дело, если ставится задача: «не ковыряться в каждом документе». Тогда, наверно, и ВК может пригодиться.
(15) они эти предупреждения уже наизусть знают.
А людей, которые закрывают доки кнопкой ОК не много (на моей практике).
В общем, я свое мнение сказал: «Пользы от такой методики мало, а последствия крайне неприятные»
(17) Конечно можно эту задачу решить и без ВК. Что я делаю уже много лет.
Я о том, что тов. Ish_2 своими неоднократными унылыми шутками про ВК смущает неокрепшие умы.
ВК — большое добро.
(0)
Мне эта идея (разработка) напоминает: «Надо ж как-то было изучать объект …». Теперь изучаем FormEx. 😉
(19) Зло бывает разным. Даже неизбежным.
Лозунги «ВК- это зло !» и «ВК — это добро !» одинаково неверные.
Но первый лозунг более практичен для разработчика . Или :
Всё ли ты сделал, чтобы избежать ВК ?
Сам про ВК ничего не знаю , никогда не применял , но осуждаю !
И vengera , конечно, в этой теме .
Поэтому ещё раз :
Vip , помни ВК — это зло !
(16) Спасибо конечно, но я не о себе думал то, когда писал (и не со зла)
и дописал ты не так
Попытка
Сервис=СоздатьОбъект(«Сервис»);
Исключение
Сообщить(«Ошибка! Отсутствует или не загружена внешняя компонента FormEx: «,»!»);
Возврат 0;
КонецПопытки;
и чего ???
и что делать бедному КОМУ ТО из (2) — документ то не проведется :-)))
А там бухгалтерша орет, плачет, начальству жалуется….пипец полнейший ))))
Сань думай….. подсказываю из твоего же описания, засунь в исключение
«#Записать? Провести? Закрыть»
и все будут счастливы.
(21) Тогда так. «Хорошая ВК — это добро!».
Т.к. ВК бывают очень и очень разные.
(23) Давай так : «Хорошая ВК может стать необходимым ЗЛОМ !» ?
Тогда , считай , сторговались.
(24) Без ВК жизнь нелегка.
А с ВКом все кувырком.
обработка — в основном правильная. потому что неоднократно/постоянно наблюдаю ситуацию когда между ОК и Закрыть — выбирают ОК — И ЭТО ПОНЯТНО ПОЧЕМУ!!! ОК — понятно, что будет ОК!, А закрыть — а вдруг чего-то не ок будет???
Изменять штатное, обычным пользователем 1С подразумеваемое, привычное поведение кнопки, ИМХО не айс.
Я для себя предпочел другое решение — документ открывается на чтение, хотите редактировать, жмите в документе специальную кнопку, он переоткрывается для редактирования. Правда у меня УРБД и подавляющее большинство документов в ЦБ, где такой режим «открывания» документов особенно актуален, «чужие» и трогать их кнопкой ОК без причины нельзя.
(7) > ВК — это зло.
Кстати, обоснуй;) Т.к. пока единственное, что приходит на ум (при условии, что ВК нормально написана) — это «зависимость» от разработчика ВК, в некотором смысле. Так в таком случае вся ИТ индустрия такое зло, что мама не горюй:-) А уж 1С вместе с армией 1С’негов и того более…;)
(28) Не понял . А чем я занимался в пред.постах в твоей теме ?
Лозунг : ВК — это зло !
1. иллюстирует прежде всего текущую тему — здесь можно было обойтись без ВК.
2. имеет общее практическое значение для разработчика .
+ 29 На всякий случай :
зло — это не отрицание , а существенное свойство ВК. Вот и всё .
(30) > зло — это не отрицание , а существенное свойство ВК
Совершенно не обоснованно наделение объекта свойством, которым он не обладает или обладание этим свойством не доказано, выдается за истину;) Весело;) Как говориться: под пиво пойдет…, после бутылки водки;)
А вот у меня кнопка ОК заблокирована у проведенных документов. Хоть с ВК, хоть без:)
(31) Умничаешь. Запутать хочешь…
Пользователи у всех разные. И для многих контор (хотя и не для всех) эта штуковина будет благом.
почитал споры — не понял к чему… мне лично 80% того что на ИС лежит и нафиг не надо — но я ж не плююсь в авторов со словами «зачем такую лабуду писать». Если не надо тебе это — просто пройди мимо… Аффтару респект. полезная в некоторых случаях тема ))) мне пригодилась )))
Улыбнуло «ВК=зло» ))) минут 20 представлял себе что будет с моей торговой базой (16Гб на скуле без транз.лога) без 1С++ и прямых запросов ))) потом столько же смеялся )))))))))))
(35)
(31)
Правы на все 100