At 11:57 2017-07-07, "Paul H. Tarver" paul@tpcqpc.com wrote:
I sometimes run into this with variables and/or fields. In either case, you can pre-test a value and/or format using the transform() function as well.
If TRANSFORM(a,"@L 999.99") = "***.**" Endif
The nice thing about this method is you can control exactly the format of the value you are testing.
Alternate test:
If occurs('*',TRANSFORM(a,"@L 999.99") ) > 0 Endif
Or the condition "*"$transform(...)
[snip]
Sincerely,
Gene Wirchenko
Don't you love having lots of cool ways with FoxPro to solve the same problem? :)
Paul H. Tarver Tarver Program Consultants, Inc. Email: paul@tpcqpc.com
-----Original Message----- From: ProfoxTech [mailto:profoxtech-bounces@leafe.com] On Behalf Of Gene Wirchenko Sent: Sunday, July 09, 2017 11:35 PM To: profoxtech@leafe.com Subject: RE: numeric overflow
At 11:57 2017-07-07, "Paul H. Tarver" paul@tpcqpc.com wrote:
I sometimes run into this with variables and/or fields. In either case, you can pre-test a value and/or format using the transform() function as
well.
If TRANSFORM(a,"@L 999.99") = "***.**" Endif
The nice thing about this method is you can control exactly the format of the value you are testing.
Alternate test:
If occurs('*',TRANSFORM(a,"@L 999.99") ) > 0 Endif
Or the condition "*"$transform(...)
[snip]
Sincerely,
Gene Wirchenko
[excessive quoting removed by server]
Always seems to be 3 ways or none.
Fred
On Mon, Jul 10, 2017 at 11:03 AM, Paul H. Tarver paul@tpcqpc.com wrote:
Don't you love having lots of cool ways with FoxPro to solve the same problem? :)
Paul H. Tarver Tarver Program Consultants, Inc. Email: paul@tpcqpc.com
-----Original Message----- From: ProfoxTech [mailto:profoxtech-bounces@leafe.com] On Behalf Of Gene Wirchenko Sent: Sunday, July 09, 2017 11:35 PM To: profoxtech@leafe.com Subject: RE: numeric overflow
At 11:57 2017-07-07, "Paul H. Tarver" paul@tpcqpc.com wrote:
I sometimes run into this with variables and/or fields. In either case, you can pre-test a value and/or format using the transform() function as
well.
If TRANSFORM(a,"@L 999.99") = "***.**" Endif
The nice thing about this method is you can control exactly the format of the value you are testing.
Alternate test:
If occurs('*',TRANSFORM(a,"@L 999.99") ) > 0 Endif
Or the condition "*"$transform(...)[snip]
Sincerely,
Gene Wirchenko
[excessive quoting removed by server]