Re: CAT bug in ILE RPG

[Majobo@xxxxxxx]

>>Has anyone else run across bugs with the CAT operation code in RPG IV?  
>>Using CAT in some situations gives us unpredictable results, such as fields 
>>being concatenated in the wrong order.  (However, if instead we use EVAL 
>>and the plus sign on these same fields to concatenate them, the program 
>>works fine!)
>>
>> field1  CAT  field2:0   resultfld
>>          CAT  field3:0   resultfld
>>             .
>>             .
>>             .
>>          CAT  field9:0   resultfld
>>
>>The above does not work!!  
>>
>>But the following does work (we use %trimr because all 9 fields have 
>>trailing blanks):
>>
>>         EVAL     resultfld=%trimr(field1)+%trimr(field2)+ ...
+%trimr(field9)
>>
_______________________________________________________
>???
>So what do you get?
>What was in the resultfield; (what was in the numbered fields) ??
>
>A bit vague, no?
>
>Luc
______________________________________________________
Each of the nine fields that I am concatenating is a 4-byte character string 
containing zero, one, or two numeric characters left-justified, and then
padded 
on the right with blanks.  The result field is a 16-character blank field.
(It just 
so happens that the 3rd and 9th fields are always blanks.)
In this example, in the interest of simplication, I have represented the
numeric contents of the 9 fields with uppercase alphabetic characters, and
represented 
the blanks with lowercase "b"s.

Abbb  CDbb   bbbb   EFbb   GHbb   JKbb   LMbb   NPbb   bbbb

Per this example, the result field will always contain the following:

ACDbbGHJKLMNPEFG

Thanks,
John Rodrigues

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---