Re: Why isn't my %xlate working?

Because %xlate is a character by character translation

message = %XLATE ( '11.11.1111' : %CHAR ( minimumDate ) : message );
message = %XLATE ( '22.22.2222' : %CHAR ( TodaysDate ) : message );

is the same as

message = %XLATE ( '11.11.1111' : '01.01.0001' : message );
message = %XLATE ( '22.22.2222' : '06.08.2010' : message );

1 will translate to a 0 (see first character in the first Xlate string), 2 will translate to a 0, and . will translate to a .

It is not finding the whole string '11.11.1111' and translating it to '01.01.0001' you need to use %replace to do that.


Mark Murphy
STAR BASE Consulting, Inc.
mmurphy@xxxxxxxxxxxxxxx



-----rpg400-l-bounces@xxxxxxxxxxxx wrote: -----


To: RPG programming on the IBM i / System i <rpg400-l@xxxxxxxxxxxx>
From: David FOXWELL <David.FOXWELL@xxxxxxxxx>
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
Date: 08/06/2010 08:58AM
Subject: Why isn't my %xlate working?


This must be obvious, but not to me :

User enters a date which must be between 2 dates.

IF DateEntered > TodaysDate OR
DateEntered < minimumDate;
message = 'Use date between 11.11.1111 and 22.22.2222'; // Message returned by a standard error procedure.
message = %XLATE ( '11.11.1111' : %CHAR ( minimumDate ) : message );
message = %XLATE ( '22.22.2222' : %CHAR ( TodaysDate ) : message );

ENDIF;

How on earth am I getting this at the end : message = 'Use date between 00.00.0000 and 00.00.0000' ?

Ps : I realize I don't NEED the xlate function.


Thanks.