// Classe WIEvent
// 
// Construtor:  WIEvent(timeout, prjId)
// Parametros:  timeout = tempo de espera em segundos para a resposta do WIEvent. Default = 30.
//              prjId   = id do projeto onde está o event a ser chamado. Default = projeto chamado na url.
//
// Métodos:
//    
//  execute() -> executa o processamento do WIEvent.
//
//  preread(nome)   -> solicita a leitura de uma variável. O conteúdo poderá ser lido
//                     com o método readobj(), após a chamada do método execute().
//
//  readobj(nome)   -> lê uma variável previamente solicitada com preread().
//
//  writeobj(nome, valor) -> grava uma variável na sessão do WI. A gravação somente ira se
//                     efetivar após a chamada ao método execute().
//
//  selectdb(eventId) -> solicita a execução de um evento do tipo SELECT, identificado por
//                     eventId.
//
//
//  updatedb(eventId) -> solicita a execução de um evento do tipo UPDATE, identificado por
//                     eventId. O evento somente será executado ao se chamar o método execute().
//
//  next()          -> avança para o próximo registro retornado pela chamada ao método selectdb().
//
//  column(nome)    -> retorna o valor da coluna indicada por nome, que pode ser o nome da coluna
//                     ou sua ordem no registro.
//
//  go(linha)       -> move o cursor para a linha indicada, dentro dos registros retornados.
//
//  rowcount()      -> retorna o número de registros retornados pela chamada ao método selectdb().
//
//  populateCombo(eventId, combo, código, valor) -> popula a combo passada como parâmetro com registros
//                  retornados por um evento do tipo SELECT identificado por eventId, colocando
//                  como "value" a coluna indicada por código e como texto a coluna indicada por valor.
//  
//  setInputValue(eventId, input, coluna) -> escreve no valor do campo input o valor da coluna indicada 
//                  por coluna, do primeiro registro retornado por um evento do tipo SELECT identificado
//                  por eventId.

var doc = document;
doc.WIEventArray = new Array();

function WIEvent(timeout, prjId) {
   // propriedades
   if(!prjId) {
      prjId = window.location.href.split('/')[3];
   }
   this.project = prjId;
   this.currentRow = - 1;
   this.maxRow = 0;
   this.resultSet = new Array();
   this.params = new Object();
   // métodos
   this.readobj = readObject;
   this.writeobj = writeObject;
   this.selectdb = selectDb;
   this.updatedb = updateDb;
   this.execute = execute;
   this.next = next;
   this.column = column;
   this.go = go;
   this.preread = preread;
   this.rowcount = rowcount;
   this.populateCombo = populateCombo;
   this.getErrorMessage = getErrorMessage;
   this.setInputValue = setInputValue;
   this.reads = new Object();
}
function execute() {
   this.responseText = '';
   this.resultSet = new Array();
   this.currentRow = - 1;
   var xmlhttp;
   try
   {
      xmlhttp = new ActiveXObject("Msxml2.XMLHTTP");
   }
   catch(er) {
      xmlhttp = new XMLHttpRequest();
   }
   var server = location.protocol + "//" + location.host;
   xmlhttp.open("POST", server + "/" + this.project + "/EventConnector.wsp", false);
   xmlhttp.setRequestHeader("Content-Type", 'application/x-www-form-urlencoded');
   var data = '';
   for(i in this.params) {
      tmp = encodeURI(i) + "=" + encodeURI(this.params[i]) + "&";
      tmp = tmp.replace(/%252B/gi,'%2B');
      tmp = tmp.replace(/%2526/gi,'%26');
      data += tmp;
   }

   if (this.debug) {
     alert('Enviando: \n' + data)
   }

   xmlhttp.send(data);
   if(xmlhttp.status != 200) {
      return this.getErrorMessage(xmlhttp.status);
   }
   this.responseText = xmlhttp.responseText;

   if (this.debug) {
     alert('Status: ' + xmlhttp.status + '\nRecebendo: \n' + this.responseText)
   } 

   if (this.responseText == '') return 'Erro: Resposta vazia.';
   if (this.responseText.indexOf('###SESSION_EXPIRED###:') == 0) {
      location = this.responseText.split('\n')[1];
      return;
   }
   var xmlDoc;
   var rows;
   var vars;
   try
   {
      xmlDoc = new ActiveXObject("Msxml2.DOMDocument");
      xmlDoc.async = false;
      xmlDoc.resolveExternals = false;
      if(!xmlDoc.loadXML(xmlhttp.responseText)) {
         if (this.debug) alert(xmlDoc.parseError.reason);
         return xmlDoc.parseError.reason;
      }
      if (xmlDoc.getElementsByTagName('selectdb').length > 0) {
        rows = xmlDoc.getElementsByTagName('selectdb')[0].childNodes;
      }
      if (xmlDoc.getElementsByTagName('reads').length > 0) {
        vars = xmlDoc.getElementsByTagName('reads')[0].childNodes;
      }
   }
   catch(er) {
      xmlDoc = new DOMParser().parseFromString(xmlhttp.responseText, "text/xml").documentElement;
      if (xmlDoc.getElementsByTagName('selectdb')) {
        rows = xmlDoc.getElementsByTagName('div');
      }
      if (xmlDoc.getElementsByTagName('reads').length > 0) {
        vars = xmlDoc.getElementsByTagName('input');
      }
   }
   for(var i = 0; vars && i < vars.length; i++) {
     this.reads[vars[i].getAttribute('name')] = vars[i].getAttribute('value');
   }
   for(var i = 0; rows && i < rows.length; i++) {
      var cols = rows[i].getElementsByTagName('span');
      var obj = new Object();
      for(var k = 0; k < cols.length; k++) {
         var col = cols[k];
         var text = col.firstChild.nodeValue;
         obj[cols[k].getAttribute('id')] = text;
         obj[cols[k].getAttribute('seq')] = text;
      }
      this.resultSet[this.resultSet.length] = obj;
   }
   this.maxRow = this.resultSet.length;
   return 'OK';
}

