SUBMIT ZHFIUCPL0 USING SELECTION-SCREEN '1000'
WITH PNPPERNR-LOW = PERNR
WITH KILL = 'X'
WITH SHOW = ' '
AND RETURN.