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 |
Explain is it possible to code goto statement in natural? If yes please provide the syntax of the same?
What happens when you issue a ESCAPE ROUTINE in a program ? Will there be any compilation /Run time error.
How are you going to remove duplicates from the file that is being read?
Explain the like inverted list?
Would like to know if have an expecific command that returns a code or something about the execution of a CALLNAT. For example ... CALLNAT 'SUBPRG' [parameter] [parameter] ... [here comes a code or command that checks if the CALLNAT was successful]
What is data trace system 2.0 used for?
How can I create 1 DDM that fetches 3 ADABAS files simultaneously?
What is the quality process in development?
Explain how are you going to remove duplicates from the file that is being read?
what is the difference between read and find ?
How to create 1 ddm that fetches 3 adabas files simultaneously?
how we can find occurence of MU and PE fileds in a file?