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

Add a field to screen when what's the flow of impact?

2955


Explain the difference between the xctl and link commands?

1172


Explain the difference between link and xctl?

1022


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?

1176


which cics command must be issued by the application program in order to gain access to the common work area (cwa)?

1175


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

1110


Explain how would you resolve an asra abend?

1047


Can a CICS code be a part of a copybook? If so, then what are the outcomes after compilation?

1168


How to handle exceptional conditions in cics?

1188


how do you fire a batch job from a cics txn ?

1102


when an apllication is invoked via the exec cics start command with the from option, how does the application gain access to the common area?

1117


Explain how can you accomplish breakpoint in intertest?

1079


Name the two types of transient data queues?

1098


What is non-conventional programs?

1131


Define primary objective of cics?

1049