BaseSystemLib hinzugefügt

2026-06-29 16:28:48 +02:00
parent a51a0c6fd1
commit 14a1c5172d
168 changed files with 6797 additions and 0 deletions
@@ -0,0 +1,24 @@
+FUNCTION "FC_WriteDatalogToDB" : Bool
+{ S7_Optimized_Access := 'TRUE' }
+VERSION : 0.1
+   VAR_INPUT 
+      sErrorData : "DataLogBuffer";
+   END_VAR
+
+
+BEGIN
+	// unten reinschieben -> Fifo
+	 
+	 IF "dbDataLogBuffer".nIdx < "cNoTempDataLog" THEN
+	     "dbDataLogBuffer".nIdx += 1;
+	     "dbDataLogBuffer".DataLogBuffer["dbDataLogBuffer".nIdx] := #sErrorData;
+	     IF "dbDataLogBuffer".nIdxMax < "dbDataLogBuffer".nIdx THEN
+	         "dbDataLogBuffer".nIdxMax := "dbDataLogBuffer".nIdx;
+	     END_IF;
+	     #FC_WriteDatalogToDB := TRUE;
+	 ELSE
+	     #FC_WriteDatalogToDB := FALSE;
+	 END_IF;
+	
+END_FUNCTION
+