Siemens SINUMERIK 828D Function Manual page 455

Program code
N320 IF (NUM==-1)
N340 GOTOF LABEL1
N350 ENDIF
N380 WRITE(ERROR,FILENAME,ASSEMBLED)
N390 IF (ERROR<>0)
N400 SETAL(61000+ERROR)
N410 ENDIF
N430 ENDLOOP
N440
N450 LABEL1:
N460
N480 CALL FILENAME
N490
N510 DELETE(ERROR,FILENAME)
N520 IF (ERROR<>0)
N530 SETAL(61000+ERROR)
N540 ENDIF
N550
N560 M17
Example 2: Deleting auxiliary functions and generating the auxiliary function output without AUXFUSYNC(...)
Program code
N0610 DEF STRING[400] ASSEMBLED=""
N0620 DEF STRING[31] FILENAME="/_N_CST_DIR/_N_AUXFU_SPF"
N0630 DEF INT GROUPINDEX[10]
N0640 DEF INT NUM
N0650 DEF INT LAUF
N0660 DEF INT ERROR
N0670 DEF BOOL ISQUICK
N0680 DEF BOOL ISSYNACT
N0690 DEF BOOL ISIMPL
...
N0760 AUXFUDEL("M",2,3,5)
N0770
Basic Functions
Function Manual, 09/2011, 6FC5397-0BP40-2BA0
H2: Auxiliary function outputs to PLC
Comment
; All auxiliary functions of the channel
; have been executed.
; Write a part program block to file FILENAME.
; Error evaluation
; Process a generated subroutine.
; Delete the file again after execution.
Comment
; M2=3 (5th auxiliary function group) delete
8.13 Block-search response
455