Nutzung Im Script - Siemens SINUMERIK 840D sl Funktionshandbuch

Parameter "Option":
0:
Bit 0 = 1:
Bit 1 = 1:
Rückgabewert:
0
-1
-2
-4
-5
-6
-7

Nutzung im Script

Programmcode
If S7Ext.Magic("") < 0 Then
End If
For Each cont In s7prog.Next
Fehler = S7Ext.MakeSerienIB("f:\dh\arc.dir\PLC.arc", 0, Cont)
'Jetzt Fehlerauswertung
Der oben programmierte For Each ... Next -Block kann in der Programmiersprache Delphi
wie folgt programmiert werden (ähnliche Programmierung gilt auch für die
Programmiersprache C, C++):
Programmcode
Var
Grundfunktionen
Funktionshandbuch, 12/2018, A5E40870716A AB
Normale Serien-IBN-Datei mit Urlöschen.
Serien-IBN-Datei ohne Urlöschen. Wenn SDBs im Projekt sind, ist diese Option nicht
wirksam.
Es wird dann immer ein Urlöschen durchgeführt.
Serien-IBN-Datei mit PLC-Neustart
= OK
= Funktion nicht verfügbar, Funktion "Magic" vorher aufrufen
= Dateiname nicht erzeugbar
= Parameter Container ungültig oder Baustein Container leer
= interner Fehler (Speicheranforderung durch Windows abgelehnt)
= interner Fehler (Problem im STEP 7-Projekt)
= Schreibfehler beim Erzeugen der Serien-IBN-Datei (z. B. Diskette voll)
Wscript.Quit(1)
Set Proj1 = s7.Projects("neu")
set S7Prog = Nothing
Set s7prog = Proj1.Programs.Item(1) 'wenn es nur ein Programm gibt
If (Cont.ConcreteType = S7BlockContainer) Then
'Bausteincontainer prüfen
Exit For
End if
Cont = Nothing
Next
EnumVar: IEnumVariant;
rgvar: OleVariant;
fetched: Cardinal;
P3: PLC-Grundprogramm für SINUMERIK 840D sl
14.7 Inbetriebnahme PLC-Programm
911