Merci pour les réponses...
Bon l' Htrouve à l'aire de fonctionner. Le problème est ailleurs :
Est-ce qu'on sait pas faire des Fichierversecran sur un onglet ?
Voici le message d'erreur :
Erreur à la ligne 4 du traitement Initialisation de ONG_PMdata.
Vous avez appelé la fonction FichierVersEcran.
La fenêtre 'FEN_PM' est inconnue.
FEN_PM contient un onglet ong_pmdata
INIT de FEN_PM
//HLitRecherche(Patienten,Uniek_FM_ID,PatID)
FichierVersEcran(FEN_PM,Patienten)
fDétecteStockageAmovible(detectUSB)
INIT de l'onglet
HLitRecherche(PMdata,Uniek_FM_ID,PatID)
FichierVersEcran(ONG_PMdata,PMdata)
PMsn = SAI_PM_SN..ValeurAffichée
A CHAQUE MODIF de l'onglet
NumVoletActif est une chaîne
NumVoletActif = ONG_PMdata..Valeur
SI NumVoletActif = 1 ALORS
HLitRecherche(PMdata,Uniek_FM_ID,PatID)
FichierVersEcran(ONG_PMdata,PMdata)
PMsn = SAI_PM_SN..ValeurAffichée
SINON SI NumVoletActif = 2 ALORS
HLitRecherche(PMverv,Uniek_FM_ID,PatID)
FichierVersEcran(ONG_PMdata,PMverv)
SINON SI NumVoletActif = 3 ALORS
HLitRecherche(PMimp,Uniek_FM_ID,PatID)
FichierVersEcran(ONG_PMdata,PMimp)
FIN
BAV