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 / 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


Please Help Members By Posting Answers For Below Questions

When would you use abend command?

1240


Explain ceci transaction commands?

1074


What is the tcp in the cisc?

1150


Explain the difference between the into and the set option in the exec cics receive map command?

1178


explain the means of supporting pseudo conversation programming. (Eg. Storing and restoring of states, control flow, error handling)?

1110


How to establish dynamic cursor position on a map?

1113


What are the recoverable cics resources?

1054


Explain how do you handle errors in cics programs?

1033


Define temporary storage?

1120


what are the commands used to gain exclusive control over a resource?

1264


Explain the difference between link xctl?

1052


How to handle exceptional conditions in cics?

1188


what is an mdt (modified data tag)? Its menaing and use?

1218


Can you define cemt?

1118


Name the cics command that gives the length of twa area?

1042