Есть документ Поступление автомобилей, у него есть реквизит Автомобиль. запросом отбираю все документы, делающие движения по регистру Остатки автомобилей, в которых есть данный автомобиль.Потом я эти документы пытаюсь перепровести, но проведение не получается, причем никаких ошибок не возникает

Код привожу ниже

Процедура ПриЗаписи(Отказ)
   дкФормаПриЗаписи(ЭтаФорма,Отказ);
   Если Не Отказ И ЭтотОбъект.Проведен Тогда
       ПерепроведениеДокументов();
   КонецЕсли;    
КонецПроцедуры

может без кода?)

Процедура ПерепроведениеДокументов() Экспорт
   
   Автомобиль = ЭтотОбъект.Автомобили.ВыгрузитьКолонку("Автомобиль");
   ДатаПоступления = ЭтотОбъект.Дата;
   
   //Отберем документы запросом, делающие движения по регистру Остатки автомобилей, включающие данный автомобиль
   Запрос = Новый Запрос;
   Запрос.УстановитьПараметр("Автомобиль", Автомобиль);
   Запрос.Текст = "ВЫБРАТЬ
                  |    ОстаткиАвтомобилей.Регистратор.Ссылка КАК Регистратор,
                  |    ОстаткиАвтомобилей.Регистратор.Дата КАК Дата,
                  |    ОстаткиАвтомобилей.Автомобиль КАК Автомобиль
                  |ИЗ
                  |    РегистрНакопления.ОстаткиАвтомобилей КАК ОстаткиАвтомобилей
                  |ГДЕ
                  |    ОстаткиАвтомобилей.Автомобиль В(&Автомобиль)";
   
   Выборка = Запрос.Выполнить().Выбрать();
   ДокументыДляПерепроведения = Новый Массив;
   Пока Выборка.Следующий() Цикл
       Если (Выборка.Дата > ДатаПоступления) Тогда
           ДокСсылка = Выборка.Регистратор.ПолучитьОбъект();
           ДокументыДляПерепроведения.Добавить(ДокСсылка);
       КонецЕсли;    
   КонецЦикла;    
   
   Попытка
       Для ид = 0 по ДокументыДляПерепроведения.Количество()-1 Цикл
           ДокументыДляПерепроведения[ид].Записать(РежимЗаписиДокумента.Проведение, РежимПроведенияДокумента.Неоперативный);
           Сообщить ("Документ " + ДокументыДляПерепроведения[ид] + " успешно перепроведен!");
       КонецЦикла;
   Исключение;
   КонецПопытки;
   
КонецПроцедуры

аааа, при записи перепроведение документов?

(0) "проведение не получается, причем никаких ошибок не возникает" - врешь. Нагло, бессовестно, с особым цинизмом
(1) НИНАДА!!!!

(4) Спасибо, сблевал.

что говорит отладчег?

я правильно понял, что автор при проведении одного документа хочет провести целую пачку?

(6)(7) зачем ты пишешь всякое?

(7)Рад, что Вам помог)

(10) всякое - это у Екстрима

(12) да у него вообще цирк

Сотри этот код, удали конфу, выключи комп, выкинь его нахрен.

(10) Гоняю, чтобы крылья тренировали.

+(14) а потом сформулируй задачу одним предложением на русском языке

(15) не взлетит ))

Первое:

   Пока Выборка.Следующий() Цикл
       Если (Выборка.Дата > ДатаПоступления) Тогда
           ДокСсылка = Выборка.Регистратор.ПолучитьОбъект();
           ДокументыДляПерепроведения.Добавить(ДокСсылка);
       КонецЕсли;    
   КонецЦикла;

Замени на:

   Пока Выборка.Следующий() Цикл
       Если (Выборка.Дата > ДатаПоступления) Тогда
           ДокументыДляПерепроведения.Добавить(Выборка.Регистратор);
       КонецЕсли;    
   КонецЦикла;

Второе:

   Попытка
       Для ид = 0 по ДокументыДляПерепроведения.Количество()-1 Цикл
           ДокументыДляПерепроведения[ид].Записать(РежимЗаписиДокумента.Проведение, РежимПроведенияДокумента.Неоперативный);
           Сообщить ("Документ " + ДокументыДляПерепроведения[ид] + " успешно перепроведен!");
       КонецЦикла;
   Исключение;
   КонецПопытки;

Замени на:
   Попытка
       Для ид = 0 по ДокументыДляПерепроведения.Количество()-1 Цикл
           НовДок = ДокументыДляПерепроведения[ид].ПолучитьОбъект();
           НовДок.Записать(РежимЗаписиДокумента.Проведение, РежимПроведенияДокумента.Неоперативный);
           Сообщить ("Документ " + ДокументыДляПерепроведения[ид] + " успешно перепроведен!");
       КонецЦикла;
   Исключение;
   КонецПопытки;


(19) С быдлокода все начинали.

(20) Это не повод его поддерживать. И у него в ДокументыДляПерепроведения и так объекты живут

(21) Ну он понял что надо работать с объектами, но не понял в каком моменте их получить.

(0)
Проверку на дату в условие запроса вставть

Попытку внутрь цикла перенеси и в исключении чего-нить напиши, чтоб видеть какой док не провелся

И главное задумайся, что будет когда два пользователя твои чудо-документы Поступление автомобилей откроют, из которых ты перепрведение кучи документов делаешь и просто Ок на форме нажмут, так что в твоей куче документов у них пересечение по автомобилю и по дате получится

(0) И научись пользоваться отладчиком. Половина вопросов отпадет.

(23) Попытку хоть куда ни засунь, она один хрен транзакцию откатит.

