What is wrong with the following data declaration?
01 W-DATE PIC X(6).
05 DD PIC 99.
05 MM PIC 99.
05 YY PIC 99.
(a) Nothing is wrong.
(b) Under W-DATE all level 05 items are having a PIC 99 but
level
01 has PIC X(6).
(c) PIC can't be specified for a group item.
(d) DD, MM, and YY are invalid datanames.
- 6 Answers
- 11137 Views
- Mphasis, TCS, I also Faced
- E-Mail Answers
Answer Posted / anshu puri
cobol dont allow to use PIC clause at 01 level
| Is This Answer Correct ? | 2 Yes | 7 No |
Post New Answer View All Answers
For rewrite, why is it mandatory that file needs to be opened?
What is amode(24)?
What do you understand by psb and acb?
Which is the default, TEST BEFORE or TEST AFTER for a PERFORM statement?
) How do u handle errors in BMS macro
how do you reference the variable unblock file formats from cobol programs
What are the access modes of START statement?
Difference between array and sub-script ?
How do you differentiate between cobol and cobol-ii?
how do you reference the fixed unblock file formats from cobol programs
I have a program with an Array of 5000 occurences which is being passed from 5 sub levels to the front end screen. Thess 5 programs using each 5*2 = 10 different arrays with size as 5000. This is causing the transaction to utilize more storage consupmtion. I am looking to reduce the storage consumption. As part of that initially i thought Dynamic array may solve my problem. After viewing the comments given i see its same as normal array. IS there any other way we can resolve this issue?
Can we redefine the field of x(200) to less than 200?
Program A (Normal COBBAT) calling a B Program (DB2COBOL, COBBATDB which is using a VSAM file. its a dynamic call. How we will handle VSAM file decleration in our from JCL from where we are running A PGM. And should we have PLAN for A pGM also. if possible can some one post a sample JCL. Thanks for help in advance.
What is the default value(s) for an initialize and what keyword allows for an override of the default?
What is the LINKAGE SECTION used in COBOL?
