Orthographe sql sous VBA

ll

le || c'est du oracle utilise le &

Citation:

---

SQL = "SELECT PLS_CONSO_DRC_EOM.BOOK, SUM(FTC_RESJOUR_EOM.NOMI/JOURTCTX_EOM.COURS) AS TOMBEES_CONVERTIES," & Month([ECHEANCE]) & "AS mois_echeance," & Year([ECHEANCE]) & "DUIT_EOM.DEVISE=PLS_CONSO_DRC_EOM.DEVISE) AND (IMPORT_FTC_PRODUIT_EOM.NUM_PROD=PLS_CONSO_DRC_EOM.PROD)) INNER JOIN FTC_RESJOUR_EOM ON IMPORT_FTC_PRODUIT_EOM.NUM_PROD=FTC_RESJOUR_EOM.PROD"
sSQL = sSQL + " WHERE (((IMPORT_FTC_PRODUIT_EOM.INDI_ANNU) = 'N') AND ((IMPORT_FTC_PRODUIT_EOM.GV_CORP) Is Null) AND ((IMPORT_FTC_PRODUIT_EOM.CODE_CONTRAT) AS annne_echeance, SUM(FTC_RESJOUR_EOM!Latent/JOURTCTX_EOM.COURS) AS latent_conv"
sSQL = sSQL + " FROM ((IMPORT_FTC_PRODUIT_EOM INNER JOIN JOURTCTX_EOM ON IMPORT_FTC_PRODUIT_EOM.DEVISE=JOURTCTX_EOM.DEVISE) INNER JOIN PLS_CONSO_DRC_EOM ON (IMPORT_FTC_PRO= 'OBLIG'))"
sSQL = sSQL + "GROUP BY PLS_CONSO_DRC_EOM.BOOK," & Month([ECHEANCE]) & "," & Year([ECHEANCE]) & ", IMPORT_FTC_PRODUIT_EOM.ASOFDATE, FTC_RESJOUR_EOM.ASOFDATE, JOURTCTX_EOM.ASOFDATE, PLS_CONSO_DRC_EOM.ASOFDATE"
sSQL = sSQL + "HAVING(((PLS_CONSO_DRC_EOM.BOOK) = '227') AND ((IMPORT_FTC_PRODUIT_EOM.ASOFDATE) ='" & PLSDateFinMoisPrec() & "') AND ((FTC_RESJOUR_EOM.ASOFDATE) = '" & PLSDateFinMoisPrec() & "') AND ((JOURTCTX_EOM.ASOFDATE) = '" & PLSDateFinMoisPrec() & "') AND ((PLS_CONSO_DRC_EOM.ASOFDATE) = '" & PLSDateFinMoisPrec() & "'))"
sSQL = sSQL + "ORDER BY" & Year([ECHEANCE]) & ";"

---

deux Choses:
1)

Code:

---

1 2 3

FTC_RESJOUR_EOM!Latent [!]??? FTC_RESJOUR_EOM.Latent

---

2) tu concatène tes chaines SQL OK .
tu fini par ["] et non par espace ["]

Code:

---

1 2 3 4

'OBLIG'))" sSQL = sSQL + "GROUP BY en réalité tu écris: 'OBLIG'))GROUP BY "

---

de plus tu fais un HAVING(((PLS_CONSO_DRC_EOM.BOOK) = '227')
hors le HAVING ce comporte comme la close WHERE mais après le groupe by.

réserve cette close pour tester le résultate de ton group by:

Code:

---

select count(*) from mytable having count(*)>2

---

Code:

---

1 2 3 4 5

select mesChamp from myTable where wheremaClose group by mesCchamps having havingmaClose;

---

Merci !! En reécrivant tout sous le bon format, ça fonctionne :)