// Objecto ao qual podem ser adicionados novos métodos que são executados na função "actualizaEscondidos()"
// Serve para manipular as respostas às questões que são produzidas por classes externas
function Actualiza () {};

// Objecto ao qual podem ser adicionados novos métodos que são executados na função "respondida()"
// Serve para manipular as respostas às questões que são produzidas por classes externas
function Respondida () {};

function limpaResposta(tipoQuestao,nome,num) {
	idque = eval("\"idnum_" + num + "\"");
	switch (tipoQuestao) {
		case 1:
		{
			// Radio buttons
			var quest;
			var nomes = nome.split(',');
			for (var i=0; i<nomes.length; i++) {
				quest = eval("document.servico." + nomes[i]);
				if(nomes[i].substring(nomes[i].length-1)=="T") {
					// Caixa de texto de opção
					quest.value = "";
				} else if(quest.selectedIndex) {
					// ComboBox
					quest.selectedIndex = 0;
				} else {
					// Radio buttons
					if(quest.length==undefined) {	// Apenas um botão
						quest.checked = false;
					} else {
						for(j=0;j<quest.length;j++){
							quest[j].checked = false;
						}
					}
				}
			}
			break;
		}
		case 2:
		{
			var quest;
			var nomes = nome.split(',');
			for (var i=0; i<nomes.length; i++) {
				quest = eval("document.servico." + nomes[i]);
				if(nomes[i].substring(nomes[i].length-1)=="T")
					quest.value = "";
				else
					quest.checked = false;
			}
			break;
		}
		case 3: // ranking
			nomeQue = eval("\"Q" + num + "\"");
			ordenaCaixa(nomeQue);
			break;
		case 4:
		{
			var nomes = nome.split(',');
			for (var i=0; i<nomes.length; i++) {
				quest = eval("document.servico." + nomes[i]);
				if(nomes[i].substring(nomes[i].length-1)=="T")
					quest.value = "";
			}
			break;
		}
		case 5:
		{
			var nomes = nome.split(',');
			for (var i=0; i<nomes.length; i++) {
				quest = eval("document.servico." + nomes[i]);
				if(nomes[i].substring(nomes[i].length-1)=="T") {
					quest.focus();
					window.alert("Por motivos de segurança, este campo tem que ser apagado manualmente.");
				}
			}
			return;
		}
		case 6:
		{
			var nomes = nome.split(',');
			nomes[0].match(/^(Q\d+)/);
			nome = RegExp.$1;
			var assocs = eval(nome + "_assocs");
			removeSeleccao(nome,1);
			removeSeleccao(nome,2);
			for(var i=0; i<assocs.length; i++) {
				// Remove a linha do ecrã
				var tab = document.getElementById(nome + "_assoc");
				// Remove a selecção do ecrã
				tab.removeChild(assocs[i][0]);
			}
			for(var i=assocs.length-1; i>=0; i--) {
				// Apaga o elemento do vector
				deleteElement(assocs,i);
			}
			break;
		}
		case 7:
		{
			var nomes = nome.split(',');
			for (var i=0; i<nomes.length; i++) {
				quest = eval("document.servico." + nomes[i]);
				if(nomes[i].substring(nomes[i].length-1)=="T") {
					quest.value = "";
				} else {
					quest.value = 0;
					var vBarra = eval(quest.name + "_barra");
					d=document.getElementById(quest.name + "_ci" + vBarra['pos']);
					if (d) d.className="fundoBarra"; 
					vBarra['pos'] = -999;
				}
			}
			break;
		}
		case 8:
		{
			var nomes = nome.split(',');
			for (var i=0; i<nomes.length; i++) {
				quest = eval("document.servico." + nomes[i]);
				quest.value = "";
			}
			break;
		}
		case 10:
		{
			for (var i=1; i<=3; i++) {
				quest = eval("document.servico.data_" + num + "_" + i);
				quest.value = "";
			}
			break;
		}
		case 11:
		{
			for (var i=1; i<=2; i++) {
				quest = eval("document.servico.cp_" + num + "_" + i);
				quest.value = "";
			}
			break;
		}
	}
	if(document.getElementById(idque).className != "respDuvida")
		document.getElementById(idque).className = "porResponder";
}

function actualizaEscondidos(){
	// Rank
	tabelas = document.getElementsByTagName("table");
	for (var i = 0; i < tabelas.length; i++) {
		var id = tabelas[i].getAttribute("id");
		if(id==null) continue;
		if(id.substring(0,6) == "idRank") {		// Questões tipo Rank
			var nomeQue = id.substring(7,id.length);

			vect = eval(nomeQue + "_vector");
			// O vector 'vect' contém a posição de cada item original
			// Agora tenho que criar um vector que contém as posições actuais de cada elemento (item) na sua própria casa
			saida = new Array(vect.length);
			for(k=0; k<saida.length; k++){
				for(m=0; m<vect.length; m++){
					if(vect[m]==k+1)
						saida[k] = m+1;
				}
			}
			// Afecta campos escondidos com valor correspondente à resposta
			for(j=0; j<saida.length; j++){
				caixa = eval("document.servico." + nomeQue + "N" + (j + 1));
				caixa.value = saida[j];
			}

		}
	}
	// Associativas
	var divs = document.getElementsByTagName("div");
	for (var i = 0; i < divs.length; i++) {
		var id = divs[i].getAttribute("id");
		if(id==null) continue;
		idlen = id.length;
		if(id.substring(idlen-6,idlen) == "_assoc") {		// Questões tipo Associativo
			var nomeQue = id.substring(0,idlen-6);
			var assocs = eval(nomeQue + "_assocs");
			for(var j=0; j<assocs.length; j++) {
				k = assocs[j][1];
				//window.alert("document.servico." + nomeQue + "N" + (k + 1));
				caixa = eval("document.servico." + nomeQue + "N" + (k + 1));
				if(caixa.value != "")
					caixa.value += ",";
				caixa.value += assocs[j][2] - fosso;
			}
		}
	}
	// Actualiza respostas às questões carregadas de classes externas
	var obj = Actualiza;
	for (x in obj) {
		var f = "Actualiza." + x;
		//window.alert(typeof eval(f));
		if(typeof eval(f) != "function") continue;
		eval("Actualiza." + x + "()");
	}
	// Datas
	var inputs = document.getElementsByTagName("input");
	for (var i = 0; i < inputs.length; i++) {
		var id = inputs[i].getAttribute("name");
		if(id==null) continue;
		idlen = id.length;
		if(id.substring(0,13) == "formato_data_") {		// Questões tipo Data
			var numQue = id.substring(13,idlen);
			quest = eval("document.servico.Q" + numQue + "T");
			quest.value = leData(numQue, true);
		}
	}
	// CodPostal
	var inputs = document.getElementsByTagName("input");
	for (var i = 0; i < inputs.length; i++) {
		var id = inputs[i].getAttribute("name");
		if(id==null) continue;
		idlen = id.length;
		if(id.substring(0,3)=="cp_" && id.substring(idlen-1, idlen)=="1") {	// Questões tipo CodPostal
			var numQue = id.substring(3,idlen-2);
			var cp1 = eval("document.servico.cp_" + numQue + "_1");
			var cp2 = eval("document.servico.cp_" + numQue + "_2");
			quest = eval("document.servico.Q" + numQue + "T");
			quest.value = cp1.value + "-" + cp2.value;
		}
	}
}

