If I have a COBOL declaration like this:
Code: Select all
01 WS-A PIC X(20) VALUES SPACES.
01 WS-B REDEFINES WS-A PIC 9(10).
Code: Select all
IF WS-B IS NUMERIC
do this
END-IF
Is it a good coding practice?
Code: Select all
01 WS-A PIC X(20) VALUES SPACES.
01 WS-B REDEFINES WS-A PIC 9(10).
Code: Select all
IF WS-B IS NUMERIC
do this
END-IF
You need to be a member in order to post a reply
Not a member? register to join our community
Members can start their own topics & subscribe to topics
It’s free and only takes a minute