1 2 3 4 5 6 7 8 9
| rst.Open "SELECT t.cd_tache, t.phase as poste, t.id_of as cd_of, t_tache as nop, fnom as libelle, t.qui, id_article as draw_ref" _
& ", t.description as designation, sum(T) as T0, " _
& IIf(msql, "datepart(dw,dateadd(d,1,p.jour))", "weekday(p.jour)") & " as W, t.Tbudget+t.Tbudsup as Tb, t.Tpointe as Tp, " & IIf(msql, "coalesce", "nz") & "(max(p.date_trans),0) as imp " _
& "FROM (pointages as p inner join taches as t on p.cd_tache=t.cd_tache) inner join tiers on t.cd_tiers=tiers.cd_tiers " _
& "WHERE cd_pers=" & x_cd_pers & " and jour>=" & IIf(msql, "", "cdate") & "('" & x_jour - 1 & "') and jour<=" & IIf(msql, "", "cdate") & "('" & x_jour + 5 & "') " _
& "GROUP BY t.cd_tache, t.phase, t.id_of, t_tache, t.qui, id_article, fnom, description, " & IIf(msql, "datepart(dw,dateadd(d,1,p.jour))", "weekday(p.jour)") & ", t.Tbudget+t.Tbudsup, t.Tpointe " _
& "UNION ALL SELECT cd_tache, phase, id_of, t_tache, fnom, qui, id_article, description, null, null, t.Tbudget+t.Tbudsup, t.Tpointe, 0 " _
& "FROM taches as t inner join tiers on t.cd_tiers=tiers.cd_tiers WHERE etat<='P' and qui='" & qui & "' " _
& "ORDER BY 1;", cnx, adOpenStatic |
Partager