Siemens SINUMERIK 840DE SL - Page 401

Program code Comment
PROC SUB2 ;Subprogram SUB2
DEF INT VAR2 ;LUD DEFINITION
...
IF (VAR1==1) ;Read PUD
VAR1=VAR1+1 ;Read & write PUD
VAR2=1 ;Write LUD
ENDIF
SUB3 ;Subprogram call
...
M17
Program code Comment
PROC SUB3 ;Subprogram SUB3
...
IF (VAR1==1) ;Read PUD
VAR1=VAR1+1 ;Read & write PUD
VAR2=1 ;Error: LUD from SUB2 not known
ENDIF
...
M17
Example 3: Definition and use of user variables of data type AXIS
Program code Comment
DEF AXIS ABSCISSA ; 1st Geometry axis
DEF AXIS SPINDLE ;Spindle
...
IF ISAXIS(1) == FALSE GOTOF CONTINUE
ABSCISSA = $P_AXN1
CONTINUE:
...
SPINDLE=(S1) ; 1st spindle
OVRA[SPINDLE]=80 ;Spindle override = 80%
SPINDLE=(S3) ; 3rd spindle
Work preparation
3.1 Flexible NC programming
NC programming
Programming Manual, 12/2019, 6FC5398-2EP40-0BA0 401