Tip

Personalize your iSeries


Andrew Borts
With iSeries systems now being more cost effective, a lot of users have more of them under one roof. It's becoming more important to personalize how they look and run to match your needs. How can we personalize our systems? Let's look at our first impression of the iSeries system – the Sign-on Screen.

There's a few things that may not help us in the long run. Do we need to override the Program/Procedure? Do we need to override the initial Menu? How about change our Current Library? All of these items aren't necessary on ALL of our screens. Always keep it the same on the console. The source for your sign-on screen has been located in QGPL under QDDSSRC for years. Let's look at that file for a moment and see what trouble we can get into!

As always, copy the original so it doesn't get mucked up while we're playing with its "twin brother."

From the above figure, look at the following edits I've already made:

A. Notice that I changed "Sign On" to "Put Something Here" -- yes -- everyone that sees the words "User ID" and "Password" are lulled into entering that information on their own -- why have "Sign on" taking up precious room we can use for something like our company name.

B. I commented out the "Program/Procedure" with four (4) asterisks (*). No need to display this -- 99% of the user community has never changed this. Please also note that I added DSPATR(ND) and DSPATR(PR) to protect and NOT display the input field. The field MUST be on the display, however, no need to see it nor enter anything within them.

C. Same treatment as in the example I gave for B.

So, what do we put in the normally open space? How about "Contact Help Desk at extension 1234?" Communicating before you signed into the system, great idea! Once these edits are in place, you can compile the display as you normally would compile a DSPF source type, and then perform the following command to utilize that sign-on display instead of the one shipped from IBM. What else can we do? We can use a message file to display different messages for the users that sign in. How? Well, it's just a display file, so let's look at the following.

D. See B
E. Under no circumstance change the above.
F. I added some elements that are dynamic that could change from a message file called "SIGNONMF" from a message number of SON 1000 (Signon 1000?)

So, where did they come from? From the two CL commands!

CRTMSGF MSGF(library of your choice/SIGNONMF) TEXT('Sign-on Message File') And to add the message to the file…

ADDMSGD MSGID(SON1000) MSGF(SIGNONMF) MSG('To Contact Help Desk;')

ADDMSGD MSGID(SON1001) MSGF(SIGNONMF) MSG('Tel: 123-456-7890')

ADDMSGD MSGID(SON1002) MSGF(SIGNONMF) MSG('Internal: Extension 1234')

The last thing, let's modify which display we see.

CHGSBSD SBSD(QINTER) SGNDSPF(library of your choice /QDSIGNONNW)

Where QDSIGNONNW is the name of the file edited within my examples.

Now to be 100% SAFE, – do NOT edit the QCTL subsystem's Sign-on – NOR do you replace the existing QDSIGNON located in QSYS).

Like what you see? I found this information on line, visit the Astradyne site for more information.

-----------------------------------------
About the author: Andrew Borts is webmaster at United Auto Insurance Group in North Miami, Fla. He is often a frequent speaker at COMMON and is past president of The Southern National Users Group, an iSeries-AS/400 user group based in Deerfield Beach, Fla.

This was first published in January 2007

There are Comments. Add yours.

 
TIP: Want to include a code block in your comment? Use <pre> or <code> tags around the desired text. Ex: <code>insert code</code>

REGISTER or login:

Forgot Password?
By submitting you agree to receive email from TechTarget and its partners. If you reside outside of the United States, you consent to having your personal data transferred to and processed in the United States. Privacy
Sort by: OldestNewest

Forgot Password?

No problem! Submit your e-mail address below. We'll send you an email containing your password.

Your password has been sent to:

Disclaimer: Our Tips Exchange is a forum for you to share technical advice and expertise with your peers and to learn from other enterprise IT professionals. TechTarget provides the infrastructure to facilitate this sharing of information. However, we cannot guarantee the accuracy or validity of the material submitted. You agree that your use of the Ask The Expert services and your reliance on any questions, answers, information or other materials received through this Web site is at your own risk.