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.
Answers were Sorted based on User's Feedback
Answer / jai
01 rec1.
02 a pic x(6) == 6
02 b redefines a. == 6
03 c occus 6 times pic 9. == 6
02 d occurs 6 times.
03 e pic x(5) ==30
03 f pic 999. ==18
------
66
| Is This Answer Correct ? | 0 Yes | 1 No |
01 rec1.
02 a pic x(6)-------------------- 6 bytes
02 b redefines a.
03 c occurs 6 times pic 9.------ 6*1(pic 9 ie why we
have mul with 1 )------------------- 6 bytes
02 d occurs 6 times pic 9.------- (6*1) 6 bytes
03 e pic x(05)------------------- 5*6 =30 bytes
03 f pic 999. --------------------- 3*6=18
6
6
6
30
18
66
if you remove e f
18
| Is This Answer Correct ? | 0 Yes | 1 No |
study the following 01 A PIC 99V0 VALUE 5 01 B PIC 9V9 VALUE 6 01 C PIC 99V9 VALUE 2.5 01 D PIC 99 VALUE 3 COMPUTE A ROUNDED B C = A+B*C/D ON SIZE ERROR PERFORM PRINT-ERROR the comments of A.B.C after execution of the above statement are a.A=10 B=0 C=10 b.A=10 B=9.9 C=9.9 c.A=10 B=0 C=9.9 d.A=10 B=6 C=10
can we use reference modification an arry.
input:- 12233344445555566666... output:- 1=1,2=4,3=9... Here firstno i.e 1 should be displayed and after that the alikeno.s should be added n displayed.i.e 2+2=4 like tat it goeson.
Suppose i have a Cobol field of 10 byte. it contains a decimal sign.How to know where is the point location?
What are the different rules to perform a Search?
I have files that contains both duplicates files(occur more than twice) and non-duplicate files.The file is already sorted by a key.I want to determine those records that are duplicate and will be move to a duplicate file and non- duplicate files to be move to a valid file.thank you.help please
Difference between lrecl, blksize among PS, PDS issues? i.e in jcl at dcb
What is "Call by content" and "call by reference"?
Which of the following EDITind and PICTURE symbols is to be used if a minus(-) is to appear before the value if the value is -ve and a plus(+) is to appear before the value if the value is +ve? (a) + (b) - (c) + OR (d) It is not possible
What should be the sorting order for SEARCH ALL?
hi is there any means of deletin a record from a ps usin cobol not using jcl?eg if i am reading a record and if some condition is matched tat particular record must be deletd fom the ps
1)what is the maximum limit for occurs? Eg: 01 A PIC X(10) OCCURS N TIME. What is the max value for N?