////////////////////////////////////////////////////////////
// Lê os campos e constrói a data com o separador da questão
// Recebe:
//	- numQue: número da questão
//	- junta: true - junta o vector numa string
//		 false - devolve apenas o vector
function leData(numQue, junta) {
	var quest = eval("document.servico.sepdata_" + numQue);
	var sepdata = quest.value;
	var vnums = new Array();
	for (var j=1; j<=3; j++) {
		quest = eval("document.servico.data_" + numQue + "_" + j);
		vnums.push(quest.value);
	}
	if(junta)
		return vnums.join(sepdata);
	else
		return vnums;
}

////////////////////////////////////////////////////////////
// Constrói a data a partir de um vector com 3 elementos e de um campo formato
// Recebe:
//	- vdata: vector com 3 elementos (dd,mm,yyyy), ou (yyyy,mm,dd), (mm,dd,yyyy)
//	- formato: 1 - DD,MM,YYYY
//		   2 - YYYY,MM,DD
//		   3 - MM,DD,YYYY
// Devolve:
//	Objecto próprio, não do tipo data, pois não quero construir uma data válida
function constroiData(vdata, formato) {
	var obj;
	switch(formato) {
		case 1:
			obj = {dia:vdata[0], mes:vdata[1], ano:vdata[2]};
			break;
		case 2:
			obj = {dia:vdata[2], mes:vdata[1], ano:vdata[0]};
			break;
		case 3:
			obj = {dia:vdata[1], mes:vdata[0], ano:vdata[2]};
			break;
	}
	return obj;
}

///////////////////////////////////////////////////////////
// Verifica questões que executam funções JS no final (para validação)
function verificaFunc() {
	// Executar as funções de validação de questões antes da submissão do inquérito
	var funcOK;
	var func = document.getElementById("list_func").value;
	if(func=="") return 1;
	var vFunc = func.split(",");
	if(!vFunc.length) return 1;
	for(i in vFunc) {
		var oPar = getRefs(vFunc[i]);
		funcOK = execFunc(oPar);
		if(funcOK.ret) {
			//obrigatoria(oPar);	// Feito na função, por causa da referência à 2ª questão
			window.alert(funcOK.msg);
			return 0;
		} else if(funcOK.msg) {
			window.alert(funcOK.msg);
		}
	}
	return 1;
}

function execFunc(o) {
	//window.alert(o.num);
	var idque = eval("\"idque_num" + o.nordem + "\"");
	var lfunc = document.getElementById(idque).getAttribute("func");
	var vfunc = lfunc.split(",");
	var fnome = vfunc.shift();

	// Verifica se a função existe
	try {
		var fn = eval(fnome);
	} catch(err) {
		return {ret:0, msg:'Erro de configuração na questão ' + o.num + '. Por favor contacte o responsável.'};
	}
	if (typeof fn != 'function') {
		return {ret:0, msg:'Erro de configuração na questão ' + o.num + '. Por favor contacte o responsável.'};
	}

	var params = vfunc.join(",");
	eval("var ret = " + fnome + "(" + params + ");");
	return ret;
}

////////////////////////////////////////////
// Recebe o número da questão (que_id)
// Devolve o número de ordem da questão tal como o utilizador a vê
// Devolve null, se não encontrar
function getNumOrdem(num) {
	var divs = document.getElementsByTagName("div");
	for (var i = 0; i < divs.length; i++) {
		var id = divs[i].getAttribute("id");
		if(id==null) continue;
		if(id.indexOf("idque_num") != 0) continue;
		var idlen = id.length;
		var nOrd = eval(id.substring(9,idlen));
		var refs = getRefs(nOrd);
		if(!refs) continue;
		if(num == refs.num) return nOrd;
	}
	return null;
}

function getRefs(num) {
	//window.alert(num);
	var idque = eval("\"idque_num" + num + "\"");
	eval("var refs = " + document.getElementById(idque).getAttribute("refs"));
	//window.alert(refs.tipo + "," + refs.nome + "," + refs.num + "," + refs.nordem);
	return refs;
}

function verificaRegEx() {
	// Confrontar as expressões regulares com as respostas
	var regExOk;
	var regex = document.getElementById("list_regex").value;
	if(regex=="") return 1;
	var vRegEx = regex.split(",");
	if(!vRegEx.length) return 1;
	for(i in vRegEx) {
		var oPar = getRefs(vRegEx[i]);
		regExOk = testaRegEx(oPar);
		if(!regExOk) {
			obrigatoria(oPar);
			window.alert("Conteúdo inválido na questão assinalada");
			return 0;
		}
	}
	return 1;
}

