9.4 SCL FC568_SEQ_DSTP

//RAZ STRING D ETAT ETAPES
"DB566_SEQ_DSTP".SEQ.NOM_ETAPE := '                                                                                ';
"DB566_SEQ_DSTP".SEQ.DESCRIP_TRANSITION := '                                                                      ';


REGION SEQ EN-TÊTE
//INIT SEQUENCE PAR AFFICHEUR
IF "DB810_GESTION_IHM".INIT_SEQ THEN
    "DB566_SEQ_DSTP".SEQ.NUM_ETAPE := 0;
END_IF;
//RAZ DES VARIABLES
IF "DB566_SEQ_DSTP".SEQ.NUM_ETAPE = 0 THEN
    "DB566_SEQ_DSTP".SEQ.T_100MS := 0;
    "DB566_SEQ_DSTP".SEQ.T_1S := 0;
    %DB566.DBW6 := 0;    (*  RAZ CMD01*)
    %DB566.DBW8 := 0;    (*  RAZ CMD02*)
    %DB566.DBW10 := 0;    (*  RAZ CMD03*)
    %DB566.DBW12 := 0;    (*  RAZ CMD04*)
    "DB566_SEQ_DSTP".SEQ.INT01 := 0;  (*   *)
    "DB566_SEQ_DSTP".SEQ.INT02 := 0;  (*   *)
    "DB566_SEQ_DSTP".SEQ.ETAT01 := 0;  (*   *)
END_IF;
// DEMARRAGE DE LA SEQUENCE
IF "DB566_SEQ_DSTP".SEQ.NUM_ETAPE = 0 AND "REPRISE_API_OK" THEN
    "DB566_SEQ_DSTP".SEQ.NUM_ETAPE := 10;
END_IF;
// INCREMENTATION TEMPO
IF "BIT_100ms" AND "DB566_SEQ_DSTP".SEQ.T_100MS < 32766 THEN
    "DB566_SEQ_DSTP".SEQ.T_100MS := "DB566_SEQ_DSTP".SEQ.T_100MS + 1;
END_IF;
IF "BIT_1s" AND "DB566_SEQ_DSTP".SEQ.T_1S < 32766 THEN
    "DB566_SEQ_DSTP".SEQ.T_1S := "DB566_SEQ_DSTP".SEQ.T_1S + 1;
END_IF;
// ETAPE DE PREPARATION AU DEMARRAGE
IF "DB566_SEQ_DSTP".SEQ.NUM_ETAPE = 10 THEN
    "DB566_SEQ_DSTP".SEQ.CMD01_00 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD01_01 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD01_02 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD01_03 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD01_04 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD01_05 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD01_06 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD01_07 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD01_08 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD01_09 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD01_10 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD01_11 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD01_12 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD01_13 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD01_14 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD01_15 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD02_00 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD02_01 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD02_02 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD02_03 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD02_04 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD02_05 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD02_06 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD02_07 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD02_08 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD02_09 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD02_10 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD02_11 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD02_12 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD02_13 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD02_14 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.CMD02_15 := 0;    (*  *)
    "DB566_SEQ_DSTP".SEQ.INT01 := 0;  (*  *)
    "DB566_SEQ_DSTP".SEQ.INT02 := 0;  (*  *)
    "DB566_SEQ_DSTP".SEQ.ETAT01 := 0;  (*  *)
    "DB566_SEQ_DSTP".SEQ.NOM_ETAPE := 'Attente demande de recuperation de tous les programmes';
    "DB566_SEQ_DSTP".SEQ.DESCRIP_TRANSITION := 'Demande recue';
    (*ATTENTE DMD RECUPERATION PROGRAMME*)
    IF "Tjrs_0" THEN
        "DB566_SEQ_DSTP".SEQ.T_100MS := 0;
        "DB566_SEQ_DSTP".SEQ.T_1S := 0;
        "DB566_SEQ_DSTP".SEQ.NUM_ETAPE := 100;
    END_IF;
END_IF;
END_REGION
REGION RECUPERATION PROGRAMME
(*Etape 100 : Demande DSTP*)
IF "DB566_SEQ_DSTP".SEQ.NUM_ETAPE = 100 THEN
    "DB550_GESTION_COM_LINA".DSTP_Dmd_sauvegarde_tous_programmes := 1;
    "DB566_SEQ_DSTP".SEQ.NOM_ETAPE := 'Demande de recuperation de tous les programmes envoye a Lina';
    "DB566_SEQ_DSTP".SEQ.DESCRIP_TRANSITION := '';
    IF "Tjrs_1" THEN
        "DB566_SEQ_DSTP".SEQ.T_100MS := 0;
        "DB566_SEQ_DSTP".SEQ.T_1S := 0;
        "DB566_SEQ_DSTP".SEQ.NUM_ETAPE := 110;
    END_IF;
END_IF;
(*Etape 110 : Attente demande prise en compte*)
IF "DB566_SEQ_DSTP".SEQ.NUM_ETAPE = 110 THEN
    "DB566_SEQ_DSTP".SEQ.NOM_ETAPE := 'Attente demande de sauvegarde de tous les programmes raz';
    "DB566_SEQ_DSTP".SEQ.DESCRIP_TRANSITION := 'Demande mises a zero';
    IF "DB550_GESTION_COM_LINA".DSTP_Dmd_sauvegarde_tous_programmes = 0 THEN
        "DB566_SEQ_DSTP".SEQ.T_100MS := 0;
        "DB566_SEQ_DSTP".SEQ.T_1S := 0;
        "DB566_SEQ_DSTP".SEQ.NUM_ETAPE := 10;
    END_IF;
END_IF;
END_REGION