Interested to Buy Any Domain ? << Click Here >> for more details...
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?
- 7 Answers
- 10417 Views
- I also Faced
- E-Mail Answers
Answer Posted / y@$w@nth
Sorry for the above answer i thought zeros should be supressed.
When at the time of defining the field in the map we can
code PICOUT option for eg:
SUPFIELD DFHMDF POS=(**,**),
LENGTH=4,
ATTRIB=(UNPROT,FSET),
PICOUT='9(4)',
PICIN='9(4)'
If zeros should be supressed then code following
SUPFIELD DFHMDF POS=(**,**),
LENGTH=4,
ATTRIB=(UNPROT,FSET),
PICOUT='z(3)9',
PICIN='z(3)9'
Correct me if i am wrong
| Is This Answer Correct ? | 8 Yes | 0 No |
Post New Answer View All Answers
Can you explain enq and deq used in cics?
how can you prevent more than one user from accessing the same transient data queue?
In the EIB block of CICS, highlight the names of few of the important fields?
Explain how would you resolve an asra abend?
What are the cics commands associated with task control?
Explain how do you set the mdt option to on status, even if data is not entered?
What is the use of the eibaid field?
Define cics interface block?
What are the types of important programs that are used in the cics?
What is ENQ?
Can you explain cics transaction gateway?
kindly specify the pic clause for the following:any bll cell, data type of length option field, hhmmss type of data fields?
Explain the difference between link xctl?
Explain the difference between getting the system time with eibtime and asktime command?
Define the term transaction routing?
