Définition...
Opérateurs...
Exemple...
Traduction...
/***************************************************************/
Type Entrepot Defaut Final
/* Objet : Type des objets correspondant aux entrepots. */
/***************************************************************/
Prive :
NomEntrepot : Caractere Lecture Public;
NomServeur : Nul Ou Caractere Lecture Public;
Acces : AccesEntrepot Lecture Public;
MemoireEstMobile : Booleen Lecture Public;
Public :
Fonction TailleMemoireAllouee() Retourner Entier;
Fonction TailleMemoireTotale() Retourner Entier;
Fonction TailleFichierEchangeAlloue() Retourner Entier;
Fonction TailleFichierEchangeTotal() Retourner Entier;
Fonction NbVerrousPoses() Retourner Entier;
Fonction NbVerrousTotal() Retourner Entier;
Fonction NbObjetsAlloues() Retourner Entier;
Fonction Etat() Retourner EtatEntrepot;
Procedure Habilitation ChangerEtat(NouvelEtat : EtatEntrepot);
Fin Type
Le type Entrepot ne possède pas de constructeur implicite, ni constructeur explicite.
Les objets de type Entrepot sont automatiquement créés par Up ! Object Management System lors du démarrage du noyau d'exécution.
Principal
Variable
E1 : Nul Ou Entrepot;
E2 : Nul Ou Entrepot;
Debut
E1=EntrepotSysteme;
/* Affectation entre deux entrepôts. */
Si E1==E2 Alors
/* Egalité entre deux entrepôts. */
...
Fin Si
Si E1!=E2 Alors
/* Inégalité entre deux entrepôts. */
...
Fin Si
Fin Principal
Lager | Warehouse | 大商店 | Deposito | - | - | - | - |