Solution, Milling with several settings, Main program spgm, contour – HEIDENHAIN TNC 426B (280 472) Training ISO programming User Manual
Page 48: Spgm end

HEIDENHAIN Basic Course ISO G
426
62188/2
F06
100
0
50
0
10
90
10
90
R10
R10
50
100
40
0
R20
R20
R20
R20
30
MAIN PROGRAM
SPGM, contour
Retract tool, end
SPGM end
%62188 G71 *
N10
G30 G17 X+0 Y+0 Z-40 *
N20
G31 G90 X+100 Y+100 Z+0 *
N30
T13 G17 S2000 * ................................................. R20
N40
G00 G40 G90 Z+100 M03 *
N50
X-30 Y+70 * ............................................................ AUXILIARY POINT
N60
Z+0 *
N70
G98 L2 *
N80
G01 G91 Z-5 F200 * ................................................. SETTING
N90
L1,0 * ..................................................................... CALL CONTOUR
N100 L2,5 * ..................................................................... FURTHER CONTOUR SECTIONS
N110 G00 Z+100 M06 *
N120 T14 G17 S3000 *
N130 G00 G40 G90 Z+100 M03 *
N140 X-30 Y+70 *
N150 G01 Z-30 F500 *
N160 L1,0 *
N170 G00 Z+100 M30 *
N180 G98 L1 *
N190 G01 G41 G90 X+10 Y+70 F200 *
N190 G26 R3 *
N200 X+10 Y+90 *
N210 G25 R10 *
N220 G01 X+50 Y+90 *
N230 G25 R20 *
N240 G01 X+90 Y+50 *
N250 G25 R20 * .............................................................. CONTOUR
N260 G01 X+90 Y+10 *
N270 G25 R10 *
N280 G01 X+50 *
N290 G25 R20 *
N300 G01 X+10 Y+50 *
N310 G25 R20 *
N320 G01 Y+70 *
N330 G27 R3 *
N340 G01 G40 X-20 Y+70 *
N350 G98 L0 *
N999999 %62188 G71 *