My Mainframe guy gave a text file that had the COBOL FILE DEFINITION
and few columns are like this
10 XF-PRIM-REG-ID PIC +9(02)V9(06).
10 XF-PRIM-REM-ID PIC +9(03)V9(06).
It has a + sign in PIC 9. Is this a correct CFD anyway, because I am not able to import this CFD from Manager. I know I can keep that extra + sign by defining a new filler as PIC X(1), but my question is more from COBOL perspective if this is a correct generation. Any comments?
COBOL FILE DEFINITION
Moderators: chulett, rschirm, roy
-
- Participant
- Posts: 54607
- Joined: Wed Oct 23, 2002 10:52 pm
- Location: Sydney, Australia
- Contact:
Not something I've seen. You could perhaps work around it by changing the FD.
Code: Select all
10 XF-PRIM-REG-ID-FLD.
15 XF-PRIM-REG-ID-SIGN PIC X.
15 XF_PRIM-REG-ID PIC 9(02)V9(06).
10 XF-PRIM-REM-ID-FLD.
15 XF-PRIM-REM-ID-SIGN PIC X.
15 XF-PRIM-REM-ID PIC 9(03)V9(06).
IBM Software Services Group
Any contribution to this forum is my own opinion and does not necessarily reflect any position that IBM may hold.
Any contribution to this forum is my own opinion and does not necessarily reflect any position that IBM may hold.