UID:UID уникальный ключ 
BeginPeriod: date/datetime not null. Начало актуальности сведений.
EndPeriod: date/datetime Конец актуальности сведений.
<Измерения> Разрезы, в которых ведутся сведения
<Ресурсы> Сведения

Slice(Point:date/datetime): table(object, <Измерения>, <Ресурсы>)
//срез сведений по всем измерениям на дату/время Point
Select object, <Измерения>, <Ресурсы>
From <ПериодическиеСведения>
Where Point between BeginPeriod and EndPeriod

DimensionSlice(Point:date/datetime, dimension:<Измерения>) : object,<Ресурсы>
//срез сведений по одному набору измерений на дату/время Point
Select object,<Ресурсы>
From <ПериодическиеСведения>
Where (Point between BeginPeriod and EndPeriod) and (<Измерения>=dimension)

OnAfterInsert
//вставка нового значения
CurrentRes := DimensionSlice(new.Point, new.<Измерения>);
If CurrentRes.object is null then
	new.EndPeriod := null
else begin
	update CurrentRes.object 
	set EndPeriod := new.BeginPeriod; 	
	new.EndPeriod := CurrentRes.EndPeriod;
end;
	
OnAfterDelete
//удаление значения
CurrentRes := DimensionSlice(old.Point, old.<Измерения>); 
If not CurrentRes.object is null then
	update CurrentRes.object 
	set EndPeriod := old.EndPeriod;