Некоторые картинки не загружаются из РФ и РК, используйте VPN.

воскресенье, 24 февраля 2019 г.

1С [Конвертация] Проверка реквизита (параметра) перед выгрузкой объекта (Организация)

Для выгрузки объектов при помощи КД (для конфигурация на платформе 8.2,8.3), где реквизит удовлетворяет требованиям параметра:

В Конвертация=>Параметры добавляем нужный параметр (Организация), обязательно указываем тип.
В Конвертация=> ПередВыгрузкойОбъекта:


Если Документы.ТипВсеСсылки().СодержитТип(ТипЗнч(Объект)) Тогда

    Если Объект.Метаданные().Реквизиты.Найти("Организация") <> Неопределено И (Параметры.Контрагент <> Объект.Организация) и (ЗначениеЗаполнено(Параметры.Организация)) Тогда

        Отказ = Истина;      

    КонецЕсли;
       
ИначеЕсли Справочники.ТипВсеСсылки().СодержитТип(ТипЗнч(Объект)) Тогда

    Если Параметры.БазоваяВерсия И Объект.Метаданные().Реквизиты.Найти("Организация") <> Неопределено И (Параметры.Организация <> Объект.Организация) и (ЗначениеЗаполнено(Параметры.Организация))  Тогда

        Отказ = Истина;

    КонецЕсли;

КонецЕсли;

Для проверки заполненности параметра:
В Конвертация=>ПередВыгрузкойДанных:

Если Не ЗначениеЗаполнено(Параметры.Организация) Тогда
 Сообщить("Не указана Организация на вкладке Параметры!");
 Сообщить("Выгрузка остановлена");
 Отказ=Истина;
КонецЕсли;

1С [Конвертация] Комментарий ко всем объектам

Конвертация => ПослеЗагрузкиОбъекта:


ЕстьПолеКомментарий=Неопределено;
СправочникГруппа=Ложь;
ЗаполненоПолеКомментарий="";
Попытка
 ЕстьПолеКомментарий=Объект.Метаданные().Реквизиты.Найти("Комментарий");
Исключение
КонецПопытки;
Попытка
 ЗаполненоПолеКомментарий=Объект.Комментарий;
Исключение
КонецПопытки;
Попытка
 СправочникГруппа=Объект.ЭтоГруппа;
Исключение
КонецПопытки;
Если ЕстьПолеКомментарий <> Неопределено И Не СправочникГруппа И ЗаполненоПолеКомментарий="" Тогда
 Объект.Комментарий=Строка("Загружено из другой базы: "+ТекущаяДата());
КонецЕсли

суббота, 12 января 2019 г.

пятница, 28 декабря 2018 г.

[MSError] 0x80131049 Ошибка установки MS Office

Решается переименовыванием/удалением ветки:
HKLM\Software\Microsoft\AppModel

Связана ошибка чаще с удалением приложения Micrsofot Office 365

среда, 26 декабря 2018 г.

[MSSOFT] NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND (0xc0000233)

Есть Samba сервер с доменной авторизацией на winbind. Произошла авария на линии электропередачи, из-за чего вырубилась вся серверная. Сервер самба врубился до контроллеров домена и не подключился к ним. При попытке подключиться к шаре - требует пароли и не принимает их. Перезавел в домен - ноль реакции.
net ads join -U username -D domainName
Проверяю команду 
winbind -t 
получаю сабж
решение нашел на просторах рунета:
остановить winbind
service winbind stop
очистить папку с кэшем samba
rm -rf /var/cache/samba
запустить сервис
service winbind start

понедельник, 17 декабря 2018 г.

[MSSoft] Импорт/Экспорт профилей WiFi сетей

При смене ноутбука так не хочется снова вводить миллион паролей от WiFi сетей, как это автоматизировать?
Можно выгрузить со старого ноутбука (командная строка):
netsh wlan export profile folder=C:\WIFI key=clear

Перенести папку C:\WiFi на другой ПК

