PDA

Просмотр полной версии : Инвентаризация товаров с выбором счета



Софико
18.11.2014, 11:36
обрый день, мне нужно сделать в документе "Инвентаризация товаров" возможность заполнения остатков номеклатура, в зависимости от выбора счета.
делано внешней обработкой
Процедура Инициализировать(Объект, ИмяТабличнойЧасти, ТабличноеПоле) Экспорт;

тПроводки = Объект[ИмяТабличнойЧасти];

Если тПроводки.Количество() > 0 Тогда

ТекстВопроса = "Перед заполнением табличная часть будет очищена. Заполнить?";
Ответ = Вопрос(ТекстВопроса, РежимДиалогаВопрос.ДаНет, , КодВозвратаДиалога.Да, Метаданные().Синоним);
Если Ответ <> КодВозвратаДиалога.Да Тогда
Возврат;
КонецЕсли;

тПроводки.Очистить();

КонецЕсли;

ФормаСклады = Справочники.Склады.Получит ьФормуВыбора();
Склад = ФормаСклады.ОткрытьМодаль� �о();

Счет9021 = ПланыСчетов.Типовой.Матери алыПринятыеВПереработку;

Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ
| ТиповойОстатки.Субконто2 КАК Номенклатура,
| СУММА(ТиповойОстатки.Колич ествоОстатокДт) КАК Количество,
| ТиповойОстатки.Счет КАК СчетУчета,
| СУММА(ТиповойОстатки.Сумма ОстатокДт) КАК Сумма,
| СРЕДНЕЕ(ВЫБОР
| КОГДА ТиповойОстатки.Количество� �статокДт > 0
| ТОГДА ТиповойОстатки.СуммаОстат� �кДт / ТиповойОстатки.Количество� �статокДт
| ИНАЧЕ 0
| КОНЕЦ) КАК Цена,
| СУММА(ТиповойОстатки.Сумма ОстатокДт) КАК СуммаУчет,
| СУММА(ТиповойОстатки.Колич ествоОстатокДт) КАК КоличествоУчет
|ИЗ
| РегистрБухгалтерии.Типово� �.Остатки(&ДатаДок, Счет = &Счет, , Субконто1 = &Склад) КАК ТиповойОстатки
|
|СГРУППИРОВАТЬ ПО
| ТиповойОстатки.Субконто2,
| ТиповойОстатки.Счет
|
|УПОРЯДОЧИТЬ ПО
| СчетУчета,
| Номенклатура";

Запрос.УстановитьПараметр("Склад", Склад);
Запрос.УстановитьПараметр("Счет", Счет9021);
Запрос.УстановитьПараметр("ДатаДок", Объект.Дата);

Результат = Запрос.Выполнить().Выгрузит ь();

тПроводки.Загрузить(Резуль тат);

КонецПроцедуры

Функция мУстановитьЗначение(Получ� �тель,Значение)

Если ТипЗнч(Получатель)=ТипЗнч(З начение) Тогда
Получатель = Значение;
Иначе
Сообщить("Типы значений для замены различные!");
КонецЕсли;

КонецФункции

окно выбора склада появляется и все, заполнение остатков не происходит
Или может другой простой вариант кто предложит
Если в документе на вкладке "Счета учета расчетов" выбираю нужный склад, заполняется все равно по всем


или в процедуре модуля ЗаполнитьПоОстаткамНаСкла де в документе "ИнвентаризацияТоваровНаСк ладе" добавить отбор по счету.