/* для 955
if &uf('IMAIN,FULLTEXTABLE,1')='1' then
if g140 : 'IRI'
then if p(v955^A) then '
',if p(v955^T) then v955^T else 'Полный текст' fi,'', fi,
else
if p(v955^A) then '
',if p(v955^T) then v955^T else 'Постраничный просмотр полного текста' fi,'', fi,
fi,
fi,
/* ***
/* для 951
if &uf('IMAIN,FULLTEXTABLE,1')='1' then
(if p(v951^I) and a(v951^N) then '
',if p(v951^T) then v951^T else &uf('+\1',v951^I) fi,'', fi),
if g140 : 'IRI'
then (if p(v951^A) then '
',if p(v951^T) then v951^T else v951^A fi,'', fi),
else (if p(v951^A) and a(v951^N) then '
',if p(v951^T) then v951^T else v951^A fi,'', fi),
fi
(if v951^N<>'' then if &uf('+9V')='32' then 'Групповая ссылка работает только в ИРБИС64' else '
',if p(v951^T) then v951^T else 'Постраничный просмотр полного текста' fi,'', fi fi),
fi,
/* ***
(if p(v600) then
if p(v600^w) then
if v600^w:'VS' then
'',' ЗАПИСЬ из ЭК, "связанная" с текущей ','',' \о произв.\','
'
fi fi fi),
if val(&unifor('J,I600='v903))>0
then '
','','Есть запись "О произведении"','' fi,
"
Учебная литература: "d691,
(|
|d691,v691^a,| / |v691^b,| / |v691^c,| / |v691^d,| / |v691^e,| / |v691^f,| / |v691^g),
("
Держатели документа: "|
|v902^a,| : |v902^b),
if s(,odfp_H,)<>'' then '
',odfp_H, fi,
if p(v36^i) then '
Нотный инципит:
',
(if p(v36) then mdl,''v36^a,v36^b,v36^c,mpl,
if p(v36^a) then &uf('Av330^c#'v36^a) fi,| Часть |v36^b,if p(v36^b) then | : |d36^f fi,
| |v36^f,'',
if s(v36^d,v36^1,v36^g,v36^m,v36^n,v36^o)<>'' then mdl,' (',v36^d,v36^1,
if v36^g:'=' then &uf('G2='v36^g) else v36^g fi,mdl,v36^m,v36^n,v36^o,')',mpl,|. - |v36^q
fi,
if p(v36^p) then '
'&uf('+S0'v36^p) fi,| (|v36^t|)|,
|
[[|,v36^i|]]
| fi), mpl,
else
(if p(v953) then
if '0 2':v953^p then else
/* '
',v953^T ,'
'
'
'v953^t|
|,'',
''
fi fi)
fi