function testaRegEx(o) {
	var resp = false;

	// Se foi desactivada, devolve 'true'
	var des = document.getElementById("idque_desactivar" + o.nordem);
	if(des && des.checked) return true;

	var orex = document.getElementById("idque_regex" + o.nordem);
	if(!orex) return 1;
	var rex = orex.innerHTML;
	if(rex == "") return 1;
	rex = eval("/" + rex + "/");
	//window.alert("rex: " + rex);
	//window.alert("tipo: " + o.tipo + ", nome: " + o.nome + ", num: " + o.num + ", nordem: " + o.nordem);
	//if(!nome || !nome.length) return true;
	var quest;
	var nomes = o.nome.split(',');
	switch (o.tipo) {
		case 4:		// Questão aberta
			for (var i=0; i<nomes.length; i++) {
				quest = eval("document.servico." + nomes[i]);
				if(nomes[i].substring(nomes[i].length-1)=="T") {
					if(quest.value.match(rex)) resp=true;
				}
			}
			break;
		case 8:		// Questão com espaços por preencher
			resp = true;
			for (var i=0; i<nomes.length; i++) {
				quest = eval("document.servico." + nomes[i]);
				if(!quest.value.match(rex)) resp = false;
				//window.alert("-" + quest.value + "-, " + quest.value.match(rex) + ", " + resp);
			}
			break;
		case 10:	// Questão Data
			var vdata = leData(o.num, false);
			//window.alert(vdata);
			var quest = eval("document.servico.formato_data_" + o.num);
			var formato = eval(quest.value);
			var data = constroiData(vdata, formato);
			resp = dataValida(data.dia, data.mes, data.ano);
			break;
		default:		// Outras
			return 1;
	}
	return resp;
}

function verificaObrigatorias() {
	// Testar se as obrigatórias estão respondidas
	var resp;
	var obrig = document.getElementById("list_obrig").value;
	if(obrig=="") return 1;
	var vObrig = obrig.split(",");
	if(!vObrig.length) return 1;
	for(i in vObrig) {
		var oPar = getRefs(vObrig[i]);
		resp = respondida2(oPar);
		if(!resp) {
			obrigatoria(oPar);
			window.alert("Questão obrigatória não respondida");
			return 0;
		}
	}
	return 1;
}

////////////////////////////////////////////////////////////////////////////
// BubbleSort para ordenar as caixas de selecção (questões tipo rank)
function ordenaCaixa(nome) {
	var i, j, tmp;

	// Nome do vector que contém a ordem das opções
	vect = eval(nome + "_vector");
	// Nome do vector que contém o texto das respostas
	var vResp = eval(nome + "_vResp");

	for(i=0; i < vect.length; i++) {
		for(j=0; j < (vect.length-1); j++) {
			if(vect[j] > vect[j+1]) {
				// Ordena vector auxiliar
				tmp = vect[j+1];
				vect[j+1] = vect[j];
				vect[j] = tmp;
				// Ordena caixa de selecção
				k = j+1;
				tmp = vResp[k+1];
				vResp[k+1] = vResp[k];
				vResp[k] = tmp;
			}
		}
	}
	criaTabela(nome);
}

function vergrf() {
	document.servico.numservico.value = 924160;
	document.servico.submit();
}

function confirmar(janela) {
	// Limpar todos os avisos anteriores
	limpaAvisos();

	// Verifica questões obrigatórias
	if(!verificaObrigatorias()) return;

	// Verifica expressões regulares sobre questões
	if(!verificaRegEx()) return;

	// Verifica questões que executam funções JS no final (para validação)
	if(!verificaFunc()) return;

	// Limpar checkboxes de questões Rank, que interferem com as respostas
	limpaCaixasRank();

	if(!janela) {
		actualizaEscondidos();
		document.servico.reentrada.value = 1;
		document.servico.submit();
		return;
	}

	showSubmit();
/*
	if (navigator.appName.indexOf ("Microsoft") != -1){
		var windowWidth = 300;
		var windowHeight = 150;
		var locX = ( screen.width - windowWidth ) / 2;
		var locY = ( screen.height - windowHeight ) / 2;

		var windowFeatures = "dialogTop:" + locY + "px;"
					+ "dialogLeft:" + locX  + "px;"
					+ "dialogWidth:" + windowWidth  + "px;"
					+ "dialogHeight:" + windowHeight + "px;"
					+ "center:yes;help:no;status:no";

		opcao = window.showModalDialog( "../confirmaenvio.php", "Confirm", windowFeatures );
		if(opcao){
			actualizaEscondidos();
			document.servico.reentrada.value = 1;
			document.servico.submit();
		}else
			window.alert("Dados NÃO enviados");:
	} else {
		if(!confirm("Quer voltar atrás?\n\nPrima OK para voltar atrás.\nPrima Cancel para continuar.")){
			actualizaEscondidos();
			document.servico.reentrada.value = 1;
			document.servico.submit();
		}else
			return;
	}
*/
	
}

function hideSubmit() {
	document.getElementById("clog").style.display = "none";
}

function showSubmit() {
	document.getElementById("clog").style.display = "block";
}

function submeteInq() {
	actualizaEscondidos();
	document.servico.reentrada.value = 1;
	document.servico.submit();
}

function mostraQuestao(que_id) {
	nomeQue = eval("\"idque_num" + _nQuestao + "\"");
	hiderow(nomeQue);
	_nQuestao = que_id;
	nomeQue = eval("\"idque_num" + _nQuestao + "\"");
	showrow(nomeQue);
}

function mostraAnterior()
{
	if(_nQuestao > 1) {
		mostraQuestao(_nQuestao-1);
	}
}

function mostraSeguinte()
{
	proxQue = _nQuestao + 1;
	x = eval("\"idque_num" + proxQue + "\"");
	if(document.getElementById(x))
		mostraQuestao(proxQue);
}


// Para validar respondentes
function verificar() {
	//document.servico.reentrada.value = 1;
	document.servico.submit();
}

// Para construir as tabelas de perguntas do tipo Rank
// Para apresentar 1ª questão em testes que apresentam 1 questão de cada vez
_nQuestao = 1;
function inicio() {
	constroiRank();
	showrow('idque_num1');
}

//////////////////////////////////////////////////
// Para verificar respostas abertas das checkBoxes
function clickCheck(nome) {
	quest = eval("document.servico." + nome);
	if(quest.checked == false) {
		quest = eval("document.servico." + nome + "T");
		if(quest) quest.value = "";
	}
}

function clickCheckT(nome) {
	quest = eval("document.servico." + nome);
	quest.checked = true;
}

//////////////////////////////////////////////////
// Para verificar respostas abertas dos radioButtons
function clickRadio(nome) {
	quest = eval("document.servico." + nome);
	if(quest) quest.value = "";
}

