| 12
 3
 4
 5
 6
 7
 8
 9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 
 | 
LOCAL		
	nCnx est un entier
	requete est une chaîne
	bResultat est un booléen	
	
nCnx = SQLConnecte("windev","Console Root","","FLINK","ODBC")//,"SQLOLEDB")
SQLInfoGene()
requete = "SELECT `Date_1` ,`Temp_Entree` ,`Temp_Chaud` ,`Temp_Sortie` ,`Recircul`,`Num_Phase` ,`Phase` ,`Lait` ,`Jour` ,`Sectime` from Archivage_P1"
bResultat = SQLExec(requete,"maRequete")
SI bResultat=Faux ALORS
	Info("La consultation de la base a échouée!!")
FIN
TANTQUE SQLAvance("maRequete")=0
	
	SI tempsDebut..PartieHeure <=SQLLitCol("maRequete",1)<=tempsFin..PartieHeure ALORS
		//si SQLLitCol("maRequete",9)=requeteTempsDebut et SQLLitCol("maRequete",1)<conv_tempsdebut ou 
		TableAjoute(TABLE_Table1,SQLLitCol("maRequete",1)+TAB+SQLLitCol("maRequete",2)+TAB+SQLLitCol("maRequete",3)+TAB+SQLLitCol("maRequete",4)+TAB+SQLLitCol("maRequete",5)+TAB+SQLLitCol("maRequete",6)+TAB+SQLLitCol("maRequete",7)+TAB+SQLLitCol("maRequete",8)+TAB+SQLLitCol("maRequete",9)+TAB+SQLLitCol("maRequete",10))
	FIN
FIN
SQLFerme("maRequete")
SQLDéconnecte() | 
Partager