Hi,
Today I have seen a code that was written 15 years ago
A variable is declared with pic -----9 to display sqlcode
I have checked in some manuals and also with my colleagues but I couldn't find the reason what happens if a variable is declared with -----9
Please help me with this weird declaration
Thanks
WORKING-STORAGE SECTION.
01 WS-VARS.
05 WS-NE-VAR PIC -----9.
PROCEDURE DIVISION.
MOVE -877 TO WS-NE-VAR.
DISPLAY '-877 >' WS-NE-VAR '<'.
MOVE 888 TO WS-NE-VAR.
DISPLAY ' 888 >' WS-NE-VAR '<'.
MOVE -123456 TO WS-NE-VAR.
DISPLAY '-123456>' WS-NE-VAR '<'.
MOVE 123456 TO WS-NE-VAR.
DISPLAY ' 123456>' WS-NE-VAR '<'.
STOP RUN.