Siemens SINUMERIK 840D sl Programming Manual page 183

Example 3:
An ASUB, which is started by the PLC in order to activate a modified zero offset and tool
offsets, is to be executed invisibly.
Program code
N100 PROC ZO SBLOF DISPLOF
N110 CASE $P_UIFRNUM OF
N120 _G54: G54 D=$P_TOOL T=$P_TOOLNO
N130 RET
N140 _G54: G55 D=$P_TOOL T=$P_TOOLNO
N150 RET
N160 _G56: G56 D=$P_TOOL T=$P_TOOLNO
N170 RET
N180 _G57: G57 D=$P_TOOL T=$P_TOOLNO
N190 RET
N200 END: D=$P_TOOL T=$P_TOOLNO
N210 RET
Job Planning
Programming Manual, 06/2009, 6FC5398-2BP20-0BA0
0 GOTOF _G500
1 GOTOF _G54
2 GOTOF _G55
3 GOTOF _G56
4 GOTOF _G57
DEFAULT GOTOF END
Flexible NC programming
1.25 Subprogram technique
183