'>',
if &uf('IRequest,MaskMrg,')<>'*' and
(rsum((if p(v51) then if v51.4:&uf('30') and v51^c:&uf('IRequest,MaskMrg,') then '1;' fi fi))>0 or
rsum((if p(v52) then if v52.4:&uf('30') and v52^c:&uf('IRequest,MaskMrg,') then '1;' fi fi))>0)
or s(v51.4|+|,v52.4|+|):&uf('30') and &uf('IRequest,MaskMrg,')='*'
then else
if s(v51.4) : &uf('30') then else
if s(v52.4) : &uf('30')
then
(if p(v52) then
if v52.4=&uf('30') then
if &uf('IRequest,MaskMrg,')<>'' and &uf('IRequest,MaskMrg,')<>'*' then
if v52^c:&uf('IRequest,MaskMrg,') then else
&uf('+7W54#'&uf('30')' год - НЕТ перерегистрации в '&uf('IRequest,MaskMrg,')),
fi fi fi fi),&uf('+7Q54'),(||g54|
|)
else ''&uf('30')' год - НЕТ ПЕРЕРЕГИСТРАЦИИ
'
fi fi fi,
if p(v54) then
if v54^c<>'' then
if rsum((if p(v54) then if p(v54^a) and p(v54^c) then '0;' else |1;|d54^a fi fi))>0 then
(if p(v54) then if p(v54^a) and a(v54^c) then 'ОТЧИСЛЕН из ВУЗа 'v54*6.2|.|,v54*4.2|.|,v54.4|г.|,| |v54^a,'',
| - |v54^b,| фак. |v54^F,| спец. |v54^S,'
'fi fi)
fi fi fi,
"
ОТЧИСЛЕН из библиотеки "d55,(|; |+d55,v55*6.2|.|,v55*4.2|.|,v55.4|г.|,| (|v55^a|)|,| - |v55^c),"
"d55,
'
',
'
',
"Идентификатор читателя: "v30," Категория: "|, |+v50, " ФИО: "v10," "v11," "v12,/*ghfghfghfgh " Год рождения: "v21, &uf('+7W1#'(if p(v51) then v51^c,'!'v51 fi/)),&uf('+7T1')/&uf('+7W51#'(if p(g1) then &uf('G2!'g1) fi/)), &uf('+7W2#'(if p(v52) then v52^c,'!'v52 fi/)),&uf('+7T2')/&uf('+7W52#'(if p(g2) then &uf('G2!'g2) fi/)), /*&unifor('MD52^c'),&unifor('MD51^c'), if g52^c:g51^c then else if p(v51) then ' Запись в б-ку: ' fi, (if g51.1:'^' then else|.,|+g51*6.2|.|,g51*4.2|.|,g51.4|г.| fi, if s(g51^a,g51^b)<>''then' (' g51^a|; |,g51^b fi,| - |g51^c||, if s(g51^a,g51^b)<>''then')'fi) fi, if p(g52) then ' Перерегистрация: ', (if g52.1:'^'then else|.,|+g52*6.2|.|,g52*4.2|.|,g52.4|г.| fi, if s(g52^a,g52^b)<>''then' ('g52^a|; |,g52^b fi,| - |g52^c||, if s(g52^a,g52^b)<>''then')'fi), if g52:'^c' then else if g51:'^c'then' Записан в ',|; |+g51^c'' fi fi, fi, " Разрешенные места получения лит-ры: "v56|, |"", " Неразрешенные места получения лит-ры: "v57+|, |"", " Пол: "v23," Образование: "v20, ' | ',
'',
if p(v950) then ' ', else if p(v953) then '' fi, fi, ' | ',
'