//calcul la difference entre 2 heures dans la meme journee
diff est un entier=HeureDifférence(h_fin,h_deb)
Résultat est une chaîne = EntierVersHeure(Abs(diff))
//calcul la difference si la nuit ou un jour d ecart
SI h_deb>h_fin ALORS
// Calculs sur dates et heures
heureDébut,heureFin sont des DateHeure
//prends la date du champ date
heureDébut..PartieDate =date_deb
//prends l heure du champ heure de debut
heureDébut..PartieHeure = h_deb
//prends la date du champ date debut et ajoute un jour
heureFin..PartieDate = date_deb
heureFin..Jour +=1
//prends l heure du champ heure de fin
heureFin..PartieHeure = h_fin
//calcul la difference entre les 2 heures
dDurée est une Durée = heureFin - heureDébut
//le champ nombre d heure pas jour affiche la duree formatee
nbr_h_jour=dDurée
nbr_h_jour=NumériqueVersChaine(dDurée..Heure,"02d")+NumériqueVersChaine(dDurée..Minute,"02d")
SINON
nbr_h_jour=Résultat
FIN
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=12&topic_id=1578&post_id=6544