ACCEPT DATANAME LINE XXX POSITION XXX IF F1 GO TO XXXX
A SAMPLE SOURCE WOULD BE HELPFUL
THANKS Bert
Anonymous
You seem to have CSS turned off. Please don't fill out this field.
You'd want to use the CRT-STATUS to query the key pressed, either with a manual define or via the internal register COB-CRT-STATUS. The values to compare those like COB-SCR-F1 are found in screenio.cpy, see https://gnucobol.sourceforge.io/faq/index.html#does-gnucobol-support-crt-status
CRT-STATUS
COB-CRT-STATUS
COB-SCR-F1
Hi Bert,
you can see examples with function keys here: https://sourceforge.net/p/gnucobol/contrib/HEAD/tree/trunk/samples/DBsample
László
ACCEPT DATANAME LINE XXX POSITION XXX
IF F1 GO TO XXXX
A SAMPLE SOURCE WOULD BE HELPFUL
THANKS Bert
You'd want to use the
CRT-STATUSto query the key pressed, either with a manual define or via the internal registerCOB-CRT-STATUS. The values to compare those likeCOB-SCR-F1are found in screenio.cpy, see https://gnucobol.sourceforge.io/faq/index.html#does-gnucobol-support-crt-statusHi Bert,
you can see examples with function keys here:
https://sourceforge.net/p/gnucobol/contrib/HEAD/tree/trunk/samples/DBsample
László