Sync from remote server: 2025-10-12 18:56:41
This commit is contained in:
525
Tilt/database_write.m
Executable file
525
Tilt/database_write.m
Executable file
@@ -0,0 +1,525 @@
|
||||
function database_write(catena,IDcentralina,DTcatena,...
|
||||
X,Y,Z,Xlocal,Ylocal,Zlocal,HShift,HShift_local,AlfaX,AlfaY,Azimuth,TempDef_TL,...
|
||||
Speed_local,Speed,Acceleration,Acceleration_local,ErrTiltLink,ARRAYdateTL,...
|
||||
X_HD,Y_HD,Z_HD,Xlocal_HD,Ylocal_HD,Zlocal_HD,HShift_HD,HShift_local_HD,...
|
||||
AlfaX_HD,AlfaY_HD,Azimuth_HD,tempHD,Speed_HD,Speed_local_HD,Acceleration_HD,...
|
||||
Acceleration_local_HD,ErrTiltLinkHD,ARRAYdateHD,ACCdefRisHD,MAGdefRisHD,...
|
||||
X_HDVR,Y_HDVR,Z_HDVR,Xlocal_HDVR,Ylocal_HDVR,Zlocal_HDVR,HShift_HDVR,HShift_local_HDVR,...
|
||||
AlfaX_HDVR,AlfaY_HDVR,Azimuth_HDVR,tempHDVR,Speed_HDVR,Speed_local_HDVR,Acceleration_HDVR,...
|
||||
Acceleration_local_HDVR,ErrTiltLinkHDVR,ARRAYdateHDVR,ACCdefRisHDVR,MAGdefRisHDVR,...
|
||||
Y_TLH,Z_TLH,Xlocal_TLH,Ylocal_TLH,Zlocal_TLH,AlfaX_TLH,AlfaY_TLH,TempDef_TLH,Speed_TLH,Traversine,...
|
||||
Speed_local_TLH,Acceleration_TLH,Acceleration_local_TLH,ErrTiltLinkH,ARRAYdateTLH,...
|
||||
X_IPL,Y_IPL,Z_IPL,Xlocal_IPL,Ylocal_IPL,Zlocal_IPL,HShift_IPL,...
|
||||
HShift_local_IPL,Azimuth_IPL,TempDef_IPL,Speed_local_IPL,Speed_IPL,...
|
||||
Acceleration_local_IPL,Acceleration_IPL,AlfaX_IPL,AlfaY_IPL,ErrInPlaceLink,ARRAYdateIPL,...
|
||||
X_HR,Y_HR,Z_HR,Xlocal_HR,Ylocal_HR,Zlocal_HR,HShift_HR,HShift_local_HR,...
|
||||
AlfaX_HR,AlfaY_HR,Azimuth_HR,TempDef_TLHR,Speed_local_HR,Speed_HR,...
|
||||
Acceleration_HR,Acceleration_local_HR,ErrTiltLinkHR,ARRAYdateTLHR,...
|
||||
Y_TLHRH,Z_TLHRH,Ylocal_TLHRH,Zlocal_TLHRH,AlfaX_TLHRH,AlfaY_TLHRH,TempDef_TLHRH,Speed_TLHRH,...
|
||||
Speed_local_TLHRH,Acceleration_TLHRH,Acceleration_local_TLHRH,ErrTiltLinkHRH,ARRAYdateTLHRH,...
|
||||
X_IPLHR,Y_IPLHR,Z_IPLHR,Xlocal_IPLHR,Ylocal_IPLHR,Zlocal_IPLHR,HShift_IPLHR,...
|
||||
HShift_local_IPLHR,AlfaX_IPLHR,AlfaY_IPLHR,TempDef_IPLHR,Azimuth_IPLHR,Speed_IPLHR,...
|
||||
Speed_local_IPLHR,Acceleration_IPLHR,Acceleration_local_IPLHR,ErrInPlaceLinkHR,ARRAYdateIPLHR,...
|
||||
Livello,PiezDef,PiezDefT,ErrPiezoLink,ARRAYdatePL,BaroDef,BaroDefT,ErrBaroLink,ARRAYdateBL,...
|
||||
DatiLoad,ErrLoadLink,ARRAYdateLL,Rain,RainCum,ErrRainLink,ARRAYdateRL,SPP,ARRAYdateSPP,...
|
||||
Snow,SnowCum,ErrSnowLink,ARRAYdateSL,ANGdefKL,TdefKL,ErrKlinoLink,ARRAYdateKL,NodoKlinoLink,...
|
||||
ANGdefKLHR,TdefKLHR,ErrKlinoLinkHR,ARRAYdateKLHR,...
|
||||
Dati_ThL,ErrThermLink,ARRAYdateThL,Dati_PT100,ErrPT100Link,ARRAYdatePT100,...
|
||||
Dati_PE,ErrPendulum,ARRAYdatePE,Dati_WL,Portata,TdefWL,ErrWeirLink,NodoWeirLink,ARRAYdateWL,...
|
||||
conn,FileName)
|
||||
|
||||
%% Attivo/disattivo la scrittura
|
||||
[scrivoTL,scrivoTLH,scrivoIPL,scrivoHD,scrivoHDVR,scrivoTLHR,scrivoTLHRH,scrivoIPLHR,...
|
||||
scrivoPL,scrivoBL,scrivoLL,scrivoKL,scrivoKLHR,scrivoRL,scrivoSL,scrivoThL,...
|
||||
scrivoPT100,scrivoWL,scrivoPE,scrivoSPP] = scrivo(X,Z_TLH,X_IPL,X_HD,X_HDVR,X_HR,Z_TLHRH,X_IPLHR,...
|
||||
Livello,BaroDef,DatiLoad,ANGdefKL,ANGdefKLHR,Rain,Snow,Dati_ThL,Dati_PT100,...
|
||||
Dati_WL,Dati_PE,SPP,FileName);
|
||||
|
||||
%% Contatori nodi
|
||||
cTL = 1; % Tilt Link V
|
||||
cTLH = 1; % Tilt Link H
|
||||
cIPL = 1; % In Place Link
|
||||
cHD = 1; % Tilt Link HD
|
||||
cHDVR = 1; % Tilt Link HD VR
|
||||
cTLHR = 1; % Tilt Link HR V
|
||||
cTLHRH = 1; % Tilt Link HR H
|
||||
cIPLHR = 1; % In Place Link HR
|
||||
cPL = 1; % Piezo Link
|
||||
cBL = 1; % Baro Link
|
||||
cLL = 1; % Load Link
|
||||
cKL = 1; % Klino Link
|
||||
cKLHR = 1; % Klino Link HR
|
||||
cRL = 1; % Rain Link
|
||||
cThL = 1;% Therm Link
|
||||
cPT100 = 1; % PT100
|
||||
cWL = 1; % Weir Link
|
||||
cPE = 1; % Pendulum
|
||||
contPE = 1; % Secondo Contatore per i Pendulum
|
||||
cSPP = 1; % SPP Link
|
||||
cSL = 1; %% Snow Link
|
||||
|
||||
% conto i dati
|
||||
[~,colTL] = size(X); % controllo quanti dati ho
|
||||
[~,colTLH] = size(Z_TLH); % controllo quanti dati ho
|
||||
[~,colIPL] = size(X_IPL); % controllo quanti dati ho
|
||||
[~,colHD] = size(X_HD); % controllo quanti dati ho
|
||||
[~,colHDVR] = size(X_HDVR); % controllo quanti dati ho
|
||||
[~,colTLHR] = size(X_HR); % controllo quanti dati ho
|
||||
[~,colTLHRH] = size(Z_TLHRH); % controllo quanti dati ho
|
||||
[~,colIPLHR] = size(X_IPLHR); % controllo quanti dati ho
|
||||
[~,colPL] = size(Livello'); % controllo quanti dati ho
|
||||
[~,colBL] = size(BaroDef'); % controllo quanti dati ho
|
||||
[~,colLL] = size(DatiLoad'); % controllo quanti dati ho
|
||||
[~,colKL] = size(ANGdefKL'); % controllo quanti dati ho
|
||||
[~,colKLHR] = size(ANGdefKLHR'); % controllo quanti dati ho
|
||||
[~,colRL] = size(Rain'); % controllo quanti dati ho
|
||||
[~,colThL] = size(Dati_ThL'); % controllo quanti dati ho
|
||||
[~,colPT100] = size(Dati_PT100'); % controllo quanti dati ho
|
||||
[~,colWL] = size(Dati_WL'); % controllo quanti dati ho
|
||||
[~,colPE] = size(Dati_PE'); % controllo quanti dati ho
|
||||
[~,colSPP] = size(SPP'); % controllo quanti dati ho
|
||||
[~,colSL] = size(Snow'); % controllo quanti dati ho
|
||||
[rC,~] = size(catena);
|
||||
idNodo = cell2mat(catena(:,1));
|
||||
|
||||
text = 'Upload of the results in the DB started';
|
||||
fileID = fopen(FileName,'a');
|
||||
fmt = '%s \r';
|
||||
fprintf(fileID,fmt,text);
|
||||
|
||||
%% Scrittura risultati su DB
|
||||
for a = 1:rC
|
||||
NodeNum = cell2mat(catena(a,3));
|
||||
|
||||
%% Tilt Link V
|
||||
if idNodo(a,1) == 1
|
||||
if scrivoTL == 1 % se ho correttamente tutti i dati
|
||||
ListaDate = colTL;
|
||||
|
||||
DATAinsert = cellMakerTL(IDcentralina,DTcatena,NodeNum,cTL,ListaDate,...
|
||||
ErrTiltLink,ARRAYdateTL,X,Y,Z,Xlocal,Ylocal,Zlocal,HShift,HShift_local,...
|
||||
AlfaX,AlfaY,Azimuth,TempDef_TL,Speed,Speed_local,Acceleration,Acceleration_local);
|
||||
|
||||
idElabData = DB_date_time(IDcentralina,DTcatena,NodeNum,ListaDate,ARRAYdateTL,conn);
|
||||
|
||||
DBwriteTL(DATAinsert,idElabData,ListaDate,NodeNum,IDcentralina,DTcatena,conn);
|
||||
|
||||
cTL = cTL+1;
|
||||
clear DATAinsert
|
||||
% Logfile
|
||||
text = ['Tilt Link node no. ' num2str(NodeNum) ' of ' ...
|
||||
num2str(rC) ' of unit ' IDcentralina ' and chain ' DTcatena ' written in the DB!'];
|
||||
fprintf(fileID,fmt,text);
|
||||
end
|
||||
|
||||
%% Tilt Link H
|
||||
elseif idNodo(a,1) == 11
|
||||
if scrivoTLH == 1 % se ho correttamente tutti i dati
|
||||
ListaDate = colTLH;
|
||||
|
||||
DATAinsert = cellMakerTLH(IDcentralina,DTcatena,NodeNum,cTLH,ListaDate,...
|
||||
ErrTiltLinkH,ARRAYdateTLH,Y_TLH,Z_TLH,Xlocal_TLH,Ylocal_TLH,Zlocal_TLH,...
|
||||
AlfaX_TLH,AlfaY_TLH,TempDef_TLH,Speed_TLH,Speed_local_TLH,...
|
||||
Acceleration_TLH,Acceleration_local_TLH);
|
||||
|
||||
idElabData = DB_date_time(IDcentralina,DTcatena,NodeNum,ListaDate,ARRAYdateTLH,conn);
|
||||
|
||||
DBwriteTLH(DATAinsert,idElabData,ListaDate,NodeNum,DTcatena,IDcentralina,Traversine,conn);
|
||||
|
||||
cTLH = cTLH+1;
|
||||
clear DATAinsert
|
||||
% Logfile
|
||||
text = ['Tilt Link H node no. ' num2str(NodeNum) ' of ' ...
|
||||
num2str(rC) ' of unit ' IDcentralina ' and chain ' DTcatena ' written in the DB!'];
|
||||
fprintf(fileID,fmt,text);
|
||||
end
|
||||
|
||||
%% In Place Link
|
||||
elseif idNodo(a,1) == 42
|
||||
if scrivoIPL == 1 % se ho correttamente tutti i dati
|
||||
ListaDate = colIPL;
|
||||
|
||||
DATAinsert = cellMakerIPL(IDcentralina,DTcatena,NodeNum,cIPL,ListaDate,...
|
||||
ErrInPlaceLink,ARRAYdateIPL,X_IPL,Y_IPL,Z_IPL,Xlocal_IPL,...
|
||||
Ylocal_IPL,Zlocal_IPL,HShift_IPL,HShift_local_IPL,...
|
||||
AlfaX_IPL,AlfaY_IPL,Azimuth_IPL,TempDef_IPL,Speed_IPL,...
|
||||
Speed_local_IPL,Acceleration_IPL,Acceleration_local_IPL);
|
||||
|
||||
idElabData = DB_date_time(IDcentralina,DTcatena,NodeNum,ListaDate,ARRAYdateIPL,conn);
|
||||
|
||||
DBwriteIPL(DATAinsert,idElabData,ListaDate,NodeNum,IDcentralina,DTcatena,conn);
|
||||
|
||||
cIPL = cIPL+1;
|
||||
clear DATAinsert
|
||||
% Logfile
|
||||
text = ['In Place Link node no. ' num2str(NodeNum) ' of ' ...
|
||||
num2str(rC) ' of unit ' IDcentralina ' and chain ' DTcatena ' written in the DB!'];
|
||||
fprintf(fileID,fmt,text);
|
||||
end
|
||||
|
||||
%% Tilt Link HD
|
||||
elseif idNodo(a,1) == 67
|
||||
if scrivoHD == 1 % se ho correttamente tutti i dati
|
||||
ListaDate = colHD;
|
||||
|
||||
DATAinsert = cellMakerHD(IDcentralina,DTcatena,NodeNum,cHD,ListaDate,...
|
||||
ErrTiltLinkHD,ARRAYdateHD,X_HD,Y_HD,Z_HD,Xlocal_HD,Ylocal_HD,Zlocal_HD,...
|
||||
HShift_HD,HShift_local_HD,AlfaX_HD,AlfaY_HD,Azimuth_HD,tempHD,Speed_HD,...
|
||||
Speed_local_HD,Acceleration_HD,Acceleration_local_HD,ACCdefRisHD,MAGdefRisHD);
|
||||
|
||||
% Controllo se i dati sono da scrivere o aggiornare
|
||||
idElabData = DB_date_time(IDcentralina,DTcatena,NodeNum,ListaDate,ARRAYdateHD,conn);
|
||||
% Controllo se i dati delle risultanti sono da scrivere o aggiornare
|
||||
idElabData_RIS = DB_date_time_RIS(IDcentralina,DTcatena,NodeNum,ListaDate,ARRAYdateHD,conn);
|
||||
|
||||
DBwriteHD(DATAinsert,idElabData,idElabData_RIS,ListaDate,NodeNum,IDcentralina,DTcatena,conn);
|
||||
|
||||
cHD = cHD+1;
|
||||
clear DATAinsert
|
||||
% Logfile
|
||||
text = ['Tilt Link HD node no. ' num2str(NodeNum) ' of ' ...
|
||||
num2str(rC) ' of unit ' IDcentralina ' and chain ' DTcatena ' written in the DB!'];
|
||||
fprintf(fileID,fmt,text);
|
||||
end
|
||||
|
||||
%% Tilt Link HD VR
|
||||
elseif idNodo(a,1) == 61
|
||||
if scrivoHDVR == 1 % se ho correttamente tutti i dati
|
||||
ListaDate = colHDVR;
|
||||
|
||||
DATAinsert = cellMakerHDVR(IDcentralina,DTcatena,NodeNum,cHDVR,ListaDate,...
|
||||
ErrTiltLinkHDVR,ARRAYdateHDVR,X_HDVR,Y_HDVR,Z_HDVR,Xlocal_HDVR,Ylocal_HDVR,Zlocal_HDVR,...
|
||||
HShift_HDVR,HShift_local_HDVR,AlfaX_HDVR,AlfaY_HDVR,Azimuth_HDVR,tempHDVR,Speed_HDVR,...
|
||||
Speed_local_HDVR,Acceleration_HDVR,Acceleration_local_HDVR,ACCdefRisHDVR,MAGdefRisHDVR);
|
||||
|
||||
% Controllo se i dati sono da scrivere o aggiornare
|
||||
idElabData = DB_date_time(IDcentralina,DTcatena,NodeNum,ListaDate,ARRAYdateHDVR,conn);
|
||||
% Controllo se i dati delle risultanti sono da scrivere o aggiornare
|
||||
idElabData_RIS = DB_date_time_RIS(IDcentralina,DTcatena,NodeNum,ListaDate,ARRAYdateHDVR,conn);
|
||||
|
||||
DBwriteHDVR(DATAinsert,idElabData,idElabData_RIS,ListaDate,NodeNum,IDcentralina,DTcatena,conn);
|
||||
|
||||
cHDVR = cHDVR+1;
|
||||
clear DATAinsert
|
||||
% Logfile
|
||||
text = ['Tilt Link HD VR node no. ' num2str(NodeNum) ' of ' ...
|
||||
num2str(rC) ' of unit ' IDcentralina ' and chain ' DTcatena ' written in the DB!'];
|
||||
fprintf(fileID,fmt,text);
|
||||
end
|
||||
|
||||
%% Tilt Link HR V
|
||||
elseif idNodo(a,1) == 5
|
||||
if scrivoTLHR == 1 % se ho correttamente tutti i dati
|
||||
ListaDate = colTLHR;
|
||||
|
||||
DATAinsert = cellMakerTLHR(IDcentralina,DTcatena,NodeNum,cTLHR,ListaDate,...
|
||||
ErrTiltLinkHR,ARRAYdateTLHR,X_HR,Y_HR,Z_HR,Xlocal_HR,Ylocal_HR,Zlocal_HR,...
|
||||
HShift_HR,HShift_local_HR,AlfaX_HR,AlfaY_HR,Azimuth_HR,TempDef_TLHR,Speed_HR,...
|
||||
Speed_local_HR,Acceleration_HR,Acceleration_local_HR);
|
||||
|
||||
idElabData = DB_date_time(IDcentralina,DTcatena,NodeNum,ListaDate,ARRAYdateTLHR,conn);
|
||||
|
||||
DBwriteTLHR(DATAinsert,idElabData,ListaDate,NodeNum,IDcentralina,DTcatena,conn);
|
||||
|
||||
cTLHR = cTLHR+1;
|
||||
clear DATAinsert
|
||||
% Logfile
|
||||
text = ['Tilt Link HR node no. ' num2str(NodeNum) ' of ' ...
|
||||
num2str(rC) ' of unit ' IDcentralina ' and chain ' DTcatena ' written in the DB!'];
|
||||
fprintf(fileID,fmt,text);
|
||||
end
|
||||
|
||||
%% Tilt Link HR H
|
||||
elseif idNodo(a,1) == 12
|
||||
if scrivoTLHRH == 1 % se ho correttamente tutti i dati
|
||||
ListaDate = colTLHRH;
|
||||
|
||||
DATAinsert = cellMakerTLHRH(IDcentralina,DTcatena,NodeNum,cTLHRH,ListaDate,...
|
||||
ErrTiltLinkHRH,ARRAYdateTLHRH,Y_TLHRH,Z_TLHRH,Ylocal_TLHRH,Zlocal_TLHRH,...
|
||||
AlfaX_TLHRH,AlfaY_TLHRH,TempDef_TLHRH,Speed_TLHRH,Speed_local_TLHRH,...
|
||||
Acceleration_TLHRH,Acceleration_local_TLHRH);
|
||||
|
||||
idElabData = DB_date_time(IDcentralina,DTcatena,NodeNum,ListaDate,ARRAYdateTLHRH,conn);
|
||||
|
||||
DBwriteTLHRH(DATAinsert,idElabData,ListaDate,NodeNum,DTcatena,IDcentralina,conn);
|
||||
|
||||
cTLHRH = cTLHRH+1;
|
||||
clear DATAinsert
|
||||
% Logfile
|
||||
text = ['Tilt Link HR H node no. ' num2str(NodeNum) ' of ' ...
|
||||
num2str(rC) ' of unit ' IDcentralina ' and chain ' DTcatena ' written in the DB!'];
|
||||
fprintf(fileID,fmt,text);
|
||||
end
|
||||
|
||||
%% In Place Link HR
|
||||
elseif idNodo(a,1) == 43
|
||||
if scrivoIPLHR == 1 % se ho correttamente tutti i dati
|
||||
ListaDate = colIPLHR;
|
||||
|
||||
DATAinsert = cellMakerIPLHR(IDcentralina,DTcatena,NodeNum,cIPLHR,ListaDate,...
|
||||
ErrInPlaceLinkHR,ARRAYdateIPLHR,X_IPLHR,Y_IPLHR,Z_IPLHR,Xlocal_IPLHR,Ylocal_IPLHR,...
|
||||
Zlocal_IPLHR,HShift_IPLHR,HShift_local_IPLHR,AlfaX_IPLHR,AlfaY_IPLHR,Azimuth_IPLHR,...
|
||||
TempDef_IPLHR,Speed_IPLHR,Speed_local_IPLHR,Acceleration_IPLHR,Acceleration_local_IPLHR);
|
||||
|
||||
idElabData = DB_date_time(IDcentralina,DTcatena,NodeNum,ListaDate,ARRAYdateIPLHR,conn);
|
||||
|
||||
DBwriteIPLHR(DATAinsert,idElabData,ListaDate,NodeNum,DTcatena,IDcentralina,conn);
|
||||
|
||||
cIPLHR = cIPLHR+1;
|
||||
clear DATAinsert
|
||||
% Logfile
|
||||
text = ['In Place Link HR node no. ' num2str(NodeNum) ' of ' ...
|
||||
num2str(rC) ' of unit ' IDcentralina ' and chain ' DTcatena ' written in the DB!'];
|
||||
fprintf(fileID,fmt,text);
|
||||
end
|
||||
|
||||
%% Piezo Link
|
||||
elseif idNodo(a,1) == 2
|
||||
if scrivoPL == 1 % se ho correttamente tutti i dati
|
||||
ListaDate = colPL;
|
||||
|
||||
DATAinsert = cellMakerPL(IDcentralina,DTcatena,NodeNum,cPL,ListaDate,...
|
||||
ARRAYdatePL,Livello,PiezDef,PiezDefT,ErrPiezoLink);
|
||||
|
||||
idElabData = DB_date_time(IDcentralina,DTcatena,NodeNum,ListaDate,ARRAYdatePL,conn);
|
||||
|
||||
DBwritePL(DATAinsert,idElabData,ListaDate,NodeNum,IDcentralina,DTcatena,conn);
|
||||
|
||||
cPL = cPL+1;
|
||||
clear DATAinsert
|
||||
% Logfile
|
||||
text = ['Piezo Link node no. ' num2str(NodeNum) ' of ' ...
|
||||
num2str(rC) ' of unit ' IDcentralina ' and chain ' DTcatena ' written in the DB!'];
|
||||
fprintf(fileID,fmt,text);
|
||||
end
|
||||
|
||||
%% Baro Link
|
||||
elseif idNodo(a,1) == 3
|
||||
if scrivoBL == 1
|
||||
ListaDate = colBL;
|
||||
|
||||
DATAinsert = cellMakerBL(IDcentralina,DTcatena,NodeNum,ListaDate,...
|
||||
ARRAYdateBL,BaroDef,BaroDefT,ErrBaroLink);
|
||||
|
||||
idElabData = DB_date_time(IDcentralina,DTcatena,NodeNum,ListaDate,ARRAYdateBL,conn);
|
||||
|
||||
DBwriteBL(DATAinsert,idElabData,ListaDate,NodeNum,IDcentralina,DTcatena,conn);
|
||||
|
||||
cBL = cBL+1;
|
||||
clear DATAinsert
|
||||
% Logfile
|
||||
text = ['Baro Link node no. ' num2str(NodeNum) ' of ' ...
|
||||
num2str(rC) ' of unit ' IDcentralina ' and chain ' DTcatena ' written in the DB!'];
|
||||
fprintf(fileID,fmt,text);
|
||||
end
|
||||
|
||||
%% Load Link
|
||||
elseif idNodo(a,1) == 15
|
||||
if scrivoLL == 1
|
||||
ListaDate = colLL;
|
||||
|
||||
DATAinsert = cellMakerLL(IDcentralina,DTcatena,NodeNum,cLL,...
|
||||
ListaDate,ARRAYdateLL,DatiLoad,ErrLoadLink);
|
||||
|
||||
idElabData = DB_date_time(IDcentralina,DTcatena,NodeNum,ListaDate,ARRAYdateLL,conn);
|
||||
|
||||
DBwriteLL(DATAinsert,idElabData,ListaDate,NodeNum,IDcentralina,DTcatena,conn);
|
||||
|
||||
cLL = cLL+1;
|
||||
clear DATAinsert
|
||||
% Logfile
|
||||
text = ['Load Link node no. ' num2str(NodeNum) ' of ' ...
|
||||
num2str(rC) ' of unit ' IDcentralina ' and chain ' DTcatena ' written in the DB!'];
|
||||
fprintf(fileID,fmt,text);
|
||||
end
|
||||
|
||||
%% Klino Link
|
||||
elseif idNodo(a,1) == 26
|
||||
if scrivoKL == 1
|
||||
ListaDate = colKL;
|
||||
|
||||
DATAinsert = cellMakerKL(IDcentralina,DTcatena,NodeNum,cKL,ListaDate,...
|
||||
ARRAYdateKL,ANGdefKL,TdefKL,ErrKlinoLink,NodoKlinoLink);
|
||||
|
||||
idElabData = DB_date_time(IDcentralina,DTcatena,NodeNum,ListaDate,ARRAYdateKL,conn);
|
||||
|
||||
DBwriteKL(DATAinsert,idElabData,ListaDate,NodeNum,IDcentralina,DTcatena,conn,NodoKlinoLink);
|
||||
|
||||
cKL = cKL+1;
|
||||
clear DATAinsert
|
||||
% Logfile
|
||||
text = ['Klino Link node no. ' num2str(NodeNum) ' of ' ...
|
||||
num2str(rC) ' of unit ' IDcentralina ' and chain ' DTcatena ' written in the DB!'];
|
||||
fprintf(fileID,fmt,text);
|
||||
end
|
||||
|
||||
%% Klino Link HR
|
||||
elseif idNodo(a,1) == 44
|
||||
if scrivoKLHR == 1
|
||||
ListaDate = colKLHR;
|
||||
|
||||
DATAinsert = cellMakerKLHR(IDcentralina,DTcatena,NodeNum,cKLHR,...
|
||||
ListaDate,ARRAYdateKLHR,ANGdefKLHR,TdefKLHR,ErrKlinoLinkHR);
|
||||
|
||||
idElabData = DB_date_time(IDcentralina,DTcatena,NodeNum,ListaDate,ARRAYdateKLHR,conn);
|
||||
|
||||
DBwriteKLHR(DATAinsert,idElabData,ListaDate,NodeNum,IDcentralina,DTcatena,conn);
|
||||
|
||||
cKLHR = cKLHR+1;
|
||||
clear DATAinsert
|
||||
% Logfile
|
||||
text = ['Klino Link HR node no. ' num2str(NodeNum) ' of ' ...
|
||||
num2str(rC) ' of unit ' IDcentralina ' and chain ' DTcatena ' written in the DB!'];
|
||||
fprintf(fileID,fmt,text);
|
||||
end
|
||||
|
||||
%% Rain Link
|
||||
elseif idNodo(a,1) == 27
|
||||
if scrivoRL == 1
|
||||
ListaDate = colRL;
|
||||
|
||||
DATAinsert = cellMakerRL(IDcentralina,DTcatena,NodeNum,ListaDate,...
|
||||
ARRAYdateRL,Rain,RainCum,cRL,ErrRainLink);
|
||||
|
||||
idElabData = DB_date_time(IDcentralina,DTcatena,NodeNum,ListaDate,ARRAYdateRL,conn);
|
||||
|
||||
DBwriteRL(DATAinsert,idElabData,ListaDate,NodeNum,IDcentralina,DTcatena,conn);
|
||||
|
||||
cRL = cRL+1;
|
||||
clear DATAinsert
|
||||
% Logfile
|
||||
text = ['Rain Link node no. ' num2str(NodeNum) ' of ' ...
|
||||
num2str(rC) ' of unit ' IDcentralina ' and chain ' DTcatena ' written in the DB!'];
|
||||
fprintf(fileID,fmt,text);
|
||||
end
|
||||
|
||||
%% SPP Link
|
||||
elseif idNodo(a,1) == 64
|
||||
if scrivoSPP == 1
|
||||
ListaDate = colSPP;
|
||||
|
||||
DATAinsert = cellMakerSPP(IDcentralina,DTcatena,NodeNum,ListaDate,...
|
||||
ARRAYdateSPP,SPP,cSPP);
|
||||
|
||||
idElabData = DB_date_time(IDcentralina,DTcatena,NodeNum,ListaDate,ARRAYdateSPP,conn);
|
||||
|
||||
DBwriteSPP(DATAinsert,idElabData,ListaDate,NodeNum,IDcentralina,DTcatena,conn);
|
||||
|
||||
cSPP = cSPP+1;
|
||||
clear DATAinsert
|
||||
% Logfile
|
||||
text = ['SPP Link node no. ' num2str(NodeNum) ' of ' ...
|
||||
num2str(rC) ' of unit ' IDcentralina ' and chain ' DTcatena ' written in the DB!'];
|
||||
fprintf(fileID,fmt,text);
|
||||
end
|
||||
|
||||
%% Snow Link
|
||||
elseif idNodo(a,1) == 78
|
||||
if scrivoSL == 1
|
||||
ListaDate = colSL;
|
||||
|
||||
DATAinsert = cellMakerSL(IDcentralina,DTcatena,NodeNum,ListaDate,...
|
||||
ARRAYdateSL,Snow,SnowCum,cSL,ErrSnowLink);
|
||||
|
||||
idElabData = DB_date_time(IDcentralina,DTcatena,NodeNum,ListaDate,ARRAYdateSL,conn);
|
||||
|
||||
DBwriteSL(DATAinsert,idElabData,ListaDate,NodeNum,IDcentralina,DTcatena,conn);
|
||||
|
||||
cSL = cSL+1;
|
||||
clear DATAinsert
|
||||
% Logfile
|
||||
text = ['Snow Link node no. ' num2str(NodeNum) ' of ' ...
|
||||
num2str(rC) ' of unit ' IDcentralina ' and chain ' DTcatena ' written in the DB!'];
|
||||
fprintf(fileID,fmt,text);
|
||||
end
|
||||
|
||||
%% Therm Link
|
||||
elseif idNodo(a,1) == 4
|
||||
if scrivoThL == 1
|
||||
ListaDate = colThL;
|
||||
|
||||
DATAinsert = cellMakerThL(IDcentralina,DTcatena,NodeNum,ListaDate,...
|
||||
ARRAYdateThL,Dati_ThL,cThL,ErrThermLink);
|
||||
|
||||
idElabData = DB_date_time(IDcentralina,DTcatena,NodeNum,ListaDate,ARRAYdateThL,conn);
|
||||
|
||||
DBwriteThL(DATAinsert,idElabData,ListaDate,NodeNum,IDcentralina,DTcatena,conn);
|
||||
|
||||
cThL = cThL+1;
|
||||
clear DATAinsert
|
||||
% Logfile
|
||||
text = ['Therm Link node no. ' num2str(NodeNum) ' of ' num2str(rC) ...
|
||||
' of unit ' IDcentralina ' and chain ' DTcatena ' written in the DB!'];
|
||||
fprintf(fileID,fmt,text);
|
||||
end
|
||||
|
||||
%% PT100
|
||||
elseif idNodo(a,1) == 28
|
||||
if scrivoPT100 == 1
|
||||
ListaDate = colPT100;
|
||||
|
||||
DATAinsert = cellMakerPT100(IDcentralina,DTcatena,NodeNum,ListaDate,...
|
||||
ARRAYdatePT100,Dati_PT100,cPT100,ErrPT100Link);
|
||||
|
||||
idElabData = DB_date_time(IDcentralina,DTcatena,NodeNum,ListaDate,ARRAYdatePT100,conn);
|
||||
|
||||
DBwritePT100(DATAinsert,idElabData,ListaDate,NodeNum,DTcatena,IDcentralina,conn);
|
||||
|
||||
cPT100 = cPT100+1;
|
||||
clear DATAinsert
|
||||
% Logfile
|
||||
text = ['PT100 Link node no. ' num2str(NodeNum) ' of ' num2str(rC) ...
|
||||
' of unit ' IDcentralina ' and chain ' DTcatena ' written in the DB!'];
|
||||
fprintf(fileID,fmt,text);
|
||||
end
|
||||
|
||||
%% Weir Link
|
||||
elseif idNodo(a,1) == 53
|
||||
if scrivoWL == 1
|
||||
ListaDate = colWL;
|
||||
Therm = cell2mat(NodoWeirLink(:,6));
|
||||
|
||||
DATAinsert = cellMakerWL(IDcentralina,DTcatena,NodeNum,cWL,ListaDate,ARRAYdateWL,...
|
||||
Dati_WL,Portata,TdefWL,ErrWeirLink,Therm);
|
||||
|
||||
idElabData = DB_date_time(IDcentralina,DTcatena,NodeNum,ListaDate,ARRAYdateWL,conn);
|
||||
|
||||
DBwriteWL(DATAinsert,idElabData,ListaDate,NodeNum,IDcentralina,DTcatena,cWL,Therm,conn);
|
||||
|
||||
cWL = cWL+1;
|
||||
clear DATAinsert
|
||||
% Logfile
|
||||
text = ['Weir Link node no. ' num2str(NodeNum) ' of ' num2str(rC) ...
|
||||
' of unit ' IDcentralina ' and chain ' DTcatena ' written in the DB!'];
|
||||
fprintf(fileID,fmt,text);
|
||||
end
|
||||
|
||||
%% Pendulum
|
||||
elseif idNodo(a,1) == 52
|
||||
if scrivoPE == 1
|
||||
ListaDate = colPE;
|
||||
|
||||
DATAinsert = cellMakerPE(IDcentralina,DTcatena,NodeNum,cPE,contPE,ListaDate,...
|
||||
ARRAYdatePE,Dati_PE,ErrPendulum);
|
||||
|
||||
idElabData = DB_date_time(IDcentralina,DTcatena,NodeNum,ListaDate,ARRAYdatePE,conn);
|
||||
|
||||
DBwritePE(DATAinsert,idElabData,ListaDate,NodeNum,IDcentralina,DTcatena,conn);
|
||||
|
||||
cPE = cPE+1;
|
||||
contPE = contPE+2;
|
||||
clear DATAinsert
|
||||
% Logfile
|
||||
text = ['Pendulum node no. ' num2str(NodeNum) ' of ' num2str(rC) ...
|
||||
' of unit ' IDcentralina ' and chain ' DTcatena ' written in the DB!'];
|
||||
fprintf(fileID,fmt,text);
|
||||
end
|
||||
end
|
||||
|
||||
end
|
||||
|
||||
text = 'DB upload completed';
|
||||
fprintf(fileID,fmt,text);
|
||||
fclose(fileID);
|
||||
|
||||
end
|
||||
Reference in New Issue
Block a user