Возникла задача сведения об образовании прицепить к таблице CATALOGS (дать возможность прицеплять). Выполнил докомпиляцию интерфейса, вывел конфигуратором поле. Все хорошо работает, если править существующие записи об образовании. Если же добавить новую запись и попытаться тут же прицепить ее к новой таблице, то ничего не получается. Как правильно работать с новыми записями? Вот почти работающий код:
Код: Выделить всё
#component 'Z_STAFF'
alter interface RECWIN02
create view
as select PlanEducation.name
from synonym Catalogs PlanEducation
where ((EDUCATION.CREF1 == PlanEducation.NREC));
HandleEvent
cmPick:
{
case CurField of
#PLANEDUCATION.NAME :
{
RunInterface(GetPlanEdu, PERSONS.NREC, EDUCATION.CREF1);
if isnew()
insert current EDUCATION;
else
update current EDUCATION;
RereadRecord;
}
end;
inherited::HandleEvent(cmPick);
}
end;
end.