Формирование кодированной информации об объекте в БД CDS-ISIS
ADD
903
*
if
v920:'SPR' then else if a(v903) then if v920='J' then v200^a.1,&unifor('R')
else if p(v906)or p(v675)or p(v621)or p(v686)then if p(v906) then
v906,'-',&unifor('R') else &unifor('Av675.15#1'),if a(v675)then
&unifor('Av621.15#1'),if a(v621)then &unifor('Av686.15#1') fi
fi,"/"v908,'-',&unifor('R') fi else if v920:'asp'then
v463^j*2.2,v700^a.5,&unifor('B'v200^a,"
"d463^c,&unifor('Av463^c#1')),v463^v,v463^h,v463^k else if
p(v215^y)then v210^d*2.2,v700^a.5,&unifor('B'v710^a),&unifor('B'v200^a),f(val(v215^a),0,0),'-',&unifor('R')
else '-'&unifor('R') fi fi fi fi fi fi