Error runtime execution Microsoft JScript
Hi, I have a problem that sometimes my test shows an exception, but if I keep trying it sometimes it works. I'm using Jscript. Thanks.
Forum Discussion
//USEUNIT DadosEfetuarLogin
//USEUNIT dadosentrada_CT_01_EfetuarLogin
//USEUNIT dadosentrada_CT_02_NaoInformarLogin
//USEUNIT TemplateEfetuarLogin
//USEUNIT TemplateMetodoTeste
function CT_01_EfetuarLogin(){
//CARREGAR A MASSA DE DADOS
dadosentrada_CT_01_EfetuarLogin.CT_01_carregarDadosEntrada();
//ABRIR O SEI
TemplateMetodoTeste.templateMetodoTeste();
//TEMPLATE COM OS PASSOS DO TESTE
TemplateEfetuarLogin.executarTeste();
//Fechar o SEI
TemplateMetodoTeste.fecharSEI();
}
Unit 2
var login = null;
var senha = null;
var clicarPerfilIntercambioLocalProducao = new Boolean();
var escolherPerfilIntercambioLocalProducao = null;
var perfilAcesso = null;
unit 3
//USEUNIT DadosEfetuarLogin
function executarTeste(){
sei = Aliases.SEI;
tfrmLogin = sei.frmLogin;
campoUsuario = tfrmLogin.edtUsuario;
campoSenha = tfrmLogin.edtSenha;
perfilAdm = tfrmLogin.CB_ADM;
perfilEnf = tfrmLogin.CB_ENF;
perfilMed = tfrmLogin.CB_MED;
desmamrcar = cbUnchecked;
marcar = cbChecked;
if ( DadosEfetuarLogin.login != null ){
campoUsuario.wText = DadosEfetuarLogin.login;
}
if ( DadosEfetuarLogin.senha != null ){
campoSenha.wText = DadosEfetuarLogin.senha;
}
if ( DadosEfetuarLogin.clicarPerfilIntercambioLocalProducao ){
if ( DadosEfetuarLogin.escolherPerfilIntercambioLocalProducao == 'intercambio' ){
tfrmLogin.RadioGroup1.TGroupButton.ClickButton();
}
if ( DadosEfetuarLogin.escolherPerfilIntercambioLocalProducao == 'local' ){
tfrmLogin.RadioGroup1.TGroupButton1.ClickButton();
}
}
if ( DadosEfetuarLogin.perfilAcesso != null ){
perfilAdm.ClickButton(desmamrcar);
perfilEnf.ClickButton(desmamrcar);
perfilMed.ClickButton(desmamrcar);
if ( DadosEfetuarLogin.perfilAcesso == 'ADM' ){
perfilAdm.ClickButton(mamrcar);
}
if ( DadosEfetuarLogin.perfilAcesso == 'ADM ENF' ){
perfilAdm.ClickButton(mamrcar);
perfilEnf.ClickButton(mamrcar);
}
if ( DadosEfetuarLogin.perfilAcesso == 'ADM MED' ){
perfilAdm.ClickButton(marcar);
perfilMed.ClickButton(marcar);
}
if ( DadosEfetuarLogin.perfilAcesso == 'ENF' ){
perfilEnf.ClickButton(marcar);
}
if ( DadosEfetuarLogin.perfilAcesso == 'END MED' ){
perfilEnf.ClickButton(marcar);
perfilMed.ClickButton(marcar);
}
if ( DadosEfetuarLogin.perfilAcesso == 'MED' ){
perfilMed.ClickButton(marcar);
}
}
//Clicar no botão "Entrar"
tfrmLogin.Acessa.ClickButton();
}
UNIT 4
function templateMetodoTeste(){
//Esse bloco serve para iniciar o SEI (clicar no ícone)
explorer = Aliases.Explorer;
explorer.wndProgman.SHELLDLL_DefView.FolderView.DblClickItem("Lacador", 0);
explorer.dlgAbrirArquivoAvisoDeSeguran_a.btnExecutar.ClickButton();
//
}