Сегодня, наконец, понял для чего в типовых такая конструкция.
Она отлично помогает выделить блок, который нужно выполнить, если на каком то участке блока необходимо выйти из блока, например:

Пока Истина Цикл

Произвольный_Код
// Результат нас устраивает?
// Если да
Прервать;

//Идем далее
Произвольный_Код2
// Результат нас устраивает?
// Если да
Прервать;

..............
Прервать;
КОнецЦикла;

Есть ли у кого-нибудь аргументы за и против использования такого подхода?

ты сам понял, что сказал?

Маразм...

(0)Ну тебе всамы раз в руки такой руль :)

Перейти ~Метка1;
....
~Метка1:

(3) Так это как раз более прямая альтернатива меткам.

А чем не нравится Если...Тогда?

(3) т.к. одним из минусов меток является то, что можно долго ломать голову над тем как же выполнение кода оказалось именно в этом месте - тут такого вопроса не возникает

для выделения блоков есть процедуры

(5) допустим есть 5 вариантов поиска элемента.
Писать:
Если НеНашли Тогда
ПроизвольныйКод
КонецЕсли
Если НеНашли Тогда
ПроизвольныйКод
КонецЕсли
Если НеНашли Тогда
ПроизвольныйКод
КонецЕсли
Если НеНашли Тогда
ПроизвольныйКод
КонецЕсли
Если НеНашли Тогда
ПроизвольныйКод
КонецЕсли

Это достаточно простой пример, в реальности он может быть куда сложнее.

(7) Согласен. Этим подходом и пользуюсь, просто сегодня понял, зачем в типовых делают однопроходный цикл вида - Пока Истина Цикл, чтобы выйти из него на произвольном участке кода.

Господи, Иисусе! (с) South park

Обычно в таких случаях я пишу внешнюю функцию, внутри которой проверяю значение, а функция уже возвращает "Удовлетворяет или не удовлетворяет". И если говорить об удобстве разбора кода, то мой вариант также претендует на удобство и красоту. Например:
...
Если ПроверитьСоответствиеЗначенияЗаданномуУсловию(ТекЗначение) Тогда
 //произвольный код
КонецЕсли
...
КонецПроцедуры

Функция ПроверитьСоответствиеЗначенияЗаданномуУсловию(Значение)
 Если Значение=1 Тогда
   Возврат Истина;
 ИначеЕсли Значение=2 Тогда
   Возврат Истина;
 ИначеЕсли Значение=3 Тогда
   Возврат Ложь;
КонецФункции

(10) Господи и SuSE! (про внедренный таки линупс на рабочих станциях)

(9) Да они просто новый набор прогеров понабрали, а те кодить нормально не умеют.

Ну да, классно. Запустил юзверя с именем "ДятелОповещатель" и при запуске поставил обработку с этим циклом, в котором задал условие БоссОткрылБазу. Ждем босса - цикл крутится. Босс зашел в базу - всем письмо с текстом "Атас! Начальство на месте" и выход из цикла.

(0)как глубоко )))

(0) Бред, такая конструкция нужна для других целей.

(0)нужно ещё обсосать компиляцию интерпретацию и не помню где забыл как с этой точки зрения называется платформа
и посаться обязательно

Уф, минут 5 смотрел и не вдуплял, пока не увидел, что "Пока Истина Цикл" входит в код =)

(16) для каких?

(19) цикл с заранее неизвестным количеством итераций. хотя его все равно лучше заменить на
Пока НужноПродолжать Цикл...

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

тру проги пишут по НЕ нужнопродолжать цикл

(22) бухаете?

Стаж 2 г 7 месяцев - долго же до тебя доходило... :-(

(0) нормальная конструкция, да простит меня NS ;)...

О goto ещё не вспоминали? :-)

(0) Блок кода - помогает видеть. А вот условие, по которому выходят из цикла, - его придётся поискать. Причём опытный кодер всегда сумеет запрятать это условие куда поглубже и сделать его максимально неудобочитаемым :-)

А так - конструкция как конструкция. Если возникает потребность именно в ней - используй. Если можно обойтись другими - лучше использовать другие.

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

(0),(29) :))

ФлагПродолженияРаботы = Истина;
Пока ФлагПродолженияРаботы Цикл
.....
  Если ОченьХитроЗапрятанноеУсловие Тогда
     ФлагПродолженияРаботы = Ложь;
     Продолжить;
  КонецЕсли;

КонецЦикла;

