Павел Грибов, Автор в ЖЗГ - Страница 102 из 297

Чтиво за последнее время

13.05.2020 Павел Грибов Чтиво

Александр Седых. Боги не врут 1-2. Сюжет на маге разделившем волею богов разум в теле девочки. Читабельно. Оценка 3.

Александр Немченко. Контакт. Сюжет: после восстания машин, люди концентрируются на улучшении себя за счет изменения генетического кода. Появляются писоники. И вот один из самых выдающихся писоников вызвал на контакт цивилизацию ящеров с другого конца галактики. Оценка: 4

Сергей Тармашев. Древний 1-7. Сюжет: на земле произошла ядерная война. Оставшиеся в живых изолировались в нескольких бункерах. Один из них — Тринадцатый — обычный военный с необычной дальнейшей судьбой. Оценка: 5

Оставить комментарий

Как завершить скрипты по таймауту

12.05.2020 Павел Грибов PHP

Задача: ряд скриптов иногда «зависают». Есть два варианта — переделать скрипт, чтобы не «зависал». Не всегда возможно. Второй вариант: отслеживать время работы скрипта, и по какому то предельному значению времени выполнения — убивать. Например так:

#!/usr/local/bin/php
<?php
$timeout=100; // время после которого скрипт считаем зависшим
$res=`ps -ax | grep sos | awk '{print $1,$4}'`;

$resa=explode("\n",$res);

foreach ($resa as $value) {
 if ($value!=""){
  $va=explode(" ",$value);
  $pid=$va[0];
  $timea=explode(":",$va[1]);
    if (isset($timea[1])==true){
      $time=$timea[0];
      echo "PID: $pid, TIME: $time\n";
      if ($time>$timeout){
       `kill $pid`;
      };
    };
  };
};
?>

#!/usr/local/bin/php

<?php

$timeout=100; // время после которого скрипт считаем зависшим

$res=`ps -ax | grep sos | awk '{print $1,$4}'`;

$resa=explode("\n",$res);

foreach ($resa as $value) {

if ($value!=""){

$va=explode(" ",$value);

$pid=$va[0];

$timea=explode(":",$va[1]);

if (isset($timea[1])==true){

$time=$timea[0];

echo "PID: $pid, TIME: $time\n";

if ($time>$timeout){

`kill $pid`;

};

Оставить комментарий php, pid, timeout, убить скрипт

Все способы определения не заданной даты в 1С

30.04.2020 Павел Грибов 1C

В текстах модулей

Если Дата = ‘00010101‘ Тогда
Если Дата = ‘00010101000000‘ Тогда
Если Дата = ‘0001—01—01‘ Тогда
Если Дата = Дата(1, 1, 1) Тогда
Если Дата = Дата(1, 1, 1, 0, 0, 0) Тогда
Если Не ЗначениеЗаполнено(Дата) Тогда

В запросах

ГДЕ Дата = ДАТАВРЕМЯ(0001,01,01,0,0,0)
ГДЕ Дата = ДАТАВРЕМЯ(1,1,1)
ГДЕ Дата = &ПустаяДата

Запрос.УстановитьПараметр(«ПустаяДата«, ‘00010101‘);

Оставить комментарий 1с, проверка пустая дата

mysqli(): Server sent charset (255) unknown to the client. Please, report to the developers

24.04.2020 Павел Грибов MySQL

Сия ошибка происходит если сервер mysql новый (например 8.х), а клиент старый (например php 5.6). Скорее всего они еще и к тому же разнесены на разные сервера. Что такое? А просто разные кодировки по умолчанию у клиента и сервера.

Как лечить, есть два варианта

1) Обновить клиент — т.е. php и mysql-client

2) Проставить в настройках сервера mysql принудительные кодировки по умолчанию

[client]
default-character-set=utf8
[mysql]
default-character-set=utf8
[mysqld]
collation-server = utf8_unicode_ci
character-set-server = utf8

[client]

default-character-set=utf8

[mysql]

default-character-set=utf8

[mysqld]

collation-server = utf8_unicode_ci

character-set-server = utf8

Оставить комментарий

1С: Прикрепляемые файлы к документу

20.04.2020 Павел Грибов 1C

Задача: организовать прикрепление и хранение файлов в документе. Желательно используя «штатный велосипед» 1С.

Решение:

Всё зависит от БСП на основе которой построена Ваша конфигурация. В моем случае, конфигурация Бухгалтерия 3.0.75.100, БСП 3.1.25

Узнать версию БСП можно при помощи:

Сообщить(СтандартныеПодсистемыСервер.ВерсияБиблиотеки());

1	Сообщить(СтандартныеПодсистемыСервер.ВерсияБиблиотеки());

Далее если есть подписка на ИТС, читаем тут или если нет, то у меня 😉

1) Чтобы ручками не заполнять все реквизиты, копируем справочник «ПередачаТоваровПрисоединенныеФайлы», копию переименовываем в <ИмяМоегоДокумента>ПрисоединенныеФайлы. В моем случае документ носит имя «Абоненты». Далее на скриншотах и в тексте я его так и буду называть. В Вашем случае это будет Ваш справочник/документ.

