<?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='\
И это правильно. В общем и целом… 🙂
(0)
п.3 > Если ввести вместо кириллической о латинскую o
Нет, самая опасная это буквы «с». 🙂
Они и выгядят одиноково, и на одной кнопке находятся…
п.7 > Лучше озаботься четкой логикой системы
Системы работы фирмы? Увы, очень часто приходится подстраивать программу под отсутствие всякой логики. И тогда появляются всякие исключения, рушащие вся стройность конфигурации.
п.8 > а потом документик присвоивший статус распроведет
А ОбработкаУдаленияПроведения() на что?
п.9 > Программисту это странно. Что 00-00-00, что 23-59-59, все равно.
Странные программисты. Они наверно даже не продполают сколько в этом интервале (23-59-59 и 00-00-00) может документов поместиться…
п.10 очень спорный….
п.11 А где их делать? 🙂
(2) по п.10 Согласен
по п.11 в обработчиках ПередЗаписью, там где есть переменная «Отказ»
Я еще добавил к п.3 не называть новый документ «Документ», новый справочник «Справочник», ну и т.д. с регистрами
2 Altair777 ну, исключения возможны и могут быть. просто они должны быть обоснованными. п.7 — это про то что документ не был регистратором ни у одного регистра.
п.8. ну вот и не знаю на что. пусто было в реквизите справочника «статус». наверно чтоб очистить указанный реквизит.
п 10. спорный? что вообще возможно придумать процедуру с тем же названием что и ктото до тебя? при мне так поламали календарь в зарплате:) причем хороший программист поламал.
п. 11. ладно, уговорили. разрешаю делать при проведении делать:) только внимательно!
2 YAN собака по имени Собака, и кошка по имени Кошка:) да, хорошо.
по п.7 «Пожалуйста, помни про регистры. Вообще, не забудь, что такое есть и надо бы пользовать. Не храни информацию в документах.»
Аж страшно стало прочитав последнее предложение 🙂
2 YAN да, триллер еще тот
(4) Да и еще не называть реквизиты и ТЧ в документах «Документ» в справочника «Справочник», т.к. это может привести к ошибкам запросах!
Прям заповеди, не возжелай жены ближнего своего!
2 brr 🙂 это скромная колеция глупостей
(5) > п 10. спорный? что вообще возможно придумать процедуру с тем же названием что и ктото до тебя?
Я семерочник. А 8-ке разве можно создать 2 процедуры в одном модуле с одним и тем же названием? 🙂
Или там процедура ищется по каким-то непонятным приоритетам? Какую первую нашло, ту и выполнило?
А еще я видел при открытии формы установка реквизита значением по умолчанию! Это стоит делать или при ЭтоНовый() или «Если Не ЗначениеЗаполнено(НужныйРеквизитФормы) Тогда…»
Прикольно так открыть (документ) и получить модифицированность объекта. А при закрытии формы ведь пользователь обязательно скажет «Даа!Сохранить!» и перепроведет документ 2007 года 🙂
>> «Даа!Сохранить!» и перепроведет документ 2007 года 🙂
Не перепроведёт. Дата запрета не позволит.
п.10 при включенных галках Тексты модулей/Проверка в Настройках не имеет смысла. При записи конфигуратор обязательно ругнется «Процедура или функция с указанным именем уже определена». При выключенных — Бог в помощь…
(13) а в процедуре которая это делает нужно поставить сброс модифицируемости…
(12) пожалуйста:
1. процедура: РОРА();
2. процедура: POPA();
(16) для того чтобы не чинить (не делать сброс модифицируемости) — не надо ломать :), или стоит подумать при программировании ЧТО делаем и ЗАЧЕМ — и не делать то, что позволяет получить желаемое (например, заполнить реквизит по умолчанию чем то), но поломать логику нормальной работы — к сожалению такое бывает
(17) ну когда будет стоять перед вами прямая задача «по умолчанию заполнять тем то и тем то» — я сомневаюсь что вы скажате что то типа «….бла бла бла.. признак модифицируемости.. бла бла бла.. не кошерно.. бла бла бла.. каноны православного программирования в 1с… итд итп»
вы просто возьмете и сделаете… а чтобы тупых вопросов про «записать» не возникало — воткнете сброс признака модифицируемости.. вернее не сброс а анализ — какой он был до заполнения реквизитов по умолчанию и ровно такой же выставите после заполнения оных..
(18) IamAlexy, я с тобой не соглашусь… Ты не тупой программист с кривыми руками, который лепит откровенную лажу (я в это не верю).
(19) ну хорошо.
есть задача: при создании нового документа заполнять форму предопределенными значениями..
причем дать пользователю возможность отказаться от ввода документа и соответственно в последствии не иметь проблем с нумерацией.
ваше решение ?
я бы сделал заполнение и сброс модифицированности.
(20) …при создании нового документа …
…я бы сделал заполнение и сброс модифицированности…
Ооо!
IamAlexy, а вот это уже похоже на «кривые руки» 🙂
(20) Ну что ж, придеться писать для тебя код….
Уважаемый IamAlexy, я бы сделал так:
Процедура ПриОткрытии()
//1)
// код выполняется ТОЛЬКО (!) ДЛЯ НОВОГО ОБЪЕКТА
Если ЭтоНовый() Тогда
РеквизитКЗаполнению_1 = ПолучитьЗначениеДляЗаполнения(1); //или значение
РеквизитКЗаполнению_2 = ПолучитьЗначениеДляЗаполнения(2); //или значение
…
КонецЕсли;
//новый объект заполняется нужными значениями
//модифицированность сбрасывать вообще нет смысла — ведь он же еще новый!
//пользователь всегда может отказаться от записи объекта
//объект существует пока только на экране…
//с нумерацией проблем быть не должно (не с чего)
//2)
// а этот код выполняется ДЛЯ УЖЕ (!) СУЩЕСТВУЮЩЕГО объекта и
// только если важное поле почему то ЕЩЕ НЕ ЗАПОЛНЕНО
// а оно обязательно к заполнению
// например, такого поля раньше просто не было у документа…
Если НЕ ЗначениеЗаполнено(РеквизитКЗаполнению_1) Тогда
РеквизитКЗаполнению_1 = ПолучитьЗначениеДляЗаполнения(1); //или значение
КонецЕсли;
// и сбрасывать модифицированность объекта в этой ситуации глупо
// ведь объект реально изменился!!! и ЕГО НАДО ПЕРЕЗАПИСАТЬ в БД…
// иначе установленного значения реквизита не останется 🙂 у объекта в БД
я рад что ты знаешь про ЭтоНовый() но смысл то не в том — когда именно заполнять реквизиты «по умолчанию» — у нового втупую влоб а у старого проверяя заполненость…
смысл в том что, заполнив реквизиты документа по умолчанию нужно сбросить модифицированность для того чтобы пользователь:
1. мог отказаться от работы с документом и не задавался вопросом «я же ничего не ввел и ничего не поменял — почему оно меня спрашивает про сохранение»
2. мог контролировать изменение данных (модифицированность показанную звездочкой в заголовке) совершая осмысленные действия САМОСТОЯТЕЛЬНО
Н-да…
Был у нас препод по тензорному анализу, бааальшой мастак лепить глупости,
но что бы так…
(22) +1, народ похоже не вдупляет)))
(24) угу.. думать и кодить это не синонимы
От прочтения сего была вызвана процедура «ВызватьКультурныйШок(ЖертваЧтения)».
Описание процедуры: крошит моск наффик, убивая нейронный траффик:-))))))
(24) Народ давно вдупляет 🙂
23 коммент посмотри в (про геометрические объекты) и все ясно станет.
Меня тоже раздражает, когда ПриОткрытии() что-то устанавливают, а Модифицированность не сбрасывают!
Еще некоторые писатели используют для установки реквизитов ПриЗаписи(), вместо ПередЗаписью() — тогда после сохранения опять получаем этот лишний диалог…
Тоже вспомнился универ и некоторые преподы 🙂
2 sound (29) больше стажеры вспоминаются пока что.
Вы бы еще при открытии в регистрах сведений проведенного документа что-нибудь поменяли бы 😀
(32) Мммм… а где Вы усмотрели ХАМСТВО — в ссылке на Ваши же слова?
Ответ был такой: прямые линии (умные люди думают одинаково)
У нас пример паралельных линий , не пересекающихся»
В контексте этого обсуждения (Продолжаем сводить с ума…) ссылка на Ваши слова — подчеркивание Вашего ума, и мы это уже поняли (народ вдупляет)… 😉
Тем более, у Вас столько плюсиков ❗ ❗ ❗
(32) Как-то получилось, что я Вас считаю приличным человекос. И вдруг такое гнутье пальцев… Фи.
Предлагаю не писать вредные советы, а сделать все наоборот. Написать статью о «правильных» методах работы с объектами конфигурации, своего рода правила хорошего тона.
Для начинающих будет хорошим справочником по работе.
YAN: «Аж страшно стало прочитав последнее предложение».
Я почему-то не понял сарказма. По-моему хорошее замечание.
(34) Да ну, человек в неадеквате явно! ) Рейтинги считает… ))
(37) Ну и что? Я вот тоже свой считаю 🙂
Но пальцы не гну. Даже и не знаю в какую их сторону надо гнуть по-правильному…
А вот интересно… KukA.5 свой рейтинг заработал за 1,5 месяца.
Сколько лет он к этому готовился?
И все ли там его? И все ли такое полезное?
Типа насколько заслужены плюсики. Я 8-ке не разбираюсь, поэтому и спрашиваю.
Но 32 коммент точно заслужил… только не плюсик.
(32) Ну не общайся с нами, нулевистами. Не засоряй эфир.
Функция ПрисвоитьБезопасно(А,Б) Экспорт
//Назначение: Присваивает значение Б переменной А только если значение реально изменилось
//ДатаСоздания: 2008
//Автор: Fixin
//Тестирована: Да
//Описание:
// Удобно, когда нужно защититься от модифицированности
Если А <> Б Тогда
А = Б;
КонецЕсли;
Возврат А;
КонецФункции
(37) это ты не в адеквате 🙂 — прочитай (по существу) что было написано для тебя в (32)
(40) По существу, пользователь всегда ожидает естественного и интуитивно понятного поведения от программы, то есть как в Ворде например, если мы открыли документ и ничего не изменили, то и сохранять нечего. Так же можно было бы сказать об избыточности интерфейса с лишними диалогами, но по существу с Вами разговаривать по-моему не поможет…
(41) В Ворде — да, но в Икселе может быть и нет. При открытии и закрытии книги, в некоторых случаях, может появиться диалог о сохранении.
По вопросу (28). Имхается мне, что косяк разработчика не в том, что модифицированность не сбрасывается, но в том, что она появляется.
Устанавливать реквизиты в процедуре ПриОткрытии() (за исключением новых документов) необходимо, в основном, для поддержки избыточности данных.
Наличие модифицированности формы объекта при открытии для пользователя означает косяк в данных, а для администратора — косяк в коде, который их создал. Сброс модифицированности в этом случае — это сокрытие от пользователя правды.
(42) это и есть суть!
…не надо косячить, чтобы потом это же исправлять…
(41) видимо мало Вы работали с МСОфисом… Существует куча вариантов, когда при открытии документа (что ворд, что ексель) он модифицируется автоматически и предлагает себя сохранить при закрытии…