![]() |
|
вытянуть дополнительный адрес контрагента в печатную форму( помогите) | ☑ | ||
---|---|---|---|---|
0
demous
31.05.12
✎
14:14
|
упп 8.2
вообщем добавляем в контрагента помимо юридического и фактического адреса, еще один Местонахождение... подскажите как мне его вытащить вот в этот эллемент? заранее спасибо Область.Параметры.НаименованиеПокупателя = Контрагент.НаименованиеПолное;; Область.Параметры.ЮридическийАдресПокупателя = СведенияОПокупателе.ЮридическийАдрес;; Область.Параметры.ФактическийАдресПокупателя = СведенияОПокупателе.ФактическийАдрес;; Область.Параметры.Местонахождение = .Местонахождение;; |
|||
1
PuhUfa
31.05.12
✎
14:16
|
Посмотреть общий модуль который создает СведенияОПокупателе и поправить там или сделать свое по аналогии
|
|||
2
hhhh
31.05.12
✎
14:17
|
(0) Область.Параметры.Местонахождение = СведенияОПокупателе.Местонахождение;;
а в СведенияОПокупателе добавить поле Местонахождение, то есть скопипастить с юридического адреса. |
|||
3
demous
31.05.12
✎
14:19
|
Если Не Контрагент.Пустая() Тогда
СведенияОПокупателе = УправлениеКонтактнойИнформацией.СведенияОЮрФизЛице(Контрагент, Дата); // Получаем лицензию контрагента ТекстЗапроса = "ВЫБРАТЬ | К_ЛицензииКонтрагентовСрезПоследних.Серия, | К_ЛицензииКонтрагентовСрезПоследних.Номер, | К_ЛицензииКонтрагентовСрезПоследних.НачалоДействия, | К_ЛицензииКонтрагентовСрезПоследних.КонецДействия, | К_ЛицензииКонтрагентовСрезПоследних.ОрганВыдавший |ИЗ | РегистрСведений.К_ЛицензииКонтрагентов.СрезПоследних( | &Дата, | Контрагент = &Контрагент | И Номенклатура = &Номенклатура) КАК К_ЛицензииКонтрагентовСрезПоследних" ; Запрос = Новый Запрос(ТекстЗапроса); Запрос.УстановитьПараметр("Дата" , Дата); Запрос.УстановитьПараметр("Контрагент" , Контрагент); Запрос.УстановитьПараметр("Номенклатура", СтрокаДок.Номенклатура.К_КодПродукции); РезультатЗапроса = Запрос.Выполнить(); Область.Параметры.НаименованиеПокупателя = Контрагент.НаименованиеПолное;; Область.Параметры.ЮридическийАдресПокупателя = СведенияОПокупателе.ЮридическийАдрес;; Область.Параметры.ФактическийАдресПокупателя = СведенияОПокупателе.ФактическийАдрес;; Область.Параметры.Местонахождение = .Местонахождение;; (2) так не работает, выдает ошибку что не найдено поле |
|||
4
demous
31.05.12
✎
14:23
|
док РеализицияТоваровУслуг - процедура ПечатьРазделБ
|
|||
5
PuhUfa
31.05.12
✎
14:23
|
Смотри общие модули УправлениеКонтактнойИнформацией в нем СведенияОЮрФизЛице. Дальше или правь в нем что бы выдергивало еще и твое Местонахождение или по аналогии выдергивай по месту
|
|||
6
philll
31.05.12
✎
14:32
|
Область.Параметры.Местонахождение = контрагент.Местонахождение;
пробовал? |
|||
7
philll
31.05.12
✎
14:33
|
ну раз в "контрагента" добавил, и вот это
Область.Параметры.НаименованиеПокупателя = Контрагент.НаименованиеПолное;; работает, то Местонахождение почему бы нет? |
|||
8
demous
31.05.12
✎
14:37
|
(6)(7) добавил не как реквизит, а именно в адресе забили, не юр или факт, а местонахождение ( видконтактнойинформации)
|
|||
9
demous
31.05.12
✎
14:56
|
ИмяСправочника = "Контрагенты";
ТекстКонтактнаяИнформацияАдреса = " | , МАКСИМУМ (ВЫБОР КОГДА КонтактнаяИнформация.Вид = &ВидЮридическийАдрес ТОГДА ВЫРАЗИТЬ(КонтактнаяИнформация.Представление КАК Строка(1000)) | ИНАЧЕ """" КОНЕЦ) КАК ЮридическийАдрес | , МАКСИМУМ (ВЫБОР КОГДА КонтактнаяИнформация.Вид = &ВидФактическийАдрес ТОГДА ВЫРАЗИТЬ(КонтактнаяИнформация.Представление КАК Строка(1000)) | ИНАЧЕ """" КОНЕЦ) КАК ФактическийАдрес // 31.05.2012 | , МАКСИМУМ (ВЫБОР КОГДА КонтактнаяИнформация.Вид = &ВидМестонахождение ТОГДА ВЫРАЗИТЬ(КонтактнаяИнформация.Представление КАК Строка(1000)) | ИНАЧЕ """" КОНЕЦ) КАК Местонахождение"; // ТекстУсловияОбъектКонтактнойИнформации = "КонтактнаяИнформация.Объект = Организации.Ссылка | И КонтактнаяИнформация.Вид В (&ВидЮридическийАдрес, &ВидФактическийАдрес, &ВидТелефона, &ВидМестонахождение) | И КонтактнаяИнформация.Тип В (&ТипАдрес, &ТипТелефон)"; Запрос.УстановитьПараметр("ВидТелефона", Справочники.ВидыКонтактнойИнформации.ТелефонКонтрагента); Запрос.УстановитьПараметр("ВидЮридическийАдрес", Справочники.ВидыКонтактнойИнформации.ЮрАдресКонтрагента); Запрос.УстановитьПараметр("ВидФактическийАдрес", Справочники.ВидыКонтактнойИнформации.ФактАдресКонтрагента); // 31.05.2012 Запрос.УстановитьПараметр("ВидМестонахождение", Справочники.ВидыКонтактнойИнформации.МестонахождениеКонтрагента); // так верно будет? |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |