Спасибо. Всё сделали.
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 11:31 пользователем zagzag.