Счет-фактура

  • Автор темы Автор темы q2009
  • Дата начала Дата начала

q2009

New member
Регистрация
22 Дек 2011
Сообщения
15
Реакции
0
Платформа 1С:Предприятие 8.3 (8.3.5.1460)
Конфигурация "Комплексный учет для бюджетных учреждений Украины" (Версия 1.0.45)
Есть макет счета
У Вас недостаточно прав для просмотра ссылок. Войдите или зарегистрируйтесь.

Все заполняется кроме "подвала" счета, а именно должности и ФИО ответственных лиц.

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

	ОбластьМакета.Параметры.ГлавныйБухгалтер	= ГлавныйБухгалтер;
	ОбластьМакета.Параметры.Директор			= Директор;
	ОбластьМакета.Параметры.ДолжностьГлавныйБухгалтер	= ДолжностьГлавныйБухгалтер;
	ОбластьМакета.Параметры.ДолжностьДиректор			= ДолжностьДиректор;

Можно прямо указать данные о должности и ФИО ответственных лиц, но желательно чтобы это заполнялось автоматом.
Подскажите в чем причина.
 
Последнее редактирование:
Платформа 1С:Предприятие 8.3 (8.3.5.1460)
Конфигурация "Комплексный учет для бюджетных учреждений Украины" (Версия 1.0.45)
Есть макет счета
У Вас недостаточно прав для просмотра ссылок. Войдите или зарегистрируйтесь.

Все заполняется кроме "подвала" счета, а именно должности и ФИО ответственных лиц.

Можно прямо указать данные о должности и ФИО ответственных лиц, но желательно чтобы это заполнялось автоматом.
Подскажите в чем причина.
Ваш макет не открывается.
Вы заполнили регистр сведений ОтветственныеЛицаОрганизаций? А фамилию, имя и отчество в спр. Физ.лица - регистр сведений ФИОФизЛиц?
 
Все данные есть. Причина была в том, что в программе создана главная организация и ее филиал. Должностные лица были прописаны только для филиала. И при выписке счета, в котором надо указывать и главную, и филиал, ответственные лица не заполнялись. Если счет сугубо от филиала, то все нормально. Но нужно ведь, чтобы в счете фигурировала главная организация со своими реквизитами и ее филиал, а подписи были только ответственных лиц филиала.
Вот как правильно это все сделать?
 
Назад
Сверху