J McNamara - 2024-12-18
 WORKING-STORAGE SECTION.
   01 Keyboard-Status.
      03 Accept-Status Pic 9.
      03 Function-Key Pic X.
        88 F1-Pressed Value X"01".
      03 System-Use Pic X.

     PERFORM UNTIL F1-Pressed 
      DISPLAY "hello"
    END-PERFORM

F1 JUST STAYS IN LOOP SORRY GUYS.
I TRIED...

THANKS

Sent with Proton Mail secure email.