<snip>

My data is SR01 = 3000    and ER01 = 30DF

  If (&SR01 > &ER01) .MSG = DRM001       

I get the message saying SR01 is greater than 30DF and I cannot determine
why.  It is almost like it is ignoring the rules for Hexidecimal data.

SR01.... Pool (S) .... - ISPYX211  VALUE(3000)          
 ..CHG by SELECT       - ISPYX212                       
ER01.... Pool (S) .... - ISPYX211  VALUE(30DF)          
 ..CHG by SELECT       - ISPYX212                       


</snip>

While in hex, x'3000' is definitely less than x'30DF' .

But when represented as a character string, c'3000' = x'F3F0F0F0' which is
greater than c'30DF' = x'F3F0C4C6'.

Tom Chicklon

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to