I had the same thought, but the only thing that will match a '0N' pattern is
an empty string ("") or a string of 1 or more numeric digits (0-9). The ""
should have been handled by the first IF -- IF (ANS#"" AND ANS # "B") THEN
...
Larry Hiscock
Western Computer Services
http://www.wcs-corp.com
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Ron Sharcott
Sent: Friday, June 02, 2006 1:03 PM
To: '[email protected]'
Subject: RE: [U2] [UV] How can this be non-numeric?
Could pattern matching be affecting the outcome?
Pattern Description
0X or ... Any number of characters, including no characters.
nX n number of any character.
0A Any number of alphabetic characters, including none.
nA n number of alphabetic characters.
"n-mA" n to m number of alphabetic characters.
"n-mX" n to m number of any characters.
0N Any number of numeric characters, including none.
nN n number of numeric characters.
"n-mN" n to m number of numeric characters.
text Exact text. Text must be enclosed in quotation marks.
Ron Sharcott (3635)
-----Original Message-----
From: Peter Veenhof [mailto:[EMAIL PROTECTED]
Sent: Friday, June 02, 2006 12:00 PM
To: [email protected]
Subject: RE: [U2] [UV] How can this be non-numeric?
I'm on Universe 10.1.11 and I execute the following code:
INPUT ANS
SCRATCH = 'HELLO'
IF (ANS#"" AND ANS # "B") THEN
IF ANS MATCHES '0N' THEN
IF ANS>0 THEN
IF SCRATCH<ANS>#"" THEN
PRINT SCRATCH<ANS>
END
END
END
END
STOP
And if I enter 1.x or 1X or 2B for ANS the program runs fine without error.
When I debug through it I see that all those inputs return a false from ANS
MATCHES '0N'... must be a wrong line number or something, I'd get a debug in
there and find out for sure!
Pete
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Brenda Price
Sent: Friday, June 02, 2006 2:07 PM
To: [email protected]
Subject: RE: [U2] [UV] How can this be non-numeric?
We get this error when users enter "1.x" or "1X" or "2B", etc on code like
that.
Brenda
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Kevin King
Sent: Friday, June 02, 2006 11:48 AM
To: [email protected]
Subject: RE: [U2] [UV] How can this be non-numeric?
That would be my guess, that the line number isn't right.
-Kevin
[EMAIL PROTECTED]
http://www.PrecisOnline.com
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Stevenson, Charles
Sent: Friday, June 02, 2006 10:31 AM
To: [email protected]
Subject: [U2] [UV] How can this be non-numeric?
Program "TIP.LIST": Line 242, Nonnumeric data when numeric required. Zero
used.
It's got to be ANS that is "nonnumeric", but how?
Here's the code:
239: IF (ANS#"" AND ANS # "B") THEN
240: IF ANS MATCHES '0N' THEN
241: IF ANS>0 THEN
242: IF SCRATCH<ANS>#"" THEN
Could be the line number is not right, object & source don't line up, but
here's VLIST of same:
00239: IF (ANS#"" AND ANS # "B") THEN
00239 00BD8 : 106 ne ANS "" => $R44
00239 00BE0 : 106 ne ANS "B" => $R46
00239 00BE8 : 008 and $R44 $R46 => $R48
00239 00BF0 : 2DE testfw $R48 00CB0:
00240: IF ANS MATCHES '0N' THEN
00240 00BF8 : 0E0 match ANS "0N" => $R49
00240 00C00 : 2DE testfw $R49 00CA0:
00241: IF ANS>0 THEN
00241 00C08 : 0A6 gt ANS 0 => $R50
00241 00C10 : 2DE testfw $R50 00C88:
00242: IF SCRATCH<ANS>#"" THEN
00242 00C18 : 060 dyn_extract SCRATCH ANS 0 0 => $R51
00242 00C24 : 106 ne $R51 "" => $R52
00242 00C2C : 2DE testfw $R52 00C70:
UV 10.0.16, HPUX
TIA,
Chuck Stevenson
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/
