'</>',
/* Поступление за текущий месяц (по сопроводительным документам)
/* g2 - очное
/* g3 - заочное
/* g4 - вечернее
/* v991^A - факультет
&uf('+7W1#'),,&uf('+7W2#'),,&uf('+7W3#'),,
&uf('+7W1#',&uf('+3SRDR,1000,!FO=Д/О',,'$!,mfn/')  ),,,,
&uf('+7W2#',f(rsum((if p(g1) then '1,' fi)),0,0) ),,
&uf('+7W1#',&uf('+3SRDR,1000,!FO=З/О',,'$!,mfn/')  ),,,,
&uf('+7W3#',f(rsum((if p(g1) then '1,' fi)),0,0) ),,
&uf('+7W1#',&uf('+3SRDR,1000,!FO=В/О',,'$!,mfn/')  ),,,,
&uf('+7W4#',f(rsum((if p(g1) then '1,' fi)),0,0) ),,
&uf('+7W10#',,,,,if &uf('IPRIVATE,DBN,IBIS')<>'' then &unifor('IPRIVATE,DBN,IBIS') else 'IBIS' fi ),,,,
&uf('+7W20#',g10),,
&uf('+7W21#',&uf('IMAIN,DbNameForKKO,')  ),,,,if g21:'.' then else &uf('+7W21#',g21,'.mnu') fi,,,
if g21<>'' then &uf('+7U20#',,(&uf('+5T',,g21,,)/) ),,,&uf('+7G20')  fi,,,,,
/*-------учебников по всему фонду в g21
&uf('+7W21#',
f(rsum(  (if p(g20) then   &uf('+3S',g20,,',0,?"!I=$"?,mfn'),','  fi/)  ),0,0) ,,
),,,,,,,,,,,,,,,,,,,,,,,,,
/*if s(v991^A,v991^B)='' 
/*then 
   'Учебников по БД ',(g20+|, |),':   <br>',,,,
   'Всего: <b>',,g21,,'</b>',,
   '<br> В осеннее полугодие: <b>',,f(rsum(  (if p(g20) then   &uf('+3S',g20,,',0,?"!0=$"?,mfn'),','  fi/)  ),0,0) ,,'</b>',,
   '<br> В весеннее полугодие: <b>',,f(rsum(  (if p(g20) then   &uf('+3S',g20,,',0,?"!9=$"?,mfn'),','  fi/)  ),0,0) ,,'</b>',,
   '<br> Дисциплин по БД VUZ: <b>',,,,&uf('+3SVUZ',,,',0,?"DISCN=$"?,mfn'),,,'</b>',,,'<br><br>',
/*,,,,,,,,,,
'<table border=1>',
'<tr>',
'<td align=center colspan=10 bgcolor="#d4d4d4">Всего студентов по форме обучения </td>',,,
'</tr>',
'<tr>',,
'<td>Очное</td><td>Заочное',,'</td><td>Вечернее</td>',,
'</tr>',
'<td>',,g2,'&nbsp </td><td>',g3,' &nbsp',,'</td><td>',g4,' &nbsp</td>',,
'</tr>',





if v991^A<>'' 
then 
/*------------------- факультет - в g10 имя БД каталога
&uf('+7W1#'),,&uf('+7W2#'),,&uf('+7W3#'),,
&uf('+7W11#',&uf('+3S',g10,,',1000,!"FAK=',,,v991^A,,,,'$"!,(|^A|v691^A,,|^I|v691^I/)/')  ),,
&uf('+7W12#',,(if p(g11) then if &uf('+97',g11^A)=&uf('+97',&uf('Av991^A#1')) then g11^I fi fi/) ),,
&uf('+7G12'),,
&uf('+7W1#',,,f(rsum((if p(g12) then '1,' fi )),0,0) ),,,
/*&uf('+7W1#',,,&uf('+3J',,g10,,',DISC=')  ),,,
&uf('+7W2#',,,&uf('+3S',g10,,',0,!FAK=',,,v991^A,,,,'$!,')  ),,,
&uf('+7W3#',,,&uf('+3SRDR',,,',0,!FAK=',,,v991^A,,,,'$!,')  ),,,
   '<tr>',
   '<td align=center colspan=6 bgcolor="#d4d4d4" >&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbspПо факультету ',,v991^A,,,' в БД каталога ',,g10,,' / БД RDR',,,,'&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp',,,,,
   '</td>',,,
   '</tr>',
   '<tr>',,
   '<td>Дисциплин</td><td>Учебников',,'</td><td>Студентов</td>',,
   '</tr>',
   '<td>',,g1,'&nbsp </td><td>',g2,' &nbsp',,'</td><td>',g3,' &nbsp</td>',,
   '</tr>',
fi/

if v991^B<>'' 
then 
/*--------------------специальность в g10 имя БД каталога
&uf('+7W1#'),,&uf('+7W2#'),,&uf('+7W3#'),,
&uf('+7W11#',&uf('+3S',g10,,',1000,!"SPEC=',,,v991^B,,,,'$"!,(|^C|v691^C,,|^I|v691^I/)/')  ),,
&uf('+7W12#',,(if p(g11) then if &uf('+97',g11^C)=&uf('+97',&uf('Av991^B#1')) then g11^I fi fi/) ),,
&uf('+7G12'),,
&uf('+7W1#',,,f(rsum((if p(g12) then '1,' fi )),0,0) ),,,
/*&uf('+7W1#',,,&uf('+3S',g10,,',0,!"SPEC=',,,v991^B,,,,'$" (F) "DISC=',,,'$"!,')  ),,,
&uf('+7W2#',,,&uf('+3S',g10,,',0,!SPEC=',,,v991^B,,,,'$!,')  ),,,
&uf('+7W3#',,,&uf('+3SRDR',,,',0,!SPEC=',,,v991^B,,,,'$!,')  ),,,
   '<tr>',
   '<td align=center colspan=6 bgcolor="#d4d4d4" >&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbspПо специальности ',,v991^B,,,' в БД каталога ',,g10,,' / БД RDR',,,,,'&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp',,,,,
   '</td>',,,
   '</tr>',
   '<tr>',,
   '<td>Дисциплин</td><td>Учебников',,'</td><td>Студентов</td>',,
   '</tr>',
   '<td>',,g1,'&nbsp </td><td>',g2,' &nbsp',,'</td><td>',g3,' &nbsp</td>',,
   '</tr>',
fi,,,,,,,,,,,,,

'</table>',