Необходимо добавить еще одну форму счета на оплату

Форум Учет и отчетность Бухгалтерский учет и налоги (БУ)

1С:Бухгалтерия 7.7 Бухгалтерский учет 7.7

1. *Evgesha* 07.10.15 07:50 Сейчас в теме

Здравствуйте, уважаемые.
В наличии имеется 2 mxl файла, например 1cbs.mxl и 1cbs1.mxl в каталоге базы PrnForms. Сейчас форма счета открывается 1cbs.mxl. Как добавить вторую печатную форму 1cbs1.mxl?
Заранее благодарю.

По теме из базы знаний

Ответы

Подписаться на ответы Инфостарт бот

Свернуть все

2. deniseek77 86 07.10.15 08:21 Сейчас в теме

(1) *Evgesha*, Делать внешнюю печатную форму, а не пытаться использовать еще 1 макет.

3. *Evgesha* 07.10.15 08:35 Сейчас в теме

Пыталась, думала проще будет прописать в конфигураторе форму xml (((

6. l_user 07.10.15 09:49 Сейчас в теме

(3) *Evgesha*,
С точки зрения 1С-методологии правильно сделать как рекомендует deniseek77 в (2), но и у KontoraB в (4) тоже решение.
В качестве подсказки для решения, подсказываемого KontoraB немного "покодировал", может и пригодится.
Я использовал типовую конфигурацию "Бухгалтерия 7.7". В процедуре "Печать" экранной формы документа "Счет" заменить блок

	ИмяФайлаПечатнойФормы = КаталогИБ()+"ExtForms\PrnForms\1cbs.mxl";
	Если ФС.СуществуетФайл(ИмяФайлаПечатнойФормы) = 1 Тогда
		Таб.ИсходнаяТаблица(ИмяФайлаПечатнойФормы);
	Иначе
		Таб.ИсходнаяТаблица("Таблица");
	КонецЕсли;

на предлагаемый

	Список	= СоздатьОбъект("СписокЗначений");
	Список.ДобавитьЗначение(0, "Встроеннная");
	Список.ДобавитьЗначение(1, "1cbs.mxl");
	Список.ДобавитьЗначение(2, "1cbs1.mxl"); 
	ВыбранноеЗначение	= 0;
	Если Список.ВыбратьЗначение(ВыбранноеЗначение,"",,,1)<>1 Тогда
		Возврат;
	КонецЕсли;
	Если ВыбранноеЗначение > 0 Тогда
		ИмяФайлаПечатнойФормы = КаталогИБ()+"ExtForms\PrnForms\1cbs"+?(ВыбранноеЗначение=1,"","1")+".mxl";
		Если ФС.СуществуетФайл(ИмяФайлаПечатнойФормы) = 1 Тогда
			Таб.ИсходнаяТаблица(ИмяФайлаПечатнойФормы);
		Иначе
			Сообщить("Не найден шаблон "+ИмяФайлаПечатнойФормы);
			Возврат;
		КонецЕсли;
	Иначе
		Таб.ИсходнаяТаблица("Таблица");
	КонецЕсли;

Показать

8. *Evgesha* 07.10.15 10:00 Сейчас в теме

(6) l_user, Заменила блок, выходит следующая ошибка:
Таб<<?>>.ИсходнаяТаблица(ИмяФайлаПечатнойФормы);
{Документ.Счет.Форма.Модуль(419)}: Переменная не определена (Таб)
Таб<<?>>.ИсходнаяТаблица("Таблица");
{Документ.Счет.Форма.Модуль(425)}: Переменная не определена (Таб)
Таб<<?>>.ВывестиСекцию("Шапка");
{Документ.Счет.Форма.Модуль(428)}: Переменная не определена (Таб)
Таб<<?>>.ВывестиСекцию("Строка");
{Документ.Счет.Форма.Модуль(435)}: Переменная не определена (Таб)
Таб<<?>>.ВывестиСекцию("Подвал");
{Документ.Счет.Форма.Модуль(438)}: Переменная не определена (Таб)
Таб<<?>>.Опции(0,0,0,0,"ОпцииПечатиСчета","ОкноСчета");
{Документ.Счет.Форма.Модуль(440)}: Переменная не определена (Таб)
Таб<<?>>.ТолькоПросмотр(1);
{Документ.Счет.Форма.Модуль(441)}: Переменная не определена (Таб)
Таб<<?>>.Показать("Печать счета","");
{Документ.Счет.Форма.Модуль(442)}: Переменная не определена (Таб)

11. *Evgesha* 07.10.15 11:15 Сейчас в теме

(6) l_user, Спасибо Вам большущее )

4. KontoraB 07.10.15 09:23 Сейчас в теме

сделать выбор форм счетов ...

5. AndKovalchuk 196 07.10.15 09:29 Сейчас в теме

Не очень понятен вопрос. Что значит добавить.
а) Предоставить пользователю выбор из двух форм
б) печатать сразу две формы
в) иное?

7. *Evgesha* 07.10.15 09:55 Сейчас в теме

(5) AndKovalchuk, Предоставить пользователю выбор из двух форм

9. ditp 94 07.10.15 10:27 Сейчас в теме

Таб = СоздатьОбъект("Таблица");

10. *Evgesha* 07.10.15 11:14 Сейчас в теме

(9) ditp, Спасибочки, все работает )))

12. *Evgesha* 07.10.15 11:16 Сейчас в теме

(9) ditp, А еще не подскажите, чтоб для формы счета 1cbs.mxl печаталась ландшафт, а для 1cbs1.mxl - портрет

13. l_user 07.10.15 12:31 Сейчас в теме

(12) *Evgesha*,
Если вы ничего не меняли в процедуре "Печать", и значения списка значений у вас такие же, какие я выкладывал в качестве примера: то есть "1 = 1cbs.mxl". То после строчки

	Таб.Опции(0,0,0,0,"ОпцииПечатиСчета","ОкноСчета");

нужно добавить строчку

	Таб.ПараметрыСтраницы(?(ВыбранноеЗначение=1,2,1));

Попробуйте.

14. *Evgesha* 07.10.15 13:54 Сейчас в теме

(13) l_user, Спасибо Вам за помощь

15. Shreki2015 2 23.10.15 14:13 Сейчас в теме

добавлю свои 5 копеек
обычно иду по пути добавления новой внешней печатной формы, чем нового макета и прописывания в модуле формы документа выбора макетов.
представьте что надо делать обновления, и с каждый обновлением надо по-новой повторять Ваши изменения, если в обновлении затронулся тот же документ. а если забыли? а если кто-то другой обновлял?
с внешней печатной формой проще. добавил и не мучаешься обновляя.

Оставьте свое сообщение

E-mail: