Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
14 дек 2024, 06:28

Разрыв на печатной форме при определенном условии

Автор kruger48, 08 фев 2011, 22:13

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

kruger48

Доброго времени суток !Помогите!Конфа бух 2.0 8.2Документ реализация товаров и услуг , печатная форма "акт об оказании услуг" Отредактировал ее так чтобы в отдельных табличках выводилось то что на закладке агентские услуги и в отдельной все остальное. Критично чтобе обе таблицы были на 1 листе а4 но если чуть не помещается то вторая сразу бы переносилась на второй лист.Вопрос как это реализовать?Спасибо заранее.

progmikon

Цитата: kruger48 от 08 фев 2011, 22:13
Доброго времени суток !Помогите!Конфа бух 2.0 8.2Документ реализация товаров и услуг , печатная форма "акт об оказании услуг" Отредактировал ее так чтобы в отдельных табличках выводилось то что на закладке агентские услуги и в отдельной все остальное. Критично чтобе обе таблицы были на 1 листе а4 но если чуть не помещается то вторая сразу бы переносилась на второй лист.Вопрос как это реализовать?Спасибо заранее.
Ключевая фраза - "ПроверитьВывод".

kruger48


progmikon


kruger48

Все получилось большое спасибо. Только теперь новый вопрос если на закладке агентские услуги в реализации товаров и услуг ничего нет а вторую таблицу все равно выводит пустую .Как быть?

cska-fanat-kz

Цитата: kruger48 от 09 фев 2011, 20:27
Все получилось большое спасибо. Только теперь новый вопрос если на закладке агентские услуги в реализации товаров и услуг ничего нет а вторую таблицу все равно выводит пустую .Как быть?

Ищете цикл
Для каждого ЧетоТам Из <<Требуемая ТЧ>> Цикл

КонецЦикла
(по любому есть!)
и вокруг него ставите условие:

Если <<ТребуемаяТЧ>>.Количество() <> 0 Тогда
//здесь ваш цикл Для каждого...
КонецЕсли;
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

kruger48

Спасибо помогло...А вот теперь дописываю процедуру на кнопку перенести в "агентские услуги" документа реализация товаров и услуг. Надо чтобы он в реквизиты табличной части подставлял контрагента из шапки но это легко и выбирал договор вида с комитентов а в шапке указан с покупателем вот это уже вопрос помогите пожалуйста!!

kruger48

И + к этому подтягивал счет расчетов из счетов расчетов с контрагентом

progmikon

Для получения договора контрагента, указанного в шапке, только с видом "с комитентом" можно использовать следующий запрос:

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


Обратите внимание, что в данном случае, он выберет только первый попавшийся договор, если у контрагента их несколько с данным типом.

По поводу получения расчетного счета этого контрагента:

Контрагент.ОсновнойБанковскийСчет

Названия некоторых реквизитов у вас могут различаться, поскольку я привел пример для бухгалтерии, но думаю смысл понятен.

kruger48

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


Немного непонятно но почему то не работает!

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск