DH1:=IF(H REF(H,1) AND L REF(L,1),H-L,0);
DH2:=IF(REF(H,1) H AND REF(L,1) L,REF(H,1)-REF(L,1),0);
DH3:=IF(REF(H,1) AND H REF(L,1),H-REF(L,1),0);
DH4:=IF(H REF(H,1) AND L REF(H,1),REF(H,1)-L,0);
DH0:=IF(H REF(L,1) OR L REF(H,1),0,DH1+DH2+DH3);
DH:=DH0/(H-L)*100;
MDH:SUM(DH0,5);