function clickRadioT(nome,num) {
	quest = eval("document.servico." + nome);
	quest[num].checked = true;
}

//////////////////////////////////////////////////
// Para verificar respostas abertas dos radioButtons
function clickSelect(nome,num) {
	quest = eval("document.servico." + nome);
	if(quest.selectedIndex != num) {
		quest = eval("document.servico." + nome + "T");
		if(quest) quest.value = "";
	}
}

function clickSelectT(nome,num) {
	quest = eval("document.servico." + nome);
	quest.selectedIndex = num;
}

//////////////////////////////////////////////////
// para verificar se a questão está respondida
// Parâmetros: 
// - Número de ordem da questão (1, 2, 3, ...)
function respondida(n) {
	var o = getRefs(n);
	var idque = eval("\"idnum_" + o.num + "\"");
	if(!document.getElementById(idque)) return;

	var resp = respondida2(o);

	if(document.getElementById(idque).className != "respDuvida")
		document.getElementById(idque).className = resp ? "jaRespondida" : "porResponder";
}

//////////////////////////////////////////////////
// para verificar se a questão está respondida
// Parâmetros: 
// - Um objecto com parâmetros da questão
//	- tipo:		1-Mutex, 2-NMutex, 3-Rank, 4-Aberta
//	- nome:		Lista de nomes das diversas opções
//	- num:		Número real da questão (que_id)
//	- nordem:	Número de ordem da questão (1, 2, 3, ...)
//	- classe:	Pode ainda receber o nome de método da classe Respondidas, para executar se "tipoQuestao=127"
function respondida2(o) {
	var resp = false;

	// Se foi desactivada, devolve 'true'
	var des = document.getElementById("idque_desactivar" + o.nordem);
	if(des && des.checked) return true;

	var quest;
	//window.alert("tipo: " + o.tipo + ", nome: " + o.nome + ", num: " + o.num);
	//if(!o.nome || !o.nome.length) return true;
	var nomes = o.nome.split(',');
	switch (o.tipo) {
		case 1:	// Para verificar Mutex respondidas
		{
			for (var i=0; i<nomes.length; i++) {
				quest = eval("document.servico." + nomes[i]);
				//window.alert(nomes[i]);
				if(nomes[i].substring(nomes[i].length-1)=="T") {
					// Caixa de texto de opção
					if(quest.value != "") resp=true;
				} else if(quest.selectedIndex) {
					// ComboBox
					if(quest.selectedIndex != 0) resp=true;
				} else {
					// Radio buttons
					if(quest.length==undefined) {	// Apenas um botão
						if(quest.checked) resp=true;
					} else {
						for(j=0;j<quest.length;j++){
							if(quest[j].checked) resp=true;
						}
					}
				}
			}
			break;
		}
		case 2:	// Para verificar NMutex respondidas
		{
			for (var i=0; i<nomes.length; i++) {
				quest = eval("document.servico." + nomes[i]);
				if(nomes[i].substring(nomes[i].length-1)=="T") {
					if(quest.value != "") resp=true;
				} else {
					if(quest.checked != false) resp=true;
				}
			}
			break;
		}
		case 3:	// Para verificar Rank respondidas
		{
/*
			vect = eval("Q" + o.num + "_vector");
			for(i=0; i<vect.length; i++)
				if(vect[i] != i+1) {
					resp=true;
					break;
				}
*/
			resp=true;
			break;
		}
		case 6:	// Para verificar Associativas respondidas
		{
			var assocs = eval(o.nome + "_assocs");
			if(assocs.length) resp=true;
			break;
		}
		case 4:	// Para verificar Aberta respondidas
		case 7:	// Para verificar Barra respondidas
		{
			for (var i=0; i<nomes.length; i++) {
				quest = eval("document.servico." + nomes[i]);
				if(nomes[i].substring(nomes[i].length-1)=="T") {
					if(quest.value != "") resp=true;
				}
			}
			break;
		}
		case 5:	// Para verificar Aberta respondidas
		{
			for (var i=0; i<nomes.length; i++) {
				quest = eval("document.servico." + nomes[i]);
				if(nomes[i].substring(nomes[i].length-1)=="T") {
					if(quest.value != "") resp=true;
				}
			}
			break;
		}
		case 8:	// Para verificar Blank respondidas
		{
			for (var i=0; i<nomes.length; i++) {
				quest = eval("document.servico." + nomes[i]);
				if(quest.value != "") resp=true;
			}
			break;
		}
		case 10:	// Para verificar Data respondidas
		{
			var cnt10 = 0;
			for (var i=1; i<=3; i++) {
				quest = eval("document.servico.data_" + o.num + "_" + i);
				if(quest.value != "") cnt10++;
			}
			resp = cnt10==3;
			break;
		}
		case 11:	// Para verificar CodPostal respondidas
		{
			var cnt11 = 0;
			for (var i=1; i<=2; i++) {
				quest = eval("document.servico.cp_" + o.num + "_" + i);
				if(quest.value != "") cnt11++;
			}
			resp = cnt11==2;
			break;
		}
		case 127:	// Para verificar questões Externas respondidas
		{
			if(!o.classe) {
				resp = false;
				break;
			}
			var metodo = o.classe;
			var f = "Respondida." + metodo;
			resp = eval("Respondida." + metodo + "('" + o.nome + "')");
			break;
		}
	}
	return resp;
}


///////////////////////////////////////////////////////////
// Limpa todos os avisos anteriores (das obrigatórias, regexs, funcs, e outras que haja
function limpaAvisos() {
	var divs = document.getElementsByTagName("div");
	for (var i = 0; i < divs.length; i++) {
		var id = divs[i].getAttribute("id");
		if(id==null) continue;
		if(id.indexOf("idque_num") != 0) continue;
		var idlen = id.length;
		var num = eval(id.substring(9,idlen));
		var idque = eval("\"idque_num" + num + "\"");
		if(document.getElementById(idque).className == "obrigatoria") {
			document.getElementById(idque).className = "semObrigatoria";
		}
	}
}

