Показано с 1 по 1 из 1
Комбинированный просмотр
-
18.11.2014, 12:36 #1
- Регистрация
- 22.04.2014
- Адрес
- Казахстан
- Сообщений
- 12
- Сказал(а) спасибо
- 6
- Поблагодарили 1 раз в 1 сообщении
Инвентаризация товаров с выбором счета
обрый день, мне нужно сделать в документе "Инвентаризация товаров" возможность заполнения остатков номеклатура, в зависимости от выбора счета.
делано внешней обработкой
Процедура Инициализировать(Объект, ИмяТабличнойЧасти, ТабличноеПоле) Экспорт;
тПроводки = Объект[ИмяТабличнойЧасти];
Если тПроводки.Количество() > 0 Тогда
ТекстВопроса = "Перед заполнением табличная часть будет очищена. Заполнить?";
Ответ = Вопрос(ТекстВопроса, РежимДиалогаВопрос.ДаНет, , КодВозвратаДиалога.Да, Метаданные().Синоним);
Если Ответ <> КодВозвратаДиалога.Да Тогда
Возврат;
КонецЕсли;
тПроводки.Очистить();
КонецЕсли;
ФормаСклады = Справочники.Склады.Получит ьФормуВыбора();
Склад = ФормаСклады.ОткрытьМодаль� �о();
Счет9021 = ПланыСчетов.Типовой.Матери алыПринятыеВПереработку;
Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ
| ТиповойОстатки.Субконто2 КАК Номенклатура,
| СУММА(ТиповойОстатки.Колич ествоОстатокДт) КАК Количество,
| ТиповойОстатки.Счет КАК СчетУчета,
| СУММА(ТиповойОстатки.Сумма ОстатокДт) КАК Сумма,
| СРЕДНЕЕ(ВЫБОР
| КОГДА ТиповойОстатки.Количество� �статокДт > 0
| ТОГДА ТиповойОстатки.СуммаОстат� �кДт / ТиповойОстатки.Количество� �статокДт
| ИНАЧЕ 0
| КОНЕЦ) КАК Цена,
| СУММА(ТиповойОстатки.Сумма ОстатокДт) КАК СуммаУчет,
| СУММА(ТиповойОстатки.Колич ествоОстатокДт) КАК КоличествоУчет
|ИЗ
| РегистрБухгалтерии.Типово� �.Остатки(&ДатаДок, Счет = &Счет, , Субконто1 = &Склад) КАК ТиповойОстатки
|
|СГРУППИРОВАТЬ ПО
| ТиповойОстатки.Субконто2,
| ТиповойОстатки.Счет
|
|УПОРЯДОЧИТЬ ПО
| СчетУчета,
| Номенклатура";
Запрос.УстановитьПараметр( "Склад", Склад);
Запрос.УстановитьПараметр( "Счет", Счет9021);
Запрос.УстановитьПараметр( "ДатаДок", Объект.Дата);
Результат = Запрос.Выполнить().Выгрузит ь();
тПроводки.Загрузить(Резуль тат);
КонецПроцедуры
Функция мУстановитьЗначение(Получ� �тель,Значение)
Если ТипЗнч(Получатель)=ТипЗнч(З начение) Тогда
Получатель = Значение;
Иначе
Сообщить("Типы значений для замены различные!");
КонецЕсли;
КонецФункции
окно выбора склада появляется и все, заполнение остатков не происходит
Или может другой простой вариант кто предложит
Если в документе на вкладке "Счета учета расчетов" выбираю нужный склад, заполняется все равно по всем
или в процедуре модуля ЗаполнитьПоОстаткамНаСкла де в документе "ИнвентаризацияТоваровНаС� �ладе" добавить отбор по счету.
Похожие темы
-
Документ Инвентаризация товара на складе
от Ravlik в разделе 1С - Предприятие 8.0, 8.1, 8.2, 8.3Ответов: 0Последнее сообщение: 28.05.2014, 11:11 -
Инвентаризация компьютеров
от Trebla в разделе В помощь системному администраторуОтветов: 4Последнее сообщение: 29.12.2009, 12:02
Социальные закладки