Golgappa.net | Golgappa.org | BagIndia.net | BodyIndia.Com | CabIndia.net | CarsBikes.net | CarsBikes.org | CashIndia.net | ConsumerIndia.net | CookingIndia.net | DataIndia.net | DealIndia.net | EmailIndia.net | FirstTablet.com | FirstTourist.com | ForsaleIndia.net | IndiaBody.Com | IndiaCab.net | IndiaCash.net | IndiaModel.net | KidForum.net | OfficeIndia.net | PaysIndia.com | RestaurantIndia.net | RestaurantsIndia.net | SaleForum.net | SellForum.net | SoldIndia.com | StarIndia.net | TomatoCab.com | TomatoCabs.com | TownIndia.com
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?

Answer Posted / y@$w@nth

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=z(3)9,
PICIN=z(3)9

Correct me if i am wrong

Is This Answer Correct ?    0 Yes 3 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

How to handle exceptional conditions in cics?

1068


How To Compile The COBOL-BD2-CI CS Programs In Real TIme? Please Give Me the Detailed Description?

6638


Explain how DSECT parameter is used in BMS ?

1154


What is the pic clause for the hhmmss type of data fields?

867


Define an asra?

962


Why do we need integrated cics translator?

993


what is the most common way of building queue-id of a tsq?

1027


Highlight the difference between a symbolic map and physical map?

1044


What is the term conversational programs means?

954


What is the use of mdt (modified data tag)?

1001


What are the cics commands associated with task control?

946


What is meant by an AICA ABEND?

1108


Name the 3 common ways to create maps?

1058


Code the related portions of cics/cobol-i programs to gain addressability to twa area assigned to a particular task. Assme that the size of twa area is 300bytes. What are the advantages if cobol-ii is used in the place of cobol?

1080


What does the 'cemt:cics' transactions do?

1133