//////////////////////////////////////////////////
// Para indicar que é obrigatória e não foi respondida
// Parâmetros:
// Parâmetros: 
// - Um objecto com parâmetros da questão
//	- tipo:		1-Mutex, 2-NMutex, 3-Rank, 4-Aberta
//	- nome:		Lista de nomes das diversas opções
//	- num:		Número real da questão (que_id)
//	- nordem:	Número de ordem da questão (1, 2, 3, ...)
//	- classe:	Pode ainda receber o nome de método da classe Respondidas, para executar se "tipoQuestao=127"
function obrigatoria(o) {
	var idque = eval("\"idque_num" + o.nordem + "\"");
	document.getElementById(idque).className = "obrigatoria";
	poeFoco(o);
}

function poeFoco(o) {
	//window.alert(o.nome);
	var vQue = o.nome.split(',');
	var que = null;
	var quest;

	switch(o.tipo) {
		case 1:
			quest = eval("document.servico." + vQue[0]);
			if(quest[0] && quest[0].getAttribute("type")=="radio") {
				quest = quest[0];
			}
			break;
		case 2:
			quest = eval("document.servico." + vQue[0]);
			break;
		case 4:
			for(var i=0; i<vQue.length; i++) {
				//window.alert(vQue[i]);
				if(vQue[i].substring(vQue[i].length-1)=="T") {
					que = vQue[i];
					break;
				}
			}
			quest = eval("document.servico." + que);
			break;
		case 8:
			quest = eval("document.servico." + vQue[0]);
			break;
		case 10:
			quest = eval("document.servico.data_" + o.num + "_1");
			break;
		case 127:
			// Best guess!
			quest = eval("document.servico." + vQue[0]);
			break;
	}
	if(quest) {
		quest.focus();
	}
}

//////////////////////////////////////////////////
// Para colocar/retirar questão em dúvida
// Parâmetros:
// - Número de ordem da questão (1, 2, 3, ...)
function poeEmDuvida(n) {
	var o = getRefs(n);
	var idque = eval("\"idque_num" + o.nordem + "\"");
	var idqueresp = eval("\"idnum_" + o.num + "\"");
	if(document.getElementById(idque).className == "comDuvida") {
		document.getElementById(idque).className = "semDuvida";

		// A dúvida desapareceu, por isso, digo que está por responder e depois chamo 'respondida'
		// que fica inibida qdo o nome da classe é: "respDuvida"
		document.getElementById(idqueresp).className = "porResponder";

		respondida(n);
	} else {
		document.getElementById(idque).className = "comDuvida";
		document.getElementById(idqueresp).className = "respDuvida";
	}
}

//////////////////////////////////////////////////////
// Para construir as tabelas de perguntas do tipo Rank
//////////////////////////////////////////////////////

function constroiRank() {
	tabelas = document.getElementsByTagName("table");
	for (var i = 0; i < tabelas.length; i++) {
		var id = tabelas[i].getAttribute("id");
		if(id==null) continue;
		if(id.substring(0,6) == "idRank") {
			var nomeQue = id.substring(7,id.length);
			criaTabela(nomeQue);
		}
	}
}

function criaTabela(nome) {
	var idTabela = "idRank_" + nome;
	var vResp = eval(nome + "_vResp");

	// Referência para a tabela
	var tabLoc = document.getElementById(idTabela);
	if(!tabLoc) return;

	// Apaga todos os TBODY desta tabela
	linhas = tabLoc.getElementsByTagName("tbody");
	for(i=0; i<linhas.length; i++) {
		tabLoc.removeChild(tabLoc.getElementsByTagName("tbody").item(i));
	}

	// Cria TBODY:
	tabCorpo = document.createElement("tbody");

	//if(self.vResp) {
		for(var i=1; i<vResp.length; i++) {
			// Cria uma linha de tabela
			var linha = document.createElement("tr");

			// Cria primeira célula
			celula = document.createElement("td");
			celula.innerHTML = vResp[i];
			mudaClasse(celula,"tdMedio");
			// Adiciona célula à linha
			linha.appendChild(celula);

			// Cria checkbox
			var celula = document.createElement("td");

			// Cria checkbox
			var caixa = document.createElement("input");
			caixa.setAttribute("type", "checkbox");
			//caixa.setAttribute("className", "botaoSemLinha");
			mudaClasse(caixa, "botaoSemLinha");
			caixa.setAttribute("name", nome + "_" + i);
			caixa.setAttribute("value", "1");
			celula.appendChild(caixa);
			mudaClasse(celula,"tdMedio");
			// Adiciona célula à linha
			linha.appendChild(celula);

			// coloca linha na tabela
			tabCorpo.appendChild(linha);
			tabLoc.appendChild(tabCorpo);
		}
	//}
}

function subirRespostas(nome) {
	var caixas = listaCaixas(nome + "_");
	// Nome do vector que contém o texto das respostas
	var vResp = eval(nome + "_vResp");
	// Nome do vector que contém a ordem das opções
	vect = eval(nome + "_vector");
	for(var i=1; i<vResp.length; i++) {
		caixa = caixas[i];
		if(!caixa) continue;
		if(cbSeleccionada(caixa) && i>1) {
			tmp = vResp[i];
			vResp[i] = vResp[i-1];
			vResp[i-1] = tmp;
			// Altera também o vector que contém a ordem das opções
			k = i-1;
			tmp = vect[k];
			vect[k] = vect[k-1];
			vect[k-1] = tmp;
		}
	}
	criaTabela(nome);
}

function descerRespostas(nome) {
	var caixas = listaCaixas(nome + "_");
	// Nome do vector que contém o texto das respostas
	var vResp = eval(nome + "_vResp");
	// Nome do vector que contém a ordem das opções
	vect = eval(nome + "_vector");
	for(var i=vResp.length-1; i>=1; i--) {
		caixa = caixas[i];
		if(!caixa) continue;
		if(cbSeleccionada(caixa) && i<vResp.length-1) {
			tmp = vResp[i];
			vResp[i] = vResp[i+1];
			vResp[i+1] = tmp;
			// Altera também o vector que contém a ordem das opções
			k = i-1;
			tmp = vect[k];
			vect[k] = vect[k+1];
			vect[k+1] = tmp;
		}
	}
	criaTabela(nome);
}

function limpaCaixasRank() {
	tabelas = document.getElementsByTagName("table");
	for (var i = 0; i < tabelas.length; i++) {
		var id = tabelas[i].getAttribute("id");
		if(id==null) continue;
		if(id.substring(0,6) == "idRank") {
			var nomeQue = id.substring(7,id.length);
			criaTabela(nomeQue);
		}
	}
}

