Der inlr beendet das Pgm nach dem 1. exfmt.

Versuch mal:

*inlr = *off;
DOU *inlr
EXFMT MAIN;

// F8 Funktion
if *in08; // F8 gedrückt
*in50 = *off; // Feld MONSCHICHV anzeigen
else;
*in50 = *on; // Feld MONSCHICHV verbergen
endif;
if *in03; // F3 gedrückt
*inlr = *on; // LR anschalten
endif;

enddo;

Im Format dann F3 zulassen (CF03).

Evtl. muss Du noch die Syntax korrigieren. Ich kann kein leider Free.

Gruss
Ulli