Попробовать удалить в схеме.ХСД строки с <!

И что получиться?

1. Выбираем из таблицы ОстаткиОбороты все, что имеет остаток 0 и приход Не равный 0 - и все

ВЫБРАТЬ
    ТоварыНаСкладахОстаткиИОбороты.Номенклатура
ИЗ
    РегистрНакопления.ТоварыНаСкладах.ОстаткиИОбороты(&Дата1, &Дата2, Период, ДвиженияИГраницыПериода, Склад = &Склад) КАК ТоварыНаСкладахОстаткиИОбороты
ГДЕ
    ТоварыНаСкладахОстаткиИОбороты.КоличествоПриход <> 0
    И ТоварыНаСкладахОстаткиИОбороты.КоличествоКонечныйОстаток = 0

Вот для ХМЛ:

Функция ИмпортXML(Параметры)
    ФайлXML = Новый ЧтениеXML;
    ИмяФайла = Параметры.ИмяФайла;
    
    Попытка
        ФайлXML.ОткрытьФайл(ИмяФайла);
    Исключение
        Предупреждение("Ошибка открытия файла " + ИмяФайла);
        Возврат Неопределено;
    КонецПопытки;        
    
    тзВыписка =  Новый ТаблицаЗначений;
    тзВыписка.Колонки.Добавить("НомерПП");
    тзВыписка.Колонки.Добавить("Приход");
    тзВыписка.Колонки.Добавить("Расход");
    тзВыписка.Колонки.Добавить("ОКПО");
    тзВыписка.Колонки.Добавить("Контрагент");
    тзВыписка.Колонки.Добавить("МФО");
    тзВыписка.Колонки.Добавить("РСчет");
    тзВыписка.Колонки.Добавить("Содержание");
    
    КолвоЗаписей = 0;
    Пока ФайлXML.Прочитать() Цикл
        ИмяТега = ФайлXML.Имя; 
        Если ИмяТега = "ROW" И ФайлXML.ТипУзла = ТипУзлаXML.НачалоЭлемента Тогда
            
            ДатаВыписки = ФайлXML.ПолучитьАтрибут("DOCUMENTDATE");  // 20081110
            // Проверка на дату выписки
            Если ДатаВыписки <> Формат(Параметры.ДатаДок,"ДФ=yyyyMMdd") И ДатаВыписки <> Формат(Параметры.ДатаДок,"ДФ=dd.MM.yyyy") Тогда
                Продолжить;
            КонецЕсли;    
            
            РСчетА = СокрЛП(ФайлXML.ПолучитьАтрибут("ACCOUNTNO"));
            РСчетБ = СокрЛП(ФайлXML.ПолучитьАтрибут("CORRACCOUNTNO"));
            
            Если РСчетБ = Параметры.РСчет Тогда // дебет
                НовСтрока = тзВыписка.Добавить();
                НовСтрока.Приход        = Число(ФайлXML.ПолучитьАтрибут("AMOUNT"))/100;
                НовСтрока.Расход        = 0;
                
                НовСтрока.РСчет            = СокрЛП(Формат(РСчетА,"ЧГ=0"));
                    
                //НовСтрока.ОКПО            = СокрЛП(Формат(ФайлXML.ПолучитьАтрибут("CORRIDENTIFYCODE"),"ЧГ=0"));
                //НовСтрока.МФО            = СокрЛП(Формат(ФайлXML.ПолучитьАтрибут("BANKID"),"ЧГ=0"));
                //НовСтрока.Контрагент    = СокрЛП(ФайлXML.ПолучитьАтрибут("CORRCONTRAGENTSNAME"));
                
            ИначеЕсли РСчетА = Параметры.РСчет Тогда // кредит    
                НовСтрока = тзВыписка.Добавить();
                НовСтрока.Приход        = 0;
                НовСтрока.Расход        = Число(ФайлXML.ПолучитьАтрибут("AMOUNT"))/100;
                
                НовСтрока.РСчет            = СокрЛП(Формат(РСчетБ,"ЧГ=0"));
                    
                //НовСтрока.ОКПО            = СокрЛП(Формат(ФайлXML.ПолучитьАтрибут("CORRIDENTIFYCODE"),"ЧГ=0"));
                //НовСтрока.МФО            = СокрЛП(Формат(ФайлXML.ПолучитьАтрибут("CORRBANKID"),"ЧГ=0"));
                //НовСтрока.Контрагент    = СокрЛП(ФайлXML.ПолучитьАтрибут("CORRSNAME"));
            Иначе
                Продолжить;
            КонецЕсли;    
            
            НовСтрока.ОКПО            = СокрЛП(Формат(ФайлXML.ПолучитьАтрибут("CORRIDENTIFYCODE"),"ЧГ=0"));
            НовСтрока.МФО            = СокрЛП(Формат(ФайлXML.ПолучитьАтрибут("CORRBANKID"),"ЧГ=0"));
            НовСтрока.Контрагент    = СокрЛП(ФайлXML.ПолучитьАтрибут("CORRSNAME"));
            
                
            НовСтрока.Содержание     = СокрЛП(ФайлXML.ПолучитьАтрибут("DETAILSOFPAYMENT"));
            НовСтрока.НомерПП         = СокрЛП(ФайлXML.ПолучитьАтрибут("DOCUMENTNO"));
            
            КолвоЗаписей = КолвоЗаписей + 1;
            
        Иначе
            Продолжить;    
        КонецЕсли;    
        
    КонецЦикла;      
    
    
    Если НЕ тзВыписка.Количество() И КолвоЗаписей > 0 Тогда
        Предупреждение("В текущем файле нет платежей с данной датой выписки и расчетным счетом!");
    КонецЕсли;
    
    ФайлXML.Закрыть();
    
    Возврат тзВыписка;