(28) О чём и речь - рядом с опытным кодером обфускаторы нервно курят за кулисами :-)

У меня где-то в коде есть:
Пока НЕ "Хлебом единым" = "жив человек" Цикл
О чем думал когда писал не помню, но уже исправлять не буду.

(30) метко

(30)Поклонник Дудинцева?

(0) ещё пойми следущее, что


Пока Условие = Истина Цикл

конецЦикла;

идёт две операции, поэтому пищут просто

Пока Условие Цикл

(30) а у меня

Пока (2 * b) OR NOT (2 * b) Цикл

пришлось даже в глобальнике писать
Перем b Экспорт;

(34) "долгое" логическое выражение =)

а кто вот так пишет _ТабЗнач?

(0) А матчасть почитать не пробовал? Таким образом люди реализуют do..while , которого нет в 1с. То бишь когда нужно условное выражение проверять в конце каждой итерации, а не в начале
http://phpclub.ru/manrus/cont/do.while.html

(37) тс... автор познает основы программирования, не взрывайте ему моск не1с-ными вещами )

(27) ага, именно.
(28) а в чем отличие от (0) ? наличием флага?
(37)(38) знаю я мат часть, знаю.

простов 1С нет цикла с постусловием

Чё вы набросились на автора? Он вам ничего не предлагает. Человек просто озадачился однажды, а теперь наконец понял, почему в типовых конфигурациях код выглядит так, а не иначе.

(40) +1 вот и весь секрет

(40) да, его очень не хватает иногда

такой код очень легко уйдет в бесконечный.

я тоже так пишу, вот вариант

&НаКлиенте
Функция ДанныеФормыДеревоПолучитьУровеньЭлемента(ДФЭлементДерева)
   
   Если ДФЭлементДерева = Неопределено Тогда
       Возврат Неопределено;
   КонецЕсли;
   
   Уровень = 0;
   
   ДФЭлементДереваПотомок = ДФЭлементДерева;
   Пока Истина Цикл
       ДФЭлементДереваРодитель = ДФЭлементДереваПотомок.ПолучитьРодителя();
       Если ДФЭлементДереваРодитель = Неопределено Тогда
           Прервать;
       Иначе
           Уровень = Уровень + 1;
       КонецЕсли;
       ДФЭлементДереваПотомок = ДФЭлементДереваРодитель;
   КонецЦикла;
   
   Возврат Уровень;
   
КонецФункции

работает без всякого ухода.

в 8.2. для деревоколлекця нет метода Урувень(), увы

(44) Любой нетривиальный цикл имеет шанс уйти в бесконечность.

(44) надо очень сильно постараться...

(0) такой код пишут люди, у которых руки растут из жопы пальцами внутрь

о, наконец-то гений программирования в ветку заглянул ;)...

(47) и стараться не надо. Число итераций должно быть всегда жестко определено, иначе условия выхода из цикла может не сработать и цикл будет бесконечным.

(50) хм, а можно пример?...

(51) запросто. Конкретный пример - создаю pdf-файл через отправку табличного документа на виртуальный pdf-принтер - ком-объект. Команда Напечатать() отправилась, код 1С шагнул в следующую строку, а файл еще создается.
В цикле проверяем размер файла(что это не пустой файл), если размер больше 1кб - то Прервать; Но Если по каким-то причинам файл так и не создался, то цикл будет крутится бесконечно. Поэтому ставится счетчик итераций ~10000 и внутри них проверяется наличие заполненного файла

+ код
ИмяФайла = ПОлучитьИмяФайла(ЭлементСписка.Значение);
               Файл = Новый ТекстовыйДокумент;
               Файл.Записать(ИмяФайла);
               Принтер = Новый ComObject("Bullzip.PDFPrinterSettings");
               Принтер.SetValue("output", ИмяФайла);
               Принтер.SetValue("ShowSaveAS", "never");
               Принтер.SetValue("ShowProgress", "no");
               Принтер.SetValue("ShowProgressFinished", "no");
               Принтер.SetValue("ShowSettings", "never");
               Принтер.SetValue("ShowPDF", "no");
               Принтер.SetValue("ConfirmOverwrite","no");
               Принтер.SetValue("OwnerPassword","");
               Принтер.SetValue("Permissions",61636);
               Принтер.WriteSettings();
               
               ТабДокумент.Автомасштаб=Истина;    
               ТабДокумент.ИмяПринтера = "Bullzip PDF Printer";
               ТабДокумент.Напечатать();
               Счетчик = 1;
               ФайлПДФ = Новый Файл(имяФайла);
               Пока Счетчик <> 100000 Цикл
                   ОбработкаПрерыванияПользователя();
                   РазмерФайла = ФайлПДФ.Размер() ;
                   Если  РазмерФайла > 100  Тогда
                       Прервать;
                   Конецесли;
                   Счетчик = Счетчик + 1;
               КонецЦикла;    

