800 0 (|DV=|v40^d.6/)/(if v40^f<>'******'then|DW=|v40^f.6 fi/)
999 0  if mfn=1 then 'Z=ппп' fi
101 0 'MRO='v101
50 0 'KAT='v50
16 8 MDL,'/K=/',v16
10 8 '/K=/',v10
11 8 '/K=/',v11
12 8 '/K=/',v12
27 8 '/K=/',(v27| |)
27 0 (|PRF=|v27,|%|d27/)
13 8 MDL,'/K=/',v13
15 8 MDL,'/K=/',v15
20 8 '/K=/',v20
21 0 "RG="v21
51 0 (|RD=|v51.8,|-|v51^c/)/(|RD=|v52.8,|-|v52^c/)
31 0 MHL,(if p(v31) then if v31:'^'then 'FRD='v31^b,v31^a/'DFR='v31^a,v31^b else 'FRD='v31 fi fi/)
40 8 MDL,'/K=/',v40
30 0 "K="v30/"K="v10," "v11," "v12
301 0 "RI="v30,/"RI="v10," "v11," "v12/(|RI=|v27/)
302 0 MHL,if v40^F:'******' then if p(v30) then "RB="v30 else "RB="v10," "v11," "v12 fi fi
303 0 "A="v10," "v11," "v12
304 0 MHL,if v40^F:'******' then "AB="v10," "v11," "v12 fi
40 0 MHL,(if v40^F='******' then |C=|v40^A fi,|%|D40,/)
40 0 MHL,(if v40^F='******' then |N=|d40^c,&unifor(|9|v40^C) fi,|%|D40,/)
40 0 MHL,(if v40^F='******' then |H=|v40^H,if a(v40^h)then|H=|v40^b fi fi,|%|D40,/)
1 0 '!'v21,v10,v11.6,v12.6
920 0 "V="v920,if a(v920) then "V=ST"d67,"V=RDR"n67 fi
50 0 MHL,"KAT="v50,if a(v50) then"KAT=Студент"d90 fi
54 0 (|DO=|v54.8,if s(v54^a,v54^b,v54^c)<>''then' ('v54^a|; |,v54^b,|-Восст.|d54^c,')'fi/)
22 0 MHL,"SB="v22
24 0 MHL,"SPB="v24
19 0 MHL,"IShZ="v19^f
26 0 MHL,(|JZ=|v26/)
25 0 MHL,"STR="v25,if a(v25) then if v920:'RDRU' then 'RU' fi
14 0 MHL,"PSP="v14
29 0 MHL,"NR="v29
15 0 MHL,"MR="v15,
90 0 MHL,"ST="v90^0"-",v90^a"-",v90^f
90 0 MHL,if p(v69) then "STD="v90^0"-",v90^a"-",v90^f else "STU="v90^0"-",v90^a"-",v90^f fi
90 0 MHL,if p(v54) and &unifor('Av54^c#1')=''then else if p(v90) then "FAK="v90^a/"KAFV="v90^d/"Napr="v90^n/"Spec="v90^c/"NUPL="v90^u/"GR="v90^e/"SEM="v90^f/"KNTR=1"d90^h/"FO="v90^o/"VO="v90^v/"IShZ="v90^j/if &unifor("Kkurs.mnu|"v90^f)<>''then'KURS=',&unifor("Kkurs.mnu|"v90^f) fi fi fi
90 0 MHL,if p(v54) and &unifor('Av54^c#1')=''then else if p(v90^u) and p(v90^f) then"UPS="v90^u,'-S'v90^f/"UPSS="v90^u,'-S'f(val(v90^f),2,0)/if &unifor("Kkurs.mnu|"v90^f)<>''then'UPK='v90^u'-K',&unifor("Kkurs.mnu|"v90^f) fi fi fi
90 0 MHL,if p(v54) and &unifor('Av54^c#1')=''then else if p(v90) and a(v90^u) and p(v90^f) then '?'v90^a,v90^n,v90^c,v90^v,v90^o,'-S'v90^f fi fi
69 0 MHL,if p(v54) and &unifor('Av54^c#1')=''then else (if p(v69^w) then|NDUN=|v69^w/if &unifor('Av90^f#1')<>''then 'DUNS='v69^w,'-S'&unifor('Av90^f#1')/'DUNSS='v69^w,'-S'f(val(v90^f),2,0)/if &unifor('Kkurs.mnu|'&unifor('Av90^f#1'))<>''then 'DUNK='v69^w'-K',&unifor('Kkurs.mnu|'&unifor('Av90^f#1')) fi fi fi,|%|d69/) fi