Sync from remote server: 2025-10-12 18:56:41

This commit is contained in:
2025-10-12 18:56:59 +02:00
commit 7e8ee264aa
553 changed files with 161447 additions and 0 deletions

75
ATD/DBwritePCL.m Executable file
View File

@@ -0,0 +1,75 @@
function DBwritePCL(DATAinsert,idElabData,ListaDate,NodeNum,IDcentralina,DTcatena,conn)
nNodo = num2str(NodeNum);
l = ListaDate;
for ii=1:l
idData = idElabData(ii,1);
if idData == 0 % Se la data non č su DB (=0), scrivo i dati
tablename = 'ELABDATADISP';
checkA = isnan(cell2mat(DATAinsert(ii,15)));
if checkA == 1 % il vettore accelerazione č NaN
checkV = isnan(cell2mat(DATAinsert(ii,13)));
if checkV == 1 % il vettore velocitŕ č NaN
colnames = {'UnitName','ToolNameID','NodeNum','EventDate','EventTime',...
'Y','Z','YShift','ZShift','AlfaX','AlfaY','T_node','calcerr'};
data = [DATAinsert(ii,1),DATAinsert(ii,2),DATAinsert(ii,3),...
DATAinsert(ii,4),DATAinsert(ii,5),DATAinsert(ii,6),...
DATAinsert(ii,7),DATAinsert(ii,8),DATAinsert(ii,9),...
DATAinsert(ii,10),DATAinsert(ii,11),DATAinsert(ii,12),...
DATAinsert(ii,17)];
else % velocitŕ č un numero, accelerazione NaN
colnames = {'UnitName','ToolNameID','NodeNum','EventDate','EventTime',...
'Y','Z','YShift','ZShift','AlfaX','AlfaY','T_node',...
'speed','speed_local','calcerr'};
data = [DATAinsert(ii,1),DATAinsert(ii,2),DATAinsert(ii,3),...
DATAinsert(ii,4),DATAinsert(ii,5),DATAinsert(ii,6),...
DATAinsert(ii,7),DATAinsert(ii,8),DATAinsert(ii,9),...
DATAinsert(ii,10),DATAinsert(ii,11),DATAinsert(ii,12),...
DATAinsert(ii,13),DATAinsert(ii,14),DATAinsert(ii,17)];
end
else % scrivo tutto
colnames = {'UnitName','ToolNameID','NodeNum','EventDate','EventTime',...
'Y','Z','YShift','ZShift','AlfaX','AlfaY','T_node','speed',...
'speed_local','acceleration','acceleration_local','calcerr'};
data = [DATAinsert(ii,1),DATAinsert(ii,2),DATAinsert(ii,3),...
DATAinsert(ii,4),DATAinsert(ii,5),DATAinsert(ii,6),...
DATAinsert(ii,7),DATAinsert(ii,8),DATAinsert(ii,9),...
DATAinsert(ii,10),DATAinsert(ii,11),DATAinsert(ii,12),...
DATAinsert(ii,13),DATAinsert(ii,14),DATAinsert(ii,15),...
DATAinsert(ii,16),DATAinsert(ii,17)];
end
fastinsert(conn,tablename,colnames,data);
else % altrimenti li aggiorno
tablename = 'ELABDATADISP';
checkA = isnan(cell2mat(DATAinsert(ii,15)));
if checkA == 1 % il vettore accelerazione č NaN
checkV = isnan(cell2mat(DATAinsert(ii,13)));
if checkV == 1 % il vettore velocitŕ č NaN
colnames = {'Y','Z','YShift','ZShift','AlfaX','AlfaY','T_node','calcerr'};
data = [DATAinsert(ii,6),DATAinsert(ii,7),DATAinsert(ii,8),...
DATAinsert(ii,9),DATAinsert(ii,10),DATAinsert(ii,11),...
DATAinsert(ii,12),DATAinsert(ii,17)];
else % velocitŕ č un numero, accelerazione NaN
colnames = {'Y','Z','YShift','ZShift','AlfaX','AlfaY','T_node',...
'speed','speed_local','calcerr'};
data = [DATAinsert(ii,6),DATAinsert(ii,7),DATAinsert(ii,8),...
DATAinsert(ii,9),DATAinsert(ii,10),DATAinsert(ii,11),...
DATAinsert(ii,12),DATAinsert(ii,13),DATAinsert(ii,14),...
DATAinsert(ii,17)];
end
else % scrivo tutto
colnames = {'Y','Z','YShift','ZShift','AlfaX','AlfaY','T_node','speed',...
'speed_local','acceleration','acceleration_local','calcerr'};
data = [DATAinsert(ii,6),DATAinsert(ii,7),DATAinsert(ii,8),...
DATAinsert(ii,9),DATAinsert(ii,10),DATAinsert(ii,11),...
DATAinsert(ii,12),DATAinsert(ii,13),DATAinsert(ii,14),...
DATAinsert(ii,15),DATAinsert(ii,16),DATAinsert(ii,17)];
end
whereclause = ['WHERE UnitName = ''' IDcentralina ''' and ToolNameID = ''' DTcatena ''' and NodeNum = ''' ...
nNodo ''' and EventDate = ''' cell2mat(DATAinsert(ii,4)) ''' and EventTime = ''' cell2mat(DATAinsert(ii,5)) ''' '];
update(conn,tablename,colnames,data,whereclause)
end
end
end