For both ACCEPT and DISPLAY, the compiler accepts negative values for the LINE and COLUMN options.
The compiler should report as an error that only positive, non-zero values are allowed.
But now no errors are reported and when running an ACCEPT field, the behavior is strange: the field can be typed for an indefinite length.
Sample program:
>>SOURCE FREE
IDENTIFICATION DIVISION.
PROGRAM-ID. TESTACCEPT99.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 wTEXT PIC x(10) value 'abc'.
01 wNUM PIC 999 value zero.
01 wRuler pic x(80) value '....+....1....+....2....+....3....+....4'.
PROCEDURE DIVISION.
display wRULER at 0901
DISPLAY 'text ...: ' AT LINE -10 COL 10
ACCEPT wTEXT AT LINE -2 COLUMN -40 with prompt '_'
DISPLAY 'num ....: ' AT 1110
ACCEPT wNUM AT LINE 11 COLUMN -10 with prompt '_'
STOP RUN.
Diff: