> CREATE CURSOR Employee ( Iid I ) > CREATE CURSOR Contrat_l ( Iid I , iemployeeiD I , ddebut D(8) , dfin D(8) ) > > FOR x = 1 TO 60 > INSERT INTO Employee VALUES (x) > ENDFOR > > > > INSERT INTO Contrat_l VALUES ( 1 , 4 , {^2005/03/18}, {^2005/09/15} ) > INSERT INTO Contrat_l VALUES ( 2 , 14 , {^2001/06/13}, {^2006/01/12} ) > INSERT INTO Contrat_l VALUES ( 2 , 14 , {^2007/01/12}, {} ) > INSERT INTO Contrat_l VALUES ( 2 , 22 , {^2003/01/12}, {^2003/09/12} ) > > > > SET >>
CREATE CURSOR Employee ( Iid I ) CREATE CURSOR Contrat_l ( Iid I , iemployeeiD I , ddebut D(8) , dfin D(8) ) FOR x = 1 TO 60 INSERT INTO Employee VALUES (x) ENDFOR INSERT INTO Contrat_l VALUES ( 1 , 4 , {^2005/03/18}, {^2005/09/15} ) INSERT INTO Contrat_l VALUES ( 2 , 14 , {^2001/06/13}, {^2006/01/12} ) INSERT INTO Contrat_l VALUES ( 2 , 14 , {^2007/01/12}, {} ) INSERT INTO Contrat_l VALUES ( 2 , 22 , {^2003/01/12}, {^2003/09/12} ) lDCurrentDate = DATE() SELECT *; FROM Employee; LEFT JOIN Contrat_l ON Employee.Iid = Contrat_l.iemployeeiD AND; Contrat_l.ddebut <= m.lDCurrentDate AND; (Contrat_l.dfin >= m.lDCurrentDate OR; EMPTY(Contrat_l.dfin ) OR; ISNULL(Contrat_l.dfin ))If you change: