HRAZ()
SI SC_Fiche.SAI_Nb_j=0 OU SC_Fiche.SAI_Saisie3="" ALORS
  Erreur("attention veuillez revoir votre saisie")
  RETOUR
FIN

// Lecture des informations saisies
//ecranversfichier()

x  est un numérique
y est un entier=0
y=SC_Fiche.SAI_Nb_j
x=SC_Fiche.doti

// S'il s'agit d'un nouvel enregistrement
SI Absence..NouvelEnregistrement = Vrai ALORS
  // On l'ajoute
  Absence.date1=SC_Fiche.SAI_Saisie3
  Absence.date2=SC_Fiche.SAI_Saisie4
  Absence.nb_j=SC_Fiche.SAI_Nb_j
  Absence.NUMEDOTI=SC_Fiche.ledoti
  Absence.date_certif=SC_Fiche.SAI_Saisie8
  HAjoute(Absence)
  Info("absence enregistrée")
    
  //******************************
  //******************************	
  SI PAS  HExécuteRequêteSQL(...
    "requete1",...
    "UPDATE attestation SET cumul =cumul +"+y+" where attestation.numedoti ="+x)
    DélaiAvantFermeture(1000)
    Erreur(HErreurInfo())
  SINON
    HExécuteRequête(req_tab,hModifieFichier,SC_Fiche.doti)
    TableAffiche(SC_Fiche.TABLE_Req_tab,taCourantPremier)
  FIN
  //	  
  TableAffiche(SC_Fiche.TABLE_Req_tab,taCourantPremier)	
SINON	
  // On le modifie
  //	hmodifie(Absence)
  //absence.IDAbsence=(absence.IDAbsence+1)
  //hmodifie(Absence)
FIN

// Valeur de retour de la fenêtre
MaFenêtre..ValeurRenvoyée = Vrai

Info("cette absence a été enregistrée")
HRAZ(Absence)