//////////////////////////////////////////////////////
// Para gerir barras de percentagens
//////////////////////////////////////////////////////

function barraTst(nome,a) {
	var vBarra = eval(nome + "_barra");
	if (!vBarra['bOn']) return; 
	var old = vBarra['pos']; 
	//window.alert("pos="+vBarra['pos']+"\nold="+old);
	vBarra['pos']=(a<0) ? 0 : (a>vBarra['nInt'] ? vBarra['nInt'] : a); 
	if (vBarra['pos']==old) return; 
	d=document.getElementById(nome + "_ci" + vBarra['pos']); 
	d.className="marcaBarra"; 
	d=document.getElementById(nome + "_ci" + old); 
	if (d) d.className="fundoBarra"; 

	refQuestao = eval("document.servico." + nome);
	refQuestao.value = 1;
	refQuestao = eval("document.servico." + nome + "T");
	refQuestao.value = vBarra['min'] + vBarra['pos'] * vBarra['passo'];

	// Indica que foi respondida
	nome.match(/^Q(\d+)/);
	num = RegExp.$1;
	//window.alert("nome="+nome+"\nnum="+num);
	respondida(7,nome+"T",num);
}

function barraOff(nome,a) {
	var vBarra = eval(nome + "_barra");
	vBarra['bOn']=false;
}

function barraOn(nome,a) {
	var vBarra = eval(nome + "_barra");
	vBarra['bOn']=(a==vBarra['pos']);
}

////////////////////////////////////////////////////
// Para gerir questões associativas
//////////////////////////////////////////////////////

function deleteElement(array, n) {
	//delete the nth element of array
	var length = array.length;
	if (n >= length || n<0)
		return;

	for (var i=n; i<length-1; i++)
		array[i] = array[i+1];
	array.length--;
}

function posicao(nome,i,col) {
	caixa = nome + "_cx_" + i;
	obj = document.getElementById(caixa);

	var vPos = eval(nome + "_pos");
	if(vPos['x1']==0 && vPos['y1']==0 && vPos['x2']==0 && vPos['y2']==0) {
		removeSeleccao(nome,1);
		removeSeleccao(nome,2);
	} else {
		removeSeleccao(nome,col);
	}

	var ytab = findPosY(document.getElementById(nome + "_assoc"));
	var x = findPosX(obj);
	var y = findPosY(obj) - ytab;

	if(col==1) {
		vPos['x1']= x;
		vPos['y1'] = y;
		vPos['nObj1'] = i;
	} else {
		vPos['x2'] = x;
		vPos['y2'] = y;
		vPos['nObj2'] = i;
	}

	obj.setAttribute("src","sistema/imagens/ponto2.gif");

	if(vPos['x1']!=0 && vPos['y1']!=0 && vPos['x2']!=0 && vPos['y2']!=0)
		poeLinha(nome, vPos['x1'], vPos['y1'], vPos['x2'], vPos['y2']);
}

function findPosX(obj)
{
	var curleft = 0;
	if (obj.offsetParent)
	{
		while (obj.offsetParent)
		{
			curleft += obj.offsetLeft
			obj = obj.offsetParent;
		}
	}
	else if (obj.x)
		curleft += obj.x;
	return curleft;
}

function findPosY(obj)
{
	var curtop = 0;
	if (obj.offsetParent)
	{
		while (obj.offsetParent)
		{
			curtop += obj.offsetTop
			obj = obj.offsetParent;
		}
	}
	else if (obj.y)
		curtop += obj.y;
	return curtop;
}

function poeLinha(nome, x1, y1, x2, y2) {
	var assocs = eval(nome + "_assocs");
	var vPos = eval(nome + "_pos");
	// Se já existe uma linha entre estes dois quadrados, remove-a
	for(var i=0; i<assocs.length; i++) {
		if(assocs[i][1]==vPos['nObj1'] && assocs[i][2]==vPos['nObj2']) {
			// Remove a linha do ecrã
			var tab = document.getElementById(nome + "_assoc");
			// Remove a selecção do ecrã
			removeSeleccao(nome,1);
			removeSeleccao(nome,2);
			tab.removeChild(assocs[i][0]);
			// Apaga o elemento do vector
			deleteElement(assocs,i);
			// Limpa as variáveis de posição
			vPos['x1'] = vPos['y1'] = vPos['x2'] = vPos['y2'] = 0;
			return;
		}
	}
	// Garante que o x1 é inferior ao x2
	if(x1 > x2) {
		tmp = x1;
		x1 = x2;
		x2 = tmp;
		tmp = y1;
		y1 = y2;
		y2 = tmp;
	}
	// Corrige pontos de referência das imagens
	xClasse = -31; // Está relacionado com as CSSs do layout do inquérito
	x1 += xClasse;
	x2 += xClasse;
	if (navigator.appName.indexOf ("Microsoft") !=-1) {
		y1 += 5;
		x2 -= 11;
		y2 += 5;
	} else {
		x1 += 2;
		y1 += 5;
		x2 -= 9;
		y2 += 5;
	}
	declive = (y2-y1) / (x2-x1);
	// A variável yant guarda o valor de y anterior para verificar se o y desce mais de 1 unidade de cada vez
	// Se isso acontecer, tem que se colocar pontos na mesma vertical x, mas com os ys intermédios
	yant = y1;
	// Tem que existir um DIV com id=nome+"_assoc" antes da tabela com conteúdos a associar.
	var tab = document.getElementById(nome + "_assoc");
	var linha = document.createElement("div");
	linha.className = "ponto";
	tab.appendChild(linha);
	for(var x=x1; x<=x2; x++) {
		ordOri = Math.round((y1 - declive * x1));
		y = Math.round((x * declive) + ordOri);
		poePonto(x,y,linha);
		if(Math.abs(y - yant) > 1) {
			// Determina maior e menor de (y, yant)
			ym = Math.min(y, yant);
			yM = Math.max(y, yant);
			// Coloca pontos na mesma vertical x, para rectas com declive elevado
			for(yi=ym+1; yi<yM; yi++)
				poePonto(x,yi,linha);
		}
		yant = y;
	}
	// Cria vector com linha de pontos e nºs de objecto
	var vLinha = new Array();
	vLinha[0] = linha;
	vLinha[1] = vPos['nObj1'];
	vLinha[2] = vPos['nObj2'];
	// Adiciona-o ao vector de linhas de associação
	assocs.push(vLinha);
	vPos['x1'] = vPos['y1'] = vPos['x2'] = vPos['y2'] = 0;
}

