function sstrim(s){gr=s;gr=gr.toUpperCase();gr=gr.replace(/[^0-9A-Z&_\?\*!]/g,'');ln=gr.length;if(gr.match(/^[HJNOST][A-H,J-Z]([0-9]{6,10})$/)){if(ln==8||ln==10||ln==12){nr=(ln-2)/2;gr=gr.substr(0,2)+' '+gr.substr(2,nr)+' '+gr.substr(2+nr,nr);return gr;}}
if(gr.match(/(^([A-Z]{1,2})([0-9]{1,2}[A-Z]{0,1})[0-9][A-Z][A-Z]$)|(^GIR0AA$)|(^SANTA1$)/)){gr=gr.substr(0,ln-3)+' '+gr.substr(ln-3,3);return gr;}
if(gr.match(/^LR[0-9]*/)){if(ln>2){nr=parseInt(gr.substr(2,ln),10);if(nr>=1&&nr<=204){gr='LR'+nr;}else{gr='LR';}
return gr;}}
return gr;}
function ssvalidate(form){q=sstrim(form.qry.value);form.qry.value=q;if(q=='')return false;return true;}
