1. Determine the first and last character, with Substring/Left and Right
2. Determine the length of the text (-2 Characters) build a string with
asterics for the determined length
3. Concatenate everything
Something like this:
Left(YourCol, 1) concat Repeat('*', Length(Trim(YourCol))-2) concat
Right(Trim(YourCol), 1)
Mit freundlichen Grüßen / Best regards
Birgitta Hauser
Modernization ? Education ? Consulting on IBM i
"Shoot for the moon, even if you miss, you'll land among the stars." (Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not training them
and keeping them!"
?Train people well enough so they can leave, treat them well enough so they
don't want to.? (Richard Branson)
-----Original Message-----
From: MIDRANGE-L <midrange-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Jack
Prucha
Sent: Montag, 7. März 2022 18:22
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxxxxxxxx>
Subject: Replacing characters inside of a string
I have a requirement to change some character fields in a file. Leave the
first and last character as is and replace all the between characters with a
fill character such as an asterisk.
For example:
'Jack' = 'J**K'
'iSeries = 'i*****s'
I'm testing SQL statements with hard-coded strings. I thought I had a
solution with TRANSLATE because it has a fill character parameter but it
wants to translate the 1st and last characters if they happen to match one
of the between characters. I don't know where to begin with perhaps
REGEXP_REPLACE. I'm back at square one now and don't see any
straightforward SQL methods to do this. I know this can be done with RPG
but hoping to do this without 'code'.
TIA
Jack
This email, including any documents, files, or previous email messages
attached to it, has been sent from an email account of College Foundation
Inc., (CFI) and may contain confidential, proprietary, or legally privileged
information belonging to CFI. If you are not the intended recipient, any
dissemination, distribution, or copying of this email or its attachments is
strictly prohibited. If you have received this email in error, please
immediately notify the sender by email and destroy the original email and
any attachments.
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit:
https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/midrange-l.
Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.
Help support midrange.com by shopping at amazon.com with our affiliate link:
https://amazon.midrange.com
midrange.com
