Siemens SINUMERIK 840D sl Funktionshandbuch Seite 473

Programmcode
N1230 IF (ISIMPL AND ($AC_AUXFU_VALUE[GROUPINDEX[LAUF]==19))
N1240 ASSEMBLED= ASSEMBLED << "SPOS[SPI(" <<
$AC_AUXFU_EXT[GROUPINDEX[LAUF]] << ")=IC(0)"
N1260 ELSE
N1270 ASSEMBLED= ASSEMBLED << "M[" << $AC_AUXFU_EXT[GROUPINDEX[LAUF]] << "]="
N1280
N1290 IF ISQUICK
N1300 ASSEMBLED= ASSEMBLED << "QU("
N1310 ENDIF
N1320
N1330 ASSEMBLED= ASSEMBLED << $AC_AUXFU_VALUE[GROUPINDEX[LAUF]]
N1340
N1350 IF ISQUICK
N1360 ASSEMBLED= ASSEMBLED << ")"
N1370 ENDIF
N1380 ENDIF
N1400 ENDIF
N1420 ENDFOR
N1430
N1450 WRITE(ERROR,FILENAME,ASSEMBLED)
N1460
N1470 IF ISSYNACT
N1480 ASSEMBLED="G4 F0.001"
N1490 WRITE(ERROR,FILENAME,ASSEMBLED)
N1500 ENDIF
N1510
N1520 ELSE
N1540 WRITE(ERROR,FILENAME,ASSEMBLED)
N1550 ENDIF
N1560
N1570 ENDLOOP
N1580
N1590 LABEL1:
N1600
N1620 CALL FILENAME
N1630
N1650 DELETE(ERROR,FILENAME)
N1660 IF (ERROR<>0)
N1670 SETAL(61000+ERROR)
N1680 ENDIF
N1690
N1700 M17
Grundfunktionen
Funktionshandbuch, 12/2018, A5E40870716A AB
H2: Hilfsfunktionsausgaben an PLC
9.13 Verhalten bei Satzsuchlauf
Kommentar
; Hilfsfunktionssatz in Datei schreiben.
; Hilfsfunktionssatz in Datei schreiben.
; Erzeugtes Unterprogramm abarbeiten.
; Datei nach Ausführung wieder löschen.
473