с мисты

С баша:
ххх: Леша сегодня назвал наших программистов 1С - "женская консультация"

ушло

Медок обновите до 119

c\Documents and Settings\All Users\Application Data\Medoc\Medoc\help\manuals
Структура файлов импорта таблиц (5-9) Додатка 4, ЕСВ (DBF).pdf

Значение Регистратора надо-бы поменять

Для Каждого НаборЗаписейРегистра из Движения Цикл
    НаборЗаписейРегистра.Прочитать();

    Для Каждого Запись из НаборЗаписейРегистра Цикл    

        // Чтение и модификация очередного движения.

    КонецЦикла;

КонецЦикла;

1. Первую проверку убираем (комментируем)
2. Вторая часть сохраняется (в части списания наличных партий)
3. После списания существ. партий остается некоторое количество (КоличествоНадоСписать). Вот его списываем без партии и без стоимости - уходим в минуса по количеству. потом эту ситуацию можно найти анализом регистра или тупым перепроведением расходных документов.

Или получать в ТЧ поле Штрихкод (левое соединение по номенклатуре) или отдельно заполнять ТЧ с отбором в запросе

Пример отбора по полю ТМЦ

тОтбор = ЭлементыФормы.тФил.ОтборСтрок;
    Если тОтбор.Найти("ТМЦ") = Неопределено Тогда тОтбор.Добавить("ТМЦ");
    КонецЕсли;
    тОтбор["ТМЦ"].Значение = текТМЦ;
    тОтбор["ТМЦ"].ВидСравнения  = ВидСравнения.Равно;
    тОтбор["ТМЦ"].Использование = Истина;

Для этого нужно чтобы поле Штрихкод было в ТЧ (точне наличиеШтрихкода=1/0)

что есть Товары ?
Если ТаблПоле проще установить отбор чем удалять.

Для каждого пользователя своя роль

ПоказатьУровеньГруппировокСтрок(<Уровень>)

Объект "Периодический"

