В начало

Процедура Выполнить

 

// Процедура выполняет расчет по журналу Зарплата

 

Процедура Выполнить ()

   ЖрнЗарплатаыбратьПериод{ЖрнЗарплата.НачалоТекущегоПериода ());

   Пока ЖрнЗарплатаолучитьЗапись () > 0 Цикл

      Если Считать () = 1 Тогда

         Если ЖрнЗарплатаыполнитьРасчет ()= 0 Тогда

            // Прерываем процедуру, если расчет неудачен или

            // пользователь нажал ЕSС

            Прервать;

         КонецЕсли;

      КонецЕсли;

   КонецЦикла;

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