I use this technique in subfiles to design entire lines, different colors,
underlines, etc. It's much more practical than working with indicators.
Just my 2cts.
KF
-----Ursprüngliche Nachricht-----
Von: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxxxxxxxx] Im Auftrag von
Steve M
Gesendet: Mittwoch, 24. September 2025 14:49
An: RPG programming on IBM i
Betreff: RE: DSPF Long Shot
Dan,
Thank you for the suggestion. I will try that.
To be honest, there is already a DSPATR(&HEADERA) on the field in the DSPF
and it's loaded with x'3E' in the program.
I didn't think about building the colorization by segments - interesting.
Thanks,
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