БРЕД....

Да. Добавить в запрос Функция Мин = Сумма(Минуты)

может проще использовать СводныеИтоги(<Измерение1>,<Измерение2>...)

Читаем - ОбходРезультатаЗапроса.ПоГруппировкам а заодно Запрос.Итоги

Итак:
1.Запрос надо будет формировать динамически (по-большому счету) ;
секции запроса через Объединить
количество секций равно количеству тарифов.
Приблизительно так: (для двух тарифов)

выбрать
     // здесь лирика
     (&КонецТарифа1 - выбрать когда НачалоРаботы<&НачалоТарифа1 тогда  &НачалоТарифа1 иначе НачалоРаботы конец ) как ПродолжительностьРаботы
из документа
где док.НачалоРаботы<&Конецтарифа1 или конецРаботы>&началоТарифа1     

объединить

выбрать
     // здесь лирика
     (&КонецТарифа2 - выбрать когда НачалоРаботы<&НачалоТарифа2 тогда  &НачалоТарифа2 иначе НачалоРаботы конец ) как ПродолжительностьРаботы
из документа
где док.НачалоРаботы<&Конецтарифа2 или конецРаботы>&началоТарифа2

и т.д . до упора

итог:
выбираем из регистра все тарифы
проходя по выборке, строим текст запроса, устанавливаем параметры
выполняем запрос, получаем И-строк (по количеству тарифов)
если не надо И-строк - группируем инфо в запросе

Прямой запрос по проводкам (для примера (по 3 субконто)):

    ВсеСубконто = ""; ВсСкД=""; ВсСкК="";
    Для ъ = 1 По 3 Цикл
        ВсСкД=ВсСкД+",DTSC"+(ъ-1)+" [СубкД"+ъ+" :Subconto],VDTSC"+(ъ-1)+" СубкД"+ъ+"_вид";
        ВсСкК=ВсСкК+",KTSC"+(ъ-1)+" [СубкК"+ъ+" :Subconto],VKTSC"+(ъ-1)+" СубкК"+ъ+"_вид";
    КонецЦикла;
    ВсеСубконто = ВсСкД+ВсСкК;

    запрос = БазаД.НовыйЗапрос();        
    текст="
    |select date ДатаПр,sum [Сум :Number.19.2], amount [Кво :Number.19.3], accdtid [СчД :Счет.Основной], accktid [СчК :Счет.Основной]"+ВсеСубконто+"
    |from __1s_entry
    |where Date BETWEEN @НачДата AND @КонДата     
    |and sp4373 = @OurFirm    
    |and accktid = @СчВД
    |and ktsc1 = @пВД" + УслДт +"
    |and amount<>0";    
    запрос.Подготовить(текст);

Прямой запрос к таблицам - там по-фигу какого типа и т.д

Удалить(1), потом в тестировани/исправление прибить левые ссылки
хотя полностью корректно не выйдет (да и по времени хз)

+100! Написать весь функционал работы с портом - это надо быть извращенцем
вк Scaner1C.dll (имя для поиска) - у меня на проходной.

Если ПРАВИЛЬНО внедрить - никуда от Вас не денуться

Чтобы запустить сразу процедурку Печать, надо ее вызвать в процедурке ПриОткрытии и после сего действа вызвать Возврат,установив перед этим СтатусВозврата в 0.

А та фигня,обозначенная кучей ???? - и есть параметр, который в ПРиОткрытии будет доступно как Форма.Параметр

Внешняя обработка с реквизитами Периода и кнопкой Выполнить.
Формируем запрос по документам с условиями, проходим по результату, пишем в рс

При открытии формы передаем список документов.
В форме документа - список будет в Форма.Параметр.
Далее Если Форма.параметр НеПустой - печатаем и СтатусВозврата(0); Возврат.
Недостаток - нужно переписывать модуль формы.
Можно через Формекс - ВыполнитьПроцедуру контекста