Finding all records by checking if a field is in caps

[demchak]

I am trying to so a selection function that will show me any records where one field in paticular is in all caps. I tried to use the selection criteria

trim({NAME.CADD1}) = Ucase(trim({NAME.CADD1}))

But the = seems to show just where the letters are equal regardles of the case.
Could someone please let me know if there is a different compare or better way to do this.
Thanks

 

[mbarron]

Have you turned off the Case-insensitive SQL option? It is under File , options or use File Report Options, if you only want to turn it off for this report Mike

 

[demchak]

It unchecked it but still get the same results. Any other ideas?

WH

 

[mbarron]

What kind of database are you using? Mike

 

[rogar]

Try using the StrComp() function

 

[mbarron]

If you have CR 8 or higher the following will work;

Create the following formula:

stringvar check; 
local numbervar loop; 
local numbervar lngth;
local numbervar caps;

check:=trim({NAME.CADD1}) ;
lngth:=length(check);

for loop:=1 to lngth do (


if asc(check[loop]) in 65 to 91 then caps:=caps+1

);
lngth=caps

This line if asc(check[loop]) in 65 to 91 then caps:=caps+1 check the ascii value of each character to see if it is between 65 (A) and 91 (Z)

The result is either True (if all caps) or False if not. It will return False if any numbers. If there are spaces, change the ine to:

asc(check[loop]) in [65 to 91,32] then caps:=caps+1

Mike

 

[Naith]

You could try inverting your uppercase check too.

I spent some time with a similar problem, and Rosemary suggested the following, which seemed to do the trick.

Uppercase(trim({NAME.CADD1})) = trim({NAME.CADD1})

Naith

 

[rogar]

"StrComp(trim({NAME.CADD1}), Ucase(trim({NAME.CADD1})), 0)" will return 0 if {NAME.CADD1} is all caps or a positive integer showing the position of the first lower-case letter otherwise. The third parameter of 0 specifies a binary (case-sensitive) comparison. This function is available in CR 8.x but maybe not in earlier versions.

 

[Ngolem]

< trim({NAME.CADD1}) = Ucase(trim({NAME.CADD1})) >


it couldn't be something simple like using the above formula in Crystal syntax....if it is crystal syntax it should be

trim({NAME.CADD1}) = Uppercase(trim({NAME.CADD1})) Jim Broadbent

 

[kenhamady]

I would try writing a formula field with the expression:

trim({NAME.CADD1}) = Uppercase(trim({NAME.CADD1}))

Then put that field in your select expert. This should force the comparison to happen within CR and formula literals in CR are always case sensitive. Not even sure that you need to Trim() them. Ken Hamady, On-site Custom Crystal Reports Training & Consulting
Public classes and individual training.
Guide to using Crystal in VB

http://www.kenhamady.com/

tek@kenhamady.com