I have a Field which is of size 9(4). In the Screen if I enter
the value for this field as 1234, it showing it as Valid. But if
I enter only one or two digits, zeros should be appended in the
remaining places. For example: When u enter 1 in the screen the
output should be 0001. When you enter 12, output should be 0012.
How to achieve this in the program?
Answer Posted / girish kumar
IN THE MAP JUST U CODE PICIN AS X(LENGTH) AND NEVER CODE THE
ANYTHING IN THE "INITIAL" JUST GIVE A BLANK SPACE.
FOR EX: IF YOU ARE DOING ADDITION USE
FUNCTION NUM VALUES(NO1I) PIC X(5).
FUNCTION NUM VALUES(NO2I) PIC X(5).
THEN COMPUTE NO1I + NO2I.
CODE LIKE THIS IN APPLICATION PROGRAM
I GET THE EXACT RESULT.
| Is This Answer Correct ? | 0 Yes | 0 No |
Post New Answer View All Answers
What is commarea (communications area)?
What are the recoverable cics resources?
What is the comaera (communication area)?
Receive consists of buffer option in it. What is the significance of this option?
Define communication area?
Explain the difference between a symbolic map and physical map?
Explain the difference between the into and the set option in the exec cics receive map command?
Can you explain enq and deq used in cics?
Give certain situations where NEWCOPY is obligatory?
how can you prevent more than one user from accessing the same transient data queue?
Can dynamic calls be used in CICS?
What is the eib parameter?
Explain the difference between exec cics handle condtion and an exec cics ignore command?
Explain how and where is the twa size set?
What is the common work area?