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
- 15572 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 |
What is the difference between Perform para and perform asaection in cobol?
What is perform what is varying?
What will happen if a variable is declared as below.. Explain with an example? Working storage section:- 01 WS-VARX PIC X(10) VALUE 'ABCDEFGHIJ'. 01 WS-VARN REDEFINES WS-VARX PIC 9(5) VALUE '12345'. What will happen I am going to Display the WS-VARX and WS- VARN?
1.Can we define condition-name conditions in FD entry.
Explain complete concept of table handling in COBOL with an example?
why 02 level number can't be use as a separate level number like 01 or 77 ?
How to read records in reverse order in flat file? I know we can do it by reading all records into an array.... Then read records in reverse order by using subscript or index but can any body give me the exact code.
if you give cylinder(1,1)how many cylinders it will be allocate?
i have 10 names in an array and my name is one of them also array is not in sorted order i need to display my name using index how will i do this
can we use go to statement inline-perform?
when COMP-3 is preferrable?
suppose there is one PF having two members PF1 PF2.PF has one unique key Emp ID.could you tell me uniqueness in PF will be effective across members as well ? assume emp iD 3333 is in member PF1 would same Emp id be exist also in member PF2 ?
COBOL 
