Re: Comp in DDS

[simafrog <SimaFrog@xxxxxxxxxx>]

That could be it. (MDT) Thanks,
The blank is greater than A. So if I say Comp GT A, when they enter a blank, 
the error message is wrong. Is S/B 'Please enter a value' not "Value entered is 
greater than A"

> -----Original Message-----
> From: rob@xxxxxxxxx [mailto:rob@xxxxxxxxx]
> Sent: Monday, March 15, 2004, 9:01 AM
> To: RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
> Subject: Re: Comp in DDS
> 
> Test for the greater than 'A' because a blank is less.
> 
> Rob Berendt
> -- 
> Group Dekko Services, LLC
> Dept 01.073
> PO Box 2000
> Dock 108
> 6928N 400E
> Kendallville, IN 46755
> http://www.dekko.com
> 
> 
> 
> 
> 
> simafrog <SimaFrog@xxxxxxxxxx> 
> Sent by: rpg400-l-bounces@xxxxxxxxxxxx
> 03/15/2004 11:03 AM
> Please respond to
> RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
> 
> 
> To
> RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
> cc
> 
> Subject
> Comp in DDS
> 
> 
> 
> 
> 
> 
> HI I need to check a data entry field. It cannot be blank, but also must 
> be greater than 'A'. COMP only lets you have one condition. I would like 
> to do this in the DDS only.
> Thanks,
> Rob
> _______________________________________________
> This is the RPG programming on the AS400 / 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.
> 
> 
> _______________________________________________
> This is the RPG programming on the AS400 / 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.
>