1С Форум

Комментарии к статьям - Чистка базы 1С. Удаление "не удаляемых объектов"	Администратор 10.06.19 17:18
Комментарии к видео - Загрузка номенклатуры с нуля 1С УТ 11	Администратор 06.06.19 23:10
ЭКСПОТОР - Выгрузка номенклатуры в Excel, Авито, XML - "Значение индекса выходит за границы диапазона"	Администратор 06.06.19 20:42
ВЫГРУЗКА НОМЕНКЛАТУРЫ из 1С - Несколько выгрузок из 1С	Администратор 23.05.19 16:28
ЗАГРУЗКА НОМЕНКЛАТУРЫ, ЦЕН, ДОКУМЕНТОВ из EXCEL в 1С - Как добавить данные с других листов	Администратор 29.04.19 10:19
ПАРСЕР ЯНДЕКС.МАРКЕТ для 1С - ОБНОВЛЕНИЯ - Общая информация	Администратор 22.04.19 14:47
ЗАГРУЗКА НОМЕНКЛАТУРЫ, ЦЕН, ДОКУМЕНТОВ из EXCEL в 1С - СКРИПТ - Артикула в кавычках	Администратор 18.04.19 14:13
ЗАГРУЗКА НОМЕНКЛАТУРЫ, ЦЕН, ДОКУМЕНТОВ из EXCEL в 1С - СКРИПТ - Наименование и артикул в одном столбце	Администратор 18.04.19 14:12
ЗАГРУЗКА НОМЕНКЛАТУРЫ, ЦЕН, ДОКУМЕНТОВ из EXCEL в 1С - Как удалить лишний артикул из наименования	Администратор 18.04.19 14:12
ЗАГРУЗКА НОМЕНКЛАТУРЫ, ЦЕН, ДОКУМЕНТОВ из EXCEL в 1С - СКРИПТ - Загрузка остатков с + или с ++	Администратор 18.04.19 14:11

Пользователь

Сообщений: 3 Регистрация: 26.01.2016

252.6211

01.06.2016 13:47:02

В УТ 11.1

Параметры Организация
{v8 ОрганизацияДействуетНаОсновании}
Скрипт:

Цитата

Если СокрЛП(Параметры.Организация_ЮрФизЛицо) = "Юридическое лицо" Тогда
Результат = "Устава";
ИначеЕсли СокрЛП(Параметры.Организация_ЮрФизЛицо) = "Индивидуальный предприниматель" Тогда
Результат = "Свидетельства";
Иначе
Результат = "???????????????";
КонецЕсли;

Параметры Клиент
{v8 КлиентДействуетНаОсновании}

Цитата

Если СокрЛП(Параметры.Клиент_ЮрФизЛицо) = "Юридическое лицо" Тогда
Результат = "Устава";
ИначеЕсли СокрЛП(Параметры.Клиент_ЮрФизЛицо) = "Индивидуальный предприниматель" Тогда
Результат = "Свидетельства";
Иначе
Результат = "???????????????";
КонецЕсли;

Аналогично можно выводить должность в лице "Директора" для ЮЛ или "" для ИП

Изменено: Константин Хорев - 01.06.2016 14:16:08

Администратор Администратор Сообщений: 920 Регистрация: 28.08.2013	#2 0 01.06.2016 13:52:26 Очень многим пригодится

Абдул-Халим Байбетиров Пользователь Сообщений: 3 Регистрация: 19.01.2017	#3 0 28.01.2017 13:28:12 Спасибо за скрипт! Буду рад если будет по больше таких скриптов.

Администратор Администратор Сообщений: 920 Регистрация: 28.08.2013	#4 0 07.02.2017 08:27:11 Абдул-Халим Байбетиров, Их будет больше, если будут вопросы от пользователей. Если вопросов нет, значит всем все понятно

INXXSS

Пользователь

Сообщений: 29 Регистрация: 22.05.2016

08.11.2017 09:25:59

Какой будет скрипт на УНФ 1.6.11?

Подправьте:

Если СокрЛП({v8 КлиентВидКонтрагента}) = "Юридическое лицо"
Тогда Результат = "Устава";
ИначеЕсли СокрЛП({v8 КлиентВидКонтрагента}) = "Индивидуальный предприниматель"
Тогда Результат = "Свидетельства";
Иначе
Результат = "???????????????";
КонецЕсли;

Изменено: INXXSS - 08.11.2017 09:36:18

Администратор Администратор Сообщений: 920 Регистрация: 28.08.2013	#6 0 08.11.2017 09:45:00 INXXSS, Верно

INXXSS

Пользователь

Сообщений: 29 Регистрация: 22.05.2016

08.11.2017 09:49:22

так выдает ошибку
{ВнешняяОбработка.ПечатьДокументовВ_Word_OpenOffice_ЗМ.МодульОбъекта(49205)}: Ошибка компиляции при вычислении выражения или выполнении фрагмента кода: {(1,13)}: Ожидается выражение

Изменено: INXXSS - 08.11.2017 09:50:21

Администратор

Сообщений: 920 Регистрация: 28.08.2013

08.11.2017 09:53:09

Цитата

Если СокрЛП(Параметры.Клиент_ВидКонтрагента) = "Юридическое лицо" Тогда
Результат = "Устава";
ИначеЕсли СокрЛП(Параметры.Клиент_ВидКонтрагента) = "Индивидуальный предприниматель" Тогда
Результат = "Свидетельства";
Иначе
Результат = "???????????????";
КонецЕсли;

параметр неверно у вас стоял

INXXSS Пользователь Сообщений: 29 Регистрация: 22.05.2016	#9 0 08.11.2017 09:55:53 да, теперь в порядке!

Форум 1С