Awesome, Dan. Even after (too long to write here), can always learn a new trick.
Much appreciated.
Steve
-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Dan Bale
Sent: Tuesday, September 23, 2025 22:37
To: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx>
Subject: RE: DSPF Long Shot
Not sure what happened to the line feeds in my original comment. Try again #2:
In your DSPF, get rid of the display attributes defined on the header field.
Hex code X'3E' is the display attribute for blue, underline.
Hex code X'20' is the display attribute for green.
In your RPG, concatenate x'3E' + %trim(your header text field) + x'20'
Then use your centering function on that concatenation.
- Dan Bale
-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Steve M
Sent: Tuesday, September 23, 2025 10:46 PM
To: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx>
Subject: DSPF Long Shot
Almost absolutely certain the answer to this is "no", but it's never a final no until this group has their say/input.
DSPF format with a line for a header text. Field defined as character 80 bytes. Screen to screen the text in the header will change. Field attributes are blue and underscore.
On the first screen the actual text is 30 bytes. There is an centering function that is called before loading the text to the screen field so it's right in the middle.
Next screen the actual text is 50 bytes. (I know you all see where this is going). Yes, it's centered, as well.
Here's the question: I don't want the underscores on each side of the actual text (they look like airplane wings) (_________Here is the text_________) - so, is there a way to only underline the actual words/letters? Maybe I've just forgotten something really simple here (always a good chance on that one).
Lots of really smart people follow these pages so hoping for any idea that may "pretty-up" the screen.
As always, thanks to all in advance.
Steve M.
*** CONFIDENTIALITY NOTICE: The information contained in this communication may be confidential, and is intended only for the use of the recipients named above. If the reader of this message is not the intended recipient, you are hereby notified that any dissemination, distribution, or copying of this communication, or any of its contents, is strictly prohibited. If you have received this communication in error, please return it to the sender immediately and delete the original message and any copy of it from your computer system. If you have any questions concerning this message, please contact the sender. ***
--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit:
https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/rpg400-l.
Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.
--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit:
https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/rpg400-l.
Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.
--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit:
https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/rpg400-l.
Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.
midrange.com