В реквизите «ВладелецФайла» указываем наш документ

2) В состав определяемых типов ПрисоединенныйФайл (ссылки) и ПрисоединенныйФайлОбъект (объекты) добавим наш документ:

3) Включить в состав плана обмена ОбновлениеИнформационнойБазы

4) Добавить источники у подписк и «ПереопределитьПолучаемуюФормуПрисоединенногоФайла» и «УстановитьПометкуУдаленияПрисоединенныхФайловДокументов»

5) Добавить в состав определяемых типов ВладелецПрисоединенныхФайлов (ссылки) и ВладелецПрисоединенныхФайловОбъект (объекты)

Если перед закрытием формы объекта-владельца файлов требуется проверить наличие занятых текущим пользователем файлов, то необходимо:

Добавить реквизит формыМожноЗакрытьФормуСФайламитипа Булево.
В обработчике формыПередЗакрытиемвставить вызов процедуры ПоказатьПодтверждениеЗакрытияФормыСФайлами общего модуля РаботаСФайламиКлиент по шаблону:

&НаКлиенте
Процедура ПередЗакрытием(Отказ, СтандартнаяОбработка)
    РаботаСФайламиКлиент.ПоказатьПодтверждениеЗакрытияФормыСФайлами(ЭтотОбъект, Отказ, Объект.Ссылка);
КонецПроцедуры

&НаКлиенте

Процедура ПередЗакрытием(Отказ, СтандартнаяОбработка)

РаботаСФайламиКлиент.ПоказатьПодтверждениеЗакрытияФормыСФайлами(ЭтотОбъект, Отказ, Объект.Ссылка);

КонецПроцедуры

Другой код, который необходимо выполнять в обработчикеПередЗакрытием, следует размещать после вызова процедуры и проверки параметраОтказ. Например:

&НаКлиенте
Процедура ПередЗакрытием(Отказ, СтандартнаяОбработка)
    РаботаСФайламиКлиент.ПоказатьПодтверждениеЗакрытияФормыСФайлами(ЭтотОбъект, Отказ, Объект.Ссылка);
    Если Отказ Тогда
        Возврат;
    КонецЕсли;
    <другой код...>
КонецПроцедуры

&НаКлиенте

Процедура ПередЗакрытием(Отказ, СтандартнаяОбработка)

РаботаСФайламиКлиент.ПоказатьПодтверждениеЗакрытияФормыСФайлами(ЭтотОбъект, Отказ, Объект.Ссылка);

Если Отказ Тогда

Возврат;

КонецЕсли;

<другой код...>

КонецПроцедуры

Результат: появившаяся «скрепочка» и список файлов по её нажатии.

Всё хорошо, одно плохо. Не понятно как это всё будет себя вести при обновлении. Предполагаю что галочки эти нужно будет расставлять каждый раз.

Оставить комментарий 1с, БСП, прикрепление файлов

« 1 … 100 101 102 103 104 … 297 »

Пн	Вт	Ср	Чт	Пт	Сб	Вс
	1	2	3	4	5	6
7	8	9	10	11	12	13
14	15	16	17	18	19	20
21	22	23	24	25	26	27
28	29	30