A field declared as P8 needs to be redefined as
Alphanumeric. What would be its new size?
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 |
control variable in online screens
Can you explain control variable in online screens?
how many work file we can code in jcl?
How to find occurrence of mu and pe fields in a file?
In a Natural program i used the below code for report FORMAT LS=132 PS=60 And down the line I want to change either LS/PS like FORMAT LS=120 PS=50, is it possible? How it will work?
The natural file converted to PDF file if Yes then explain ?
What is the difference between External subroutine and subprogram?
Explain why do we use file-aid for seqential files?
What is the difference between escape(top or bottom) and escape immediate(top or bottom?
What exactly is a hyperdescriptor? How does it work?
How to create 1 ddm that fetches 3 adabas files simultaneously?
difference between fetch , call and callnat