&uf('+7W100#'),&uf('+7W101#'),&uf('+7W102#'),
if p(g1000) then 
   if g111<>'' then g1000^t fi
   if p(g1000^i) AND g1000^i<>' '
   then &unifor('+7W100#'F((val(&unifor('30'))-val(g1000^e.4))/val(g1000^i),4,2)),
        &unifor('+7W101#'F((val(g1000^i)-val(g1000^i)/100*val(&unifor('G2.'G100))),0,2)),
        &uf('+7W101#'if &unifor('G2.'g101)='50' then &uf('G0.'g101) else F(val(g101),0,0) fi)
        &uf('+7W102#'if &unifor('G2.'G100)='00' then &unifor('30') else &unifor('G2.'G101) fi) 
      if g1000^i='1' then 
         ' - Событие отмечается ежегодно' else  
         if &unifor('G2.'G100)='00' then '<b> - Текущий год - юбилейный </b> ' else ' - До юбилея 'G102,
/*            if g102='' then '(нет данных)' fi  
            if g102*1.1<>'' then 
               if g102.1='1' then ' лет' else 
                  if g102*1.1 ='1' then ' год' else 
                     if '2 3 4 ':g102*1.1 then ' года' else ' лет' 
               fi fi fi 
            else    
               if g102 ='1' then ' год' else 
                  if '2 3 4 ':g102 then ' года' else ' лет' 
         fi fi fi fi," (интервал "g1000^i" лет)"
fi fi fi 
/*'<br>',