Crystal Reports-Need way of specifying multiple unnested IFs in formula

I am filtering out substrings in a database comment field with the following example code:

if InStr({MyTable.Comment},"Red") = 1 then
    replace(replace({MyTable.Comment}, "Red",""),"  "," ")
else if InStr({MyTable.Comment},"Blue") = 1 then
    replace(replace({MyTable.Comment}, "Blue",""),"  "," ")
else
    {MyTable.Comment}

This works perfectly if "Red" is in the comment in one row and "Blue" is in the comment in a different row, but what if "Red" and "Blue" are in the same comment?  Plus, there may be other substrings in the comment that should not be filtered:

DATABASE COMMENT       PRINT ON REPORT
Green                                 Green
Red
Blue
RedYellow Green              Yellow Green
RedBlue                          
BlueYellowRed                  Yellow
Yellow Cyan Green           Yellow Cyan Green

I really need the ability to have independent, unnested IF statements in the formula:

if InStr({MyTable.Comment},"Red") = 1 then
    replace(replace({MyTable.Comment}, "Red",""),"  "," ")
If InStr({MyTable.Comment},"Blue") = 1 then
    replace(replace({MyTable.Comment}, "Blue",""),"  "," ")
If none of the above   <-- pseudocode... unsure of how to specify this in exact code
    {MyTable.Comment}

or (in pseudocode, kind of)....

If substring of comment contains "Red" or "Blue"
       if InStr({MyTable.Comment},"Red") = 1 then
          replace(replace({MyTable.Comment}, "Red",""),"  "," ")
       If InStr({MyTable.Comment},"Blue") = 1 then
          replace(replace({MyTable.Comment}, "Blue",""),"  "," ")
else
    {MyTable.Comment}

When I do this, however, I get the error, "The remaining text does not appear to be part of the formula".  How can I filter on multiple, independent conditions?  I can't specify all the permutations of color combinations that could be in the comment - there would be way too many.

Important Note: There will never be the condition when the same color appears twice in the comment string:
RedGreenRed  <-- won't happen
BlueBlue Blue   <-- won't happen

In lieu of sugestions, can you please respond with the exact code and an explanation (if any) of why it needs to be done a certain way.  Thanks in advance.

bshelby777Asked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

mlmccCommented:
Try it this way
Use a local variable to store the string and work on it.
Remove all REDs
Remove all BLUEs
Remove the ,s

Local StringVar FixedString;
FixedString := {MyTable.Comment};
FixedString  := Replace(FixedString ."Red","");
FixedString  := Replace(FixedString ."Blue","");
FixedString  := Replace(FixedString .",","");
FixedString

mlmcc
0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
mlmccCommented:
There is no real reason to test for RED or BLUE just remove it.  Replace will replace all occurances of the word so if you ever do get RedBlueRedGreen it will result in Green

mlmcc
0
James0628Commented:
 As mlmcc pointed out, you don't need to test for the target strings before you use Replace to remove them.  With that in mind, if you just have a few strings to remove, you can just use nested Replace functions.

Replace (Replace (Replace ({MyTable.Comment}, "Red", ""), "Blue", ""), "  "," ")


 If you have more than a few strings to remove, using a variable and separate Replace functions as in mlmcc's suggestion would probably be easier to follow (nested function calls like the one above can get hard to follow pretty quickly :-).

 James
0
bshelby777Author Commented:
mlmcc - Excellent!  That code was exactly what I needed. 460 points.
James0628 - Very helpful example when there are only a few strings. 40 points.
Thank you both for your responses - they were very helpful.  I wish there were more than 500 points to give!
0
James0628Commented:
You're welcome.  Glad I could help.

 James
0
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Crystal Reports

From novice to tech pro — start learning today.