Current Date in Upper Case

Hey

I am using Test Complete (Keyword Test) i am trying to verify a Date which is in Dynamic Format now i have used this script to get the current date in this format

4-Dec-2013

aqConvert.DateTimeToFormatStr(aqDateTime.Today(),"%#d-%b-%Y")

Now what i want to know is how to make sure that the date is in this format

4-DEC-2013

I posted my question a few hour before and was being addressed by Tanya Gorbunova.

I have no idea why my query was shifted such that i could not even find it.