UpsEdf.EnteteEdifact

Définition


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

Type EnteteEdifact Defaut Final TailleSegment 4 ConserverObjets

/* Objet : Description de l'en-tete de l'echange Edifact.       */

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

/*-------------------------------------------------------------*/

/* Heritage des proprietes d'Objet.  */

/*-------------------------------------------------------------*/

Prive :

	
	EstInstanceDe : Type Lecture Public;

/*-------------------------------------------------------------*/

/* Proprietes du segment UNA.               					      */

/*-------------------------------------------------------------*/

Public :


	
   SeparateurEtiquette : Nul Ou Caractere Virtuel;
	

   SeparateurValeurComposite : Nul Ou Caractere Virtuel;
	

   SymboleVirgule : Nul Ou Caractere Virtuel;
	

   SymboleVersion : Nul Ou Caractere Virtuel;

/*-------------------------------------------------------------*/

/* Proprietes du segment UNB.               					      */

/*-------------------------------------------------------------*/

Public :


	
   NiveauSyntaxique : Caractere Virtuel;
	

   VersionSyntaxique : Entier Virtuel;
	

   LibelleEmetteur : Caractere Virtuel;
	

   CodeEmetteur : Nul Ou Caractere Virtuel;
	

   AdresseEmetteur : Nul Ou Caractere Virtuel;
	

   LibelleRecepteur : Caractere Virtuel;
	

   CodeRecepteur : Nul Ou Caractere Virtuel;
	

   AdresseRecepteur :Nul Ou Caractere Virtuel;
	

   DateProduction : Date Virtuel;
	

   CodeControle : Caractere Virtuel;
	

   MotDePasse : Caractere Virtuel;
	

   CodeMotDePasse : Nul Ou Caractere Virtuel;
	

   IdentifiantApplication : Nul Ou Caractere Virtuel;
	

   CodePriorite : Caractere Virtuel;
	

   AccuseReception : Booleen Virtuel;
	

   IdentifiantAccordCommunication : Caractere Virtuel;
	

   ModeTest : Booleen Virtuel;

/*-------------------------------------------------------------*/

/* Proprietes du segment UNT.               					      */

/*-------------------------------------------------------------*/

Prive :

	
   NbGroupes : Entier Virtuel Lecture Public;

/*-------------------------------------------------------------*/

/* Heritage des methodes d'Objet.    					      */

/*-------------------------------------------------------------*/

Public :

	
	Fonction Optimiser(Invariant) Identique(O : Nul Ou Objet) Retourner Nul Ou Booleen;
	

	Procedure Convertir(O : Nul Ou Objet);
	

	Fonction Optimiser(Invariant) CreeParLeServeur() Retourner Entier;
	

	Fonction Optimiser(Invariant) CreeParLeProcessus() Retourner Entier;
	

	Fonction Optimiser(Invariant) CreeDansLEntrepot() Retourner Entrepot;
	

	Fonction Cloner(EntrepotCible : Nul Ou Entrepot=Nul, Profondeur : ModeClonage = ClonageObjetSeul) Retourner Nul Ou Objet;
	

	Fonction LirePropriete(NomPropriete : Caractere) Retourner Nul Ou Objet;
	

	Procedure EcrirePropriete(NomPropriete : Caractere, Valeur : Nul Ou Objet);
	

	Fonction IncrementerDecrementerPropriete(NomPropriete : Nul Ou Caractere, Incrementer : Booleen, Prefixe : Booleen) Retourner Nul Ou Objet;
	

	Procedure SupprimerPropriete(NomPropriete : Caractere);
	

	Fonction Optimiser(Invariant) EnumererProprietes(NumeroPropriete : Entier, TypePropriete : Nul Ou Type=? Sortie, PeutEtreNul : Booleen=? Sortie, Aide : Nul Ou Caractere=? Sortie, NomEnumere : Nul Ou Caractere=? Sortie) Retourner Nul Ou Caractere;
	

	Fonction Optimiser(Invariant) Adresse() Retourner Nul Ou Caractere;

Prive :

	
	Fonction Exporter(E : Nul Ou IEchangeElementaire) Retourner Boolean;
	

	Fonction Importer(E : Nul Ou IEchangeElementaire, EntrepotCible : Nul Ou Entrepot=Nul, EstFiltre : Booleen=Faux, V : Entier=0, R : Entier=0, C : Entier=0) Retourner Nul Ou Objet;

/*-------------------------------------------------------------*/

/* Methodes propres.    					      */

/*-------------------------------------------------------------*/

Public :

	
   Constructeur();
	

   Operateur Optimiser(Invariant, NulAbsorbant) ==(E : Nul Ou EnteteEdifact) Retourner Nul Ou Booleen;
	

   Operateur Optimiser(Invariant, NulAbsorbant) !=(E : Nul Ou EnteteEdifact) Retourner Nul Ou Booleen;

Prive :

	
   Destructeur(MettreEnAnteMemoire : Booleen) Retourner Booleen;

Fin Type

Le type EnteteEdifact modélise l'en-tête d'un échange Edifact.

Le type EnteteEdifact possède un constructeur implicite permettant de créer un en-tête avec des valeurs par défaut modifiables.

Opérateurs

Le type EnteteEdifact possède les opérateurs standards suivants:

= pour l'affectation d'un en-tête dans un autre.
== pour l'égalité entre deux en-têtes. Le résultat est un booléen.
!= pour l'inégalité entre deux en-têtes. Le résultat est un booléen.

Exemple

Pour un exemple complet, merci de se référer à Format Electronic Data Interchange for Administraction, Commerce and Transport.

Variable /******/


   MonEnteteEdifact : EnteteEdifact;




Principal

/*******/

Debut

...

MonEnteteEdifact.SeparateurEtiquette=":";

MonEnteteEdifact.SeparateurValeursComposites=":";

MonEnteteEdifact.SymboleVirgule=",";

MonEnteteEdifact.SymboleVersion=Nul;

MonEnteteEdifact.NiveauSyntaxique="UNOB";

MonEnteteEdifact.VersionSyntaxique=2;

MonEnteteEdifact.LibelleEmetteur=NomProgramme;

MonEnteteEdifact.CodeEmetteur=Nul;

MonEnteteEdifact.LibelleRecepteur=NomProgramme;

MonEnteteEdifact.CodeRecepteur=Nul;

MonEnteteEdifact.AdresseRecepteur=Nul;

MonEnteteEdifact.DateProduction=DateSysteme();

MonEnteteEdifact.CodeControle="CC";

MonEnteteEdifact.MotDePasse="motdepasse";

MonEnteteEdifact.IdentifiantApplication=Nul;

MonEnteteEdifact.CodePriorite="A";

MonEnteteEdifact.AccuseReception=Vrai;

MonEnteteEdifact.IdentifiantAccordCommunication="AC";

MonEnteteEdifact.ModeTest=Vrai;

...

Fin Principal

Voir aussi

EchangeEdifact pour définir un échange Edifact.

Traduction


-	-	-	-	-	-	-	-	-