'>',
if v51.4:&uf('30') and (&uf('IRequest,MaskMrg,')<>'*' and v52^c=&uf('IRequest,MaskMrg,') or &uf('IRequest,MaskMrg,')='*')
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('30')' год - НЕТ перерегистрации в 'mhu,&uf('IRequest,MaskMrg,'),mpl,'
'
fi fi fi fi)
else ' '&uf('30')' год - НЕТ ПЕРЕРЕГИСТРАЦИИ
'
fi fi/
'
',
"Идентификатор читателя: "v30," Категория "v50,
" ФИО: "v10," "v11," "v12,/*ghfghfghfgh " Год рождения: "v21, &unifor('MD52^c'),&unifor('MD51^c'), if v52^c:v51^c then else" Запись в б-ку: "d51, (if v51.1:'^' then else|.,|+v51*6.2|.|,v51*4.2|.|,v51.4|г.| fi, if s(v51^a,v51^b)<>''then' (' v51^a|; |,v51^b fi,| - |v51^c||, if s(v51^a,v51^b)<>''then')'fi) fi, if p(v52) then ' Перерегистрация: ', (if v52.1:'^'then else|.,|+v52*6.2|.|,v52*4.2|.|,v52.4|г.| fi, if s(v52^a,v52^b)<>''then' ('v52^a|; |,v52^b fi,| - |v52^c||, if s(v52^a,v52^b)<>''then')'fi), if v52:'^c' then else if v51:'^c'then' Записан в ',|; |+v51^c'' fi fi, fi, " Разрешенные места получения лит-ры: "v56|, |"", " Неразрешенные места получения лит-ры: "v57+|, |"", " Пол: "v23," Образование: "v20, ' | ',
'',
if p(v950) then ' ', else if p(v953) then '' fi, fi, ' | ',
'