'{'
   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('+7W52#'&uf('30')' год - НЕТ перерегистрации в '&uf('IRequest,MaskMrg,')), 
             fi fi fi fi),&uf('+7Q52'),(|\b |g52|\b0 \par \par |) 
         else '\b '&uf('30')' год - НЕТ ПЕРЕРЕГИСТРАЦИИ \b0 \par \par ' 
   fi fi fi

"\b" mfn,"\b    Идентификатор читателя:    \b "v30,
"\par \b Имя, отчество:    \b0 "v11' ',v12,
'\par \b Дата записи в библиотеку:    \b0 '(if not v51.1:'^' then v51*6.2|.|,v51*4.2|.|,v51.4 else fi),
"\par \b В отделы:    \b0 "v51^C| |,
"\par \b Право пользования:    \b0 "v29,
"\par \b Примечания:    \b0 "v33,
"\par \b Прописан до:    \b0 "v34*6.2|.|,v34*4.2|.|,v34.4,
'\par \b Дата перерегистрации:    \b0 '/(if not v52.1:'^' then /v52^**6.2|.|v52^**4.2|.|v52^*.4 |  \bв отделе:  \b0 |v52^C| |  else v52^C fi), 
"\par \b Адрес электронной почты:     \b0 "v32,'}'

#
(V51.1/)
#
v51#
v52
##
(if not v51*1.1:'^' then v51*6.2|.|,v51*4.2|.|,v51.4 else fi)