You coded
CALL SCREEN 9000.
so 9000 is not a selection-screen, as it would require a CALL SELECTION-SCREEN or some CALL SUBSCREEN statement...
And you cannot use standard selection-screen functions, and are required to code yourself the "variant" save/restore dialog.
Regards,
Raymond