H:01:OnDblClick=today(this,1)
D:12:OnFocus=tkilos(%d) OnBlur=sumadc()
D:13:OnChange=sumadc()
D:14:OnChange=sumadc()
D:15:OnChange=sumadc()
