Примеры заполнения сертификата: различия между версиями
Shihov (обсуждение | вклад) Нет описания правки |
Shihov (обсуждение | вклад) Нет описания правки |
||
| (не показаны 3 промежуточные версии этого же участника) | |||
| Строка 5: | Строка 5: | ||
<syntaxhighlight lang='1c'> | <syntaxhighlight lang='1c'> | ||
Процедура ДействияПослеПроведенияВетСертификата(Объект, Движения) Экспорт | Процедура ДействияПослеПроведенияВетСертификата(Объект, Движения) Экспорт | ||
... | |||
Если Найти(Ссылка.Комментарий, "Накладная создана на основании Заказа")>0 Тогда | Если Найти(Ссылка.Комментарий, "Накладная создана на основании Заказа")>0 Тогда | ||
ОбъектСертификата.Документы.Очистить(); | ОбъектСертификата.Документы.Очистить(); | ||
| Строка 36: | Строка 36: | ||
<syntaxhighlight lang='1c'> | <syntaxhighlight lang='1c'> | ||
Процедура ДействияПослеПроведенияВетСертификата(Объект, Движения) Экспорт | Процедура ДействияПослеПроведенияВетСертификата(Объект, Движения) Экспорт | ||
... | |||
Если Объект.ВидДокумента.ТипСертификата = Перечисления.АСП_ТипВетСертификата.СинхронизацияОстатков Тогда | |||
Для каждого ТекТовар из Объект.Товары цикл | Для каждого ТекТовар из Объект.Товары цикл | ||
Запрос = АСП_Функции.ПолучитьЗапросПоОстаткамДинамики(Объект.Организация, ТекТовар.Номенклатура, ТекТовар.Категория, Объект.ВидДокумента); | Запрос = АСП_Функции.ПолучитьЗапросПоОстаткамДинамики(Объект.Организация, ТекТовар.Номенклатура, ТекТовар.Категория, Объект.ВидДокумента); | ||
Запрос.УстановитьПараметр("Остатки", ПараметрыСеанса.АСП_СкладскиеЗаписи.Получить()); | Запрос.УстановитьПараметр("Остатки", ПараметрыСеанса.АСП_СкладскиеЗаписи.Получить()); | ||
Запрос.УстановитьПараметр("ГУИДПроизводителя", ""); | |||
Запись = АСП_Функции.ПолучитьЗапись(ТекТовар.Производитель, 1); | |||
Запрос.УстановитьПараметр("ГУИДПроизводителя", Запись.ГУИД); | |||
Запрос.УстановитьПараметр("ДатаВыработки", ТекТовар.ДатаВыработки); | Запрос.УстановитьПараметр("ДатаВыработки", ТекТовар.ДатаВыработки); | ||
Запрос.УстановитьПараметр("КодПартии", ТекТовар.КодПартии); | Запрос.УстановитьПараметр("КодПартии", ТекТовар.КодПартии); | ||
| Строка 63: | Строка 63: | ||
<syntaxhighlight lang='1c'> | <syntaxhighlight lang='1c'> | ||
Процедура АСП_ЗаписьСправочниковПриЗаписи(Источник, Отказ) Экспорт | Процедура АСП_ЗаписьСправочниковПриЗаписи(Источник, Отказ) Экспорт | ||
... | |||
Если ТипЗнч(Источник) = Тип("СправочникОбъект.Организации") ИЛИ ТипЗнч(Источник) = Тип("СправочникОбъект.Контрагенты") Тогда | Если ТипЗнч(Источник) = Тип("СправочникОбъект.Организации") ИЛИ ТипЗнч(Источник) = Тип("СправочникОбъект.Контрагенты") Тогда | ||
... | |||
ИначеЕсли ТипЗнч(Источник) = Тип("СправочникОбъект.Партнеры") Тогда | ИначеЕсли ТипЗнч(Источник) = Тип("СправочникОбъект.Партнеры") Тогда | ||
Запрос = Новый Запрос; | Запрос = Новый Запрос; | ||
Запрос.Текст = "ВЫБРАТЬ | Запрос.Текст = "ВЫБРАТЬ | ||
| Контрагенты.Ссылка КАК Ссылка | |||
|ИЗ | |||
| Справочник.Контрагенты КАК Контрагенты | |||
|ГДЕ | |||
| Контрагенты.Партнер = (&Партнер)"; | |||
Ссылка = Источник.Ссылка; | Ссылка = Источник.Ссылка; | ||
| Строка 180: | Строка 180: | ||
Если ВидДокумента.ВидДокумента = "ОтчетПроизводстваЗаСмену" Тогда | Если ВидДокумента.ВидДокумента = "ОтчетПроизводстваЗаСмену" Тогда | ||
Возврат "ВЫБРАТЬ | Возврат "ВЫБРАТЬ | ||
| Ссылки.Ссылка КАК Ссылка, | |||
| Н.Номенклатура КАК Номенклатура, | |||
| СУММА(Н.Количество/ВИ.Количество*Т.Количество) КАК Количество, | | СУММА(Н.Количество/ВИ.Количество*Т.Количество) КАК Количество, | ||
| СУММА(0) КАК Сумма | |||
|ИЗ | |||
| СсылкиВет КАК Ссылки | |||
| ЛЕВОЕ СОЕДИНЕНИЕ Документ.ОтчетПроизводстваЗаСмену.Продукция КАК Т | |||
| ПО (Т.Ссылка = Ссылки.Ссылка) | |||
| ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АСП_Товары КАК Р | |||
| ПО (Т.Номенклатура = Р.Ссылка) | |||
| И (НЕ Р.Категория = ЗНАЧЕНИЕ(Справочник.АСП_КатегорииНоменклатуры.ПустаяСсылка)) | |||
| ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.ОсновныеСпецификацииНоменклатуры.СрезПоследних(, ) КАК Осн | |||
| ПО (Т.Номенклатура = Осн.Номенклатура) | |||
| ВНУТРЕННЕЕ СОЕДИНЕНИЕ Справочник.СпецификацииНоменклатуры.ИсходныеКомплектующие КАК Н | |||
| ПО (Осн.СпецификацияНоменклатуры = Н.Ссылка) | |||
| ВНУТРЕННЕЕ СОЕДИНЕНИЕ Справочник.СпецификацииНоменклатуры.ВыходныеИзделия КАК ВИ | | ВНУТРЕННЕЕ СОЕДИНЕНИЕ Справочник.СпецификацииНоменклатуры.ВыходныеИзделия КАК ВИ | ||
| ПО (Осн.СпецификацияНоменклатуры = ВИ.Ссылка) | |||
| | |||
|СГРУППИРОВАТЬ ПО | |||
| Ссылки.Ссылка, | |||
| Т.Номенклатура, | |||
| Н.Номенклатура | |||
|УПОРЯДОЧИТЬ ПО | |УПОРЯДОЧИТЬ ПО | ||
| Ссылки.Ссылка.МоментВремени"; | | Ссылки.Ссылка.МоментВремени"; | ||
| Строка 220: | Строка 220: | ||
| Ссылки.Ссылка КАК Ссылка, | | Ссылки.Ссылка КАК Ссылка, | ||
| ИК.Номенклатура КАК Номенклатура, | | ИК.Номенклатура КАК Номенклатура, | ||
| СУММА(ИК.Количество/ИК.Ссылка.Количество*Т.Количество) КАК Количество, | | СУММА(ИК.Количество/ИК.Ссылка.Количество*Т.Количество) КАК Количество, | ||
| СУММА(0) КАК Сумма | |||
|ИЗ | |ИЗ | ||
| СсылкиВет КАК Ссылки | | СсылкиВет КАК Ссылки | ||
| Строка 257: | Строка 257: | ||
//| | //| | ||
<syntaxhighlight lang='bash'> | <syntaxhighlight lang='bash'> | ||
| | |'''// | ||
|ВЫБРАТЬ | |ВЫБРАТЬ | ||
| Ссылки.Ссылка КАК Ссылка, | | Ссылки.Ссылка КАК Ссылка, | ||