PDA

Просмотр полной версии : Графа в счет-фактуре "Грузоотправитель и его адрес-он же"



sherstic
20.01.2011, 08:59
Как заменить "он же" на адрес в 1С Предприятие 8.2

Scorp_vp
20.01.2011, 12:35
Необходимо отредактировать печатную форму, заменив текст он же скопированным содержимым из адреса

sherstic
20.01.2011, 12:50
Это делать придется каждый раз?

almukhanov
20.01.2011, 17:21
Нужно в документе Счёт-фактура выданный подредактировать запрос и закомментиров
ать пару строк.

Добавлено через 6 минут 7 секунд
Функция СобратьДанныеПоРеализация ТоваровУслуг(ТекущееОснов� �ние)

Запрос = Новый Запрос;
Если ТипЗнч(ТекущееОснование) = Тип("ДокументСсылка.Реализация� �тгруженныхТоваров") Тогда
Запрос.УстановитьПараметр("ДокументОснование", ТекущееОснование.Документ� �тгрузки);
Иначе
Запрос.УстановитьПараметр("ДокументОснование", ТекущееОснование);
КонецЕсли;
Запрос.УстановитьПараметр("ПустойКонтрагент", Справочники.Контрагенты.Пу стаяСсылка());

Запрос.Текст = "ВЫБРАТЬ
| РеализацияТоваровУслуг.Ор� �анизация,
| РеализацияТоваровУслуг.Ор� �анизация КАК Поставщик,
| ВЫБОР
| КОГДА ЕСТЬNULL(РеализацияТоваровУ� �луг.Грузоотправитель, &ПустойКонтрагент) = &ПустойКонтрагент
| ТОГДА ""он же"" // заменить на РеализацияТоваровУслуг.Ор� �анизация

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



Далее должно быть так
ДанныеДляПечати = Новый Структура();
ДанныеДляПечати.Вставить("Организация", Шапка.Организация);
ДанныеДляПечати.Вставить("Номер", Номер);
ДанныеДляПечати.Вставить("Дата", Дата);
ДанныеДляПечати.Вставить("НомерПРД", "");
ДанныеДляПечати.Вставить("ДатаПРД", "");
ДанныеДляПечати.Вставить("Поставщик", Шапка.Поставщик);
ДанныеДляПечати.Вставить("Грузоотправитель", Шапка.Грузоотправитель);
ДанныеДляПечати.Вставить("Покупатель", Шапка.Покупатель);
ДанныеДляПечати.Вставить("Грузополучатель", Шапка.Грузополучатель);
ДанныеДляПечати.Вставить("АдресДоставки", Шапка.АдресДоставки);
ДанныеДляПечати.Вставить("Сумма", Шапка.Сумма);
ДанныеДляПечати.Вставить("Валюта", Шапка.Валюта);
ДанныеДляПечати.Вставить("УчитыватьНДС", Шапка.УчитыватьНДС);
ДанныеДляПечати.Вставить("СуммаВключаетНДС", Шапка.СуммаВключаетНДС);