Interested to Buy Any Domain ? << Click Here >> for more details...
A field declared as P8 needs to be redefined as
Alphanumeric. What would be its new size?
- 9 Answers
- 14869 Views
- I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / shailesh jha
Its new size would be A5. P8 Stores in compressed format
having (n/2+1) bytes.
| Is This Answer Correct ? | 15 Yes | 3 No |
Answer / ajmina gilani
New size should be A5, as P8 will take 5 byte to store. But
when I have tested with redefining P8 by A5, it is not
displaying proper value for redefind veriable.
| Is This Answer Correct ? | 6 Yes | 2 No |
Answer / getme
5 bytes, see below
NAT0039 Sum of field lengths in REDEFINE > length of base field (=5 bytes).
0010 DEFINE DATA LOCAL
0020 01 #P (P8)
0030 01 REDEFINE #P
E 0040 02 #A (A8)
0050 END-DEFINE
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / surya
It should be redefined as A8.
Reason: even though the P8 occupies 5 bytes of memory
it is internal to the memory allocation. But to accomaodate
8 characters you need todeclare a alphanumeric character of
length 8.
dont be confused with memory allocation awith the
declaration.
| Is This Answer Correct ? | 5 Yes | 6 No |
Answer / dd
I think directly this conversion is not possible as packed
decimal is used for numeric value fields only.
Since it is p(8) so the numeric value field size should be
15 or 16 as [8 can be either (n+1)/2 i.e. (15+1)/2 or ( n/2)
i.e. 16/2].
So we can say (n15 or 16) will be (P8).
Alternatively (A16 or 15)
| Is This Answer Correct ? | 6 Yes | 14 No |
Answer / harish
Should be less than or equal to 8, but not more than 8.
| Is This Answer Correct ? | 1 Yes | 14 No |
Suppose you are processing an input file in a natural program and you want the program to fail if the file is empty. What command you use in natural to force it to fail?
Explain difference between read(1) and read work file once?
What is the difference between External subroutine and subprogram?
Explain the like inverted list?
What is Natural?
difference between read(1) and read work file once ?
How to receive data passed through jcl parm parameter in a natural program?
how to move cursor to a particular field when position is not known?
Explain how to move cursor to a particular field when position is not known?
difference between escape(top or bottom) and escape immediate(top or bottom?
A field declared as P8 needs to be redefined as Alphanumeric. What would be its new size?
Explain what happens when you issue a escape routine in a program? Will there be any compilation /run time erro?
COBOL 
