DEF Cell( )
EXT testprogramm ( ) ;Semicolon entfernen und Unterprogramm Name eintragen
;EXT EXAMPLE2 ( )
;EXT EXAMPLE3 ( )
;P00 (#EXT_PGNO,#PGNO_GET,DMY[],0 )
;SWITCH PGNO ; Select with Programnumber
; CASE 1
;P00 (#EXT_PGNO,#PGNO_ACKN,DMY[],0 ) ; Reset Progr.No.-Request
testprogramm ( ) ; Call User-Program Unterprogramm Name eintragen
; CASE 2
; P00 (#EXT_PGNO,#PGNO_ACKN,DMY[],0 ) ; Reset Progr.No.-Request
; ;EXAMPLE2 ( ) ; Call User-Program
; CASE 3
; P00 (#EXT_PGNO,#PGNO_ACKN,DMY[],0 ) ; Reset Progr.No.-Request
;EXAMPLE3 ( ) ; Call User-Program
; DEFAULT
; P00 (#EXT_PGNO,#PGNO_FAULT,DMY[],0 )
; ENDSWITCH
ENDLOOP
END
Anwender ebene reicht.
