UpsEdi.IEchange.AssocierRessourceUps5GL


Procedure Habilitation AssocierRessourceUps5GL(T : Nul Ou Type, Alias : Nul Ou Caractere=Nul);

Description

La méthode AssocierRessourceUps5GL permet d'associer l'échange de données courant au type T éventuellement renommé avec l'alias Alias. Cela signifie que l'échange de données ne doit comporter que des objets du type T à l'exclusion de tout autre.

A l'issu, si le flux de l'échange de données courant est ouvert :

En lecture.
Il est possible d'effectuer des requêtes de sélection en Up ! 5GL via Up ! Query sur ce type.
En écriture.
Il est possible d'effectuer des requêtes d'insertion, de mise à jour ou de suppression en Up ! 5GL via Up ! Query sur ce type.

Pour dissocier l'échange de données courant d'un type, il suffit de passer le paramètre Nul.

Exemple


Type Employe Defaut

/*****************/

	NomEmploye : Caractere;

	DateEmbauche : Date;

	Numero : Entier;

	Salaire : Caractere;

	NumeroDepartement : Entier;

	Constructeur();



Variable

/******/

	F : Fichier;



Principal

/*******/

Variable

/******/

	E : Nul Ou EchangeBinaire;

	R : Nul Ou Employe;

	NumeroDepartement : Entier;



Debut

F=Fichier("c:/tmp/export.dmp", LectureBinaire);

E=EchangeBinaire(IFlux(F));

E.AssocierRessourceUps5GL(Employe, "EmployeImporte");



RequeteUps5GL MaRequeteUps5GL


   ResultatSql (NomEmploye : Nul Ou Caractere TailleMaxSql 20, DateEmbauche : Nul Ou Date, NumeroEmploye : Nul Ou Entier, Salaire : Nul Ou Reel)

   ParametreSql (NumeroDepartement)

   Ups5GLStatique

   
      Selectionner NomEmploye:=${NomEmploye}, DateEmbauche:=${DateEmbauche}, NumeroEmploye:=${NumeroEmploye}, Salaire:=${Salaire}

      De EmployeImporte

      FiltrerPar NumeroDepartement=${NumeroDepartement};

   
   Ecran.Ecrire(NomEmploye+" "+Caractere(DateEmbauche)+" "+Caractere(NumeroEmploye)+" "+Caractere(Salaire));

Fin RequeteUps5GL



E.AssocierRessourceUps5GL(Nul);

E=Nul;

F.Fermer();

Fin Principal

Traduction


-	-	-	-	-	-	-	-	-