PROGRAM Gestion_Global
VAR
dwColor_nb_alarm: DWORD;
END_VAR
IF Shared_tags_from_CR7nnS.Shared_var_cr1083_Mode_vehicule = Global_tags.Mode_vehicule.Charging THEN
VisuElems.CURRENTVISU := 'Charging';
IF Global_tags.iNb_actual_alarm > 0 THEN
dwColor_nb_alarm := 16#FFFF0000; // Rouge
ELSIF Global_tags.iNb_actual_alarm = 0 THEN
dwColor_nb_alarm := 16#FF00EC00; // Vert