'Услуга -- Кол-во -- Сумма'/
&uf('+7'),
&uf('+7W10#0'),
(if p(v62) then if (v62^b='') or (v62^d='') or (v62^e='') then &uf('+7W10#1') fi,v62^b,' -- ',v62^d,' -- ',v62^e fi/),
/*,'------',/
if (g10='0') then
 &uf('+7W100#',(v62/)),
 /*&uf('+7R100'),/
 /*,'------',/
 &uf('+7T100'),/
 /*,'------',/
 /*&uf('+7R100'),
 ,'------',/
 'Итоги: ',/
 'Услуга -- Кол-во -- Сумма'/
 &uf('+7W200#0'),/
 &uf('+7W300#',&uf('Ag100^d#1')),/,
 &uf('+7W301#',&uf('Ag100^e#1')),/,
 (if p(g100) then
   &uf('+7W400#',&uf('Ag100#',F(val(&uf('+90'))+1,0,0))),
 /*  'Следующее повторение: '
 /*  &uf('Ag400#1'),/
  if (&uf('Ag200#1')='1') then
   &uf('+7W300#',g100^d),
   &uf('+7W301#',g100^e),
   &uf('+7W200#0'),
  fi,
   if (&uf('Ag400^b#1')=g100^b) then
    &uf('+7W300#',F(val(&uf('Ag300#1'))+val(&uf('Ag400^d#1')),0,0))
    &uf('+7W301#',F(val(&uf('Ag301#1'))+val(&uf('Ag400^e#1')),0,0))
   else
    g100^b,' -- ',&uf('Ag300#1'),' -- ',&uf('Ag301#1'),&uf('+7W200#1')/
   fi,
 fi/),
else
 #,'Нарушена структура поля 62: не во всех повторениях поля заполнены подполя ^b, ^d, ^e',
fi,
&uf('+7')