Re: Систематический указатель
Пользователь:
Милана А. (IP-адрес скрыт)
Дата: 30, July, 2009 08:35
Дунаевская написал(а):
-------------------------------------------------------
> Вы правы. Я забыла, что было расширение на большее
> число уровней.
> Покажите ошибку, я ее не увидела.
> Не понимаю Вашего формата
> f(val(&unifor('G0.'v690^l)),2,0)'.'&unifor('G2.'v6
> 90^l) дает полный индекс, с выравненным первым
> уровнем (на 2 позиции)
> > заменить на
> &unifor('G0.'&unifor('G2.'&unifor('G2.'&unifor('G2
> .'v690^l)))) - дает 4-ый уровень
Светлана Михайловна.
Ваш формат
if 'ASP AUNTD PAZK SPEC PVK':v920 then if p(v690) then &unifor('S0'),(if p(v690) then if &unifor('S1A')='1'then f(val(&unifor('G0.'v690^l)),2,0)'.',if v690^l:'.'then &unifor('G0.'&unifor('G2.'v690^l)),'.'else ' .'fi,if &unifor('G2.'v690^l):'.'then &unifor('G0.'&unifor('G2.'&unifor('G2.'v690^l))),'.'else ' .'fi,if &unifor('G2.'&unifor('G2.'v690^l)):'.'then f(val(&unifor('G0.'v690^l)),2,0)'.'&unifor('G2.'v690^l) else ' .'fi,&unifor('9'&unifor('+S0',&unifor('Av461^x#1'),&unifor('Av461^b#1'),&unifor('Av461^c#1'),&unifor('Av700^a#1'),&unifor('Av700^d#1'),if &unifor('Av700^g#1')<>''then', '&unifor('Av700^g#1') else if &unifor('Av700^b#1')<>''then' '&unifor('Av700^b#1') fi fi,&unifor('Av710^a#1'),&unifor('Av200^v#1'),&unifor('Av200^a#1'),&unifor('Av963^x#1'),&unifor('Av463^c#1'))),mfn,fi fi/) fi fi/mpl,
выдает, например:
" 1. 6. 5. 1. 6. 5. 3О депутате Государственного Совета Чувашской Республики Тимофееве В. В.Республика002941", вместо
" 1. 6. 5. 3О депутате Государственного Совета Чувашской Республики Тимофееве В. В.Республика002941", т.е сначала индекс до третьего уровня, а потом еще раз полный индекс...