'>'
if s(v51.4) : &uf('30') then else
if s(v52.4) : &uf('30')
then else ''&uf('30')' год - НЕТ ПЕРЕРЕГИСТРАЦИИ
'
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, ' | ',
'