function poePonto(x, y, lin) {
	// Coloca ou retira ponto em (x,y)
	var imagem = document.createElement("img");
	imagem.setAttribute("src","sistema/imagens/ponto.gif");
	imagem.style.position = "absolute";
	imagem.style.left = x + "px";
	imagem.style.top = y + "px";
	lin.appendChild(imagem);
}

function removeSeleccao(nome,col) {
	var i = 0;
	while(1) {	// Apaga selecção nesta coluna
		caixa = nome + "_cx_" + (i++ + (col==2 ? fosso : 0));
		var obj = document.getElementById(caixa);
		if(!obj) break;
		obj.setAttribute("src","sistema/imagens/ponto.gif");
	}
}

function aceitarSugestao() {
	document.servico.numservico.value = 989184;
	document.servico.reentrada.value = 1;
	document.servico.submit();
}

function outroTeste() {
	document.servico.numservico.value = 989184;
	document.servico.reentrada.value = 0;
	document.servico.submit();
}

// Muda para o subcampo data seguinte caso tenha atingido o tamanho máximo neste campo
function mudaCampoData(o, d) {
	var ori = document.getElementById(o);
	var dst = document.getElementById(d);
	//window.alert(ori.value.length + ", " + ori.maxLength);
	if(ori.value.length == ori.maxLength) dst.focus();
}

function activar(n) {
	var quest;
	var msg = document.getElementById("idque_msg" + n);
	var estado = document.getElementById("idque_activar" + n).checked;
	var o = getRefs(n);
	var nomes = o.nome.split(',');
	if(!estado) {
		quest = document.getElementById("lstopc_" + o.num);
		quest.innerHTML = "";
		msg.style.display = "inline";
	} else {
		msg.style.display = "none";
		arg = 'que=' + o.num;
		arg += '&ord=' + n;
		// Chamada via AJAX
		var a=new Ajax();
		a.request('leCaixa',arg,'');
	}
}

function desactivar(n) {
	var quest;
	var estado = document.getElementById("idque_desactivar" + n).checked;
	var o = getRefs(n);
	var nomes = o.nome.split(',');
	switch (o.tipo) {
		case 4:		// Questão aberta
			for (var i=0; i<nomes.length; i++) {
				quest = eval("document.servico." + nomes[i]);
				if(nomes[i].substring(nomes[i].length-1)=="T") {
					quest.value = "";
					quest.disabled = estado;
				}
			}
			break;
		case 8:		// Questão com espaços por preencher
			for (var i=0; i<nomes.length; i++) {
				quest = eval("document.servico." + nomes[i]);
				quest.value = "";
				quest.disabled = estado;
			}
			break;
		case 10:	// Questão Data
			for (var i=1; i<=3; i++) {
				quest = eval("document.servico.data_" + o.num + "_" + i);
				quest.value = "";
				quest.disabled = estado;
			}
			break;
		default:		// Outras
			break;
	}
}

//////////////////////////////////////////////////////
// Para gerir respostas a questões SelectBD via AJAX
//////////////////////////////////////////////////////

function processa(nome,num,numAfect) {
	var quest = eval("document.servico." + nome);
	var ind = quest.value;

	arg = 'que=' + num;
	arg += '&val=' + ind;
	arg += '&ord=' + getNumOrdem(numAfect);
	// Chamada via AJAX
	var a=new Ajax();
	a.request('leOpcao',arg,'');
}

function leCodPost(nm1,nm2,loc) {
	var quest = eval("document.servico." + nm1);
	var cod = quest.value;
	quest = eval("document.servico." + nm2);
	sub = quest.value;

	arg = 'cod=' + cod;
	arg += '&sub=' + sub;
	// Chamada via AJAX
	var a=new Ajax();
	a.request('leCP',arg,loc);
}

// Recebe:
//	ori: questão onde foi despoletada acção
//	dst: questão que vai ser afectada pela acção
function poeBI(ori,dst) {
	var ordOri = getNumOrdem(ori);
	var refOri = getRefs(ordOri);
	var quest = eval("document.servico." + refOri.nome);
	var ind = eval(quest.value);
	switch(ind) {
		case 1: 
			document.getElementById("opc_" + dst + "_1").style.display = "inline";
			document.getElementById("opc_" + dst + "_2").style.display = "inline";
			document.getElementById("opc_" + dst + "_3").style.display = "inline";
			document.getElementById("opc_" + dst + "_4").style.display = "none";
			document.getElementById("opc_" + dst + "_5").style.display = "none";
			document.getElementById("opc_" + dst + "_6").style.display = "inline";
			document.getElementById("opc_" + dst + "_7").style.display = "inline";
			document.getElementById("opc_" + dst + "_8").style.display = "inline";
			document.getElementById("opc_" + dst + "_9").style.display = "inline";
			document.getElementById("opc_" + dst + "_10").style.display = "none";
			document.getElementById("opc_" + dst + "_11").style.display = "none";
			document.getElementById("opc_" + dst + "_12").style.display = "inline";
			break;
		case 5: 
			document.getElementById("opc_" + dst + "_1").style.display = "inline";
			document.getElementById("opc_" + dst + "_2").style.display = "inline";
			document.getElementById("opc_" + dst + "_3").style.display = "inline";
			document.getElementById("opc_" + dst + "_4").style.display = "inline";
			document.getElementById("opc_" + dst + "_5").style.display = "inline";
			document.getElementById("opc_" + dst + "_6").style.display = "inline";
			document.getElementById("opc_" + dst + "_7").style.display = "inline";
			document.getElementById("opc_" + dst + "_8").style.display = "inline";
			document.getElementById("opc_" + dst + "_9").style.display = "inline";
			document.getElementById("opc_" + dst + "_10").style.display = "inline";
			document.getElementById("opc_" + dst + "_11").style.display = "inline";
			document.getElementById("opc_" + dst + "_12").style.display = "inline";
			break;
		case 2: 
		case 3: 
		default: 
			document.getElementById("opc_" + dst + "_1").style.display = "inline";
			document.getElementById("opc_" + dst + "_2").style.display = "none";
			document.getElementById("opc_" + dst + "_3").style.display = "none";
			document.getElementById("opc_" + dst + "_4").style.display = "none";
			document.getElementById("opc_" + dst + "_5").style.display = "none";
			document.getElementById("opc_" + dst + "_6").style.display = "none";
			document.getElementById("opc_" + dst + "_7").style.display = "none";
			document.getElementById("opc_" + dst + "_8").style.display = "none";
			document.getElementById("opc_" + dst + "_9").style.display = "none";
			document.getElementById("opc_" + dst + "_10").style.display = "none";
			document.getElementById("opc_" + dst + "_11").style.display = "none";
			document.getElementById("opc_" + dst + "_12").style.display = "none";
			break;
	}
}

