/*------------------------------------------------------------------- Fichier : $monmodule$1.e Objet : En-tete de $monmodule$1.cpp Module : $Mon Module$ Auteur-Date : DUVAL-Jean-Pierre - Novembre 2003. --------------------------------------------------------------------- Observations Substituer $monmodule$ par le nom du module en minuscule -> upskrn. Substituer $MonModule$ par le nom du module en maj/minuscule -> UpsKrn. Substituer $Mon Module$ par le libelle du module -> Up ! Kernel. ---------------------------------------------------------------------*/ /*--------------------------------------------------------------*/ /* Procedures et fonctions. */ /*--------------------------------------------------------------*/ extern TypUpsVmUnsignedChar UpsVmAPI UpsCoTrt$MonModule$_1_1(TypUpsVmSession *Session, TypUpsVmShort NumeroParametre, TypUpsVmAdresse *AdresseResultat, TypPrmUpsVmEnumererParametres *UpsPrm); /* Procedure P(A:Enumere, B:Entier, C:Reel, D:Caractere, E:Objet); */ extern TypUpsVmVoid UpsVmAPI *UpsTrt$MonModule$_1_1(TypUpsVmSession *Session, TypPrm$MonModule$_1_1 *UpsPrm); /* Procedure P(A:Enumere, B:Entier, C:Reel, D:Caractere, E:Objet); */ extern TypUpsVmUnsignedChar UpsVmAPI UpsCoTrt$MonModule$_2_1(TypUpsVmSession *Session, TypUpsVmShort NumeroParametre, TypUpsVmAdresse *AdresseResultat, TypPrmUpsVmEnumererParametres *UpsPrm); /* F(A:Enumere, B:Entier, C:Reel, D:Caractere, E:Objet) Retourner Objet; */ extern TypUpsVmAdresse UpsVmAPI $UpsTrt$MonModule$_2_1(TypUpsVmSession *Session, TypUpsVmAdresse *AdresseResultat, TypPrm$MonModule$_2_1 *UpsPrm); /* F(A:Enumere, B:Entier, C:Reel, D:Caractere, E:Objet) Retourner Objet; */ /*--------------------------------------------------------------*/ /* Types et interfaces. */ /*--------------------------------------------------------------*/ extern TypUpsVmAdresse UpsVmAPI *UpsType1_get(TypUpsVmSession *Session); /* Type A. */ extern TypUpsVmLong UpsVmAPI UpsIndex1_1_0_0_get(TypUpsVmSession *Session, TypUpsVmShort Numero); /* Type A. */ extern TypUpsVmAdresse UpsVmAPI *UpsType2_get(TypUpsVmSession *Session); /* Type B. */ extern TypUpsVmLong UpsVmAPI UpsIndex2_1_0_0_get(TypUpsVmSession *Session, TypUpsVmShort Numero); /* Type B. */ /*--------------------------------------------------------------*/ /* Variables globales. */ /*--------------------------------------------------------------*/ extern TypUpsVmUnsignedChar UpsVmAPI UpsVar1_get(TypUpsVmSession *Session); /* A:Enumere; */ extern TypUpsVmVoid UpsVmAPI UpsVar1_set(TypUpsVmSession *Session, TypUpsVmUnsignedChar UpsPrm); /* A:Enumere; */ extern TypUpsVmLong UpsVmAPI UpsVar2_get(TypUpsVmSession *Session); /* B:Entier; */ extern TypUpsVmVoid UpsVmAPI UpsVar2_set(TypUpsVmSession *Session, TypUpsVmLong UpsPrm, enum EnuUpsVmOperateur Operateur); /* B:Entier; */ extern TypUpsVmLong UpsVmAPI UpsVar3_inc(TypUpsVmSession *Session, TypUpsVmChar Incrementer, TypUpsVmChar Prefixe); /* B:Entier; */ extern TypUpsVmDouble UpsVmAPI UpsVar3_get(TypUpsVmSession *Session); /* C:Reel; */ extern TypUpsVmVoid UpsVmAPI UpsVar3_set(TypUpsVmSession *Session, TypUpsVmDouble UpsPrm, enum EnuUpsVmOperateur Operateur); /* C:Reel; */ extern TypUpsVmDouble UpsVmAPI UpsVar3_inc(TypUpsVmSession *Session, TypUpsVmChar Incrementer, TypUpsVmChar Prefixe); /* C:Reel; */ extern TypUpsVmAdresse UpsVmAPI *UpsVar4_get(TypUpsVmSession *Session); /* D:Caractere; */ extern TypUpsVmVoid UpsVmAPI UpsVar4_set(TypUpsVmSession *Session, TypUpsVmAdresse *UpsPrm); /* D:Caractere; */ extern TypUpsVmAdresse UpsVmAPI *UpsVar5_get(TypUpsVmSession *Session); /* E:Objet; */ extern TypUpsVmVoid UpsVmAPI UpsVar5_set(TypUpsVmSession *Session, TypUpsVmAdresse *UpsPrm); /* E:Objet; */ /*--------------------------------------------------------------*/ /* Exceptions. */ /*--------------------------------------------------------------*/ extern TypUpsVmAdresse UpsVmAPI *UpsException1_get(TypUpsVmSession *Session); /* Exception A. */ extern TypUpsVmAdresse UpsVmAPI *UpsException2_get(TypUpsVmSession *Session); /* Exception B. */ /*--------------------------------------------------------------*/ /* Files d'attente. */ /*--------------------------------------------------------------*/ extern TypUpsVmAdresse UpsVmAPI *UpsFileDAttente1_get(TypUpsVmSession *Session); /* File d'attente A. */ extern TypUpsVmAdresse UpsVmAPI *UpsFileDAttente2_get(TypUpsVmSession *Session); /* File d'attente B. */ /*--------------------------------------------------------------*/ /* Entrepots. */ /*--------------------------------------------------------------*/ extern TypUpsVmAdresse UpsVmAPI *UpsEntrepot1_get(TypUpsVmSession *Session); /* Entrepot A. */ extern TypUpsVmUnsignedShort UpsVmAPI UpsNumeroEntrepot1_get(TypUpsVmSession *Session); /* Numero de l'entrepot A. */ extern TypUpsVmAdresse UpsVmAPI *UpsEntrepot2_get(TypUpsVmSession *Session); /* Entrepot B. */ extern TypUpsVmUnsignedShort UpsVmAPI UpsNumeroEntrepot2_get(TypUpsVmSession *Session); /* Numero de l'entrepot B. */ /*--------------------------------------------------------------*/ /* Application Program Interfaces proprietaires. */ /*--------------------------------------------------------------*/ extern TypUpsVmVoid UpsVmAPI $MonModule$EnregistrerPersistance1(TypUpsVmVoid); /* Objet : Enregistre les donnees persistantes du composant. */ extern TypUpsVmShort UpsVmAPI $MonModule$ChargerPersistance1(TypUpsVmVoid); /* Objet : Charge les donnees persistantes du composant. */ extern TypUpsVmShort UpsVmAPI $MonModule$Initialiser1(TypUpsVmVoid); /* Objet : Initialisation du composant. */ extern TypUpsVmVoid UpsVmAPI $MonModule$Terminer1(TypUpsVmVoid); /* Objet : Terminaison du composant. */ extern TypUpsVmVoid UpsVmAPI $MonModule$Demarrer1(TypUpsVtmSegmentsDonnees *SegmentDonnees); /* Objet : Demarrage du composant. */