AdaptateurClientCom : Nul Ou IntegrationClientCom Lecture Public;
Les connecteurs métiers, qui rassemblent la connaissance métier sur un progiciel populaire ou un développement spécifique, doivent surcharger les méthodes de rappel de son type.
Ainsi, les services délivrés par un serveur Component Object Module (COM) pourront être utilisés par un client en technologie en Up ! Virtual Technical Machine au travers du modèle métier.
/****************************************************************/
Rappel IntegrationClientCom.RenommerObjetSemantique(NomModule : Caractere, NomObjetSemantique : Caractere Entree Sortie)
/* Objet : Renomme les objets semantiques. */
/****************************************************************/
Debut
...
Si NomObjetSemantique=="X_AD_Language" Alors
NomObjetSemantique="CompiereLangue";
Retourner RappelSucces;
Fin Si
Si NomObjetSemantique=="X_AD_OrgType" Alors
NomObjetSemantique="CompiereCategorieOrganisation";
Retourner RappelSucces;
Fin Si
Si NomObjetSemantique=="X_C_Country" Alors
NomObjetSemantique="CompierePays";
Retourner RappelSucces;
Fin Si
Si NomObjetSemantique=="X_C_Currency" Alors
NomObjetSemantique="CompiereMonnaie";
Retourner RappelSucces;
Fin Si
...
Retourner RappelIgnore;
Fin Rappel
/****************************************************************/
Rappel IntegrationClientCom.AjouterMethodes(NomModule : Caractere, NomTypeOuInterface : Caractere, DeclarationMethodes : Nul Ou Caractere Sortie)
/* Objet : Ajoutes les methodes. */
/****************************************************************/
Debut
Si NomTypeOuInterface Dans ("X_AD_Language", "X_AD_OrgType", "X_C_Country", "X_C_Currency", "X_C_Location",
"X_C_Region", "X_C_Tax", "X_C_TaxCategory") Alors
DeclarationMethodes="Constructeur(URIDeLObjet : Caractere);");
Retourner RappelSucces;
Fin Si
DeclarationsMethodes=Nul;
Retourner RappelIgnore;
Fin Rappel
- | - | - | - | - | - | - | - | - |