Re: Sunday Moment ...

On May 23, 2016, at 7:46 PM, Englander, Douglas <Douglas_Englander@xxxxxxxxxxxxx> wrote:


Jon,

If the dates are valid/real dates, then I would use the RPG internal date functions %DATE and %CHAR. %DATE to convert the char field to a "date" then %CHAR to turn the "date" back into an edited character field.

i.e.

w_date = '20160523'

%CHAR(%DATE(w_date : *ISO0) : *USA);

Result is '05/23/2016'

%DATE input is format *ISO0
%CHAR output is format *USA

Hope this helps.

Doug


--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related questions.