Таб=СоздатьОбъект("Таблица"); Если Выбор=1 Тогда ИмяФайлаПечатнойФормы = КаталогИБ()+"ExtForms\PrnForms\[u]prfdvn[/u].mxl";
Иначе Если Выбор=2 Тогда ИмяФайлаПечатнойФормы = КаталогИБ()+"ExtForms\PrnForms\[u]prfdvn_2[/u].mxl";
.... КонецЕсли
Если (Константа.ИспользоватьВнешниеПечатныеФормы = Да) и (ФС.СуществуетФайл(ИмяФайлаПечатнойФормы) = 1) Тогда Таб.ИсходнаяТаблица(ИмяФайлаПечатнойФормы);
// далее манипулируем объектом ТАб // Если есть разница в печ. формах - используем Если Выбор=х // Если нет - просто выводим секции
Если Выбор=1 Тогда ИмяФайлаПечатнойФормы = КаталогИБ()+"ExtForms\PrnForms\prfdvn.mxl";
//Таб.ИсходнаяТаблица("Таблица1"); Иначе Если Выбор=2 Тогда ИмяФайлаПечатнойФормы = КаталогИБ()+"ExtForms\PrnForms\prfdvn_2.mxl"; //Таб.ИсходнаяТаблица("Таблица2"); .... КонецЕсли
Если (Константа.ИспользоватьВнешниеПечатныеФормы = Да) и (ФС.СуществуетФайл(ИмяФайлаПечатнойФормы) = 1) Тогда Таб.ИсходнаяТаблица(ИмяФайлаПечатнойФормы);
выборку из таблицы оборотов РН объединить с выборкой из таблицы остатков РН.
И что получиться?
1. Выбираем из таблицы ОстаткиОбороты все, что имеет остаток 0 и приход Не равный 0 - и все
ВЫБРАТЬ ТоварыНаСкладахОстаткиИОбороты.Номенклатура ИЗ РегистрНакопления.ТоварыНаСкладах.ОстаткиИОбороты(&Дата1, &Дата2, Период, ДвиженияИГраницыПериода, Склад = &Склад) КАК ТоварыНаСкладахОстаткиИОбороты ГДЕ ТоварыНаСкладахОстаткиИОбороты.КоличествоПриход <> 0 И ТоварыНаСкладахОстаткиИОбороты.КоличествоКонечныйОстаток = 0
Если НЕ тзВыписка.Количество() И КолвоЗаписей > 0 Тогда Предупреждение("В текущем файле нет платежей с данной датой выписки и расчетным счетом!"); КонецЕсли;
1. Первую проверку убираем (комментируем) 2. Вторая часть сохраняется (в части списания наличных партий) 3. После списания существ. партий остается некоторое количество (КоличествоНадоСписать). Вот его списываем без партии и без стоимости - уходим в минуса по количеству. потом эту ситуацию можно найти анализом регистра или тупым перепроведением расходных документов.
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!