En efecto tiene que ser una subscreen, y el codigo para que funcione en la PAI queda asi:
MODULE exit_command INPUT.
data: ok-code LIKE sy-ucomm.
ok-code = sy-ucomm.
CASE ok-code.
WHEN 'FUNC'.
......
........
ENDCASE.
Mil gracias Mari.Sole por tu ayuda, me has salvado
ENDMODULE.