Appel de la procédure S_FCUST :
HOuvreConnexion(MaConnexion1)
sRPG est une chaîne = [
DS_CUST E DS extname(S_CUSTOMER);
S_FCUST PR LIKEDS(DS_CUST);
TERM1 5P 0
]
SI PAS ASXMLDefinie("RPG",sRPG ,MaConnexion1) ALORS
Info(ErreurInfo())
SINON
Info("La definition a été chargée")
FIN