study the following code
01 A1
05 B PIC 99
05 C PIC X(4)
01 A2
05 B PIC 99V99
05 C PIC A(4)
pick out the valid statement from the following
a.A1 and A2 can not have sub-ordinates
b.A1 and A2 can have the same sub-ordinates but must have
same PIC clause
c.there is nothing wrong
d.A1 and A2 can have same sub-ordinates provided they are
not at 01 level
Answers were Sorted based on User's Feedback
Answer / satya prakash
a. A1 and A2 can not have subordinates because the size of
the group item A1 is differ from A2.
| Is This Answer Correct ? | 0 Yes | 1 No |
Answer / asmara
B is the right answer because if the level and sub-
ordinates must be same as well as the same PIC clause must
be there. where B PIC clause is differ.
If i am wrong let me inform to my mail..
Regards,
Asmara
| Is This Answer Correct ? | 0 Yes | 5 No |
wht is structured cobol pgm and non structred cobol pgm ?
I have a File that has duplicate records. I need only those records that occur more than thrice.?
1.What is the limit of linkage section?
What is the difference between performing a SECTION and a PARAGRAPH?
What is the LINKAGE SECTION used in COBOL?
if a file has 1000 recods how copy the records from 1 to 100 records using sort
A table has two indexes defined. Which one will be used by the SEARCH?
Hi All, how is sign is stored in S9(17) comp-3 variable. Answer with an Example will be of great help.
Study the DATA DIVISION entries and the three PROCEDURE DIVISION entries given below: 01 END-OF-FILE-SWITCH PIC XXX. 88 NO-MORE-RECS VALUE "YES". 88 MORE-RECS VALUE "NO". (i) READ SAMPLE-FILE AT END MOVE "YES" TO NO-MORE-RECS. (ii) IF NO-MORE-RECS = "YES" GO TO LAST-PARA. (iii) IF NO-MORE-RECS GO TO LAST-PARA. Which are wrong? (a) (i) and (ii) (b) (ii) and (iii) (c) (i) and (iii) (d) all
if a=b how the flow will complete??? perform test through test-exit. perform activa through activa-exit. test. if a=b then next sentence else move a to c. test-exit. exit. activa. -- -- activa-exit. exit.
what do you mean by copybook? and what is the difference between the copybook which we are using in working storage and procedure division.
what is the use of outrecord?