/*G2 - свободные экз-ры для G10 /*G10 - MaskStore /*G910 - 910^d (для определения занятости экз-ра подшивки) /*G101 - свободные всего /*G102 - свободные в филиалах &uf('+7W10#'),&uf('+7W10#'&uf('IREQUEST,MaskStore,*')), if v920.1:'A' then (if p(v463^w) then '===
',&uf('D,!I='v463^w'!,@freekz_ist_html') fi/) else &uf('+7W2#'),&uf('+7W2#' (if p(v910) then if &uf('Kmhrvn.mnu\'v910^d)='' and v910^c<>'' then if p(v910^d) and &uf('=!',&uf('Ag10#1'),'!'v910^d)='1' or a(v910^d) and &uf('Ag10#1')='*' then if v910^a:'0' or v910^a:'U' and val(v910^2)<> val(v910^1) then v910^b,| (|v910^h|)|,| - |v910^d fi fi fi fi/)), if g2<>'' then 'Свободные экземпляры ', if g10<>'*' then ' в 'g10,' : ' else " : "d910 fi, if &uf('Ag2#2')<>'' then '
' fi, (g2+|
|) else if p(v993) then'Есть только копии издания:\b0 ' (|
|+v993^a,| Шифр |v993^b,| (|v993^d|)|) else " Свободных экземпляров нет "d910, " Нет сведений об экземплярах"n910 (if p(v910) then if &uf('Kmhrvn.mnu\'v910^d)='' then if p(v910^d) and &uf('=!',&uf('Ag10#1'),'!'v910^d)='1' or a(v910^d) and &uf('Ag10#1')='*' then if v910^a:'1' then |
экз.|v910^b,|(|v910^d|)|,' занят'fi, if v910^a:'9' then |
экз.|v910^b,|(|v910^d|)|,' занят (на бронеполке)'fi, if v910^a:'U' and val(v910^2)= val(v910^1) then |
все экз-ры |v910^d,| (|v910^1|)|,' заняты'fi, if v910^a:'3'then|
экз.|v910^b,|(|v910^d|)|,' в переплете'fi, if v910^a:'4'then|
экз.|v910^b,|(|v910^d|)|,' утерян'fi, if v910^a:'5'then|
экз.|v910^b,|(|v910^d|)|,' временно не выдается ' fi, if v910^a:'6'and a(v910^w) then|
экз.|v910^b,|(|v910^d|)|,' списан' fi, if v910^a:'8'then|
экз.|v910^b,|(|v910^d|)|,' поступил, но еще не дошел до места хранения'fi if v910^a:'p'then|
экз.|v910^b,|(|v910^d|)|,' переплетен ',|(см. |v910^p|)|, &uf('+7W910#'v910^d), if &uf('D',v1,'!I='v910^p|!,(if p(v910) then if v910^d=&uf('Ag910#1') then v910^a fi fi)|):'0' then ' - cвободен 'else' - занят ' fi '
' fi fi, fi fi), fi fi, &uf('+7W101#'),&uf('+7W102#'), (if p(v910) then if &uf('Kmhrvn.mnu\'v910^d)='' then if v910^a:'0'or v910^a:'U' and p(v910^c) and val(v910^1)>val(v910^2) then &uf(|+7U101#|v910^d/) fi, if v910^a:'C' then &uf(|+7U102#|v910^d/) fi fi fi/), if g101='' and g102<>'' and rsum((if v910^a:'C' and p(v910^c) and &uf('Kmhrvn.mnu\'v910^d)=''then '1;' fi)) = rsum((if &uf('Kmhrvn.mnu\'v910^d)='' then |1;|d910^c fi)) then ' Издания есть только в отделениях/филиалах
' fi fi,