//Je vérifie qu'une ligne a bien été sélectionnée
SI TABLE_Dossier = -1 ALORS
Erreur("Vous devez sélectionner une ligne !")
FIN
//Je donne des valeurs à mes variables
rNumDossier est un réel
rNumDossier=COL_NUMERO[TABLE_Dossier]//= au numéro de dossier de ma Table
sAlias est une chaîne="ALIAS_"+rNumDossier//Défini l'alias de l'onglet ouvert
Val_temp est une chaîne//Je mémorise la valeur de mon onglet ouvert


//Vérifie si le dossier est déjà ouvert
SI sAlias=""_OU_ OngletEtat(ONG_ListeDossiers,sAlias)=voletInexistant ALORS

//J'ouvre un onglet comprenant le libellé :
// Dossier : (sélection de la COLONNE de ma TABLE dans ma Fenêtre Interne avec comme paramètre ma variable)
Val_temp=OngletOuvre(ONG_ListeDossiers,"Dossier N° [%COL_NUMERO[TABLE_Dossier]%]",FI_DOSSIERS,rNumDossier)
ONG_ListeDossiers[Val_temp]..Alias="ALIAS_"+rNumDossier

SINON
//Je signale à l'utilisateur que le dossier est déjà ouvert !
ToastAffiche("Le dossier est déjà ouvert !",toastCourt,cvMilieu,chCentre)
//Active l'onglet déjà ouvert
ONG_ListeDossiers=sAlias
FIN

Procedure MaFenêtre(gNumero)
SI gNumero=0 ALORS
HRAZ(dossier)
FIN

SI MaFenêtreInterne..Modifié ALORS
FEN_Principale.ONG_ListeDossiers["ALIAS_"+gNumero]..Image="C:\Mes Projets\MONPROJET\Icones_FEN\ModificationDossier2020.wdpic"
SAI_DATE_HEURE_MODIF=DateHeureSys()
HEnregistre(dossier)
FIN