Re: what's wrong?

["Lois Krake" <lkrake@xxxxxxxx>]

----- Original Message -----
From: <boldt@ca.ibm.com>
To: <rpg400-l@midrange.com>
Sent: Thursday, December 06, 2001 8:25 AM
Subject: Re: what's wrong?


>
> Lois wrote:
> >Hi all:
> >
> >Can anyone tell me why this will not work. #tims is defined as 12 alpha.
> >
> > c                   eval      #tims  = %triml(%editw(%subdt
> > 19.00c                                      (%timestamp:*h):'0  '))+
> >          c                                      %triml(%editw(%subdt
> > 21.00c                                      (%timestamp:*mn):'0  '))+
> >          c                                      %triml(%editw(%subdt
> > 23.00c                                      (%timestamp:*s):'0  '))+
> >          c                                      %triml(%editw(%subdt
> > 25.00c                                      (%timestamp:*ms):'0      '))
> >
> >1900 The edit word has 3 replaceable characters but 10 are
> >         needed.
> >2100 The edit word has 3 replaceable characters but 10 are
> >         needed.
> >2300 The edit word has 3 replaceable characters but 10 are
> >         needed.
> >2500 The edit word has 7 replaceable characters but 10 are
> >          needed.
>
> Hans

Sorry that was a typo in my email it should have looked like this

Thanks for your help
>
> Hans Boldt, ILE RPG Development, IBM Toronto Lab, boldt@ca.ibm.com
>
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> or email: RPG400-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
>