Ассоциация ЭБНИТ    ИРБИС-корпорация    Вики-Ирбис    Online/CHM справка Ирбис   
Web Ирбис и Z-Ирбис :  ИРБИС Irbis
 
Сведения о свободных экземплярах
Пользователь: Vladimir (IP-адрес скрыт)
Дата: 27, July, 2004 11:58

Здравствуйте.
Появилась необходимость добавить сведения о свободных экземплярах при свободном поиске литературы. Как это возможно сделать?

Re: Сведения о свободных экземплярах
Пользователь: Панев Максим (IP-адрес скрыт)
Дата: 27, July, 2004 12:35

Исправить форматы типа full*.pft (для просмотра в полном виде) и brief*.pft (для просмотра в сокращенном виде)... Форматы находятся в директории базы.

Re: Сведения о свободных экземплярах
Пользователь: Vladimir (IP-адрес скрыт)
Дата: 27, July, 2004 12:53

Это-то я уже понял... А вот какое поле и подполе за свободные экземпляры отвечают? Сколько всего экземпляров имеется выводит нормально, а вот со свободными...

Re: Сведения о свободных экземплярах
Пользователь: mikgon (IP-адрес скрыт)
Дата: 27, July, 2004 13:08

Предлагаю кусок формата для fullw. Авторство естественно!!!:))) Светланы Михайловны Дунаевской

if s(v910^c,v993)<>''then
if rsum((if v910^a:'0' and &unifor(|Kmhrvn.mnu\|v910^d)='' then'1;'else|0;|d910^d fi))>0 or
rsum((if v910^a:'U' and &unifor(|Kmhrvn.mnu\|v910^d)='' then
if p(v910^2) and val(v910^1,|1|n910^1)-val(v910^2)>0 or a(v910^2)then'1;'fi fi'\par '))>0
then else
if v910:'^A1'or v910:'^AU'then'\tab (Свободных экземпляров нет) \par 'else
if v910:'^AC'then'\tab \b (Издание есть только в отделениях)\b0 \par 'else
if p(v993) then'\tab \b (Есть только копии издания)\b0 \par '
fi fi fi fi
else
if v920.1='A'or a(v910) and p(v951)
then else |\tab (Нет сведений об экземплярах)\par |d200
fi fi,

Re: Сведения о свободных экземплярах
Пользователь: Vladimir (IP-адрес скрыт)
Дата: 27, July, 2004 13:11

Большое спасибо! Сейчас попробую.



Извините, только зарегистрированные пользователи могут писать в этом форуме.
This forum powered by Phorum.