Définition...
Opérateurs...
Exemple...
Avertissement...
Traduction...
/****************************************************************/
Interface ISocieteFinancier HeriteDe ISociete Metier Defaut
/* Objet : Definition d'une société financiere. */
/****************************************************************/
/*--------------------------------------------------------------*/
/* Heritage de IObjetMetier. */
/*--------------------------------------------------------------*/
Prive :
Identification : Nul Ou Binaire Lecture Public;
Public :
VersionMetier : Caractere;
/*--------------------------------------------------------------*/
CreePar : Nul Ou IUtilisateur;
CreeLe : Date;
ModifiePar : Nul Ou IUtilisateur;
ModifieLe : Date;
Etat : EtatObjetMetier;
Categorie : Nul Ou ICategorie;
Commentaire : Nul Ou Caractere;
/* Heritage de ISociete. */
/*--------------------------------------------------------------*/
Public :
RaisonSociale : Caractere;
/*--------------------------------------------------------------*/
Coordonnees : ICoordonnees;
DateDImmatriculation : Nul Ou Date;
Holding : Nul Ou ISociete;
Filiales : Nul Ou CollectionDe ISociete;
SorteDeLaSociete : SorteSociete;
/* Definitions propres. */
/*--------------------------------------------------------------*/
Public :
Constructeur();
Fin Interface
=
pour l'affectation d'une société financière dans une autre société financière.
==
pour l'égalité entre deux sociétés financières. Le résultat est un booléen.
!=
pour l'inégalité entre deux sociétés financières. Le résultat est un booléen.
Variable
/******/
MonFinancier : Nul Ou ISocieteFinancier;
Principal
/********/
Variable
SF1 : Nul Ou ISocieteFinancier;
SF2 : Nul Ou ISocieteFinancier;
Debut
...
/* ------------------------------------------------ */
/* Creation de la societe financiere. */
/* ------------------------------------------------ */
MonFinancier=MonProgiciel.NouvelObjet(ISocieteFinancier);
...
Si SF1==SF2 Alors
/* Egalité entre deux financiers. */
...
Fin Si
Si SF1!=SF2 Alors
/* Inégalité entre deux financiers. */
...
Fin Si
Fin Principal
IGeselschaftFinanzier | ICompanyFinancier | I公司金融家 | ICompaniaFinanciero | - | - | - | - |