Re: TESTN

>Date: Tue, 31 Oct 2000 11:28:45 -0600
>From: Lurton Keel <LKeel@UNARCORACK.com>
>
>Here is a program.
>C                   MOVEL     '12G'         SIN               3
>C                   TESTN                      SIN                  81
>c                    eval          *inlr = *on
>indicator 81 is in pos 71-72.
>My problem is that in the above example, indicator 81 is on even though
>there is a "G" in the field.
>The RPG reference says.
>"Positions 71 and 72: Either the result field contains numeric characters,
>or it contains a 1-character field that consists of a letter from A to R."

Lurton, the first paragraph defines what it means for a character to be
considered "numeric" (zone of C, D or F, and digit of 0-9.  'G' is X'C7',
so it qualifies as numeric.

The manual seems a bit too clever here though.  I did a little survey
just now (sample size of 1) and 100% of the people I surveyed were
confused by this even though I specifically pointed out the definition
of "numeric" from the first paragraph.

I'll get the manual changed to say something like this for the 71-72
indicator:
  "The result field contains numeric characters; the low-order
   character may also be a letter from A to R, since these
   characters have a zone of C, D or F, and a digit of 0 to 9.".

Barbara Morris


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