function readObject(key) {
   return this.reads[key];
}

function writeObject(name, value) {
  value = value.toString().replace(/\+/g,"%2B");
  value = value.toString().replace(/&/g,"%26");
  this.params[name] = value;
}

function selectDb(id) {
   this.writeobj('tmp.wievent.select', id);
   this.eventId = id;
   return this.execute();
}

function updateDb(id) {
   this.eventId = id;
   this.writeobj('tmp.wievent.update', id);
}

function next() {
   if(this.currentRow < this.maxRow - 1) {
      this.currentRow++;
   }
   else {
      this.currentRow = - 1;
   }
   return this.currentRow;
}

function column(id) {
   var ret = "";
   if(this.resultSet.length == 0) return ret;
   var row = this.resultSet[this.currentRow];
   if(row) ret = row[(id+"").toLowerCase()];
   return ret;
}

function go(row) {
   if(row > this.maxRow) {
      this.currentRow = - 1;
   }
   else {
      this.currentRow = row;
   }
}

function preread(key) {
   this.writeobj('tmp.wievent.read', key);
}

function rowcount() {
   return this.maxRow;
}

function populateCombo(eventId, combo, keyColumn, valueColumn) {
   var ret = this.selectdb(eventId);
   if(ret != 'OK') {
      return ret;
   }
   combo.length = 0;
   // percorre pelos resultados retornados pela consulta
   for(var i = 0; i < this.maxRow; i++) {
      opt = this.resultSet[i][(keyColumn+"").toLowerCase()];
      txt = this.resultSet[i][(valueColumn+"").toLowerCase()];
      combo.options[combo.length] = new Option(txt, opt);
   }
   return ret;
}

function getErrorMessage(err) {
   var ret = 'Erro ao executar event [' + this.eventId + ']: ';
   switch (err) {
      case 600: {
      	ret += "Event não encontrado: " + this.eventId;
        break; }
      case 601: {
      	ret += "Condição inválida.";
        break; }
      case 602: {
      	ret += "Erro de conexão com banco de dados.";
        break; }
      case 603: {
        ret += "Erro na expressão SQL.";
        break; }
      default: {
      	ret += "Erro " + err;
        break; }
   }
   return ret;
}

function setInputValue(eventId, input, column) {
  ret = this.selectdb(eventId);
   if(ret != 'OK') {
      return ret;
   }
  this.next();
  input.value = this.column(column);
  return ret;
}