Ассоциация ЭБНИТ    ИРБИС-корпорация    Вики-Ирбис    Online/CHM справка Ирбис    FTP-сервер
АРМ Комплектатор :  ИРБИС Irbis
 
Выходная форма поступлений + год издания
Пользователь: zagzag (IP-адрес скрыт)
Дата: 17, February, 2016 11:49

Здравствуйте.
Отдел комплектования просят добавить подсчёт количества книг по определенным годам издания. Каким образом лучше это реализовать?

Собственно вопрос, куда лучше записывать показатели, какие поля/подполя для этого лучше использовать? По отделам считать не нужно, только по конкретному КСУ.

Будет выводиться в своей форме, на основе TKSUMW

Может имеет смысл добавить новое поле в рабочий лист KSU ?

Re: Выходная форма поступлений + год издания
Пользователь: zagzag (IP-адрес скрыт)
Дата: 18, February, 2016 09:36

при пополнении записи, считает распределение по годам издания, но при повторном пересчете добавляется еще одно поле 1000.



Редактировано 1 раз. Последний раз 23.03.2016 12:25 пользователем zagzag.

Re: Выходная форма поступлений + год издания
Пользователь: zagzag (IP-адрес скрыт)
Дата: 19, February, 2016 14:07

Вопрос даже не в алгоритме подсчета, а в том, почему во время пополнения КСУ из Комплектатора в 1000 поле каждый раз прибавляется еще одна строка?

В рабочем листе KSU сейчас поле включено как повторяемое, но даже если сделать без повторений, в саму запись продолжают добавляться строки.

В качестве эксперимента скопировал в rksu.fst обработчик из 17 поля для поля 1000. В 17 одно значение, а в 1000 строки продолжают прибавляться.

Можно ли вообще использовать поле 1000 в записи КСУ?
Обнаружил, что оно как-то используется в CMPL\autoin.gbl, но при сохранении записи ничего не теряется.



Редактировано 1 раз. Последний раз 19.02.2016 14:08 пользователем zagzag.

Вложения: rksu.fst (85.3KB)   KSU.WS (2.9KB)   1000.wss (146 bytes)  
Re: Выходная форма поступлений + год издания
Пользователь: Дунаевская (IP-адрес скрыт)
Дата: 19, February, 2016 16:04

В StatKsu.gbl задаются поля, которые опустошаются перед очередным пополнением КСУ

Re: Выходная форма поступлений + год издания
Пользователь: zagzag (IP-адрес скрыт)
Дата: 23, March, 2016 12:24

Спасибо. Всё сделали.

1. В файл Deposit\rksu.fst добавили
1000 2
1000^1 21 (if p(v910)then if v910^u='v991' and val(v210^d) < 2013 then if'2 6 7':v910^a then else v910^1,|1|n910^1 fi fi fi/)/
1000^2 21 (if p(v910)then if v910^u='v991' and val(v210^d) = 2013 then if'2 6 7':v910^a then else v910^1,|1|n910^1 fi fi fi/)/
1000^3 21 (if p(v910)then if v910^u='v991' and val(v210^d) = 2014 then if'2 6 7':v910^a then else v910^1,|1|n910^1 fi fi fi/)/
1000^4 21 (if p(v910)then if v910^u='v991' and val(v210^d) = 2015 then if'2 6 7':v910^a then else v910^1,|1|n910^1 fi fi fi/)/
1000^5 21 (if p(v910)then if v910^u='v991' and val(v210^d) = 2016 then if'2 6 7':v910^a then else v910^1,|1|n910^1 fi fi fi/)/

2. Рабочий лист Deposit\1000.wss во вложении

3. Добавили в CMPL\KSU.ws
1000
1000: Распределение по годам издания
1
0
5
1000.wss

 ДАННЫЕ ВВОДЯТСЯ АВТОМАТИЧЕСКИ после завершения обработки ПАРТИИ документов (Режим "Пополнение записи КСУ")

4. В файл CMPL\StatKsu.gbl добавили
DEL
1000
*
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX

5. В выходной форме
if p(v1000) and &unifor('Av991^b#1')='' then 
'\bПо году издания:\b0\par\ul'
if p(v1000^1) then '\tab ', f(rsum(v1000^1),0,0), '\tab по 2012 г.\par' fi,
if p(v1000^2) then '\tab ', f(rsum(v1000^2),0,0), '\tab за 2013 г.\par' fi,
if p(v1000^3) then '\tab ', f(rsum(v1000^3),0,0), '\tab за 2014 г.\par' fi,
if p(v1000^4) then '\tab ', f(rsum(v1000^4),0,0), '\tab за 2015 г.\par' fi,
if p(v1000^5) then '\tab ', f(rsum(v1000^5),0,0), '\tab за 2016 г.\par' fi,
'\ulnone\par'
fi,



Редактировано 1 раз. Последний раз 23.03.2016 12:31 пользователем zagzag.

Вложения: 1000.wss (146 bytes)  


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