И из PowerShell`a выполнить следующую команду:
Get-ChildItem C:\WIFI\ | foreach {$fname=$_.Fullname;netsh.exe wlan add profile filename=$fname}

Она переберет все файлы в папке и на каждый создаст профиль.

Если где то ошиблись, эта команда удалить все профили
netsh.exe wlan delete profile *

среда, 3 октября 2018 г.

[MSoft] Сетевой принтер - Автономная работа и SNMP

Не буду расписывать.
Если сетевой принтер в состоянии отключен, в очереди пишет "Автономная работа", но он пингуется/есть связь с вэб-интерфейсом, то проверяем настройки порта и SNMP:

Не правильное имя сообщества приводит к этой ошибке, по мимо запрета SNMP траффика на уровни сети.

[HW] Kyocera FS-1320D (DN) сброс пароля

Всем бобра.

Есть у меня такой зверёк - FS-1320D, по всем правилам должен работать по USB и только. Но прямо из магазина умеет интернеты о_О

Политикой определен некоторый пароль для оргтехники, после его смены, я столкнулся с проблемой - не принимает пароль, более того, запрашивает и имя пользователя. На странице настройки пароля имя не упоминается, в отличии от МФУ, также для Kyo регистр букв в имени важен (обычно Admin). Потыркавшись (стандартные пароли, попытка удерживать кнопки для сброса, попытки по USB что-то придумать..., через SNMP ...), я ни к чему не пришел и позвонил производителю. Тут выяснилось что они не видят серийный номер принтера... И не знают как сменить пароль, передали вопрос второму эшелону...

Прошло две недели...

суббота, 29 сентября 2018 г.

Excel Копирование ячеек с условием без макросов

Всем добра.

Задача:
В некую таблицу скопировать все значения из столбца другой таблицы где значение справа равно некоторому.
Мысли:
Когда у меня первый раз спросили про такое, я ответил- фигушки, без макроса никак, по крайней мере для неопределенного количества найденных строк.
 Спустя время мне задали этот вопрос повторно и тут меня осенило - это не невозможно.

пятница, 17 августа 2018 г.

MS GPO Printers 0x80070002 "Не удается найти указанный файл."

Всем бобра.

Давно ничего не писал, много работы.
Сегодня я решил рассказать про одну ошибку, на решение которой я потратил сверхмного времени, а когда нашел ответ - меня бомбануло "неподецки".
А теперь по порядку.

Первый раз я столкнулся с ошибкой еще год назад, но не придал ей значения, просто установил принтер по шаре из AD.
Обращаю внимание, ошибка с принтерами никак не связана, только с политиками.

воскресенье, 26 ноября 2017 г.

1C Событие ТЧ копирование и удаление

В 1С нет как такового события копирование строки табличной части, есть
Прошу обратить внимание, речь идет о событиях именно о табличной части (Табличное поле на форме), а не отдельных полей

ПриНачалеРедактирования(Элемент, НоваяСтрока, Копирование)
//Где параметр Копирование (Булево) определяет скопирована строка или нет
Процедура ТоварыПриНачалеРедактирования(Элемент, НоваяСтрока, Копирование)
 Если Копирование Тогда
  ПересчитатьСуммуДокумента(); //Пересчитываем сумму табличной части и выводим на форму
 КонецЕсли;
КонецПроцедуры

С удалением строк несколько проще, есть событие ПослеУдаления()

ПослеУдаления(Элемент)
Процедура ТоварыПослеУдаления(Элемент)
 ПересчитатьСуммуДокумента();//Пересчитываем сумму табличной части и выводим на форму
КонецПроцедуры

суббота, 25 ноября 2017 г.

[1C] Поговорим? или логирование в 1С

Доброго времени всем.

Давно уже воюю с 1Сками, и только сейчас узнал, что помимо всяких журналов можно включить лог. Как это сделать в папке "C:\Program Files\1cv8\8.x.x.xxxx\bin\conf" создаем файлик с именем logconf.xml и пихаем туды содержимое:

 
<config xmlns="http://v8.1c.ru/v8/tech-log">

  <log history="168" location="D:\1C_files\Logs">

    <event>

      <eq property="Name" value="excp">

    </eq></event>

    <property name="all">

    </property>

  </log>

</config>




среда, 25 октября 2017 г.

Обход ошибки XMeye «неправильный логин пароль», код 11301, «Incorrect account and password»


С каждым днем все больше внедряются системы видеонаблюдения, в связи с этим системы удешевляются, и появляется оборудование работающее через сервис XMEYE.

четверг, 5 октября 2017 г.

1С добавляем возможность отправки вложения в формате PDF

Доброго времени суток.
Речь пойдет о конфигурациях КА 1.1, БП 2.0, УТ 10.3 и т.п. на обычных формах.

1С умеет отправлять печатные формы документов прямо из программы вложением на почту контрагента, но среди возможных вариантов вложения нету PDFа, эту оплошность можно исправить буквально за 10 минут.

суббота, 16 сентября 2017 г.

1C Интересный отбор для журнала документов

Доброго всем времени.

Что-то давно не писал, лень наверное накатила )))

Имеем: Комплексная Автоматизация 1.1.86.1 на платформе 8.3.8.2322
Попросили сделать так, чтобы манагеры видели из банковских документов только ППВходящее.

Принялся решать проблему, изменения в конфигурации должны быть минимальны, ибо мне ее потом обновлять.
Открыл интерфейс "Управление продажами", смотрю, здесь доступен журнал "Банковские документы". Ну все решается просто процедурой ПередОткрытием() с отбором и блокировкой отбора. По желанию добавляем проверку группы пользователя.

четверг, 27 апреля 2017 г.

WISP постоянно рвет соединение

При настройке функции WISP на роутере Zyxel столкнулся с проблемой - рвется связь, хотя сигнал отличный. В качестве провайдера выступает Yota USB WiFi. Как выяснилось нужно указывать диапазон не 20/40, а просто 20 и проблема исчезла.

1C Относительный путь

В статье про печати и подписи я писал что нет относительных путей, я несколько ошибся.
Функция СтрокаСоединенияИнформационнойБазы(); возвращает путь до базы (файловой), а оттуда можно уже отталкиваться )))

понедельник, 17 апреля 2017 г.

1СЗапрос Реквизит параметра составного типа

Задача:
Выполнить выборку доков продаж/покупок по артикулу. На входе элемент справочника Номенклатура. Для получения необходимой инфы целесообразней использовать Хозрасчетный регистр по Субконто, нежели перебирать ТЧ всех документом.
Собственно по элементу справочника я получаю данные, но как их получить по Артикулу элемента переданного в запрос в качестве параметра с составным типом?