RE: Field concatenation -- RPG400-L

I think if 2 consecutive vars are blanks it will be replaced by only 1 comma, not what you want

-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of MichaelLange@xxxxxxxxxx
Sent: Tuesday, January 14, 2020 12:02
To: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx>
Subject: RE: Field concatenation

Interesting haven't had the opportunity to use this yet.

The values will only ever be 5 long.

Regards
Michael Lange
Loewen Windows
Steinbach, MB
204.326.6808 ext. 5148

From: "Francois Lavoie" <Francois.Lavoie@xxxxxxxxxxxxxxxxxxxx>
To: "RPG programming on IBM i" <rpg400-l@xxxxxxxxxxxxxxxxxx>
Date: 01/14/2020 10:50 AM
Subject: RE: Field concatenation
Sent by: "RPG400-L" <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx>

Str=%ScanRpl(*Blanks:',':V1+V2+V3+V4+V5+V6)

-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of MichaelLange@xxxxxxxxxx
Sent: Tuesday, January 14, 2020 11:26
To: rpg400-l@xxxxxxxxxxxxxxxxxx
Subject: Field concatenation

V7.2

Hoping there is an easier way of doing this than creating a very ugly IF run.

I have 6 text fields which may or may not all contain values.
example:
V1 = blank
V2 = 0.022
V3 = blank
V4 = blank
V5 = 0.022
V6 = blank.

What I want to create is a field like ',0.022,,0.022,' where commas are the blank fields.

Regards
Michael LangeThis e-mail message, including any attachments, is for the sole use of the person to whom it has been sent, and may contain information that is confidential or legally protected. If you are not the intended recipient or have received this message in error, you are not authorized to copy, distribute, or otherwise use this message or its attachments. Please notify the sender immediately by return e-mail and permanently delete this message and any attachments. Loewen makes no warranty that this e-mail is error or virus free.
Please think green before printing this email.
--
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@xxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com
--
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@xxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com

This e-mail message, including any attachments, is for the sole use of the person to whom it has been sent, and may contain information that is confidential or legally protected. If you are not the intended recipient or have received this message in error, you are not authorized to copy, distribute, or otherwise use this message or its attachments. Please notify the sender immediately by return e-mail and permanently delete this message and any attachments. Loewen makes no warranty that this e-mail is error or virus free.
Please think green before printing this email.
--
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@xxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate link: https://amazon.midrange.com