Interested to Buy Any Domain ? << Click Here >> for more details...
Determine the total no of bytes in the following.
01 rec1.
02 a pic x(6)
02 b redefines a.
03 c occus 6 times pic 9.
02 d occurs 6 times pic 9.
03 e pic x(5)
03 f pic 999.
- 12 Answers
- 18420 Views
- I also Faced
- E-Mail Answers
Answer Posted / milan kumar
a PIC X(6)-------------6B
b REDEFINES A ---------0B
IF WE REMOVE PIC CLUSE
D=( E PIC X(5)+F PIC 999)
D=(8B OCCURS 6 TIMES)
D----------------------48B
----------
TOTAL OF 54B
| Is This Answer Correct ? | 1 Yes | 0 No |
Post New Answer View All Answers
What is Pic 9v99 Indicates in COBOL?
What is report-item in COBOL?
Write a program to enter and display the names of students in a class using the occurs clause.
Give some examples of command terminators?
i need a small 3d program using inline and outline.
What is the difference between external and global variables in COBOL?
here is my requirement A1 is alphanumeric with value 'A1B2C3D4' as defined below 05 A1 PIC X(8) VALUE IS 'A1B2C3D4' but i need to have A2,A3 as ABCD & 1234 repectively...... A2 = ABCD A3 = 1234 Can you please explain me what are the different ways to do it?
Define cobol?
What is the difference between comp and comp-3?
Write the code to count the sum of n natural numbers.
If you are current on the owner of a set, what is the difference between obtain next and obtain first?
What is a SSRANGE and NOSSRANGE?
I need to compare 3 variables(dates) and do some processing based on the earliest date. There could be more then 1 date record in any of the 3 fields. What is the best way to code this?
What are the different rules for performing sort operation?
What is the difference between Call and a Link?
