Why are you giving infinite alert when I try to focus () on an incorrectly filled onblur field?
if(ret = TstForDat(wCampo, "")!=""){
alert('Data Incorreta! Favor preencher a data corretamente.');
wCampo.focus(); //apos colocar isto, o alert em cima fica aparecendo sem parar.
}