/// Отделение, палата и кровать на которой находится пациент
Class STACIONAR.InPatientDepartmen Extends (%Persistent, %Populate, %XML.Adaptor)
{

/// Дата госпитализации/перевода в отделение
Property DateHospDepartmen As %Date [ InitialExpression = {+$h} ];

/// История болезни
Property PatientF003 As STACIONAR.F003;

/// Отделение (заполняется в приемном отделении)
Property PatientSeparation As STACIONAR.Separation;

/// Палата (заполняется в отделении)
Property PatientСhamber As STACIONAR.Сhamber;

/// Кровать (заполняется в отделении)
Property PatientBed As STACIONAR.Bed;

}


Из этого класса

PatientF003 Date
==========================
25 26.10.2008
25 26.10.2008
25 27.10.2008
46 29.10.2008
46 30.10.2008
46 30.10.2008
47 25.10.2008
47 24.10.2008

нужно получить такой результат

25 26.10.2008
46 29.10.2008
47 24.10.2008

т.е. строки с MIN датой в каждой из групп по PatientF003.

Надо шо то типа такого.......тока єто не компилица

select *
from STACIONAR.InPatientDepartmen as t
where DateHospDepartmen = (select min(DateHospDepartmen) from STACIONAR.InPatientDepartmen t1 where t->PatientF003->%ID = t1->PatientF003->%ID)