code_type_upper/1

"code_type_upper( Code " )

Holds true if Code is upper case.