Form06 if((val(&uf('30'))-val(v21^*.4))<=14) then '1'/ else if((val(&uf('30'))-val(v21^*.4))=15) then '2'/ else if((val(&uf('30'))-val(v21^*.4))>15) and ((val(&uf('30'))-val(v21^*.4))<=31) then '3'/ else '*'/ fi fi fi f5row_stf.MNU &uf('+7W1#'),&uf('+7W2#'),&uf('+7W3#'),&uf('+7W4#'),&uf('+7W5#'),&uf('+7W6#'),&uf('+7W7#'),&uf('+7W8#'),(if p(v40) then if v40^d>=&uf('Av1000^a#1') and v40^d<=&uf('Av1000^b#1') then if not v40^c:'Посещение' then if &uf('Q'v40^i.2)='om' then &uf('+7U1#',v40^d.8) else if &uf('Q'v40^i.2)='ci' then &uf('+7U2#',v40^d.8) else if &uf('Q'v40^i.2)='cs' then &uf('+7U3#',v40^d.8) else if &uf('Q'v40^i.2)='vi' then &uf('+7U4#',v40^d.8) else if &uf('Q'v40^i.2)='st' then &uf('+7U5#',v40^d.8) else if &uf('Q'v40^i.2)='ml' then &uf('+7U6#',v40^d.8) else if &uf('Q'v40^i.2)='ch' then &uf('+7U7#',v40^d.8) else if &uf('Q'v40^i.2)='oo' then &uf('+7U8#',v40^d.8) fi fi fi fi fi fi fi fi fi fi fi),(if p(v40) then if v40^d>=&uf('Av1000^a#1') and v40^d<=&uf('Av1000^b#1') and v40^c:'Посещение' then if &uf('Q'v40^i.2)='om' then &uf('+7U1#',v40^d.8,v40^1) else if &uf('Q'v40^i.2)='ci' then &uf('+7U2#',v40^d.8,v40^1) else if &uf('Q'v40^i.2)='cs' then &uf('+7U3#',v40^d.8,v40^1) else if &uf('Q'v40^i.2)='vi' then &uf('+7U4#',v40^d.8,v40^1) else if &uf('Q'v40^i.2)='st' then &uf('+7U5#',v40^d.8,v40^1) else if &uf('Q'v40^i.2)='ml' then &uf('+7U6#',v40^d.8,v40^1) else if &uf('Q'v40^i.2)='ch' then &uf('+7U7#',v40^d.8,v40^1) else if &uf('Q'v40^i.2)='oo' then &uf('+7U8#',v40^d.8,v40^1) fi fi fi fi fi fi fi fi fi fi),(if p(v40) then if v40^f<>'******' then if not v40^c:'Посещение' then if v40^f>=&uf('Av1000^a#1') and v40^f<=&uf('Av1000^b#1') then if &uf('Q'v40^i.2)='om' then &uf('+7U1#',v40^f.8) else if &uf('Q'v40^i.2)='ci' then &uf('+7U2#',v40^f.8) else if &uf('Q'v40^i.2)='cs' then &uf('+7U3#',v40^f.8) else if &uf('Q'v40^i.2)='vi' then &uf('+7U4#',v40^f.8) else if &uf('Q'v40^i.2)='st' then &uf('+7U5#',v40^f.8) else if &uf('Q'v40^i.2)='ml' then &uf('+7U6#',v40^f.8) else if &uf('Q'v40^i.2)='ch' then &uf('+7U7#',v40^f.8) else if &uf('Q'v40^i.2)='oo' then &uf('+7U8#',v40^f.8) fi fi fi fi fi fi fi fi fi fi fi fi),&uf('+7G1'),&uf('+7G2'),&uf('+7G3'),&uf('+7G4'),&uf('+7G5'),&uf('+7G6'),&uf('+7G7'),&uf('+7G8'),(if g1<>'' then 'om'fi /),(if g2<>'' then 'ci'fi /),(if g3<>'' then 'cs'fi /),(if g4<>'' then 'vi'fi /),(if g5<>'' then 'st'fi / ),(if g6<>'' then 'ml'fi /),(if g7<>'' then 'ch'fi /),(if g8<>'' then 'oo'fi /) f5col_stf.MNU 4,7 999.wss,1000 'Распределение посещений (обслуженных читателей) по категориям читателей за период с ',v1000^A*6.2".",v1000^A*4.2".",v1000^A.4,' по ',v1000^B*6.2".",v1000^B*4.2".",v1000^B.4 1,1