ConnexionSql
ListeDeConnexionsSqlDefinitionDUneConnexionSqlOuVersion :
Version
NumeroDeVersion .
NumeroDeRevision Faire
Fin Version
(
FormatBaseDeDonnees ChaineConnexion SynchroniserTransactions );
Db2
MaxDB
MicrosoftSqlServer
MySql
Odbc
Oracle
PostgreSQL
,
ChaineDeConnexion, SynchroniserTransactions
RequeteSql
ListeDeRequetesSqlDefinitionDUneRequeteSqlOuVersion :
Version
NumeroDeVersion .
NumeroDeRevision Faire
Fin Version
ConnexionSql
NomDeLaConnexionSqlStatique
SourceDeLaRequeteSql ;
ResultatSql (
ListeDeResultatsSqlDeclares )
TailleTableauxResultatsSqlDeclares,
ResultatDeclare:
TypeElementaire TailleMaxEstLong
TailleMaxSql
TailleMaximaleTailleTableauxResultatsSqlDeclares :
TailleTableauResultatSql
TailleTableauResultatParametreSql (
ListeDeParametresSqlDeclares )
TailleTableauxParametresSqlDeclaresListeDeParametresSqlDeclares :
,
ParametreSqlDeclare:
TypeElementaire TailleMax PassageDuParametreTailleTableauxParametresSqlDeclares :
TailleTableauParametreSql
TailleTableauParametreTempsDeGardeSql
TempsDeGardeOrdreSql
ListeDOrdresSqlDefinitionDUnOrdreSqlOuVersion :
Version
NumeroDeVersion .
NumeroDeRevision Faire
Fin Version
ConnexionSql
NomDeLaConnexionSqlStatique
SourceDeLOrdreSql ;
BlocSql
ListeDeBlocsSqlDefinitionDUnBlocSqlOuVersion :
Version
NumeroDeVersion .
NumeroDeRevision Faire
Fin Version
ConnexionSql
NomDeLaConnexionSqlStatique
ListeDeBlocsSqlStatiques Fin SqlStatique
;
;
DernierEnregistrementSql
NomDUneRequeteSqlNbEnregistrementsSql
NomDUnOrdreOuDUneRequeteSqlNumeroEnregistrementSql
NomDUneRequeteSqlPasDEnregistrementSql
NomDUnOrdreOuDUneRequeteSqlPremierEnregistrementSql
NomDUneRequeteSqlRequeteSql
NomSqlOuDictionnaireFin RequeteSql
OrdreSql
NomSql ParametresSqlTransmis TempsDeGardeTransmis SourceOrdreSqlBlocSql
NomSql ParametresSqlTransmis TempsDeGardeTransmis SourceBlocSqlViderTableauParametreSql
Expression ;
CataloguesSql ConnexionSql
ExpressionClesEtrangeresSql ConnexionSql
ExpressionClesPrimairesSql ConnexionSql
ExpressionColonnesTablesSql ConnexionSql
ExpressionIndexSql ConnexionSql
ExpressionParametresProceduresSql ConnexionSql
ExpressionProceduresSql ConnexionSql
ExpressionSchemasSql ConnexionSql
ExpressionTablesSql ConnexionSql
ExpressionNomSql :
ConnexionSql
ExpressionResultatSql (
ListeDeResultatsSqlRecus )
TailleTableauxResultatsSqlRecus,
ResultatSqlRecu:
TypeElementaire TailleMax2EstLong
TailleMaxSql
ExpressionTailleTableauxResultatsSqlRecus :
TailleTableauResultatSql
ExpressionParametreSql (
ListeDeParametresSqlTransmis )
TailleTableauxParametresSqlTransmisListeDeParametresSqlTransmis :
,
ParametreSqlTransmis:
TypeElementaire TailleMax2 PassageDuParametre ValeurParametreTransmis=
ExpressionTailleTableauxParametresSqlTransmis :
TailleTableauParametreSql
ExpressionTempsDeGardeSql
ExpressionModeOptimisationSql
Expression;
SqlStatique
SourceDeLaRequeteSql ;
SqlDynamique
Expression ;
;
SqlStatique
SourceDeLOrdreSql ;
SqlDynamique
Expression ;
;
SqlStatique
ListeDeBlocsSqlStatiques Fin SqlStatique
SqlDynamique
ListeDOrdresSqlDynamiques Fin SqlDynamique
;
;
Inserer Dans
NomDuType Valeurs
(
ListeDExpressions ) ;
Selectionner
ListeDExpressionsDe
ListeDeTypes
FiltrerPar
TrierPar
GrouperPar
FiltrerGroupesPar ;
,
NomDUnTypeAlias :
JointureExterne
NomDUnType Alias Sur
ExpressionFiltrerPar
ListeDExpressionsTrierPar :
TrierPar
ListeDExpressionsGrouperPar
ListeDExpressionsFiltrerGroupesPar
ListeDExpressionsMettreAJour
NomDuType Affecter
(
ListeDAffectations ) ;
,
Affectation=
ExpressionSupprimer De
NomDUnType
FiltrerPar ;
;
Source Composant "Exemple d'emploi d'Up ! Query" Version 4.0.0;
ConnexionSql
/**********/
MaConnexionSql (Oracle, "scott/tiger@ora10g_aix");
Procedure ListerEmployes(NumeroDepartement : Entier)
/**************************************************/
Debut
Ecran.Ecrire("Département "+Caractere(Entier));
Ecran.Ecrire("==============");
RequeteSql MaRequeteSql ConnexionSql MaConnexionSql
ResultatSql (NomEmploye : Nul Ou Caractere TailleMaxSql 20, DateEmbauche : Nul Ou Date, NumeroEmploye : Nul Ou Entier, Salaire : Nul Ou Reel)
ParametreSql (NumeroDepartement)
SqlStatique
SELECT ename:=${NomEmploye}, hiredate:=${DateEmbauche}, empno:=${NumeroEmploye}, sal:=${Salaire}
FROM emp
WHERE deptno=${NumeroDepartement};
Ecran.Ecrire(NomEmploye+" "+Caractere(DateEmbauche)+" "+Caractere(NumeroEmploye)+" "+Caractere(Salaire));
Fin RequeteSql
Fin Procedure
Principal
/*******/
OrdreSql
MonOrdreSql2 ConnexionSql MaConnexionSql
ParametreSql (NomEmploye : Nul Ou Caractere TailleMaxSql 20, DateEmbauche : Nul Ou Date, NumeroEmploye : Nul Ou Entier, NumeroDepartement : Nul Ou Entier, Salaire : Nul Ou Reel)
SqlStatique
INSERT INTO emp(ename, hiredate, empno, sal)
VALUES (${NomEmploye}, ${DateEmbauche}, ${NumeroEmploye}, ${NumeroDepartement}, ${Salaire});
Debut
ListerEmployes(MaConnexionSql, 10);
ListerEmployes(MaConnexionSql, 20);
ListerEmployes(MaConnexionSql, 30);
OrdreSql ConnexionSql MaConnexionSql SqlStatique
INSERT INTO emp(ename, hiredate, empno, deptno, sal)
VALUES ('youpi3', sysdate, 9100, 40, 1100.00);
OrdreSql MonOrdreSql2 Parametre ("youpi4", DateSysteme(), 9101, 40, 1101.00);
MaConnexionSql.Valider();
Fin Principal