CONTROLES QUALITE

Analyse moules : 

SELECT ANALYSES.DatePrelevement, ANALYSES.ProduitPreleve, ANALYSES.IDentreeStock, FOURNISSEUR.RaisonSociale, ESLOTS1.ZoneSanitaire, ESLOTS1.ZoneGeo2, ESLOTS1.ZoneGeo3, ESLOTS1.ZoneGeo4, ANALYSES.Reception, ANALYSES.ProduitFiniJ0, ANALYSES.ProduitFiniDLC, FormatDateTime([ESLOTS1]![DureePurification],3) AS Purification, ANALYSES.Conformite, ANALYSES.NoAnalyse, ANALYSES.Commentaires, ANALYSES.LibBacter1, ANALYSES.ValBacter1, ANALYSES.LibBacter2, ANALYSES.ValBacter2, ANALYSES.LibBacter3, ANALYSES.ValBacter3, ANALYSES.LibBacter4, ANALYSES.ValBacter4, ANALYSES.LibToxine1, ANALYSES.ValToxine1, ANALYSES.LibToxine2, ANALYSES.ValToxine2, ANALYSES.LibToxine3, ANALYSES.ValToxine3
FROM (ANALYSES LEFT JOIN FOURNISSEUR ON ANALYSES.IDFournisseur = FOURNISSEUR.IDfournisseur) LEFT JOIN ESLOTS1 ON ANALYSES.IDentreeStock = ESLOTS1.NumAuto
WHERE (((ANALYSES.DatePrelevement)>=#1/1/2024#) AND ((ANALYSES.TypeProduit)="MOULE") AND ((ANALYSES.CodeSite)="FR"));

Analyse prelevement : 

SELECT ANALYSES.DatePrelevement, ANALYSES.ProduitPreleve, ANALYSES.Conformite, ANALYSES.LieuPrelevement, ANALYSES.Commentaires, ANALYSES.LibBacter1, ANALYSES.ValBacter1, ANALYSES.LibBacter2, ANALYSES.ValBacter2, ANALYSES.LibBacter3, ANALYSES.ValBacter3, ANALYSES.LibBacter4, ANALYSES.ValBacter4, ANALYSES.LibToxine1, ANALYSES.ValToxine1, ANALYSES.LibToxine2, ANALYSES.ValToxine2, ANALYSES.LibToxine3, ANALYSES.ValToxine3
FROM ANALYSES
WHERE (((ANALYSES.DatePrelevement)>=#1/1/2024#) AND ((ANALYSES.IDentreeStock)=0) AND ((ANALYSES.CodeSite)="FR"));

CONTROLES QUALITE : 

SELECT ESControles1.DateControle, ESLOTS1_1.DateEntree, ESControles1.NumLot, STOCK.Libelle, STOCK.Pays, ESLOTS1_1.QuantiteFacture, ESLOTS1_1.CommandeQuantite, ESControles1.NumAuto, ESControles1.TypeDeColis, FormatNumber([ESControles1]![PoidsControle],3) AS PoidsControle, ESControles1.PoidsEchantillon, ESControles1.Poids2_Cond, FOURNISSEUR.RaisonSociale, ESLOTS1_1.Calibre, ESLOTS1_1.ZoneSanitaire, ESLOTS1_1.BIO, ESLOTS1_1.FQC, ESLOTS1_1.Calibre2, ESLOTS1_1.IQ, ESLOTS1_1.IR, ESControles1.TypeControle, ESControles1.Pecheur, ESControles1.Commentaire, ESControles1.Client, ESControles1.IQTaux, ESControles1.NbrePi_Kg, ESControles1.IRTaux, ESControles1.VersBlanc, ESControles1.DentChien, ESControles1.NbreCasse, ESControles1.NbreFendu, ESControles1.NbreOuvert, ESControles1.NbreCollees, ESControles1.NbreByssus, ESControles1.NbreVides, FormatNumber([ESControles1]![MassePezouline],2) AS MAssePezouline, ESControles1.TxNCasse, ESControles1.TxNFendu, ESControles1.TxNOuvert, ESControles1.TxNCollees AS TxNCollees2, ESControles1.TxByssus, ESControles1.TxNVides, ESControles1.QteTest, ESControles1.ActionIQ, [ESControles1]![TxPezouline]/100 AS TxmPezouline, ESLOTS1_1.QTbonPoids
FROM ((ESControles1 LEFT JOIN ESLOTS1 AS ESLOTS1_1 ON ESControles1.NumLot = ESLOTS1_1.NumAuto) LEFT JOIN FOURNISSEUR ON ESLOTS1_1.IDfournisseur = FOURNISSEUR.IDfournisseur) LEFT JOIN STOCK ON ESLOTS1_1.IDstock = STOCK.IDstock
WHERE (((ESControles1.DateControle) Between #1/1/2024# And Date()) AND ((ESLOTS1_1.CodeSite)<>"MA"));

lot traca fqc marion 2024 : 

SELECT ESTracabilite.DateBL, ESTracabilite.IDentreeStock, ESTracabilite.Quantite, ESTracabilite.NBcolis, ARTICLES.Libelle, ARTICLES.FQC, FOURNISSEUR.RaisonSociale, LignesCommandes.IDgamme
FROM (ESTracabilite LEFT JOIN (LignesCommandes LEFT JOIN ARTICLES ON LignesCommandes.IDReference = ARTICLES.Reference) ON ESTracabilite.IdLigneBL = LignesCommandes.NumAuto) LEFT JOIN (FOURNISSEUR RIGHT JOIN ESLOTS ON FOURNISSEUR.IDfournisseur = ESLOTS.IDfournisseur) ON ESTracabilite.IDentreeStock = ESLOTS.NumAuto
WHERE (((ESTracabilite.DateBL) Between #1/1/2024# And Date()));

MATCHS FRNS :

SELECT ESLOTS1_1.DateEntree, STOCK.Libelle, ESLOTS1_1.QuantiteFacture, FOURNISSEUR.RaisonSociale
FROM (ESLOTS1 AS ESLOTS1_1 LEFT JOIN FOURNISSEUR ON ESLOTS1_1.IDfournisseur = FOURNISSEUR.IDfournisseur) LEFT JOIN STOCK ON ESLOTS1_1.IDstock = STOCK.IDstock
WHERE (((ESLOTS1_1.DateEntree) Between #8/1/2024# And Date()) AND (([ESLOTS1_1]![IDstock])=120) AND ((ESLOTS1_1.Calibre)="M") AND ((ESLOTS1_1.CodeSite)<>"MA"));

TX DE CHAIR ITALIE A RECEPTION : 

SELECT ESControles.DateControle, ESLOTS.DateEntree, ESControles.NumLot, FOURNISSEUR.RaisonSociale, ESControles.NumAuto, ESControles.Pecheur, ESControles.IQTaux, ESControles.NbrePi_Kg
FROM ESControles LEFT JOIN ((STOCK RIGHT JOIN ESLOTS ON STOCK.IDstock = ESLOTS.IDstock) LEFT JOIN FOURNISSEUR ON ESLOTS.IDfournisseur = FOURNISSEUR.IDfournisseur) ON ESControles.NumLot = ESLOTS.NumAuto
WHERE (((ESControles.DateControle) Between #5/1/2024# And Date()) AND ((ESControles.TypeControle)="REC") AND ((ESLOTS.CodeSite)<>"MA"));

TX DE CHAIR ITALIE DU JOUR : 

SELECT ESControles.DateControle, ESLOTS.DateEntree, ESControles.NumLot, FOURNISSEUR.RaisonSociale, ESControles.NumAuto, ESControles.Pecheur, ESControles.IQTaux, ESControles.NbrePi_Kg
FROM ESControles LEFT JOIN ((STOCK RIGHT JOIN ESLOTS ON STOCK.IDstock = ESLOTS.IDstock) LEFT JOIN FOURNISSEUR ON ESLOTS.IDfournisseur = FOURNISSEUR.IDfournisseur) ON ESControles.NumLot = ESLOTS.NumAuto
WHERE (((ESControles.DateControle)=Date()) AND ((ESControles.TypeControle)="REC") AND ((ESLOTS.CodeSite)<>"MA") AND ((CInt([ESLOTS]![IDfournisseur]))=259));