Cashtane БОЛЬШОЕ СПАСИБО за наведение на мысль (возможно мой вопрос изначально был и некорректен), потому что только совсем недавно начал писать в 1С. "Знатокам" с маленькой буквы типа  Wobland,Defender aka LINN,Deon,Undefined vs NULL скажу только одно: по Вашим быдлятским советам видно сразу какие вы реально "специалисты" и какой совет можете дать. Да я совсем недавно начал кодить в 1С, да возможно мо

(26) пример моего совета, пожалуйста

мой код никуда не годится, но каждый с чего-то начинал, и хотел бы я посмотреть реально на те "шедевры", которые вы пишете

(28) Докузнища могу сбросить

(28) первое, что под руку попалось: Отказ=-Источник.Проведен()+1;

(27)"Пожалуйста"? не льстите себе

(31) чо?

(28) Не бузи ) Книжки лучше почитай, слушай, что говорят и _думай_ )

и речь тут не о коде, а о подходе в основном

(34)подход у каждого свой. восприятие этого подхода у всех разное

(35) Когда рабочая база загнется из-за криво написанной обработки проведения, и когда бухгалтера и экономисты с вилами придут, тогда будет повод задуматься о подходе, оптимизации, стиле, общих принципах и восприятии всего этого.

(36)повод всегда есть.рад за вас, если вы все изменения сразу делаете на рабочей базе, лично я сначала снимаю с нее копию. и вот опять все упирается в ПОДХОД)))

(37) В копии тестировать - это хорошо.

(38)Да и не только тестировать

и вроде знает, что дятел, но воспитыванию не поддаётся. тяжёлый случай

Процедура ПерепроведениеДокументов() Экспорт
   
       

   Запрос = Новый Запрос;
   Запрос.УстановитьПараметр("Автомобиль", ЭтотОбъект.Автомобили.ВыгрузитьКолонку("Автомобиль"));
   Запрос.УстановитьПараметр("Дата",ЭтотОбъект.Дата);
   Запрос.Текст = "ВЫБРАТЬ
                  |    ОстаткиАвтомобилей.Регистратор.Ссылка КАК Регистратор,
                  |    ОстаткиАвтомобилей.Регистратор.Дата КАК Дата,
                  |    ОстаткиАвтомобилей.Автомобиль КАК Автомобиль
                  |ИЗ
                  |    РегистрНакопления.ОстаткиАвтомобилей КАК ОстаткиАвтомобилей
                  |ГДЕ
                  |    ОстаткиАвтомобилей.Автомобиль В(&Автомобиль)
                  |    И ОстаткиАвтомобилей.Регистратор.Дата>&Дата";
   
   Выборка = Запрос.Выполнить().Выбрать();
   
   Пока Выборка.Следующий() Цикл
           ДокСсылка = Выборка.Регистратор.ПолучитьОбъект();
           Попытка
           ДокСсылка.Записать(РежимЗаписиДокумента.Проведение, РежимПроведенияДокумента.Неоперативный);
        Сообщить ("Документ " + ДокСсылка + " успешно перепроведен!");
    Исключение
         Сообщить ("Не удалось провести " + ДокСсылка);
     КонецПопытки;
     
   КонецЦикла;    
   
   

КонецПроцедуры

Попробуй так лучше будет думаю

А так все норм все начинали с быдло-кода)

(26) >> видно сразу какие вы реально "специалисты" и какой совет можете дать

Вот так взять и просто обоsрать тех людей (коих тут реально мало), кто действительно является специалистами и дают на форуме нормальные советы.

крутые кодеры, давайте обсудим примеры крутого кода

(44)я не говорю про всех, только про некоторых отдельных "деятелей". не спорю, что здесь есть очень хорошие специалисты, которые дают хорошие советы, и их действительно мало. Не говорю за себя, что я что-то из себя представляю в 1С, но по крайней мере первый не грублю людям, которые мало пока разбираются в чем-то.
(40)вы бы себя лучше воспитывали в общении, судя по которому можно сказать, что дятел это больше про вас

(46) И кто ж тебя, пернатый, обидел? Мало разбираешься? Ну так сиди и изучай, вкюлчай моск. Выложил кусок гуано на общее обозрение - будь готов, что натыкают носом.

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

(47)вопрос не в том, что гуано- не гуано, вопрос в том, какое  право например ты и другие могут тут позволять себе называть людей "пернатыми", "дятлами" и т.д. Наверно, тебя так много тыкали носом в твое же "гуано", что ты теперь тут такой "смелый". Обычно грамотные, образованные люди не позволяют себе такого общения. Думаешь, вот ты сидишь на этом форуме 6 с лишним лет, и можешь так общаться, "пилот того самого самолета"

(48) Именно поэтому тебя и называют дятлом. За неадекватную реакцию. Это интернеты, тут тебе, такому красивому, но не сильно умному, никто ничем не обязан.
"Обычно грамотные, образованные люди не позволяют себе такого общения" - это тебе в детском саду рассказывали? Реальность несколько суровее :)

(48)"Реальный" ты наш, реальность портят как раз кучка таких как ты дерзких людей. а ты такой шибко умный, чтобы судить об уме других?:)

Defender aka LINN, спору нет все начинали с г-нокода, и ты думаю не исключение. Тебе самому не думаю чтобы нравилось когда тебе писали что-то типа "надо за такой код руки оторвать и в задницу обрубки засунуть". Так что прибери свои сравнения и выражения такие как в (19). Иначе есть повод тебя обсудить в другой ветке.

(51) Нет, мой код был идеален с самого начала :)
Есть повод - обсуждай, в чем проблема?

(50) А на мой взгляд, реальность портят люди, которые лезут в профессию не имея к этому ни способностей, ни знаний.

(52)Ну выложи пример своего "идеального" кода - пообсуждаем все вместе :) я вот например свое гуано выложил, мне не в па..лу было :)

(53):)что и требовалось доказать