//////////////////////////////////////////////////////
// Para validar questões cruzadas
//////////////////////////////////////////////////////

/////////////////////////////////////////////
// Testa se a data contida no 1º campo é maior que a data contida no 2º campo
// Recebe:
//	- maior: número (que_id) da questão que deve conter a maior data
//	- menor: número (que_id) da questão que deve conter a menor data
// Devolve um objecto com dois campos:
//	- ret: código de erro: 0-OK, Outro-NOK (caso a 1ª data não seja maior que a 2ª)
//	- msg: mensagem a apresentar ao utilizador em caso de erro
//
function dataMaior(maior, menor) {
	// Códigos (retorno) a devolver
	var retOK = {ret:0, msg:''};
	var retNOK_Param = {ret:1, msg:'dataMaior: data inexistente'};
	var retNOK_Data = {ret:1, msg:'Incoerência entre os valores nos campos assinalados.'};

	// Obtém data maior no formato UNIX
	var ordMaior = getNumOrdem(maior);
	if(!ordMaior) return retNOK_Param;
	var refMaior = getRefs(ordMaior);
	var vDataMaior = leData(refMaior.num, false);
	var qMaior = eval("document.servico.formato_data_" + refMaior.num);
	var frmMaior = eval(qMaior.value);
	var dMaior = constroiData(vDataMaior, frmMaior);
	if(!dMaior.dia || !dMaior.mes || !dMaior.ano) return retOK;
	var dataMaior = new Date(dMaior.ano, dMaior.mes-1, dMaior.dia);

	// Obtém data menor no formato UNIX
	var ordMenor = getNumOrdem(menor);
	if(!ordMenor) return retNOK_Param;
	var refMenor = getRefs(ordMenor);
	var vDataMenor = leData(refMenor.num, false);
	var qMenor = eval("document.servico.formato_data_" + refMenor.num);
	var frmMenor = eval(qMenor.value);
	var dMenor = constroiData(vDataMenor, frmMenor);
	if(!dMenor.dia || !dMenor.mes || !dMenor.ano) return retOK;
	var dataMenor = new Date(dMenor.ano, dMenor.mes-1, dMenor.dia);

	if(dataMaior.getTime() > dataMenor.getTime())
		return retOK;
	else {
		obrigatoria(refMaior);
		obrigatoria(refMenor);
		return retNOK_Data;
	}
}

/////////////////////////////////////////////
// Verifica se existe telemóvel no caso de ter pedido para receber os dados via SMS
// Recebe:
//	- sms: número (que_id) da questão que permite envio de SMS
//	- tlm: número (que_id) da questão que contém nº de telemível
// Devolve um objecto com dois campos:
//	- ret: código de erro: 0-OK, Outro-NOK (caso haja incoerência entre as questões)
//	- msg: mensagem a apresentar ao utilizador em caso de erro
//
function verificaSMS(sms,tlm) {
	// Códigos (retorno) a devolver
	var retOK = {ret:0, msg:''};
	var retNOK_Param = {ret:1, msg:'verificaSMS: valores inexistentes'};
	var retNOK_Data = {ret:1, msg:'Incoerência entre os valores nos campos assinalados.'};

	// Lê campo de autorização de envio de SMSs
	var ordSMS = getNumOrdem(sms);
	if(!ordSMS) return retNOK_Param;
	var refSMS = getRefs(ordSMS);
	var qSMS = eval("document.servico.Q" + sms);
	var valSMS = qSMS[0].checked;
	//window.alert(valSMS);
	if(!valSMS) return retOK;

	// Lê campo que contém o nº do telemóvel
	var ordTLM = getNumOrdem(tlm);
	if(!ordTLM) return retNOK_Param;
	var refTLM = getRefs(ordTLM);
	var qTLM = eval("document.servico.Q" + tlm + "T");
	var valTLM = qTLM.value;
	//window.alert("tel: " + valTLM);
	if(!valTLM) {
		obrigatoria(refSMS);
		obrigatoria(refTLM);
		return retNOK_Data;
	} else {
		return retOK;
	}
}

/////////////////////////////////////////////
// Verifica se o candidato escolheu prioridades iguais
// Recebe:
//	Lista de questões que devem ser verificadas
// Devolve um objecto com dois campos:
//	- ret: código de erro: 0-OK, Outro-NOK (caso haja incoerência entre as questões)
//	- msg: mensagem a apresentar ao utilizador em caso de erro
//
function verificaPrioridades() {
	// Códigos (retorno) a devolver
	var retOK = {ret:0, msg:''};
	var retNOK_Param = {ret:1, msg:'verificaPrioridades: valores inexistentes'};
	var retNOK_Data = {ret:1, msg:'Opção repetida.'};

	var opcoes = Array();
	for (var i = 0; i < arguments.length; i++) {
		var escola = document.getElementById("Q" + arguments[i] + "_escola");
		var curso = document.getElementById("Q" + arguments[i] + "_curso");
		if(!escola || !curso) continue;
		if(!escola.value || !curso.value) continue;
		var opcao = escola.value + "---" + curso.value;
		if(opcao == "0---0") continue;
		//window.alert(opcao);
		if(in_array(opcao, opcoes)) {
			var ordOPC = getNumOrdem(arguments[i]);
			if(!ordOPC) return retNOK_Param;
			var refOPC = getRefs(ordOPC);
			obrigatoria(refOPC);
			return retNOK_Data;
		}
		opcoes.push(opcao);
	}
	return retOK;
}