Re: Trapping Hex Hi and Lo values

They are the Highest and Lowest data values that can be stored in the field.

In RPG you use the special values *HIVAL and *LOVAL.

You can MOVE    *HIVAL      FIELDHI
              MOVE    *LOVAL    FIELDLO

or

FIELD1      IFEQ    FIELDHI
process
                   ENDIF

etc...

Most likely the database file is sorted on these fields
*HIVAL would be sorted after everything else in an ascending sequence
*LOVAL before anything else...

If you moved *Blanks or *Zeros to the fields they would not sort the same way...

The work fields in your program should be defined the same way as the database
fields
normally with the *LIKE special value.

*LIKE      DEFN   DataBaseField          FIELDHI
                 MOVE *HIVAL                   FIELDHI

Hope that helps...



VENU YAMAJALA wrote:

> Hi All,
>
>  In one of our database files, we have some fields with Hex values.
> These are Hex Hi and Lo values. They contain the Hi value (FFFFFF) and lo 
>value
> (000000, is it the representation for NULL??) as the data. I am not good at
> cobol. But someone was telling me that it is possible to pass Hi and Lo values
> in cobol to database fields and in such cases we get Hi and Lo values in Hex
> format.
>
> My problem is that I have to trap for these Hi and Lo values which are stored
> in Hex. How do I do this RPG? Thanx in advance for any help or suggestions.
>
> Rgds
> Vg
> +---
> | This is the Midrange System Mailing List!
> | To submit a new message, send your mail to MIDRANGE-L@midrange.com.
> | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
> | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator: david@midrange.com
> +---



--
Jim W
http://www.netcom.com/~jimwelsh/welcome/welcome.html
mailto:jimwelsh@ix.netcom.com


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