Interested to Buy Any Domain ? << Click Here >> for more details...
consider the following piece of code
01 GROUP-ITEM
05 AMOUNT-1 PIC 99V9 USAGE COMP VALUE 50
05 AMOUNT-2 PIC 9(4)V99 USAGE COMP
MOVE ZERO TO GROUP-ITEM
ADD 50 TO AMOUNT-1
what will be the content of AMOUNT-1?
a.50
b.100
c.0
d.unpredictable
- 10 Answers
- 15466 Views
- TCS, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / suresh
hi naveen,
Actually we are moving 0 to group-item so it will become
zero and adding 50 to amount-1. Hence Amount-1 is 50.
please correct me if i am wrong.
| Is This Answer Correct ? | 5 Yes | 1 No |
Answer / man
d. unpredictable
GROUP-ITEM is considered as alphanumeric. You can only
initialise a group item.
| Is This Answer Correct ? | 3 Yes | 1 No |
Ans is D and this 100% proof i have tested
| Is This Answer Correct ? | 1 Yes | 1 No |
Answer / priyanka
IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 GROUP-ITEM.
05 AMOUNT-1 PIC 99V9 COMP USAGE COMP VALUE 50.
05 AMOUNT-2 PIC 9(4)V99 USAGE COMP.
PROCEDURE DIVISION.
A000-FIRST-PARA.
INITIALIZE GROUP-ITEM.
MOVE 0 TO GROUP-ITEM.
ADD 50 TO AMOUNT-1.
DISPLAY AMOUNT-1
.
STOP RUN.
If we don't use " MOVE 0 TO GROUP-ITEM." condition then the answer is 50 else if we are using it then the answer is 32.0. so I think the right answer is unpredictable.
Please correct in email if I am wrong.
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / harish
u r right a. 50
pls correct me if anything wrong
HARISH POOMGAME SHIVAPPA(hassan,karnataka)
NIIT TECHNOLOGY
KOLKATA
| Is This Answer Correct ? | 1 Yes | 2 No |
Answer / sachin borase
yes answer will be 50.
But if you initialize instead of move zeros then
value will be 100.
| Is This Answer Correct ? | 0 Yes | 1 No |
Answer / naveen
Why not C?
Can we have the reason for the above answer?
| Is This Answer Correct ? | 0 Yes | 2 No |
How you can delete a record from a ps file in cobol?
How do you come out of an EVALUATE statement?
I hv ten records in ps file and i hv say some 15 records in vsam file .i hv empno and age in ps file n empno,empname,dept n desig in vsam file. i hv 2 read the ps file n check wid matching empno in vsam file and then insert all fields from ps and vsam into db2 table....plz help in writin the procedure division
What do you understand by psb and acb?
In a program, variables are used but no DB2 involved in it. Can you call it as host variables??
consider the fallowing 77 stat pic 9. 88 male value 1,2,3. 88 female value 4 through7. what will be the value of stat a) set male to true. b) set female to true.
What is the difference between index and subscript?
what is meaning by design document? who can repared for this?
I have a File that has duplicate records. I need only those records that occur more than thrice.?
What are ISOLATION LEVELS? Where do we need to specify them in compiling JCL (Exactly which statement and what is syntax for it)?
what is lrec=f,what is difference between f,fb,v,vb?what is default value?how do we came to know that records are in f,fb,v,vb?
IF I mention stop run in CICS what happens?
COBOL 
