Скрипт для вывода кодов ЕГРПОУ и ИНН в украинских конфигурациях на неуправляемых формах.

Скрипт для вывода кодов ЕГРПОУ и ИНН в украинских конфигурациях на неуправляемых формах., В нашем случае это 1С:Управление торговым предприятием

itspec

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

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

18.12.2017 21:38:00

Столкнулись с проблемой, что в Украинской конфигурации нельзя без скрипта вывести Код ЕГРПОУ и ИНН.

Потому что данные по Кодам находятся в РС "Коды организаций".

Подскажите, пожалуйста, как правильно написать скрипт, чтобы вывести эти реквизиты в договор?

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

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

21.12.2017 07:28:19

Скрипт получения кода ЕДРПОУ

Код

Результат = "";

Запрос = Новый Запрос(
"ВЫБРАТЬ
|   КодыОрганизацииСрезПоследних.КодПоЕДРПОУ
|ИЗ
|   РегистрСведений.КодыОрганизации.СрезПоследних(&ДатаДокумента, Организация = &ПараметрОрганизация) КАК КодыОрганизацииСрезПоследних");

Запрос.УстановитьПараметр("ДатаДокумента", Параметры.Документ_Дата);
Запрос.УстановитьПараметр("ПараметрОрганизация", Параметры.Документ_Организация);

Выборка = Запрос.Выполнить().Выбрать();
Если Выборка.Следующий() Тогда
   Результат = Выборка.КодПоЕДРПОУ;
КонецЕсли;

Скрипт получения ИНН

Код

Результат = "";

Запрос = Новый Запрос(
"ВЫБРАТЬ
|   КодыОрганизацииСрезПоследних.ИНН
|ИЗ
|   РегистрСведений.КодыОрганизации.СрезПоследних(&ДатаДокумента, Организация = &ПараметрОрганизация) КАК КодыОрганизацииСрезПоследних");

Запрос.УстановитьПараметр("ДатаДокумента", Параметры.Документ_Дата);
Запрос.УстановитьПараметр("ПараметрОрганизация", Параметры.Документ_Организация);

Выборка = Запрос.Выполнить().Выбрать();
Если Выборка.Следующий() Тогда
   Результат = Выборка.ИНН;
КонецЕсли;

Позже будет видео по добавлению скриптов

Прикрепленные файлы

Администратор Администратор Сообщений: 2365 Регистрация: 28.08.2013	#3 0 21.12.2017 09:00:54 Видео по добавлению этих скриптов

itspec

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

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

21.12.2017 22:45:33

Спасибо за видео. Теперь не зная программирования можно делать базовые скрипты.

Есть вопрос. Вывожу один из кодов, который имеет формат "Дата".

Делаю форматировать поле, чтобы убрать время, но дополнительный параметр так и не появляется.

Скриншот: https://i.imgur.com/RGySZHp.png

Или подскажите, как можно сразу вытягивать эту дату без времени.

Изменено: itspec - 21.12.2017 22:50:53

itspec

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

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

21.12.2017 22:59:13

Делал еще один скрипт,

Результат = "";

Если СокрЛП(Параметры.Организация_ЮрФизЛицо) = "Юр. лицо" Тогда
Результат = "Статуту";
ИначеЕсли СокрЛП(Параметры.Организация_ЮрФизЛицо) = "Физ. лицо" Тогда
Результат = "Свідоцтва про державну реєстрацію фізичної особи-підприємця, номер запису в Єдиному державному реєстрі юридичних та фізичних осіб-підприємців " + Параметры.Документ_Организация_СВ_Номер_Держреєстраціїї +" від " + Параметры.Документ_Организация_СВ_Дата_ДержреєстраціїБезВремени;
Иначе
Результат = "???????????????";
КонецЕсли;

В чем проблема, параметр "Параметры.Документ_Организация_СВ_Дата_ДержреєстраціїБезВремени" - создан мною с форматом без времени, но в скрипте он выводится с временем почему-то.

Администратор Администратор Сообщений: 2365 Регистрация: 28.08.2013	#6 0 22.12.2017 09:07:34 По скриптам вообще не делается дополнительная настройка. Все нужно сделать в самом скрипте. Вам нужно прописать форматирование прямо в коде скрипта

itspec Пользователь Сообщений: 14 Регистрация: 06.05.2015	#7 0 22.12.2017 10:14:24 Спасибо, я вас понял. Подскажите тогда, пожалуйста, как это сделать на примере параметра: Параметры.Документ_Организация_СВ_Дата_ДержреєстраціїБезВремени; Изменено: itspec - 22.12.2017 10:19:00

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

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

22.12.2017 10:35:54

в скрипте должно быть обращение к исходному параметру примерно так

Формат(Параметры.ДокументДата, "ДФ=dd.MM.yyyy")

где,
Параметры.ДокументДата - вместо этого ваш параметр
"ДФ=dd.MM.yyyy" - это форматная строка (она может быть любая)

подробное описание работы функции ФОРМАТ можете посмотреть в справке 1с

itspec

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

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

24.12.2017 13:12:34

Спасибо большое.

Вот так выглядит такой скрипт в готовом виде, получение реквизита "Дата регистрации" с форматом без времени из РС Коды Оргнанизаций.

Цитата

Результат = "";

Запрос = Новый Запрос(
"ВЫБРАТЬ
| КодыОрганизацииСрезПоследних.ДатаРегистрации
|ИЗ
| РегистрСведений.КодыОрганизации.СрезПоследних(&ДатаДокумента, Организация = &ПараметрОрганизация) КАК КодыОрганизацииСрезПоследних");

Запрос.УстановитьПараметр("ДатаДокумента", Параметры.Документ_Дата);
Запрос.УстановитьПараметр("ПараметрОрганизация", Параметры.Документ_Организация);

Выборка = Запрос.Выполнить().Выбрать();
Если Выборка.Следующий() Тогда
Результат = Формат(Выборка.ДатаРегистрации, "ДФ=dd.MM.yyyy");
КонецЕсли;

ПОСЛЕДНИЕ СООБЩЕНИЯ

Комментарии к статьям - Учет бонусных карт в 1С УТ10-11, УПП, КА, Розница, УНФ	Guest 29.03.23 18:43
ЭКСЕЛОН - Загрузка в 1С из EXCEL - Как загрузить у УНФ иерархию Категорий	Антон Долгополов 29.03.23 9:17
ЭКСПОТОР - Выгрузка номенклатуры из 1С - ЭКСПОТОР - Выгрузка номенклатуры из 1С выгрузка фото URL	Валентин Gruz 29.03.23 9:16
ЭКСЕЛОН - Загрузка в 1С из EXCEL - Создание номенклатуры	Администратор 28.03.23 14:24
ЭКСЕЛОН - Загрузка в 1С из EXCEL - Сопоставление свойств	Администратор 28.03.23 14:21
Комментарии к статьям - Служебный модуль - инструмент для программиста [БЕСПЛАТНО]	Администратор 24.03.23 16:40
ЭКСЕЛОН - Загрузка в 1С из EXCEL - Вопросы-ответы по разработке "Загрузка из Excel в 1с"	Администратор 24.03.23 15:16
ЭКСЕЛОН - Загрузка в 1С из EXCEL - При восстановлении профиля, после прочтения файла пропадают колонки цены и свойства	Администратор 24.03.23 15:15
ЭКСЕЛОН - Загрузка в 1С из EXCEL - Ошибка при настройки автозагрузки	Администратор 24.03.23 15:09
ЭКСЕЛОН - Загрузка в 1С из EXCEL - куда пропадают колонки	Администратор 24.03.23 15:05
ЭКСЕЛОН - Загрузка в 1С из EXCEL - Скрипты	Администратор 24.03.23 15:03
ЭКСЕЛОН - Загрузка в 1С из EXCEL - Установка цен номенклатуры	Павел Гимельфарб 21.03.23 17:43
ЭКСЕЛОН - Загрузка в 1С из EXCEL - Обновление программы "Мастер загрузки из Excel в 1С"	Администратор 21.03.23 9:21
ЭКСЕЛОН - Загрузка в 1С из EXCEL - Поиск соответствий номенклатуры	Администратор 16.03.23 13:58
Групповая рассылка документов клиентам - Не отправляет на несколько электронных адресов	Алексей 14.03.23 19:01

Сейчас на форуме (гостей: 3)

Всего зарегистрированных пользователей: 2157

Приняло участие в обсуждении: 363

Всего тем: 798

Всего сообщений: 6007