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