Since you are talking about a panel, you aren't trying to compare
display characters are you? Are the values truly hex values or the
display equivalent? (1000x vs F1F0F0F0c) 


Jon L. Veilleux
[EMAIL PROTECTED]
(860) 636-2683 


-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Lizette Koehler
Sent: Tuesday, June 12, 2007 2:06 PM
To: [email protected]
Subject: ISPF Panel Issue with HEX Data

Hi All,

We are z/OS V1.7.

I am trying to validate HEX data in an ISPF Panel.  I am working with
UCB strings.  So they are 4 digits long containing 0000 - FFFF.

I have a test in my panel
  IF (&SR01 > &ER01) then produce a message indicating beginning range
is greater than ending range.  
  So if SR01 = 100F adn ER01 = 1000 I want the message produced.  Else
if SR01 = 1000 and ER01 = 100F it is okay.



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                       


If this looks okay, I will open an ETR with IBM.  I know this was
working under z/OS V1.4.  But for some reason this same code is not
working for z/OS V1.7.

Lizette

----------------------------------------------------------------------
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
This e-mail may contain confidential or privileged information. If
you think you have received this e-mail in error, please advise the
sender by reply e-mail and then delete this e-mail immediately.
Thank you. Aetna

----------------------------------------------------------------------
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