Ассоциация ЭБНИТ    ИРБИС-корпорация    Вики-Ирбис    Online/CHM справка Ирбис   
АРМ Комплектатор :  ИРБИС Irbis
 
Вывод даты в ЛИК в по номеру акта
Пользователь: artgonch (IP-адрес скрыт)
Дата: 27, May, 2013 13:18

Здравствуйте.

Версия И64, 2009-1.

Обнаружили, что в форме TABIUW при получении ЛИК по номеру акта форма в первой колонке не выводит дату. А хотелось бы. Вот что я добавил в файл TABIUW.pft:
'
\trowd \trqc\trgaph108\trleft-108
\clbrdrt\brdrs\brdrw15\clbrdrl\brdrs\brdrw15\clbrdrb\brdrs\brdrw15\clbrdrr\brdrs\brdrw15
\cellx1100\clbrdrt\brdrs\brdrw15\clbrdrl\brdrs\brdrw15\clbrdrb\brdrs\brdrw15\clbrdrr\brdrs\brdrw15
\cellx2200\clbrdrt\brdrs\brdrw15\clbrdrl\brdrs\brdrw15\clbrdrb\brdrs\brdrw15\clbrdrr\brdrs\brdrw15
\cellx3000\clbrdrt\brdrs\brdrw15\clbrdrl\brdrs\brdrw15\clbrdrb\brdrs\brdrw15\clbrdrr\brdrs\brdrw15
\cellx3700\clbrdrt\brdrs\brdrw15\clbrdrl\brdrs\brdrw15\clbrdrb\brdrs\brdrw15\clbrdrr\brdrs\brdrw15
\cellx6497\clbrdrt\brdrs\brdrw15\clbrdrl\brdrs\brdrw15\clbrdrb\brdrs\brdrw15\clbrdrr\brdrs\brdrw15
\cellx7205\clbrdrt\brdrs\brdrw15\clbrdrl\brdrs\brdrw15\clbrdrb\brdrs\brdrw15\clbrdrr\brdrs\brdrw15
\cellx7914\clbrdrt\brdrs\brdrw15\clbrdrl\brdrs\brdrw15\clbrdrb\brdrs\brdrw15\clbrdrr\brdrs\brdrw15
\cellx9190\clbrdrt\brdrs\brdrw15\clbrdrl\brdrs\brdrw15\clbrdrb\brdrs\brdrw15\clbrdrr\brdrs\brdrw15
\cellx9846
\pard \ql\widctlpar\intbl {'
if s(v215^y)=''then
(if &unifor('Av991^b#1')=v910^y then v910^c*6.2|.|,v910^c*4 else
if p(v910) then if 'C U 2 7':v910^a then else
if &unifor('Av991#1'):v910^u and &unifor('Av991#1'):v910^d then
ref(L('KSU='&unifor('Av991^a#1')),v88^b*6.2|.|,v88^b*4.2|.|,v88^b*2.2),
'\par ' else
if &unifor('Av991#1'):v910^u then if &unifor('Av991#1'):'^b' then else
ref(L('KSU='&unifor('Av991^a#1')),v88^b*6.2|.|,v88^b*4.2|.|),
'\par 'fi fi,
if &unifor('Av991#1'):v910^d then if &unifor('Av991#1'):'^a'then else
ref(L('KSU='v910^u),v88^b*6.2|.|,v88^b*4.2|.|,v88^b*2.2|(|v88^a|)|),
'\par 'fi fi fi fi fi fi)fi,
'\cell }
\pard \ql\widctlpar\intbl {'
(if p(v910) then
if 'C U 2 7':v910^a or p(v910^4) then else
if &unifor('Av991^a#1')=v910^u and &unifor('Av991^b#1')=v910^d
or &unifor('Av991^c#1')=v910^y and &unifor('Av991^b#1')=v910^d
or &unifor('Av991^b#1')='' and (&unifor('Av991^a#1')=v910^u or &unifor('Av991^c#1')=v910^y)
or &unifor('Av991^a#1')='' and &unifor('Av991^c#1')='' and &unifor('Av991^b#1')=v910^d
then v910^b*2,if a(v910^b)then v910^h fi'\par '
fi fi fi),
'\cell }
\pard \ql\widctlpar\intbl {'
(if p(v910) then
if 'C U 2 7':v910^a or p(v910^4) then else
if &unifor('Av991^a#1')=v910^u and &unifor('Av991^b#1')=v910^d
or &unifor('Av991^c#1')=v910^y and &unifor('Av991^b#1')=v910^d
or &unifor('Av991^b#1')='' and (&unifor('Av991^a#1')=v910^u or &unifor('Av991^c#1')=v910^y)
or &unifor('Av991^a#1')='' and &unifor('Av991^c#1')='' and &unifor('Av991^b#1')=v910^d
then v910^d'\par '
fi fi fi),
'\cell }
\pard \ql\widctlpar\intbl {''\cell }
\pard \ql\widctlpar\intbl {'
v461^x| |,v461^c,if p(v461) then"; "v200^v,if p(v200^v) then": "d200^a fi else
,v700^a," "v700^b," "d700,v200^a, " "v923^h"; "v200^v fi,(if p(v225) and 'a'='b' then'. -('v225^a,if
p(v225^a)then"; "v225^v fi')'fi),if p(v210^c) then" - "v210^A ": ",v210^C, ' - ' v215^a,v215^1 fi
'\cell }
\pard \qc\widctlpar\intbl {'v210^d'\cell }
\pard \qc\widctlpar\intbl {'v906'\cell }
\pard \qr\widctlpar\intbl {'
(if p(v910) then
if 'C U 2 7':v910^a or p(v910^4) then else
if &unifor('Av991^a#1')=v910^u and &unifor('Av991^b#1')=v910^d
or &unifor('Av991^c#1')=v910^y and &unifor('Av991^b#1')=v910^d
or &unifor('Av991^b#1')='' and (&unifor('Av991^a#1')=v910^u or &unifor('Av991^c#1')=v910^y)
or &unifor('Av991^a#1')='' and &unifor('Av991^c#1')='' and &unifor('Av991^b#1')=v910^d
then
if s(v910^e)<>''then f(val(v910^e,' 0'),0,2) else
if val(&unifor('Av10^d#1'))>0 then f(val(&unifor('Av10^d#1'),' 0'),0,2)
else &unifor('Av10^d#1')
fi fi'\par '
fi fi fi),
'\cell }
\pard \qc\widctlpar\intbl {''\cell }
\pard \widctlpar\intbl {\b \row }\pard \qc\widctlpar'

Однако столбец по-прежнему остается пустым. Условие, по-видимому, выполняется, потому что если я ставлю там безусловный литерал, то он в столбец выходит.

Помогите разобраться.

Заранее спасибо.

Re: Вывод даты в ЛИК в по номеру акта
Пользователь: Сорокина Лариса (IP-адрес скрыт)
Дата: 28, May, 2013 12:11

В форме TABIUW дата берется из записи КСУ. Проверьте, в записи есть дата?

Re: Вывод даты в ЛИК в по номеру акта
Пользователь: artgonch (IP-адрес скрыт)
Дата: 28, May, 2013 12:15

Сорокина Лариса написал(а):
-------------------------------------------------------
> В форме TABIUW дата берется из записи КСУ.
> Проверьте, в записи есть дата?


проверял - дата есть. Более того, если печтать форму по № КСУ, то дата в первом столбце выходит. А вот если печатать форму только по номеру акта (который входит в то же КСУ), то столбец пустой. Я же хочу брать дату из 910 поля, но почему-то его вывод дает пустую строку, хотя условия истинно.

Re: Вывод даты в ЛИК в по номеру акта
Пользователь: Сорокина Лариса (IP-адрес скрыт)
Дата: 28, May, 2013 13:23

artgonch написал(а):
-------------------------------------------------------
> Сорокина Лариса написал(а):
> --------------------------------------------------
> -----
> > В форме TABIUW дата берется из записи КСУ.
> > Проверьте, в записи есть дата?
>
>
> проверял - дата есть. Более того, если печтать
> форму по № КСУ, то дата в первом столбце выходит.
> А вот если печатать форму только по номеру акта
> (который входит в то же КСУ), то столбец пустой.

По номеру акта тоже берется дата из записи КСУ. Попробуйте заменить файлы формы на прикрепленные.

Я
> же хочу брать дату из 910 поля, но почему-то его
> вывод дает пустую строку, хотя условия истинно.

Вложения: tabiuw.rar (3.1KB)  
Re: Вывод даты в ЛИК в по номеру акта
Пользователь: artgonch (IP-адрес скрыт)
Дата: 31, May, 2013 10:01

Сорокина Лариса написал(а):
-------------------------------------------------------
> artgonch написал(а):
> --------------------------------------------------
> -----
> > Сорокина Лариса написал(а):
> >
> --------------------------------------------------
>
> > -----
> > > В форме TABIUW дата берется из записи КСУ.
> > > Проверьте, в записи есть дата?
> >
> >
> > проверял - дата есть. Более того, если печтать
> > форму по № КСУ, то дата в первом столбце
> выходит.
> > А вот если печатать форму только по номеру акта
> > (который входит в то же КСУ), то столбец
> пустой.
>
> По номеру акта тоже берется дата из записи КСУ.
> Попробуйте заменить файлы формы на прикрепленные.
>
> Я
> > же хочу брать дату из 910 поля, но почему-то
> его
> > вывод дает пустую строку, хотя условия истинно.


Спасибо, это то, что нужно



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