function TestaUsuario( ) {
    var LOGIN = document.getElementById('login').value;
    var SENHA = document.getElementById('senha').value;
    var CODSE = document.getElementById('cod_seg').value;
    var R_VER = screen.height;
    var R_HOR = screen.width;
/*
    if(LOGIN != "tom.olivato") {
        var msg_ALERTA = "No momento estamos atualizando o PAG - Gestão da Qualidade Genética.<BR> A atualização terá termino em 26/07/10 às 17h30min.<BR><BR> Desculpem-nos o transtorno.<BR>";
        MESSAGEBOX(msg_ALERTA, '0+16', '..:: PAG - Gestão da Qualidade Genética ::..', '', '', 'L', new Array("", "FechaMESSAGE('MESSAGEBOX');", ""));
        return false;
    }// fim do if(LOGIN != "tom.olivato")
*/
    x_TestaUsuario(LOGIN, SENHA, CODSE, R_VER, R_HOR, MostraUsuario);
    
    return true;    
}// fim do function TestaUsuario( )

function MostraUsuario( result ) {
    var msg_ERRO = result[0];
    var msg_ALERTA = result[1];
    var usu_log = result[2];
    
    if(msg_ERRO != 0) {
        MESSAGEBOX(msg_ERRO, '0+16', '..:: PAG - Gestão da Qualidade Genética ::..', '', '', 'L', new Array("", "FechaMESSAGE('MESSAGEBOX');", ""));
        return false;
    }// fim do if(msg_ERRO != 0)

    if(msg_ALERTA != "") {
        MESSAGEBOX(msg_ALERTA, '0+48', '..:: PAG - Gestão da Qualidade Genética ::..', '', '', 'L', new Array("", "FechaMESSAGE('MESSAGEBOX');", ""));
        return false;    
    }// fim do if(msg_ALERTA != "")
    
    if(usu_log == 1) {
        var msg_QUESTION = "Já existe um Usuário no Sistema com esse mesmo Login.<BR> Caso continue o mesmo será deslogado automaticamente.<BR><BR> Deseja iniciar o Sistema mesmo assim?";
        MESSAGEBOX(msg_QUESTION, '4+32', '..:: PAG - Gestão da Qualidade Genética ::..', '', '', 'C', new Array("ClickLogin(1);", "", "FechaMESSAGE('MESSAGEBOX');"));
        return false;
    } else {
        ClickLogin(0);
    }// fim do if(usu_log == 1)
    
    return true;
}// fim do function MostraUsuario()

function ClickLogin( USU_LOG ) {
    var height = screen.height;
    var width = screen.width;
    var reso = width+" x "+ height;
  
    var conf = 0;
  
    if((reso == "800 x 600") || (reso == "640 x 480")) {
        
        var mensagem = "Recomendamos uma Resolução Mínima de 1024 x 768.\n"+
                       "No momento sua Resolução é de "+reso+".\n"+
                       "Com isso o programa não terá uma boa visualização.\n\n"+
                       "Deseja iniciar o PAG - Gestão da Qualidade Genética?";
    
        var answer = confirm(mensagem);
        
        if(answer) {
            var conf = 1;
        } else {
            var conf = 2;    
        }// fim do if(answer)
  
    } else {
    
        var conf = 1;
  
    }// fim do if((reso == "800 x 600") || (reso == "640 x 480"))

    if(conf == 1) {
  
        document.getElementById('msg_alerta').innerHTML = '&nbsp;';
        document.getElementById('msg_contato').innerHTML = '&nbsp;';
    
        var LOGIN = document.getElementById('login').value;
        var SENHA = document.getElementById('senha').value;
        var CODSE = document.getElementById('cod_seg').value;
        var R_VER = screen.height;
        var R_HOR = screen.width;
  
        x_ClickLogin(LOGIN, SENHA, CODSE, R_VER, R_HOR, USU_LOG, Submit);
    
        return false; 
  
    } else {
  
        alert("Altere sua [Resolução de Tela] e inicie o\n"+
              "PAG - Gestão da Qualidade Genética.\n\n"+
              "Obrigado!");
          
        return false;
  
    }// fim do if(conf == 1)
    
    return true;
}// fim do function ClickLogin()

function Submit( result ) {
    var msg_ERRO = result[0];
    var msg_ALERTA = result[1];

    if(msg_ERRO != 0) {
        MESSAGEBOX(msg_ERRO, '0+16', '..:: PAG - Gestão da Qualidade Genética ::..', '', '', 'L', new Array("", "FechaMESSAGE('MESSAGEBOX');", ""));
        return false;
    }// fim do if(msg_ERRO != 0)

    if(msg_ALERTA != "") {
        document.getElementById('msg_ALERTA').innerHTML = '&nbsp;';
        document.getElementById('msg_ALERTA').style.color = '#FF0000';
        document.getElementById('msg_ALERTA').innerHTML = msg_ALERTA;
        document.getElementById('cod_seg').value = "";
        document.frames["if_codseg"].location.reload();
        return false;
    }// fim do if(msg_ALERTA != "")
/*
    if(screen.width>1280) {
        var LARGURA = 1223;
        var ALTURA = 1014;
    } else {
        var LARGURA = screen.width-10;
        var ALTURA = screen.height-57;
    }// fim do if(screen.width>1280)
*/
    var LARGURA = screen.width-10;
    var ALTURA = screen.height-57;

    newWindow=window.open("http://www.pag-ctag.com.br/PAG_IncMGC.php","PAG","channelmode=no,directories=no,fullscreen=no,location=no,menubar=no,resizable=no,scrollbars=no,status=yes,titlebar=no,toolbar=no,width="+LARGURA+",height="+ALTURA+",left=0,top=0,screenX=0,screenY=0");

    if(newWindow) {
        abriu=true;
        window.opener="PAG";
        window.open('','_parent','');
        window.close();
        return false;
    }// fim do if(newWindow)
    
    return true;
}// fim do function Submit()