function EnElToUpper( Obj )
    {
        var change=0;
        var Str=Obj.value;
        var StrL=Str.length;
        var StrOut="";

        var c=' ';
        var cOut=' ';
        
        for(var i=0;i<StrL;i++)
        {                  
            c = Str.substring(i,i+1);
            cOut='';
            
            if (c >= 'a' && c <= 'z') { change=1; cOut= c.toUpperCase(); }
            if (c >= 'A' && c <= 'Z') { cOut = c;}
            if (c >= 'Α' && c <= 'Ω') { cOut = c;}
            if (c >= '0' && c <= '9') { cOut = c;}
            if (c == ' ' || c == '-' || c == '_' || c==',' || c=='.' || c=='(' || c==')') { cOut = c;}
            if (c == 'Ά' || c=='α' || c=='ά') {change=1;cOut='Α';}
            if (c=='β'          ) {change=1;cOut='Β';}
            if (c=='γ'          ) {change=1;cOut='Γ';}
            if (c=='δ'          ) {change=1;cOut='Δ';}
            if (c == 'Έ' || c=='ε' || c=='έ') {change=1;cOut='Ε';}
            if (c=='ζ'          ) {change=1;cOut='Ζ';}
            if (c == 'Ή' || c=='η' || c=='ή') {change=1;cOut='Η';}
            if (c=='θ'          ) {change=1;cOut='Θ';}
            if (c == 'Ί' || c == 'Ϊ' || c=='ι' || c=='ί' || c=='ϊ' || c=='ΐ') {change=1;cOut='Ι';}
            if (c=='κ'          ) {change=1;cOut='Κ';}
            if (c=='λ'          ) {change=1;cOut='Λ';}
            if (c=='μ'          ) {change=1;cOut='Μ';}
            if (c=='ν'          ) {change=1;cOut='Ν';}
            if (c=='ξ'          ) {change=1;cOut='Ξ';}
            if (c == 'Ό' || c=='ο' || c=='ό') {change=1;cOut='Ο';}
            if (c=='π'          ) {change=1;cOut='Π';}
            if (c=='ρ'          ) {change=1;cOut='Ρ';}
            if (c=='σ'			) {change=1;cOut='Σ';}
            if (c=='τ'          ) {change=1;cOut='Τ';}
            if (c == 'Ύ' || c == 'Ϋ' || c=='υ' || c=='ύ' || c=='ϋ' || c=='ΰ') {change=1;cOut='Υ';}
            if (c=='φ'          ) {change=1;cOut='Φ';}
            if (c=='χ'          ) {change=1;cOut='Χ';}
            if (c=='ψ'          ) {change=1;cOut='Ψ';}
            if (c == 'Ώ' || c=='ω' || c=='ώ') {change=1;cOut='Ω';}
            if (c=='ς'					) {change=1;cOut='Σ';}
            if (cOut==''					) {change=1;}

           StrOut=StrOut+cOut;
        };
               
         if(change==1) Obj.value=StrOut;
        return;
    }