DECL/COMMON,INTGR,APart,BPart
xxx = Prompt/CHECK,‘A Part’,APart,CHECK,‘B Part’,BPart,title,‘Select Part Programme’
IF/ APart
JUMPTO/(A)
else
IF/BPart
JUMPTO/(B)
else
JUMPTO/(END)
ENDIF
ENDIF
(A)
B Part programe here , jumpto END after B measure finish
JUMPTO/(END)

(END)