/* 991 Отбор O A B H F C
/* 991 заголовки K L M N P
/*			Загл	Отбор
/* A форма обучения	K	O
/* B факультет		L	A
/* C кафедра чит.	M	B
/*   кафедра вып.		H
/* D семестр		N	F
/* E цикл		P	
/* H Направление		1
/* I специальность	Q	C
/*
if v920: 'VUZ' 
then 
  &uf('+7W8#'),
  (if p(v69) 
   then 
if &uf('Av991^O#1')='' or &uf('Av991^O#1')<>'' and &uf('+97',&uf('Av68^O#1'))=s(&uf('+97',&uf('Av991^O#1'))) then 
if &uf('Av991^A#1')='' or &uf('Av991^A#1')<>'' and &uf('+97',&uf('Av68^A#1'))=s(&uf('+97',&uf('Av991^A#1'))) then 
if &uf('Av991^F#1')='' or &uf('Av991^F#1')<>'' and val(&uf('Av991^F#1'))=val(&uf('Av68^F#1')) then 
if &uf('Av991^B#1')='' or &uf('Av991^B#1')<>'' and &uf('+97',v69^B)=s(&uf('+97',&uf('Av991^B#1')))  then 
if &uf('Av991^H#1')='' or &uf('Av991^H#1')<>'' and &uf('+97',&uf('Av68^H#1'))=s(&uf('+97',&uf('Av991^H#1'))) then 
if &uf('Av991^1#1')='' or &uf('Av991^1#1')<>'' and &uf('+97',&uf('Av68^N#1'))=s(&uf('+97',&uf('Av991^1#1'))) then 
if &uf('Av991^C#1')='' or &uf('Av991^C#1')<>'' and &uf('+97',&uf('Av68^C#1'))=s(&uf('+97',&uf('Av991^C#1'))) then ,,,,,,,,,,,,,,,,,,,,,,,,,
     &uf('+7W7#','^A',if &uf('Av991^K#1')<>'' then &uf('Av68^O#1'), else ' ' fi,),
     &uf('+7U8#',&uf('AG7#1')),,,,,,,,,,
     &uf('+7W7#',,&uf('AG7#1'),'^B',if &uf('Av991^L#1')<>'' then &uf('Av68^A#1'), else ' ' fi,),
     &uf('+7U8#',&uf('AG7#1')),,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
     &uf('+7W7#',,&uf('AG7#1'),'^C',if &uf('Av991^M#1')<>'' then v69^B, else ' ' fi,),
     &uf('+7U8#',&uf('AG7#1')),,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
     &uf('+7W7#',,&uf('AG7#1'),'^D',if &uf('Av991^N#1')<>'' then f(val(&uf('Av68^F#1')),2,0), else ' ' fi,),
     &uf('+7U8#',&uf('AG7#1')),,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
     &uf('+7W7#',,&uf('AG7#1'),,'^E',if &uf('Av991^P#1')<>'' then ref(l(|IDD=|v69^D),v4) fi,,,,),,
     &uf('+7U8#',&uf('AG7#1')),,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
     &uf('+7W7#',,&uf('AG7#1'),,'^I',if &uf('Av991^Q#1')<>'' then &uf('Av68^C#1') else ' ' fi,,,,),
     &uf('+7U8#',&uf('AG7#1')),,,,,,,,,,,,,,,,,,,,,,,,,,,,,
     &uf('+7W7#',&uf('AG7#1'),,,'^V',ref(l('IDD=',v69^D),v3^A),,,'^W',v69^D,
                     '^O',&uf('Av991^O#1'),,
                     '^1',&uf('Av991^A#1'),,
                     '^2',&uf('Av991^1#1'),,
                     '^3',&uf('Av991^C#1'),,
                     '^4',&uf('Av991^F#1'),,
        ),,,
     &uf('+7U8#',&uf('AG7#1')),,,,,,,,,,
fi fi fi fi fi fi fi,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
   fi/),,,
fi,
  (G8/)