Siemens SINUMERIK 828D Consignes De Fonctionnement page 784

Sorties de fonctions auxiliaires vers l'AP
13.13 Comportement lors d'une recherche de bloc
Code de programme
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
784
Commentaire
; Écrire le bloc de fonction auxiliaire dans un
fichier.
; Écrire le bloc de fonction auxiliaire dans un
fichier.
; Exécuter le sous-programme généré.
; Supprimer le fichier après exécution.
Description fonctionnelle, 01/2023, A5E48764112D AE
Fonctions de base