Реклама на этом месте
Форум 1С
Форум 1С
Программистам. Бухгалтерам. Администраторам. Пользователям
Задай вопрос - получи решение проблемы. Без троллинга и флуда.
24 Май 2018, 05:38
МультиВход
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Не получили письмо с кодом активации?
 
collapse

Автор Тема: Запрос с условием, внешняя печатная форма  (Прочитано 2487 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн d_liliya

  • **
  • Сообщений: 81
  • РЕПУТАЦИЯ: 0
  • Регистрация: 2014-11-02
  • Сайт: 
  • Профессия: Ученик 1С
Разрабатываю внешнюю печатную форму, к документу Реализация. Нужно из регистра сведений КонтактнаяИнформация "достать" адрес конкретного контрагента,который лежит в Представление и вывести в ячейку. Для этого нужно сделать запрос и как-то условием задать выбор по контрагенту. (Код неправильный)
Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ
| КонтактнаяИнформация.Представление,
| Реализация.Контрагент
|ИЗ
| РегистрСведений.КонтактнаяИнформация КАК КонтактнаяИнформация
| ВНУТРЕННЕЕ СОЕДИНЕНИЕ Документ.Реализация КАК Реализация
| ПО (Реализация.Контрагент = КонтактнаяИнформация.Объект.Ссылка)";

ЗапросАдрес = Запрос.Выполнить().Выгрузить();
ОбластьМакета.Параметры.Адрес = ЗапросАдрес;

Подскажите, как это сделать?


Оффлайн Besart

  • *****
  • Сообщений: 678
  • РЕПУТАЦИЯ: 142
  • КПД: 21%
  • Регистрация: 2012-12-10
    • Skype: artfa.a
  • Компания: Фрилансер
  • Профессия: Программист 8.1
если конфа типовая, например УТ11 , то в ней есть общий модуль ФормированиеПечатныхФорм, там есть много чего интересного, в т.ч. функция ПолучитьАдресИзКонтактнойИнформации(Объект, ТипАдреса = ""), на вход передается Объект - ссылка, ТипАдрес - Фактический, Регистрации или Юридический,
в ващем случае это будет выглядеть так:
Адрес = ФормированиеПечатныхФорм.ПолучитьАдресИзКонтактнойИнформации(Ссылка, "Юридический"); //Ссылка - СправочникСсылка.Контрагенты

Оффлайн cska-fanat-kz

  • 1С:Специалист
  • Глобальный модератор
  • *****
  • Сообщений: 5745
  • РЕПУТАЦИЯ: 1099
  • КПД: 19%
  • Красная армия всех сильней!
  • Регистрация: 2010-11-06
    • Skype: cska-fanat-kz81
  • Сайт: cska-fanat-kz.ucoz.kz
  • Профессия: Разработчик 1С
Загляните в код печати счет-фактуры.
Там есть готовая функция получения данных по контрагенту, включая и адрес...
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

Оффлайн d_liliya

  • **
  • Сообщений: 81
  • РЕПУТАЦИЯ: 0
  • Регистрация: 2014-11-02
  • Сайт: 
  • Профессия: Ученик 1С
если конфа типовая, например УТ11 , то в ней есть общий модуль ФормированиеПечатныхФорм, там есть много чего интересного, в т.ч. функция ПолучитьАдресИзКонтактнойИнформации(Объект, ТипАдреса = ""), на вход передается Объект - ссылка, ТипАдрес - Фактический, Регистрации или Юридический,
в ващем случае это будет выглядеть так:
Адрес = ФормированиеПечатныхФорм.ПолучитьАдресИзКонтактнойИнформации(Ссылка, "Юридический"); //Ссылка - СправочникСсылка.Контрагенты

В общем модуле формированиеПечатныхФорм есть только функция ОписаниеОрганизации с таким кодом:
Функция ОписаниеОрганизации(СписокСведений, Список = "", СПрефиксом = Истина) Экспорт

Если ПустаяСтрока(Список) Тогда
Список = "ПолноеНаименование,ИНН,Свидетельство,ЮридическийАдрес,Телефоны,НомерСчета,Банк,БИК,КоррСчет";
КонецЕсли;

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

СоответствиеПараметров = Новый Соответствие();
СоответствиеПараметров.Вставить("ПолноеНаименование", " ");
СоответствиеПараметров.Вставить("ИНН", " ИНН ");
СоответствиеПараметров.Вставить("КПП", " КПП ");
СоответствиеПараметров.Вставить("Свидетельство", " ");
СоответствиеПараметров.Вставить("СвидетельствоДатаВыдачи", " от ");
СоответствиеПараметров.Вставить("ЮридическийАдрес", " ");
СоответствиеПараметров.Вставить("ФактическийАдрес", " ");
СоответствиеПараметров.Вставить("Телефоны", " тел.: ");
СоответствиеПараметров.Вставить("НомерСчета", " р/с ");
СоответствиеПараметров.Вставить("Банк", " в банке ");
СоответствиеПараметров.Вставить("БИК", " БИК ");
СоответствиеПараметров.Вставить("КоррСчет", " к/с ");
СоответствиеПараметров.Вставить("КодПоОКПО", " Код по ОКПО ");

Список = Список + ?(Прав(Список, 1) = ",", "", ",");
ЧислоПараметров = СтрЧислоВхождений(Список, ",");

Для Счетчик = 1 По ЧислоПараметров Цикл

ПозЗапятой = Найти(Список, ",");

Если ПозЗапятой > 0 Тогда
ИмяПараметра = Лев(Список, ПозЗапятой - 1);
Список = Сред(Список, ПозЗапятой + 1, СтрДлина(Список));

Попытка
СтрокаДополнения = "";
СписокСведений.Свойство(ИмяПараметра, СтрокаДополнения);

Если ПустаяСтрока(СтрокаДополнения) Тогда
Продолжить;
КонецЕсли;

Префикс = СоответствиеПараметров[ИмяПараметра];
Если НЕ ПустаяСтрока(Результат) Тогда
Результат = Результат + ",";
КонецЕсли;

Результат = Результат + ?(СПрефиксом = Истина, Префикс, "") + СтрокаДополнения;
Исключение
Сообщить("Не удалось определить значение параметра организации: " + ИмяПараметра, СтатусСообщения.Внимание);
КонецПопытки;

КонецЕсли;
КонецЦикла;
Возврат СокрЛП(Результат);

КонецФункции // ОписаниеОрганизации()

Как отсюда достать Юридический адрес?

Оффлайн cska-fanat-kz

  • 1С:Специалист
  • Глобальный модератор
  • *****
  • Сообщений: 5745
  • РЕПУТАЦИЯ: 1099
  • КПД: 19%
  • Красная армия всех сильней!
  • Регистрация: 2010-11-06
    • Skype: cska-fanat-kz81
  • Сайт: cska-fanat-kz.ucoz.kz
  • Профессия: Разработчик 1С
Глобальным поиском ищите где она вызывается и увидите пример
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.


Теги:
 

Как можно подставлять цену из регистра сведений "Цены поставщиков" в документ"ПоступлениеТоваров" на актуальную дату? Необходимо использовать запрос в решении.

Автор Елена6666666666Раздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 14
Просмотров: 10973
Последний ответ 24 Окт 2014, 13:30
от cska-fanat-kz
Запрос Параметры для "ИЗ"

Автор БерезинРаздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 2
Просмотров: 3363
Последний ответ 15 Май 2013, 23:27
от Березин
Что быстрее: Загрузить табличную часть в запрос и там добавить колонки, или пробежаться циклом по ТЧ и добавить значения в колонки

Автор ZeedРаздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 1
Просмотров: 1223
Последний ответ 11 Июл 2016, 09:00
от vitasw
УТ 11.3 форма "УправлениеЭквайринговымТерминалом"

Автор skelaРаздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 2
Просмотров: 238
Последний ответ 09 Фев 2018, 21:23
от Геннадий ОбьГЭС
Запрос по обработке "Согласование заявок"

Автор DenielAkreedРаздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 0
Просмотров: 927
Последний ответ 29 Сен 2016, 02:39
от DenielAkreed

* Живое общение

Не устроил ответ?

Зарегистрируйся и задай свой вопрос. Живое общение приносит результат намного быстрее.


Зарегистрироваться

* Реклама

* Поиск

* Последние задачи на разработку (фриланс)

* Реклама

* Последние вакансии

* Топ 10 авторов за месяц

Геннадий ОбьГЭС Геннадий ОбьГЭС
161 Сообщений
alex0402
76 Сообщений
oleg-x
68 Сообщений
AIFrame AIFrame
61 Сообщений
buketov.av buketov.av
44 Сообщений
wise wise
39 Сообщений
KOI8-R
35 Сообщений
Анюта17
29 Сообщений
ilyay ilyay
29 Сообщений
Alter
29 Сообщений

* Кто онлайн

  • Точка Гостей: 205
  • Точка Скрытых: 0
  • Точка Пользователей: 3
  • Точка Сейчас на форуме:

* Облако тэгов

* Форум 1С с мобильного

* Инструменты

* Дополнительно

Поиск

 
SimplePortal 2.3.5 © 2008-2012, SimplePortal