Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

how to show default editable value on MFS

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IMS DB/DC
View previous topic :: :: View next topic  
Author Message
heredev

New User


Joined: 30 Mar 2008
Posts: 3
Location: kolkata

PostPosted: Tue Aug 26, 2008 5:44 pm    Post subject: how to show default editable value on MFS
Reply with quote

how to show default editable value at an input field of a MFS screen when it is thrown for the first time.

example:

ENTER ROLL NO: 000000

here 000000 is the default value at the ROLL NO field. User can update the value by his ROLL NO.
Back to top
View user's profile Send private message

Sandy Zimmer

Active Member


Joined: 13 Jun 2007
Posts: 826
Location: Wilmington, DE

PostPosted: Tue Aug 26, 2008 8:10 pm    Post subject:
Reply with quote

Try this - your position on the screen probably is not this, but always remember to allow for your attribute bytes.

DFLD POS=(15,42), LTH=6,ATTR=(MOD,NUM)

input
MFLD ROLL,LTH=6,JUST=R,FILL=C'0'

output
MFLD ROLL,LTH=8,ATTR=YES
Back to top
View user's profile Send private message
heredev

New User


Joined: 30 Mar 2008
Posts: 3
Location: kolkata

PostPosted: Mon Sep 01, 2008 3:25 pm    Post subject:
Reply with quote

Thanks for your help but the code did not work.

What i understand from the code is that - (correct me if i am wrong)
As the FILL=C'0' in specified for the input area, if no value is entered on the screen and ENTER is presed, zero will go to the program.

But objective is to show the default value when the scren is thrown for the first time.

I would like to state another example in this regard,

When the screen is thrown for the first time this will be displayed:
ENTER EMAIL: _____________@ibmmainframes.com

If i update the field it will become:
ENTER EMAIL: heredev______@ibmmainframes.com

So the UNDERSCORE is the default value for that input field and also is updatable.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IMS DB/DC All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts How to show message using batch jobs madprasy TSO/ISPF 7 Fri Sep 09, 2016 6:55 pm
No new posts force windows ftp client user to defa... meykh2014 All Other Mainframe Topics 0 Sun Feb 14, 2016 12:57 pm
No new posts Need to show date in "DYYMMDD.TH... deepak_shrivastava DFSORT/ICETOOL 2 Tue Jan 05, 2016 7:15 pm
No new posts change z/os default 1047 ccsid tp 1097 meykh2014 All Other Mainframe Topics 4 Sat Sep 05, 2015 5:21 pm
No new posts Initializing filler default value whe... dsivapradeep COBOL Programming 6 Thu Feb 13, 2014 11:17 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us