Fonction ShiftDesc
La fonction ShiftDesc retrouve les caractéristiques d'une équipe ou plage d'ouverture de cette ligne définie dans le fichier de configuration.
ShiftDesc( Ligne, Equipe, &Jour, &HeureDebut, &HeureFin): status
Ligne contient le nom de la ligne
Equipe contient le nom de l'équipe
SI la ligne et l'équipe existe, la fonction retourne 1 et met à jour le jour de la semaine (0 dimanche, 1 lundi, 6 samedi) , l'heure de début (nombre de seconde depuis minuit) et l'heure de fin (nombre de seconde depuis minuit). Dans le cas contraire la fonction retourne 0.
Par exemple
Liste = ShiftList( "SimLine2"); i = 0; Encours = 1; while Encours do begin Encours = ParseStr( Liste, #9, i, equipe); if Encours then begin ShiftDesc( "SimLine2", equipe, jour, debut, fin); Message( "Equipe ":equipe:" jour ":jour:" Debut ":hms( debut):" fin ":hms(fin)); i = i + 1; end
affichera
Equipe Lundi_Matin Jour 1 Debut 6:0:0 Fin 13:50:00
Equipe Lundi_ApresMidi Jour 1 Debut 14:00:00 Fin 21:50:00
...