Ассоциация ЭБНИТ    ИРБИС-корпорация    Вики-Ирбис    Online/CHM справка Ирбис   
АРМ Книговыдача :  ИРБИС Irbis
 
Вывод цены многоэкземплярки в выходную форму ...
Пользователь: Крюковских Александр (IP-адрес скрыт)
Дата: 22, May, 2009 15:09

Добрый день!
Т.к. скоро наступает период массовой сдачи литературы появилась необходимость сделать вывод цены многоэкземплярки (статус U) в выходную форму RDRW_HTML_LOOS_MARKED - Печать отмеченных сведений о утеряной литературе.
Сейчас цена выводится, для всех книг, кроме многоэкземплярки.

Цена должна браться из поля 910^E, если там информации нет, то из поля 10^D.

P.S: в соседней теме Дополнительные данные в таблице сведений о книговыдачах было предложено решение, которое нам тоже подойдёт, если цена для многоэкземплярки будет выводится по описанной выше схеме.

Re: Вывод цены многоэкземплярки в выходную форму ...
Пользователь: Крюковских Александр (IP-адрес скрыт)
Дата: 26, May, 2009 12:27

Продолжаем...

Проанализировав форму RDRW_HTML_LOOS_MARKED получаем, что в теории она должна выводить цены на многоэкземплярку, т.к. форма ссылается на файл rdr_cena, где описано требующиеся условия, на практике не работает.

Логика запросы должна быть следующая - (выделяем книжку у студента в книговыдачи -> печать -> Печать отмеченных сведений о утеряной литературе)
Для выделенного повторения 40 поля выбирается база, где находится книжка(обычно это 40^g), затем сначало по штрихкоду(40^h), а, если его нет, то по шифру(40^b), выбирается книжка в соответствующей базе, затем выбирается цена из поля 910^E, если там информации нет, то из поля 10^D.


Уважаемые коллеги прошу помощи, может ошибка в синтаксисе

На всякий случай выкладываю коды обеих файлов.
RDRW_HTML_LOOS_MARKED.pft (каталог RDR)
.......
if v1001<>'' then'СВЕДЕНИЯ ОБ <b>УТЕРЯННОЙ</b> ЛИТЕРАТУРЕ (отмеченные): <br>',
'<table border=1 width=100%>',
'<tr>',
'<td valign=top> БД </td>',
'<td valign=top> Шифр </td>',
'<td valign=top> Инв N. </td>',
'<td valign=top> ШКод </td>',
'<td valign=top> Выдан </td>',
'<td valign=top style="width: 50%;"> Краткое описание </td>',
'</tr>',
(if v1001<>'' then 
'<tr><td valign=top>',&uf('Av40^G#',v1001),
'</td><td valign=top>',&uf('Av40^A#',v1001),
'</td><td valign=top>',&uf('Av40^B#',v1001),
'</td><td valign=top>',&uf('Av40^H#',v1001),
'</td><td valign=top>',&uf('Av40^D#',v1001),
'</td><td valign=top>',&uf('Av40^C#',v1001),&uf('+7W1001#'&uf('Av40^B#',v1001)),&uf('+7W1002#'&uf('Av40^H#',v1001)),
if &uf('Av40^C#',v1001)<>'' then &uf('D'&uf('Av40^G#',v1001)',?I=',&uf('Av40^A#',v1001),'?,@rdr_cena')fi
'</td></tr>',
fi),
'</table> '
fi,&uf('!')


RDR_Cena.pft (каталог RDR)
(if p(v910) then if &uf('Ag1001#1')<>'' and v910^B:&uf('Ag1001#1') or &uf('Ag1002#1')<>'' and v910^H:&uf('Ag1002#1') then 
'. - ',v910^e,if a(v910^e)then &uf('Av10^d#1') fi,if val(v910^e)>0 or val(&uf('Av10^d#1'))>0 then &uf('Korg.mnu\3') fi fi fi),



Редактировано 1 раз. Последний раз 26.05.2009 12:39 пользователем Крюковских Александр.

Re: Вывод цены многоэкземплярки в выходную форму ...
Пользователь: Дунаевская (IP-адрес скрыт)
Дата: 27, May, 2009 16:22

Что именно у Вас не работает?
Приведенные Вами форматы - из дистрибутива, работают. Цена показывается.
Здесь действует соглашение - в модельном поле 1001 программно для этого формата (RDRW_HTML_LOOS_MARKED) передается инв. номер (40^b) отмеченного экз-ра, а в 1002 - его штрих-код (40^H). На этом основан формат RDR.CENA.

Re: Вывод цены многоэкземплярки в выходную форму ...
Пользователь: Крюковских Александр (IP-адрес скрыт)
Дата: 29, May, 2009 20:25

Как выяснилось, выходной формат не работает для каталога BOOK (книги), а для HUDO (художественная литература) работает правильно, не зависимо от многоэкземплярности книги.
Это видно на скриншотах.

Подскажите как сделать вывод для каталога BOOK. Хотя, как я понял, в выходном формате прописано брать запись из указанной базы(40^G) для каждого повторения 40 поля.



Редактировано 1 раз. Последний раз 29.05.2009 21:15 пользователем Крюковских Александр.

Вложения: RDRW_HTML_LOOS_MARKED.jpg (61.8KB)   RDRW.JPG (77.4KB)  
Re: Вывод цены многоэкземплярки в выходную форму ...
Пользователь: Дунаевская (IP-адрес скрыт)
Дата: 02, June, 2009 09:41

Может быть, в BOOK нет формата RDR_CENA.PFT?

Re: Вывод цены многоэкземплярки в выходную форму ...
Пользователь: Крюковских Александр (IP-адрес скрыт)
Дата: 02, June, 2009 10:45

Низкий поклон Вам Светлана Михайловна!
Спасибо огромное!!!
Заработало!



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