Только похоже, что ОперацияДокумент, который равен Операция.ТекущийДокумент - не совсем то, что я имел в виду:

|Условие (Операция.Документ.Вид()<>"Перемещение");

Либо уже при обходе результатов запроса:

Если Операция.Документ.Вид()="Перемещение" Тогда
 Продолжить;
КонецЕсли;

Операция.Документ.Вид()<>"Перемещение"

Если нужен итог по колонке "Вес", то

Процедура ПередПар()
Парам = СоздатьОбъект("СписокЗначений");
Парам.ДобавитьЗначение(Итог("Вес"), "Вес");

1) Если "закрывать" Вы имеете в виду остатки - то не надо. По оборотным субконто остатков нет.
2) Опять же: для закрытия остатков оборотные субконто перебирать не надо. А вообще чтобы в бух. запросе получать итоги по оборотным субконто надо использовать метод Опции(<ВклЗабалансСуммы>,<ВклОборотСубкСуммы>).
И ещё момент: оборотные субконто желательно держать последними на тех счетах, где они есть. Иначе могут быть проблемы с закрытием счетов по тем "полноценным" суконто, которые по номерам после оборотных.

Перевірив на 289 конфігурації (демо із поставки). 703 в банківській випискі вибирається, документ проводиться. Правда без ПДВ (замовлень нема на 703).
Можливо у автора конфігурація все ж змінювалась.

Ну вот - считайте какие позиции.

год=Сред(ДатаСтр,1,4);

И так делее.

Ну если вообще, то вытащить из строки год, месяц, число и применить: ВашаДата = Дата(Год, Месяц,Число).
Синтаксис:
Дата(<Год>,<Месяц>,<Число>)
Назначение:
Преобразует переданные в качестве числовых параметров Год, Месяц, Число в значение типа 'Дата'. Год указывается 4-х значным числом (вместе с веком).
Возвращает значение типа 'Дата'.
Параметры:
<Год> - числовое выражение.
<Месяц> - числовое выражение.
<Число> - числовое выражение.

Если печатается на половину листа А4 после добавления столбца в табличной части накладной при масшабе "По ширине страницы" то, предположительно, Вы в таблице-шаблоне случайно задействовали пустые столбцы справа от собственно шаблона. Пробел вставили, например.
Теперь ячейка с этим пробелом является правой границей при печати с автомасштабом. Если так то надо удалить пустые столбцы в шаблоне. Правая граница области печати в таблице видна как пунктирная вертикальная линия.

Цитата из нового порядка заполнения налоговой "Реквізити заголовної частини податкової накладної вирівнюються по правій межі поля."
Налоговики могут признать недействительной накладную в которой, например, название или адрес не выровнены по правому краю. Поэтому я себе "выровнял". Да и стиль "шапки" подправил - а то просто бесит аляповатость внешнего вида такого важного документа (лицо фирмы). Выложил, может кому пригодится.
Внешняя форма нал. накл для Бухг. учёт для Украины (7.70.290)

ALS файл по метаданным. Редакция 2.2 от июля 2002.
Обработка MetAlsl161.ert
upload

Ясный пень. Но раз есть остатки - то были обороты. Может диверсант какой создал ручную операцию с датой до марта 2011. Ищите обороты.

Ищем период в котором были обороты сформировавшие непонятные остатки. Через расшифровку (двойной счелчок мышкой на сумме оборота) добираемся к проводкам и документам, породившим обороты.

(75*100 + 130*20 + 20*5) / (75+130+20) = 81.6

Я имел в виду вот это:

ТЗ  = СоздатьОбъект("ТаблицаЗначений");
    КолСтр=ТЗ.КоличествоСтрок();
    Если КолСтр>0 Тогда
        Для й=1 По КолСтр Цикл
             Сообщить(ТЗ.ПолучитьЗначение(й,"Сумма");
        КонецЦикла;

Иначе
Сообщить("Нет строк");
КонецЕсли;


Я имел в виду вот это:

ТЗ  = СоздатьОбъект("ТаблицаЗначений");
    КолСтр=ТЗ.КоличествоСтрок();
    Если КолСтр>0 Тогда
        Для й=1 По КолСтр Цикл
             Сообщить(ТЗ.ПолучитьЗначение(й,"Сумма");
        КонецЦикла;
    Иначе
         Сообщить("Нет строк");
    КонецЕсли;

Еще. Вы писали "нет пустых вообще, все заполнено". В то же время в обработке "Если ПустоеЗначение(Док.МестоХраненияВЭксплуатации) = 0".
Может есть таки пустые и документы не обрабатываются?
Если пустых нет то зачем условие? Уберите его.
Если есть условие для МестоХраненияВЭксплуатации, то почему нет для МестоХранения?

Режим Предприятие -> Справочник Виды затрат. Не должно быть кодов от 1000 до 1200.