$title Phantoms can only have default values - ondelim (PHANTOM2,SEQ=29)
$phantom empty
$onDelim
parameter x(*) /
empty 0
zero 0
one 1
empty 1
/
$offDelim
$debug dmpuel
$if errorfree $goTo problem
$clearError
$terminate

$label problem
$error the second empty is wrong