Если после 100000 итераций размер файла так и не увеличился - значит, он не увеличится уже никогда

(52) такой - тоже

(53) а счетчик итераций это не условие выхода из цикла? и как это портит конструкцию в (0)?...

(55) чукча писатель? Если бы я писал цикл по (0), мне пришлось бы писать

Пока ИСТИНА Цикл
                   РазмерФайла = ФайлПДФ.Размер() ;
                   Если  РазмерФайла > 100  Тогда
                       Прервать;
                   Конецесли;
               КонецЦикла;    


Или ты совсем не видишь разницы?

(56) тебе конструкция do..while вообще не знакома?...

+ можно, конечно, написать
Счетчик = 1;
Пока ИСТИНА Цикл
                   РазмерФайла = ФайлПДФ.Размер() ;
                   Если  РазмерФайла > 100  Тогда
                       Прервать;
                   Конецесли;
Если Счетчик = 100000 Тогда
Прервать;
КОнецЕсли;
Счетчик = Счетчик + 1;
               КонецЦикла;  

Но читабельность такого кода уменьшается в разы

а можно еще мануал почитать
http://www.biopdf.com/guide/dotnet/chm/html/M_bioPDF_PdfWriter_PdfUtil_PrintFile_2_f3570541.htm

(57) это-то причем здесь?)

(60) это при том что ты написал в (58) ;)...

(61) блин, не тупи же! Твой оператор - это цикл с постусловием, он к сабжу не имеет отношения, в сабже цикл с предусловием:
while <условие> do
begin  
 <тело цикла>
end;

Перестань уже позориться своим непрофессионализмом

(62) Стимка, жжошь! ;)
ты по=моему вообще не понимаешь о чем речь ;)...

(63) куда мне до тебя, о гуру

(64) так а что ты хрень то какую-то несешь ;) тебе русским по белому намекают, что вся суть конструкции (0) в условии выхода из цикла. но ты почему-то напрочь этого не понимаешь. то ли дурака включил, то ли не включал ;)...

(30)(34) Ненавижу таких юмористов... руки таким надо отрывать.

(14)Скорее всего проц загонишь, лучше обработкой ожидания такое делать.

(0) Если религия (корпоративная или личная) не позволяет юзать гоуту, а юзать надо, то самое оно.

(4) Альтернатива кривая - попробуй выйти из вложенного цикла.

можно сделать два условия проверки =)


Пока Истина Цикл

  Если УсловиеОстановаИстина Тогда
     Прервать;
  КонецЕсли;
КонецЦикла;

(0) О, прикольно! Сразу не понял смысла, но потом понял. Тоже буду использовать такую идею.

(69+) Не удивлюсь, если выяснится, что подобная (0) хрень генерируется автоматически обработкой-"препроцессором", компилирующим исходный код с гоуту в код без оператора, попавшего в опалу корпоративного стандарта.

Кстати, т.к. в 7.7 типа "Булево" не было, встречал такую конструкцию(и сам потом использовал):

Пока 1=1 Цикл
....
....
КонецЦикла;

Использую:
//
Пока Истина Цикл
....
Если <Условие> Тогда
прервать;
КонецЕсли;
КонецЦикла

использую, когда условие повторного повторения (вхождение в цикл) должно проверяться в конце алгоритма самого цикла. Это обеспечит их выполнения хотя бы раз.

В паскале были конструкции "While do..." и "reaped until", вот второй конструкции у 1С нету. Её заменяю "Пока Истина Цикл
...."

заменить можно, но наверное гемора больше. Пришлось бы, наверное, указывать булевую переменную, типа "ПрошлоРазЦикл".

(74)


Условие = Истина

Пока Условие Цикл

 Условие = (условие выхода из цикла);
КонецЦикла;


Велосипедописатели

Ну не сделали в 1С цикл с условием в конце - видимо - не умеют.
"Бесконечный" цикл используется, если хочется выполнить повторение кода с начала при неудаче на каком-то участке кода, а также для "корректного" выхода из ситуации, когда код выполняться не может.