Приветствую, не получается корректно создать нужное кол-во документов по условиям, логика какая: Читаем текстовый файл, находим строку "-----" открываем документ разносим в новом документе по реквизитам данные, после читаем далее, находим "_____" записываем документ, а у меня получается, то очень много документов, то 1 документ создается правильно, а все остальные(последующие) со штатными ДатаДок и НомерДок
Код для наглядности




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

Ткните носом, что я делаю не так)

(1)         Если Найти(ТекСтр, "----------") <> 1 Тогда

это что за хрень? ТекСтр - это число, откуда в нем могут возникнуть черточки?

ты не записываешь ни один документ.

то есть наоборот

(4) Наоборот я записываю 1 документ, я понял что косяк в этом  Если Найти(ТекСтр, "----------") <> 1 Тогда, щас буду копаться

1. Лучше использовать "Т.ВыбратьСтроки" и "Пока Т.ПолучитьСтроку()" вместо цикла по счетчику.
2. Если используешь цикл по счетчику строк ТЗ, то потом обращаться к нужной строке можно двумя способами - или Т.ПолучитьСтрокуПоНомеру(<Строка>), или обращаться к каждому реквизиту через Т.ПолучитьЗначение(<Строка>,<Колонка>)
А у тебя хрень какая-то.

(6) (2) Этот вопрос решил)

КодикВырвиГлазик :)))

Если Стр <> "----------" Тогда
будет работать примерно в 10 раз быстрее

Многоэтажные длинные если намного ухудшают читабельность и понимаемость кода

(0) ДокМарк = СоздатьОбъект("Документ.Маркировка"); - создаём один документ
Счётчик цикла А=1, а двигаешься по файлу ТекСтр
Потом, возможно, если встретишь "-----", то запишешь документ.
Только ТекСтр - счётчик и там число, а не строка

Ты точно понимаешь что делает этот кусок кода?

(9) лучше Лев(Стр,5) = "-----", т.к. в файле может быть переменное кол-во символов "-"