Subversion Repositories Brabant Water.genderen

TYPE

  BoolArr2:        ARRAY [1..2]     OF BOOL;
  BoolArr4:        ARRAY [1..4]     OF BOOL;
  BoolArr5:        ARRAY [1..5]     OF BOOL;
  BoolArr8:        ARRAY [1..8]     OF BOOL;
  BoolArr9:        ARRAY [1..9]     OF BOOL;
  BoolArr12:       ARRAY [1..12]    OF BOOL;
  BoolArr16:       ARRAY [1..16]    OF BOOL;
  BoolArr36:       ARRAY [1..36]    OF BOOL;  

  IntArr2:         ARRAY [1..2]     OF INT;
  IntArr3:         ARRAY [1..3]     OF INT;
  IntArr4:         ARRAY [1..4]     OF INT;
  IntArr5:         ARRAY [1..5]     OF INT;
  IntArr6:         ARRAY [1..6]     OF INT;
  IntArr7:         ARRAY [1..7]     OF INT;
  IntArr8:         ARRAY [1..8]     OF INT;
  IntArr9:         ARRAY [1..9]     OF INT;
  IntArr10:        ARRAY [1..10]    OF INT;
  IntArr15:        ARRAY [1..15]    OF INT;
  IntArr16:        ARRAY [1..16]    OF INT;
  IntArr20:        ARRAY [1..20]    OF INT;
  IntArr30:        ARRAY [1..30]    OF INT;
  IntArr32:        ARRAY [1..32]    OF INT;
  IntArr36:        ARRAY [1..36]    OF INT;

  WordArr6:        ARRAY [1..6] OF WORD; 
  WordArr8:        ARRAY [1..8] OF WORD; 
  WordArr16:       ARRAY [1..16] OF WORD; 
  WordArr32:       ARRAY [1..32] OF WORD; 
  WordArr36:       ARRAY [1..36] OF WORD;

  DintArr16:       ARRAY [1..16] OF DINT; 

  RealArr16:       ARRAY [1..16] OF REAL;

  (* ------------------ data structuren ----------------------- *)

  KLOK_struc:  (* tijd structuur  klok *)
    STRUCT
      weekdag:      INT;     (* dag van de week 1..7 1=zondag       *)
      maand:        INT;     (* maand 1..12                         *)
      dag:          INT;     (* Dag van de maand 1..31              *)
      jaar:         INT;     (* jaartal 00..99                      *)
      uur:          INT;     (* uur 0..23                           *)
      minuut:       INT;     (* minuut 0..59                        *)
      seconde:      INT;     (* seconde 0..59                       *)
    END_STRUCT;

(* ONDERSTAANDE TBV SPA 2012.1 typicals *)
(* START : ******************************)
   FS1: (* signalen van SCADA*)
    STRUCT
    PriWrd:             WORD;   (* Instellingen Primairwoord*)
    OndWrd:             WORD;       (* Instellingen Onderdrukkingswoord*)
    BedWrd:             WORD;       (* Instellingen Bedienwoord*)
    Acoftijd:               INT;        (* Instelling Acoftijd*)
    END_STRUCT;

   TS1: (* Signalen naar SCADA (statuswoorden)*)
    STRUCT
    Bed:                WORD;   (* Status Bedienwoord*)
    Bedr:               INT;        (* Status Bedrijfwoord*)
    END_STRUCT;

   FS_CYCL_CAR: (* Signalen van SCADA Cyclische carrousel functie*)
    STRUCT
    ResReal1:           REAL;           (* Reserve Real 1*)
    ResReal2:           REAL;               (* Reserve Real 2*)
    ResDint1:           DINT;               (* Reserve Dint 1*)
    ResDint2:           DINT;               (* Reserve Dint 2*)
    InstLTGew:          ARRAY [1..32] OF DINT;  (* Cumulatief gewenst [uur] of [m3] *)
    InstWktVolg:        IntArr32;           (* Instelling handvolgorde werktuigen*)
    InstWsl:            INT;                (* Instelling wisseltijd [uur]*)
    ResInt1:            INT;                (* Reserve Int 1*)
    BedWrd:         WORD;               (* Instellingen Bedienwoord*)
    BedWrdWsl:          WORD;               (* Instellingen Bedienwoord tbv wisselen*)
    ResWrd1:            WORD;               (* Reserve Word 1*)
    ResWrd2:            WORD;               (* Reserve Word 2*)
    END_STRUCT;

   TS_CYCL_CAR: (* Signalen naar SCADA Cyclische carrousel functie*)
    STRUCT
    TijdWsl:            DINT;   (* Tijd tot volgende periodiek wissel moment [HHH:MM]*)
    ActLT:          ARRAY [1..32] OF DINT;  (* Actuele looptijd per werktuig [HHH:MM]*)
    Cum:                ARRAY [1..32] OF DINT;  (* Cummulatief inbedrijf per werktuig [uur] of [m3]*)
    StatWkt:            IntArr32;   (* Status per werktuig*)
    WktVolgIn:          IntArr32;   (* Werktuignummers in de volgorde van intschakelen*)
    WktVolgUit:         IntArr32;   (* Werktuignummers in de volgorde van uitschakelen*)
    WktNextIn:          INT;        (* Volgende werktuig dat ingeschakeld wordt (index van WktVolgIn array)*)
    WktNextUit:         INT;        (* Volgende werktuig dat uitgeschakeld wordt (index van WktVolgIn array)*)
    WktTotIn:           INT;        (* Totaal aantal ingeschakelde werktuigen (ook buiten carrousel om)*)
    WktBeschik:         INT;        (* Aantal beschikbare werktuigen*)
    END_STRUCT;
    
   FromProgn: (*Signalen van Prognose*)
    STRUCT
    PrognProd:          REAL;
    PrognVGebr:         ARRAY[1..48] OF REAL;
    CommWord1:          WORD;
    CommWord2:          WORD;    
    END_STRUCT;
    
   ToProg: (*Signalen naar Prognose*)
    STRUCT
    PLCGebr:            REAL;
    PLCProd:            REAL;
    PLCSpoel:           REAL;
    PLCCurv:            REAL;
    KritiekNiveauHoog:  REAL;
    KritiekNiveauLaag:  REAL;
    ProdStapDebiet:     ARRAY[1..50] OF REAL;
    CommWord1:          WORD;
    CommWord2:          WORD;    
    END_STRUCT;
    
   TS_PROG: (*Signalen naar SCADA tbv Prognose *)
    STRUCT
    KldrInhoud:         DINT;
    KldrMax:            DINT;
    KldrMin:            DINT;
    DebRein:            INT;
    DebRuw:             INT;
    DebSpoel:           INT;
    PrognGew:           INT;
    VulGew:             INT;
    ProdGew:            INT;
    END_STRUCT;

   FS_XYLIJN: (*Instellingen van SCADA*)
    STRUCT
    X1:                 REAL;
    X2:                 REAL;
    Y1:                 REAL;
    Y2:                 REAL;
    END_STRUCT;

   TS_XYLIJN: (*Instellingen van SCADA*)
    STRUCT
    X:                  REAL;
    Y:                  REAL;
    END_STRUCT;
    
   FS_STAP:
    STRUCT
    InstIn:             ARRAY[1..15] OF REAL;
    InstUit:            ARRAY[1..15] OF REAL;
    Acoftijd:           ARRAY[1..15] OF INT;
    END_STRUCT;     
(* EINDE ********************************)  
END_TYPE