'{',,,,,,,,,
,,'{\colortbl;\red0\green0\blue0;\red0\green0\blue255;\red0\green255\blue255; 
\red0\green255\blue0;\red255\green0\blue255;\red255\green0\blue0;\red255\green255\blue0;\red255\green255\blue255;\red0\green0\blue128;\red0\green128\blue128;\red0\green128\blue0;\red128\green0\blue128;\red128\green0\blue0;\red128\green128\blue0; 
\red128\green128\blue128;\red192\green192\blue192;}',,,,,,,
if v1^W<>'' 
then 
'\trowd \trqc\trgaph108\trleft-108
\clbrdrt\brdrs\brdrw30
\clbrdrl\brdrs\brdrw30
\clbrdrb\brdrs\brdrw30
\clbrdrr\brdrs\brdrw30
\cellx675 
\pard \widctlpar\intbl {\qc \fs20 ',,&uf('S1A'),,,
'\cell }
\clbrdrt\brdrs\brdrw30
\clbrdrl\brdrs\brdrw30
\clbrdrb\brdrs\brdrw30
\clbrdrr\brdrs\brdrw30
\cellx5000 
\pard \widctlpar\intbl {\ql \fs20 ',,
ref(l('IDD=',v1^W),v3^A),,
'\cell }
\clbrdrt\brdrs\brdrw30
\clbrdrl\brdrs\brdrw30
\clbrdrb\brdrs\brdrw30
\clbrdrr\brdrs\brdrw30
\cellx5800 
\pard \widctlpar\intbl {\qc \fs20 ',,
ref(l('IDD=',v1^W),v4),,
'\cell }
\clbrdrt\brdrs\brdrw30
\clbrdrl\brdrs\brdrw30
\clbrdrb\brdrs\brdrw30
\clbrdrr\brdrs\brdrw30
\cellx6600 
\pard \widctlpar\intbl {\qc \fs20 ',
ref(l('IDD=',v1^W),v6),
'\cell }
\clbrdrt\brdrs\brdrw30
\clbrdrl\brdrs\brdrw30
\clbrdrb\brdrs\brdrw30
\clbrdrr\brdrs\brdrw30
\cellx7400 
\pard \widctlpar\intbl {\qc \fs20 ',
ref(l('IDD=',v1^W),v5),
'\cell }
\clbrdrt\brdrs\brdrw30
\clbrdrl\brdrs\brdrw30
\clbrdrb\brdrs\brdrw30
\clbrdrr\brdrs\brdrw30
\cellx8200 
\pard \widctlpar\intbl {\qc \fs20 ',
f(rsum(&uf('7',if &uf('IPRIVATE,DBN,')<>'' then &uf('IPRIVATE,DBN,') else 'IBIS' fi,,,',!IDD=',v1^W,'!,"1,"d920')),0,0),
'\cell }
\clbrdrt\brdrs\brdrw30
\clbrdrl\brdrs\brdrw30
\clbrdrb\brdrs\brdrw30
\clbrdrr\brdrs\brdrw30
\cellx9000 
\pard \widctlpar\intbl {\qc \fs20 ',
&uf('+7W10#'),,&uf('7',if &uf('IPRIVATE,DBN,')<>'' then &uf('IPRIVATE,DBN,') else 'IBIS' fi,,,,,',!IDD=',v1^W,'!,@KoDiscEkz'),,f(rsum((if p(G10) then G10|,| else break fi)),0,0),,
'\cell }
\clbrdrt\brdrs\brdrw30
\clbrdrl\brdrs\brdrw30
\clbrdrb\brdrs\brdrw30
\clbrdrr\brdrs\brdrw30
\cellx9800 
\pard \widctlpar\intbl {\qc \fs20 ',
/*-------------------студенты
&uf('+7W991#',
'^O',if v1^A<>' ' and v1^A<>'' then v1^A else v1^O fi,,
'^A',if v1^B<>' ' and v1^B<>'' then v1^B else v1^1 fi,,
'^N',v1^2,,
'^C',if v1^I<>' ' and v1^I<>'' then v1^I else v1^3 fi,,
'^F',if v1^D<>' ' and v1^D<>'' then v1^D else v1^4 fi,,
),,,,,,,,,,,
if &uf('IMAIN,AccessRdr,1')='1' then &uf('+7W60#',,f(rsum(&uf('7RDR,!IDD=',v1^W,'!,@lncRDR')),0,0)   ) else
                                     &uf('+7W60#',,f(rsum(&uf('7VUZ,!IDV=',v1^W,'!,@lncRDRVuz')),0,0)  ) fi,,,
G60,,,,,,,,,,,,,,,,,,,,,,,,
'\cell }\pard \widctlpar\intbl {\row }\pard \qc\widctlpar ' 
else 
/*------------заголовки-------------- 
  &uf('S0'),,,,,
  '\trowd \trqc\trgaph108\trleft-108
\clbrdrl\brdrs\brdrw30
\clbrdrr\brdrs\brdrw30
\cellx9800 \pard \widctlpar\intbl {\ql \fs20 \b ',,,
  if v1^I<>'' and v1^I<>' ' 
  then 
     ,'\cf11 ','Специальность ',v1^I,,'\cf ',,'\par ' 
  else 
    if v1^E<>'' and v1^E<>' ' 
    then 
       ,'\cf11 ','Цикл ',v1^E,,'\cf ',,'\par ' 
    else 
      if v1^D<>'' and v1^D<>' ' 
      then 
        ,'\cf11 ','Семестр ',v1^D ,,'\cf ',,'\par ' 
      else 
        if v1^C<>'' and v1^C<>' ' 
        then 
          ,'\cf11 ','Кафедра (чит.) ',v1^C,,'\cf ',,'\par ' 
        else 
          if v1^B<>'' and v1^B<>' ' 
          then 
            ,'\cf11 ','Факультет ',if &uf('Kfak.mnu!',v1^B)<>'' then &uf('Kfak.mnu!',v1^B) else V1^B fi,,'\cf ',,'\par ' ,
          else 
            if v1^A<>'' and v1^A<>' ' 
            then 
              ,'\cf11 ','Форма обучения ',if &uf('Kfo.mnu!',v1^A)<>'' then &uf('Kfo.mnu!',v1^A) else V1^A fi,,'\cf ',,'\par ' 
fi fi fi fi fi fi 
  '\cell }\pard \widctlpar\intbl {\row }\pard \qc\widctlpar ' 
fi,
'}'