>SELECT ET.Operator, ET.Route, ET.Class, ET.Date, ET.RorF, op.Desc as OpDesc, ; > Thisform.lmGetServeType( ET.Operator, ET.Route, ET.Date) as ServeType, ; > IIF( ET.Route == ET.Mcl_Rte, " ", ET.Mcl_Rte) as ContrNum, ET.Family, ; > SUM( IIF( BETWEEN( ET.date, ; > IIF( not EMPTY( ldStartCurr), ; > ldStartCurr, ; > ldEndPrev), ; > ldEndCurr), ; > ET.Number, ; > 0000000) ) AS CurrPass, ; > SUM( IIF( BETWEEN( ET.date, ; > ldStartPrev, ; > IIF( not EMPTY( ldEndPrev), ; > ldEndPrev, ; > ldStartCurr)), ; > ET.Number, ; > 0000000) ) AS PrevPass ; > FROM ETMData ET ; > JOIN Operator op ; > On ET.Operator == op.Code ; > WHERE ET.Operator == lnOpCode ; > AND ( ET.date BETWEEN ldStartCurr and ldEndCurr ; > OR ET.date BETWEEN ldStartPrev and ldEndPrev) ; > AND not DELETED() ; > ORDER BY ET.Operator, OpDesc, ET.Route, ET.Class ; > GROUP BY ET.Mcl_Rte, OpDesc, ET.Operator, ET.Route, ET.Class ; > INTO CURSOR csrETMPassengers NOFILTER READWRITE >