// PASSAR ALTERAÇÕES PARA ESSE
function abrir_popup(strURL, intWidth, intHeight, flagFullVertical, flagFullHorizontal) {
    if (flagFullVertical)
        intHeight = screen.height

    if (flagFullHorizontal)
        intWidth = screen.width
        
	var remote = null;
	var intPosx = (screen.width - intWidth) / 2;
	var intPosy = (screen.height - intHeight) / 2;
	remote = window.open(strURL, '', 'toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=yes,copyhistory=no,width='+ intWidth +',height='+ intHeight +',left='+ intPosx+',top='+ intPosy);
	//remote.resizeTo(intWidth,intHeight);
	remote.focus();
}


function abrir_popup_relatorio(strURL, intWidth, intHeight, rel) {
    var fullScreen;
    if (rel == 'gantt')
        fullScreen = 'yes'
    else
        fullScreen = 'no'
        
	var remote = null;
	var intPosx = (screen.width - intWidth) / 2;
	var intPosy = (screen.height - intHeight) / 2;
	remote = window.open(strURL, '', 'fullscreen='+ fullScreen +',toolbar=no,location=no,directories=no,status=no,menubar=yes,scrollbars=yes,resizable=yes,copyhistory=no,width='+ intWidth +',height='+ intHeight +',left='+ intPosx+',top='+ intPosy);
	//remote.resizeTo(intWidth,intHeight);
	remote.focus();
}

function Abrir_Fechar_SubItens(linha, imgSeta, origem, strURL, funcaoCallback, elementoAmpulheta, info)
{
//debugger;
	if (linha.carregado)
	{
		// var linhaItens = tabela.rows.item(linha.rowIndex + 1);
		var linhaItens = linha.nextSibling;

		if (linhaItens.style.display == 'none')		
		{
			linhaItens.style.display = '';
			//imgSeta.src = '../imagens/gpa_sinal_menos.gif';
		}
		else
		{
			linhaItens.style.display = 'none';			
			//imgSeta.src = '../imagens/gpa_sinal_mais.gif';
		}

	}
	else
	{
		Requisicao(origem, strURL, funcaoCallback, elementoAmpulheta, info);
	}
	
}

function Montar_Linha_Programa(linha, nodeXml, id_pes)
{

	// Obtem os dados do xml passado
	var nodeDados = nodeXml.getElementsByTagName("dados")[0];
	var id_prg = nodeDados.getElementsByTagName('id_prg')[0].text;
	var tit_prg = nodeDados.getElementsByTagName('tit_prg')[0].text;
	var nom_pes_prg = nodeDados.getElementsByTagName('nom_pes_prg')[0].text;
	var link_prg = nodeDados.getElementsByTagName('link_prg')[0].text;
	var ema_pes_prg = nodeDados.getElementsByTagName('ema_pes_prg')[0].text;
	var num_prj_prg = nodeDados.getElementsByTagName('num_prj_prg')[0].text;
	var sig_pes_prg = nodeDados.getElementsByTagName('sig_pes_prg')[0].text;
	var im_pes_per = nodeDados.getElementsByTagName('im_pes_per')[0].text;
	var im_app_pes_per = nodeDados.getElementsByTagName('im_app_pes_per')[0].text;	
	var cpi;
	var spi;

	if (nodeDados.getElementsByTagName('cpi')[0]) {
	    cpi = nodeDados.getElementsByTagName('cpi')[0].text;
	    spi = nodeDados.getElementsByTagName('spi')[0].text;
	}	
	
	var elemento;
	
	// Excluí todas as colunas existentes na linha
	while(linha.cells.length > 0)
		linha.deleteCell(0);
	
 	linha.id = 'linhaPrograma_' + id_prg;
	linha.bgColor = "#EAEAEA";
	linha.background = "../imagens/bg_gpa_3.jpg"; // bgcolor="#FFFFFF"
	
	// Imagem para abrir o programa
	tblProg = Adicionar_Elemento( Adicionar_Elemento(linha, "td") , "table");
	tblProg.width = "100%";
	tblProg.border=0;
	tblProg.cellSpacing=0;
	tblProg.cellPadding=1;
					
	tr = tblProg.insertRow();
	td = Adicionar_Elemento(tr, "td");
	td.width = "3%"
	td.rowSpan = 2;
	// Botão para abrir a lista de projetos
	imgMostrarProjetos = Adicionar_Elemento(td, "img");
	imgMostrarProjetos.src = '../imagens/gpa_sinal_mais.gif';
	imgMostrarProjetos.alt = "Mostrar a lista de projetos deste programa";
	imgMostrarProjetos.id = 'imgSetaPrograma_' + id_prg;
	imgMostrarProjetos.id_prg = id_prg;
	imgMostrarProjetos.id_pes = id_pes;
	imgMostrarProjetos.abrir_atividades_automaticamente = 'Não';
	imgMostrarProjetos.style.cursor = 'hand';
	addEvent(imgMostrarProjetos, 'dblclick', Capturar_Clique, false);
	addEvent(imgMostrarProjetos, 'click', Capturar_Clique, false);

	// Botão para abrir a lista de projetos e a lista de atividades automaticamente
//	imgMostrarProjetosAtividades = Adicionar_Elemento(td, "img");
//	imgMostrarProjetosAtividades.src = '../imagens/gpa_sinal_mais.gif';
//	imgMostrarProjetosAtividades.alt = "texto01_funcoes_principal3";	
//	imgMostrarProjetosAtividades.id = 'imgSetaPrograma2_' + id_prg;
//	imgMostrarProjetosAtividades.id_prg = id_prg;
//	imgMostrarProjetosAtividades.id_pes = id_pes;
//	imgMostrarProjetos.abrir_atividades_automaticamente = 'Sim';	
//	imgMostrarProjetosAtividades.style.cursor = 'hand';
//	addEvent(imgMostrarProjetosAtividades, 'mousedown', Chamar_Listar_Projetos, false);
			
	// 	Cabecalho: Programa 
	td = Adicionar_Elemento(tr, "td");
	td.width = '50%';
	span = Adicionar_Elemento(td, "span"); // Adiciona <td> <span> </span> </td> dentro da linha
	span.className = "text_10";
	
	elemento = Adicionar_Elemento(span, 'font');
	elemento.color = '#494949';
	elemento.size = 0;
	elemento.innerText = 'Programa ';
	
	
	// Nome do programa
	elemento = Adicionar_Elemento(span, 'font');
	elemento.color = '#000000';
	elemento.size = 0;
	elemento = Adicionar_Elemento(elemento, 'b'); // <b> Negrito <b>
	
	if (link_prg != "")
	{
		elemento = Adicionar_Elemento(elemento, 'a'); // <a href=...
		elemento.href = link_prg;
		elemento.className = "link_10";
	}
	elemento.innerText = tit_prg;
	
	// Quantidade de projetos
//	elemento = Adicionar_Elemento(span, 'font');
//	elemento.color = '#494949';
//	elemento.size = 0;
//	switch(parseInt(num_prj_prg))
//	{
//		case 0: elemento.innerText = ' (Nenhum projeto)';
//			break;
//		case 1: elemento.innerText = ' (1 projeto)';
//			break;
//		default: elemento.innerText = ' (' + num_prj_prg + ' projetos)';
//			break;
//	}

	// botões com funções do programa

	//Informações de custo e cronograma do Programa
	    td = Adicionar_Elemento(tr, 'td');
	    td.rowSpan = 2;
	    td.width = "15%";	   	    
	if (nodeDados.getElementsByTagName('cpi')[0]) {
	    div = Adicionar_Elemento(td, 'div');
	    div.id = 'CPISPI_' + id_prg;


	    elemento = Adicionar_Elemento(div, 'font');
	    elemento.className = "text_10";
	    elemento = Adicionar_Elemento(elemento, 'b');

	    elemento.innerText = "SPI= ";

	    elemento = Adicionar_Elemento(div, 'font');
	    elemento.className = "text_10";
	    elemento.innerText = spi;

	    if (spi != '-')
	        elemento.innerText += "%"

	    elemento = Adicionar_Elemento(div, 'br');
	    elemento = Adicionar_Elemento(div, 'font');
	    elemento.className = "text_10";
	    elemento = Adicionar_Elemento(elemento, 'b');

	    elemento.innerText = "CPI= ";

	    elemento = Adicionar_Elemento(div, 'font');
	    elemento.className = "text_10";
	    elemento.innerText = cpi;
	    
	    if(cpi!='-')
	        elemento.innerText += "%"
	 }	
	//
    
	td = Adicionar_Elemento(tr, 'td');
	td.align = "right"
	td.rowSpan = 2;
	var botoes = nodeXml.getElementsByTagName("botao");		
	for(iBotao = 0; iBotao < botoes.length; iBotao++)
	{
		// Cria o link para o botão
		elemento = Adicionar_Elemento(td, 'a');
		elemento.href = botoes.item(iBotao).getElementsByTagName('link')[0].text;
		
		// Adiciona a imagem dentro do link
		elemento = Adicionar_Elemento(elemento, 'img');
		elemento.src = botoes.item(iBotao).getElementsByTagName('img_src')[0].text;
		elemento.alt = botoes.item(iBotao).getElementsByTagName('alt')[0].text;
		elemento.border = 0;
	}	
	
	span = Adicionar_Elemento( Adicionar_Elemento( tblProg.insertRow(), "td"), "span"); // Adiciona <tr> <td> <span> </span> </td> <tr>
	span.className = "text_10";
	
	// Cabeçalho: Responsável
	elemento = Adicionar_Elemento(span, 'font');
	elemento.color = '#494949';	
	elemento.size = 0;
	elemento.innerText = 'Responsável ';
			
	// Nome do responsável
	elemento = Adicionar_Elemento(span, 'font');
	elemento.color = '#000000';	
	elemento.size = 0;
	elemento = Adicionar_Elemento(elemento, 'b'); // Negrito

	if (ema_pes_prg != "") {
	    elemento.onmouseover = function() { criaDivResp(ema_pes_prg, tit_prg, "Programa", im_pes_per, im_app_pes_per, "Para utilizar este programa de mensagem instantânea é necessário instalá-lo em sua máquina. Caso contrário nada ocorrerá."); };
	    elemento.onmouseout = function() { showDiv(false); };
	    elemento.style.cursor = 'hand';
	}
	elemento.align = "center";
	elemento = Adicionar_Elemento(elemento, "b");
	if (ema_pes_prg != "") {
	    elemento = Adicionar_Elemento(elemento, "a");
	    elemento.className = "link_10";
	    //elemento.href = "mailto:" + ema_pes_prg + "?subject=Ref. Projeto: " + tit_prg;		
	}
	elemento.innerText = sig_pes_prg;
}

function Montar_Linha_Projeto(linha, nodeXml, id_prg, id_pes, abrir_atividades_automaticamente, fixar_id_prj, atualizar_ati) {
	var nodeDados = nodeXml.getElementsByTagName("dados")[0];
	var id_prj;

	id_prj = nodeDados.getElementsByTagName("id_prj")[0].text;		
	var tit_prj = nodeDados.getElementsByTagName("tit_prj")[0].text;
	var ord_prj = nodeDados.getElementsByTagName("ord_prj")[0].text;
	var link_prj = nodeDados.getElementsByTagName("link_prj")[0].text;
	var cor_bol_prj = nodeDados.getElementsByTagName("cor_bol_prj")[0].text;
	var pri_prj = nodeDados.getElementsByTagName("pri_prj")[0].text;
	var maior_pri_prj = nodeDados.getElementsByTagName("maior_pri_prj")[0].text;
	var link_carta = nodeDados.getElementsByTagName("link_carta")[0].text;
	var dat_ini_prj = nodeDados.getElementsByTagName("dat_ini_prj")[0].text; 
	var dat_fim_prj = nodeDados.getElementsByTagName("dat_fim_prj")[0].text; 
	var num_ati_prj = nodeDados.getElementsByTagName("num_ati_prj")[0].text; 
	var ema_pes_prj = nodeDados.getElementsByTagName("ema_pes_prj")[0].text;
	var sig_pes_prj = nodeDados.getElementsByTagName("sig_pes_prj")[0].text;
	var por_prj = nodeDados.getElementsByTagName("por_prj")[0].text;
	var im_pes_per = nodeDados.getElementsByTagName('im_pes_per')[0].text;
	var im_app_pes_per = nodeDados.getElementsByTagName('im_app_pes_per')[0].text;
	var posso_inc_ati = nodeDados.getElementsByTagName('posso_inc_ati')[0].text;
	var dat_ini_prev_prj = nodeDados.getElementsByTagName('dat_ini_prev_prj')[0].text;

	var por_pri_prj;
	por_pri_prj = maior_pri_prj == 0 ? 100 : (pri_prj / maior_pri_prj) * 100;
	
	var elemento, tr, td;
	
	// Excluí todas as colunas existentes na linha
	while(linha.cells.length > 0)
		linha.deleteCell(0);	
				
	linha.id = 'linhaProjeto_' + id_prj;
	linha.bgColor = "#F4F4F4";
	linha.id_prj = id_prj;
	linha.id_prg = id_prg;
	linha.posso_inc_ati = posso_inc_ati;
	linha.dat_ini_prev_prj = dat_ini_prev_prj;
	
	elemento = Adicionar_Elemento(linha, "td");
	elemento.width = "36%";
	elemento.bgcolor= "#EEEEEE";
	
	elemento = Adicionar_Elemento(elemento, "table");
	elemento.width = "100%";
	elemento.border= 0;;
	elemento.cellspacing = 0;
	elemento.cellpadding = 0;				
	
	tr = elemento.insertRow();
	
	// Seta para exibir ou esconder o projeto
	td = Adicionar_Elemento(tr, 'td');
	td.width = '20';
	td.align = 'center';
	td.valign = 'middle';
	td.className = "text_10";
	elemento = Adicionar_Elemento(td, 'img');
	elemento.id = 'imgSetaProjeto_' + id_prj;
	/*if (linha.carregado)
		elemento.src = '../imagens/gpa_sinal_menos.gif';
	else		
		elemento.src = '../imagens/gpa_sinal_mais.gif';*/

	var corSrc;
	corSrc = '';

	/*DEFINE A COR DO SEMÁFORO*/
	switch (cor_bol_prj) {
		case "W":
			corSrc = "../imagens/gpa_bola_branca";
			break;
		case "R": 
			corSrc = "../imagens/gpa_bola_vermelha";
			break;
		case "G": 
			corSrc = "../imagens/gpa_bola_verde";
			break;
		case "Y":
			corSrc = "../imagens/gpa_bola_amarela"; 
			break;
	}

	/*DEFINE A FRAÇÃO DO SEMÁFORO*/
	if (por_pri_prj <= 12.5)
		corSrc += '_0.png';
	else if (12.5 < por_pri_prj && por_pri_prj <= 37.5)
		corSrc += '_25.png';
	else if (37.5 < por_pri_prj && por_pri_prj <= 62.5)
		corSrc += '_50.png';
	else if (62.5 < por_pri_prj && por_pri_prj <= 87.5)
		corSrc += '_75.png';
	else if ((87.5 < por_pri_prj && por_pri_prj <= 100) || por_pri_prj > 100)
		corSrc += '_100.png';

	elemento.src = corSrc;
	elemento.alt = pri_prj;
	
	elemento.id_prj = id_prj;
	elemento.id_prg = id_prg;
	elemento.id_pes = id_pes;	
	elemento.style.cursor = 'hand';
	addEvent(elemento, 'click', Evento_Chamar_Listar_Atividades, false);

	// Porcentagem de conclusão do projeto			
	td = Adicionar_Elemento(tr, "td");
	td.width = 25;
	td.align = "left";
	td.valign = "middle";
	td.className = "text_10";
	td.innerText = por_prj + "%";

	// Imagem que indica o status do projeto
	//
	/*td = Adicionar_Elemento(tr, 'td');
	td.width = 25;
	td.align = 'center';
	td.valign = 'middle';
	td.className = "text_10";
			
	elemento = Adicionar_Elemento(td, "img");		
	switch(cor_bol_prj)
	{
		case "W": elemento.src = "../imagens/gpa_bola_branca.gif"; break;						
		case "R": elemento.src = "../imagens/gpa_bola_vermelha.gif"; break;
		case "G": elemento.src = "../imagens/gpa_bola_verde.gif"; break;
		case "Y": elemento.src = "../imagens/gpa_bola_amarela.gif"; break;			
	}*/
	
	// Nome do projeto
	td = Adicionar_Elemento(tr, 'td');		
	td.align = 'left';
	td.valign = 'middle';
	td.className = "text_10";
	elemento = Adicionar_Elemento(td, 'b'); // Negrito
	if (link_prj != "")
	{
		elemento = Adicionar_Elemento(elemento, 'a'); // <a href=...
		elemento.href = link_prj;
		elemento.className = "link_10";
//			elemento.className = "link_10";
	}
	
	var spn = Adicionar_Elemento(elemento, 'span');
	spn.id = "spanOrdemPrj";
	spn.innerText = ord_prj;
	
	spn = Adicionar_Elemento(elemento, 'span');
	spn.innerText = ". " + tit_prj;
	
	// Imagem da carta do projeto		
	td = Adicionar_Elemento(tr, 'td');
	td.width = 18;
	td.align = 'right';
	td.valign = 'top';
	td.className = "text_10";
//		td.className = "text_10";
	if (link_carta != "")
	{
		elemento = Adicionar_Elemento(td, "a");
		elemento.href = link_carta;
		elemento = Adicionar_Elemento(elemento, "img");
		elemento.src = "../imagens/gpa_mini_carta_projeto.gif";
		elemento.alt = "Carta do Projeto";
		elemento.border = 0;			
	}

	// Link para Email, Skype, Gtalk...
	td = Adicionar_Elemento(linha, "td");
	td.width = "10%";
	td.bgcolor = "#EEEEEE";
	td.className = "text_10";
	elemento = Adicionar_Elemento(td, "div");
	if (ema_pes_prj != "") {
	    elemento.onmouseover = function() { criaDivResp(ema_pes_prj, tit_prj, "Projeto", im_pes_per, im_app_pes_per, "Para utilizar este programa de mensagem instantânea é necessário instalá-lo em sua máquina. Caso contrário nada ocorrerá."); };
	    elemento.onmouseout = function() { showDiv(false); };
	    elemento.style.cursor = 'hand';
	}
	elemento.align = "center";
	elemento.innerHTML = "Resp.<BR>";
	elemento = Adicionar_Elemento(elemento, "b");
	if (ema_pes_prj != "") {	    	
	    elemento = Adicionar_Elemento(elemento, "a");
		elemento.className = "link_10";
		//elemento.href = "mailto:" + ema_pes_prj + "?subject=Ref. Projeto: " + tit_prj;		
	}
	elemento.innerText = sig_pes_prj;
	// Data de início
	td = Adicionar_Elemento(linha, "td");
	td.width = "12%";
	td.bgcolor = "#EEEEEE";
	td.className = "text_10";
	elemento = Adicionar_Elemento(td, "div");
	elemento.align = "right";
	elemento.innerHTML = "Início&nbsp;<BR>"; // In&iacute;cio
	elemento = Adicionar_Elemento(elemento, "b");
	elemento.innerHTML = dat_ini_prj;
	
	// Data Final
	td = Adicionar_Elemento(linha, "td");
	td.width = "12%";
	td.bgcolor = "#EEEEEE";
	td.className = "text_10";
	elemento = Adicionar_Elemento(td, "div");
	elemento.align = "right";
	elemento.innerHTML = "Fim&nbsp;<BR>"; // In&iacute;cio
	elemento = Adicionar_Elemento(elemento, "b");
	elemento.innerHTML = dat_fim_prj;
	
	// Tabela para botões das ações do projeto
	td = Adicionar_Elemento(linha, "td");
	td.width = "30%";
	td.bgcolor = "#EEEEEE";		
	
	elemento = Adicionar_Elemento(td, "table");
	elemento.border = 0;
	// elemento.borderColor = "green";
	elemento.align = "right";
	elemento.cellPadding = 0;
	elemento.cellSpacing = 2;
	elemento.width= "100%";
	
	tr = elemento.insertRow();
	tr.align = "center";
	tr.valign = "middle";
	
	// Relatórios
			
	elemento = Adicionar_Elemento(tr, "td");
	elemento.width = "100%";
	elemento.align = "left";
	elemento.valign = "top";
	elemento.className = "text_08";

	if (num_ati_prj) 
    {
	    td = elemento;
		elemento = Adicionar_Elemento(elemento, "a");
		elemento.href = "javascript:abrir_popup_relatorio('relatorio_filtro_projeto.asp?"
						+ "id_prg=" + id_prg + "&id_prj=" + id_prj + "', 740, 585)";
		elemento = Adicionar_Elemento(elemento, "img");
		elemento.border = 0;
		elemento.src = "../imagens/gpa_mini_relatorios_ger.gif";
		elemento.alt = "Relatórios do Projeto";
		td.innerHTML = td.innerHTML + "<br>&nbsp;";
	}
	// debugger;
	
	// Botões do projeto
	var botoes = nodeXml.getElementsByTagName("botao");
	var iBotao;
	var num;
	// debugger;
	for (iBotao = 0; iBotao < botoes.length; iBotao ++)
	{
		num = botoes[iBotao].getElementsByTagName("num")[0].text;
		link_botao = botoes[iBotao].getElementsByTagName("link")[0].text;

		if (num == "") 
		  num = "&nbsp;";
		td = Adicionar_Elemento(tr, "td");
		// td.width = 21;
		// if 
		td.valign = "top";
		td.className = "text_08";
		if (link_botao != "")
		{		
			elemento = Adicionar_Elemento(td, "a");
			elemento.href = link_botao;
		}
		else
			elemento = td;
		
		elemento = Adicionar_Elemento(elemento, "img");
		elemento.src = botoes[iBotao].getElementsByTagName("img_src")[0].text;
		elemento.alt = botoes[iBotao].getElementsByTagName("alt")[0].text;
		elemento.border = 0;
		
		td.innerHTML = td.innerHTML + "<br>" + num;
	}
	
	if (atualizar_ati == 'S')
	    Recarregar_Atividades(id_prg, linha, id_pes)
	
	if (abrir_atividades_automaticamente == "Sim")
		document.getElementById('imgSetaProjeto_' + id_prj).click() 				

}

function Chamar_Listar_Programas(id_pes)
{

	var strURL = "../exexml/PrincipalListarProgramas.asp?id_pes=" + id_pes;
	//prompt (strURL,strURL);

 	Requisicao(document, strURL, Listar_Programas, "Carregando Programas...", id_pes);

}

function Capturar_Clique()
{	
		handleClicksWisely(event.type, event.srcElement);
}

function Chamar_Listar_Projetos(e)
{
	var id_prg = e.id_prg;
	var id_pes = e.id_pes;
	var abrir_atividades_automaticamente = e.abrir_atividades_automaticamente;
	
	var linha = document.all("linhaPrograma_" + id_prg);
	var img = document.all("imgSetaPrograma_" + id_prg);

	var strURL = '../exexml/PrincipalListarProjetos.asp?id_prg=' + id_prg + "&id_pes=" + id_pes;
 //   window.prompt("","../exexml/PrincipalListarProjetos.asp?id_prg=" + id_prg + "&id_pes=" + id_pes)
//	prompt (strURL,strURL);
	var info = new Array(id_prg, id_pes, abrir_atividades_automaticamente);
	
	Abrir_Fechar_SubItens(linha, img, e, strURL, Listar_Projetos, "Carregando Projetos...",  info);
	
}

function Chamar_Listar_Projetos_E_Atividades(e)
{
	e.abrir_atividades_automaticamente = 'Sim';
	Chamar_Listar_Projetos(e);
}


function Evento_Chamar_Listar_Atividades()
{
	var id_prg = event.srcElement.id_prg;
	var id_prj = event.srcElement.id_prj;
	var id_pes = event.srcElement.id_pes;
	
	Chamar_Listar_Atividades(id_prg, id_prj, id_pes, event.srcElement);
}
	
function Chamar_Listar_Atividades(id_prg, id_prj, id_pes, origem)
{
	
//	debugger;
	var linha = document.all("linhaProjeto_" + id_prj);
	var img = document.all("imgSetaProjeto_" + id_prj);
//	alert("Chamar_Listar_Atividades\n linha = " + linha + "\n img = " + img + " \n tblProjetos = " + tblProjetos);
    var strURL = '../exexml/PrincipalListarAtividades.asp?id_prj=' + id_prj + "&id_pes=" + id_pes;
//    prompt(strURL,strURL)
	var info = new Array(id_prg, id_prj, id_pes);
	
	Abrir_Fechar_SubItens(linha, img, origem, strURL, Listar_Atividades, "Carregando Atividades...", info);
}

function Chamar_Listar_Passos () {
	alert('Carregando Passos...');
}


function Listar_Programas(ResponseXML, info)
{

	var i;		
	var xmlProgramas = ResponseXML.getElementsByTagName("programa");
	
	// Elimina as linhas existentes
	while(tblProgramas.rows.length > 0)	
		tblProgramas.deleteRow(tblProgramas.Rows[0]);	
		
	for(iPrograma = 0; iPrograma < xmlProgramas.length; iPrograma++)
		Montar_Linha_Programa(tblProgramas.insertRow(), xmlProgramas.item(iPrograma), info);

	if (iPrograma == 1)
	{
		var nodeXml = xmlProgramas[0];
		var nodeDados = nodeXml.getElementsByTagName("dados")[0];
		var id_prg = nodeDados.getElementsByTagName("id_prg")[0].text;
		document.getElementById('imgSetaPrograma_' + id_prg).click();
	}
}



function Listar_Projetos(ResponseXML, info)
{

	var id_prg = info[0];
	var id_pes = info[1];
	var abrir_atividades_automaticamente = info[2];
	
	var linhaPrograma = document.all("linhaPrograma_" + id_prg);
	var linhaProjetos = tblProgramas.insertRow(linhaPrograma.rowIndex + 1);		
	var td = linhaProjetos.insertCell();
	td.colSpan = 2;
	var tblProjetos = Adicionar_Elemento(td, 'table');
	tblProjetos.id = 'tblProjetos_' + id_prg;
	tblProjetos.width = '100%';
	tblProjetos.border = 1;
	tblProjetos.borderColor = "#D8D8D8";
	tblProjetos.cellPadding = 0;
	tblProjetos.cellSpacing = 0;

	var linha;	
	var elemento;
	
	linhaPrograma.carregado = true;
	
	var xmlProjetos = ResponseXML.getElementsByTagName("projeto");

	var imgSetaPrograma = document.all("imgSetaPrograma_" + id_prg);

	imgSetaPrograma.src = '../imagens/gpa_sinal_menos.gif';
	
	if (xmlProjetos.length == 0)
	{
		linha = tblProjetos.insertRow();
		linha.bgcolor = "#EEEEEE";
		elemento = Adicionar_Elemento(linha, "td");
		elemento.width = "100%";
		elemento.align = "center";
		elemento.className = "text_10";
		elemento = Adicionar_Elemento(elemento, "b");
		elemento.innerText = "Não há projetos e atividades a serem exibidos";
	}
	else
	{		
		for(var i = 0; i < xmlProjetos.length; i++)
			Montar_Linha_Projeto(tblProjetos.insertRow(), xmlProjetos[i], id_prg, id_pes, abrir_atividades_automaticamente);
			
		if (i == 1)
		{
			var nodeXml = xmlProjetos[0];
			var nodeDados = nodeXml.getElementsByTagName("dados")[0];
			var id_prj = nodeDados.getElementsByTagName("id_prj")[0].text;
			document.getElementById('imgSetaProjeto_' + id_prj).click();
		}
			
	}
}

function AdicionarLinhaProjetoVazio(tblAtividades, id_prg, id_prj, id_pes, posso_inc_ati, dat_ini_prev_prj) {
	var linha = tblAtividades.insertRow();
	linha.bgcolor = "#EEEEEE";
	var elemento = Adicionar_Elemento(linha, "td");
	elemento.width = "100%";
	elemento.align = "center";
	elemento.className = "text_10";
	elemento = Adicionar_Elemento(elemento, "b");
	if(posso_inc_ati == 'S')
		elemento.innerHTML = "Para incluir atividades click em: <a onClick='" + 'javascript:abrir_popup(\"atividade_incluir.asp?id_prg=' + id_prg + '&amp;id_prj=' + id_prj + '&amp;id_pes=' + id_pes + '&amp;dat_ini_prj=' + dat_ini_prev_prj + '\",655,450,false,false)' + "' style='cursor:pointer'><img src='../imagens/gpa_mini_atividades.gif' /></a>";
	else
		elemento.innerHTML = "Não há atividades a serem exibidas";
}

function Listar_Atividades(ResponseXML, info)
{
	var id_prg = info[0];
	var id_prj = info[1];
	var id_pes = info[2];

	var tblProjetos = document.all("tblProjetos_" + id_prg);
	var linhaProjeto = document.all("linhaProjeto_" + id_prj);

	if (linhaProjeto.parentElement.tagName == "TBODY")
		tblProjetos = linhaProjeto.parentElement.parentElement;
	else
		tblProjetos = linhaProjeto.parentElement;	

	var linhaAtividades = tblProjetos.insertRow(linhaProjeto.rowIndex + 1);	
	linhaAtividades.Container_Atividades = "True";
	var td = linhaAtividades.insertCell();
	td.colSpan = linhaProjeto.cells.length;
	var tblAtividades = Adicionar_Elemento(td, 'table');
	tblAtividades.id = 'tblAtividades_' + id_prj;
	tblAtividades.width = '100%';
	tblAtividades.border = 1;
	tblAtividades.borderColor = "#D8D8D8";
	tblAtividades.cellPadding = 0;
	tblAtividades.cellSpacing = 0;
	var linha;	
	var elemento;

	linhaProjeto.carregado = true;
	var xmlAtividades = ResponseXML.getElementsByTagName("atividade");
	var imgSetaProjeto = document.all("imgSetaProjeto_" + id_prj);	
	//imgSetaProjeto.src = '../imagens/gpa_sinal_menos.gif';
	if (xmlAtividades.length == 0)
		AdicionarLinhaProjetoVazio(tblAtividades, id_prg, id_prj, id_pes, linhaProjeto.posso_inc_ati, linhaProjeto.dat_ini_prev_prj);
	else
	{		
		for(var i = 0; i < xmlAtividades.length; i++)
		{
			Montar_Linha_Atividade(tblAtividades.insertRow(), xmlAtividades[i], id_prg, id_prj, id_pes);
		}
	}
}

function Montar_Linha_Atividade(linha, nodeXml, id_prg, id_prj, id_pes, fixar_id_ati)
{
//	prompt("Montar_Linha_Atividade", id_prj);
	var nodeDados = nodeXml.getElementsByTagName("dados")[0];
	if (fixar_id_ati != null)
		id_ati = fixar_id_ati;
	else
		id_ati = nodeDados.getElementsByTagName("id_ati")[0].text;
		
	//var id_prg = nodeDados.getElementsByTagName("id_prg")[0].text;			
	// var	id_prj = nodeDados.getElementsByTagName("id_prj")[0].text;
	var	tit_ati = nodeDados.getElementsByTagName("tit_ati")[0].text;
	var	ord_ati = nodeDados.getElementsByTagName("ord_ati")[0].text;
	var	por_ati = nodeDados.getElementsByTagName("por_ati")[0].text;
	var	ico_ati = nodeDados.getElementsByTagName("ico_ati")[0].text;
	var	cor_bol_ati = nodeDados.getElementsByTagName("cor_bol_ati")[0].text;
	var	nom_pes_ati = nodeDados.getElementsByTagName("nom_pes_ati")[0].text;
	var	sig_pes_ati = nodeDados.getElementsByTagName("sig_pes_ati")[0].text;			
	var	link_ati = nodeDados.getElementsByTagName("link_ati")[0].text;
	var	ema_pes_ati = nodeDados.getElementsByTagName("ema_pes_ati")[0].text;
	var	link_info = nodeDados.getElementsByTagName("link_info")[0].text;			
	var	dat_ini_ati = nodeDados.getElementsByTagName("dat_ini_ati")[0].text;
	var	dat_fim_ati = nodeDados.getElementsByTagName("dat_fim_ati")[0].text;			
	var erro_imp_ati = nodeDados.getElementsByTagName("erro_imp_ati")[0].text;
	var im_pes_per = nodeDados.getElementsByTagName('im_pes_per')[0].text;
	var im_app_pes_per = nodeDados.getElementsByTagName('im_app_pes_per')[0].text;

	var elemento, tr, td;

	// Excluí todas as colunas existentes na linha
	while(linha.cells.length > 0)
		linha.deleteCell(0);	
				
	linha.id = 'linhaAtividade_' + id_ati;
	linha.bgColor = "#FFFFFF";
	linha.id_prg = id_prg;
	linha.id_prj = id_prj;
	
	elemento = Adicionar_Elemento(linha, "td");
	elemento.width = "36%";
	elemento.bgcolor= "#F4F4F4";
			
	elemento = Adicionar_Elemento(elemento, "table");
	elemento.width = "100%";
	elemento.border= 0;
	// elemento.borderColor = "red";
	elemento.cellspacing = 0;
	elemento.cellpadding = 0;				
	
	tr = elemento.insertRow();

	// Porcentagem de conclusão da atividade			
	td = Adicionar_Elemento(tr, "td");
	td.width = 32;
	td.align = "right";
	td.valign = "middle";
	td.className = "text_09";
	td.innerText = por_ati + "%";	
    
	// Imagem que indica o status da atividade
	td = Adicionar_Elemento(tr, 'td');
	td.width = 20;
	td.align = "center";
	td.valign = "middle";
	td.className = "text_09";

	elemento = Adicionar_Elemento(td, "img");
	switch (cor_bol_ati) {
	    case "W": elemento.src = "../imagens/gpa_bola_branca.gif"; break;
	    case "R": elemento.src = "../imagens/gpa_bola_vermelha.gif"; break;
	    case "G": elemento.src = "../imagens/gpa_bola_verde.gif"; break;
	    case "Y": elemento.src = "../imagens/gpa_bola_amarela.gif"; break;
	}
    
	// Nome e ordem da atividade
	elemento = Adicionar_Elemento(tr, 'td');	
	elemento.align = 'left';
	elemento.valign = 'middle';
	elemento.className = "text_09";
    
	if (link_ati != "")
	{
		elemento = Adicionar_Elemento(elemento, 'a'); // <a href=...
		elemento.href = link_ati;
		elemento.className = "link_09";
	}
	
	var spn = Adicionar_Elemento(elemento, 'span');
	spn.id = "spanOrdemAti";
	spn.innerText = ord_ati;
	
	spn = Adicionar_Elemento(elemento, 'span');
	spn.innerText = ". " + tit_ati;

	// Imagem com link para informações da atividade
	td = Adicionar_Elemento(tr, 'td');
	td.width = 18;
	td.align = 'right';
	td.valign = 'top';
	td.className = "text_09";
	nobr = Adicionar_Elemento(td, "nobr");
	
	if (erro_imp_ati != ""){
	    if (erro_imp_ati == "S")
	    {	    
		    elemento = Adicionar_Elemento(nobr, "img");
		    elemento.src = "../imagens/exclamacao.gif";
		    elemento.alt = "Mostrar a lista de projetos e de atividades deste programa";
		    elemento.border = 0;		    
	    }else{
	        if (erro_imp_ati == "L")
	        {	    
		    elemento = Adicionar_Elemento(nobr, "img");
		    elemento.src = "../imagens/exclamacao.gif";
		    elemento.alt = "Esta atividade está em loop. Verifique as relações de precedência deste projeto para resolver este problema.";
		    elemento.border = 0;
		    }  
	    }
    }
	if (link_info != "")
	{
		elemento = Adicionar_Elemento(nobr, "a");
		elemento.href = link_info;
		elemento = Adicionar_Elemento(elemento, "img");
		elemento.src = "../imagens/gpa_mini_informacao.gif";
		elemento.alt = "Informações da atividade";
		elemento.border = 0;
	}

	// Sigla do responsável (Com link para email)
	td = Adicionar_Elemento(linha, "td");
	td.width = "10%";			
	td.className = "text_09";
	elemento = Adicionar_Elemento(td, "div");
	if (ema_pes_ati != "") {
	    elemento.onmouseover = function() { criaDivResp(ema_pes_ati, tit_ati, "Atividade", im_pes_per, im_app_pes_per, "Para utilizar este programa de mensagem instantânea é necessário instalá-lo em sua máquina. Caso contrário nada ocorrerá."); };
	    elemento.onmouseout = function() { showDiv(false); };
	    elemento.style.cursor = 'hand';
	}	
	elemento.align = "center";
	if (ema_pes_ati != "") 
	{
		elemento = Adicionar_Elemento(elemento, "a");
		elemento.className = "link_09";
		//elemento.href = "mailto:" + ema_pes_ati + "&subject=Ref. Atividade: " + tit_ati;
	}
	elemento.innerText = sig_pes_ati;

	// Data de início
	td = Adicionar_Elemento(linha, "td");
	td.width = "12%";
	td.className = "text_09";
	elemento = Adicionar_Elemento(td, "div");
	elemento.align = "right";
	elemento.innerHTML = dat_ini_ati;
	
	// Data Final
	td = Adicionar_Elemento(linha, "td");
	td.width = "12%";
	td.className = "text_09";
	elemento = Adicionar_Elemento(td, "div");
	elemento.align = "right";
	elemento.innerHTML = dat_fim_ati;
		
	// Tabela para botões das ações do projeto
	td = Adicionar_Elemento(linha, "td");
	td.width = "30%";
	td.bgcolor = "#EEEEEE";		
	
	elemento = Adicionar_Elemento(td, "table");
	elemento.border = 0;
	elemento.align = "right";
	elemento.cellPadding = 1;
	elemento.cellSpacing = 0;
	elemento.width= "100%";
	
	tr = elemento.insertRow();			
	tr.align = "center";
	tr.valign = "middle";
	
	// Relatórios					
	elemento = Adicionar_Elemento(tr, "td");
	elemento.width = "100%";
	elemento.align = "left";
	elemento.valign = "top";
	elemento.className = "text_08";

	td = elemento;

	elemento = Adicionar_Elemento(elemento, "a");
	elemento.href = "javascript:abrir_popup_relatorio('relatorio_filtro_atividade.asp?"
						+ "id_prg=" + id_prg + "&id_prj=" + id_prj + "&id_ati=" + id_ati + "', 738, 590)";
	elemento = Adicionar_Elemento(elemento, "img");
	elemento.border = 0;
	elemento.src = "../imagens/gpa_mini_relatorios_ger.gif";
	elemento.alt = "Relatórios da Atividade";

	td.innerHTML = td.innerHTML + "<br>&nbsp;"

	// Ícone da atividade
	elemento = Adicionar_Elemento(tr, "td");
	elemento.width = 21;
	elemento.valign = "top";
	elemento.className = "text_08";
	if (ico_ati == "ATE") {
        td = elemento
		elemento = Adicionar_Elemento(elemento, "img");
		elemento.src = "../imagens/gpa_mini_atencao.gif";
		elemento.alt = "Atividade com Atenção Especial";
		elemento.border = 0;

		td.innerHTML = td.innerHTML + "<br>&nbsp;"
	}


	// Botões da atividade
	var botoes = nodeXml.getElementsByTagName("botao");		
	var iBotao;
	var num;
	// debugger;
	for (iBotao = 0; iBotao < botoes.length; iBotao ++)
	{			
		img_src = botoes[iBotao].getElementsByTagName("img_src")[0].text;
		alt = botoes[iBotao].getElementsByTagName("alt")[0].text;
		link_ = botoes[iBotao].getElementsByTagName("link")[0].text;
		num = botoes[iBotao].getElementsByTagName("num")[0].text;
		
		if (num == "") 
		  num = "&nbsp;";
		td = Adicionar_Elemento(tr, "td");
		// td.width = 21;
		// if 
		td.valign = "top";
		td.className = "text_08";
		
		if (link_ != "")
		{				
			elemento = Adicionar_Elemento(td, "a");
			elemento.href = link_;
		}
		else
			elemento = td;
			
		elemento = Adicionar_Elemento(elemento, "img");
		elemento.src = img_src;
		elemento.alt = alt;
		elemento.border = 0;
		
		td.innerHTML = td.innerHTML + "<br>" + num;
	}
}

function Chamar_Atualizar_Programa(id_prg, id_pes) {
	var linhaPrograma = document.all("linhaPrograma_" + id_prg);
	var strURL = "../exexml/PrincipalListarProgramas.asp?id_pes=" + id_pes + "&id_prg=" + id_prg;
	linhaPrograma.id_pes = id_pes;	
	Requisicao(linhaPrograma, strURL, Atualizar_Programa, "Atualizando a tela", linhaPrograma);
}

function Atualizar_Programa(ResponseXML, info)
{
	var xmlProg = ResponseXML.getElementsByTagName("programa")[0];
	Montar_Linha_Programa(info, xmlProg, info.id_pes);
}

function Chamar_Atualizar_Projeto(id_prg, id_prj, id_pes, atualizar_ati) {
//	debugger;
	var linhaProjeto = document.all("linhaProjeto_" + id_prj);
	Chamar_Atualizar_Linha_Projeto(id_prg, id_prj, id_pes, linhaProjeto, atualizar_ati);
/*	
	if (atualizar_ati == 'S')
	{
//debugger;	
	Chamar_Recarregar_Atividade(id_prg, id_prj, id_pes)
	}
*/
}
	
function Chamar_Atualizar_Linha_Projeto(id_prg, id_prj, id_pes, linhaProjeto, atualizar_ati) 
{
	var strURL = "../exexml/PrincipalListarProjetos.asp?id_pes=" + id_pes + "&id_prg=" + id_prg	+ "&id_prj=" + id_prj;
	var info = new Array(linhaProjeto, id_prg, id_pes, atualizar_ati);
	Requisicao(linhaProjeto, strURL, Atualizar_Projeto, "Atualizando a tela", info);
	
	
}

function Atualizar_Projeto(ResponseXML, info)
{
	var linha = info[0];
	var id_prg = info[1];
	var id_pes = info[2];
	var atualizar_ati = info[3];
	linha.bgcolor = "red";
	var xmlProjeto = ResponseXML.getElementsByTagName("projeto")[0];
	Montar_Linha_Projeto(linha, xmlProjeto, id_prg, id_pes, false, linha.id_prj, atualizar_ati);
	
}

function Achar_Linha_Projeto(linhaAtividade)
{
	var obj = linhaAtividade.parentElement;
	while (obj != null && obj.Container_Atividades == null)
		obj = obj.parentElement;

	if (obj != null && obj.Container_Atividades != null)
		return obj.previousSibling;
	else
		return null;
}

function Recarregar_Atividades(id_prg, linhaProjeto, id_pes)
{
	if (linhaProjeto.carregado)
	{
		linhaProjeto.carregado = false; // Marca o projeto como não carregado, para passar pela "trava" que impede que se carrega as atividades mais de uma vez.
		
		// Excluo a linha com as atividades, que é criada logo abaixo da linha do projeto.
		var tblProjetos;
	
		if (linhaProjeto.parentElement.tagName == "TBODY")
			tblProjetos = linhaProjeto.parentElement.parentElement;
		else
			tblProjetos = linhaProjeto.parentElement;
		tblProjetos.deleteRow(linhaProjeto.nextSibling.rowIndex);
		Chamar_Listar_Atividades(id_prg, linhaProjeto.id_prj, id_pes, linhaProjeto);		
	}	
}

function Excluir_Linha_Projeto(id_prj)
{
	var linhaProjeto = document.all("linhaProjeto_" + id_prj);
	
	var tblProjetos;
	
	if (linhaProjeto.parentElement.tagName == "TBODY")
		tblProjetos = linhaProjeto.parentElement.parentElement;
	else
		tblProjetos = linhaProjeto.parentElement;
		
	if (linhaProjeto.carregado)
		tblProjetos.deleteRow(linhaProjeto.nextSibling.rowIndex);
		
	var indLinha = linhaProjeto.rowIndex;
	
	var ord_prj = tblProjetos.rows[indLinha].getElementsByTagName("span")[0].innerText;
	
	tblProjetos.deleteRow(indLinha);
	

	// Atualiza a ordem dos próximos projetos
	if (indLinha < tblProjetos.rows.length)
	{
	   for (var i = indLinha; i < tblProjetos.rows.length; i++)
		{
		    if (tblProjetos.rows[i].Container_Atividades == null)
		    {
			    spanOrdem = tblProjetos.rows[i].getElementsByTagName("span")[0];
			    spanOrdem.innerText = parseInt(spanOrdem.innerText) - 1;
			}
		}	
	}

}

function Chamar_Recarregar_Atividade(id_prg, id_prj, id_pes)
{
//	debugger;	
	var linhaProjeto = document.all("linhaProjeto_" + id_prj);
	Recarregar_Atividades(id_prg, linhaProjeto, id_pes);

}

function Chamar_Atualizar_Atividade(id_prg, id_prj, id_ati, id_pes, Mudou_Ordem)
{
    Chamar_Atualizar_Projeto(id_prg, id_prj, id_pes)
	// debugger;
	var linhaAtividade = document.all("linhaAtividade_" + id_ati);
	if (Mudou_Ordem == 'S')
	{ 
		// A ordem da atividade foi alterada, será necessário recarregar as atividades		
		Recarregar_Atividades(id_prg, Achar_Linha_Projeto(linhaAtividade), id_pes);
	}
	else
	{
//		debugger;
		var strURL = "../exexml/PrincipalListarAtividades.asp?id_pes=" + id_pes + "&id_prg=" + id_prg
			   														+ "&id_prj=" + id_prj + "&id_ati=" + id_ati;
		var info = new Array(linhaAtividade, id_prg, id_prj, id_pes);
		Requisicao(linhaAtividade, strURL, Atualizar_Atividade, "Atualizando a tela", info);
	}
}

function Atualizar_Atividade(ResponseXML, info)
{
	var linha = info[0];
	var id_prg = info[1];
	var id_prj = info[2];
	var id_pes = info[3];
	var xmlAtividade = ResponseXML.getElementsByTagName("atividade")[0];
//	debugger;
	Montar_Linha_Atividade(linha, xmlAtividade, id_prg, id_prj, id_pes, linha.id_ati);
//	prompt("id_prj passado para atualizar", linha.id_prj);	

	var linhaProjeto = Achar_Linha_Projeto(linha);
	
	if (linhaProjeto != null)
	{
		id_prj = linhaProjeto.id_prj;
		Chamar_Atualizar_Linha_Projeto(id_prg, id_prj, id_pes, linhaProjeto);
	}
}

function Chamar_Incluir_Atividade(id_prg, id_prj,id_ati, id_pes)
{	
	var strURL = "../exexml/PrincipalListarAtividades.asp?id_pes=" + id_pes 
			+ "&id_prg=" + id_prg + "&id_prj=" + id_prj + "&id_ati=" + id_ati;
			
	var linhaProjeto = document.all("linhaProjeto_" + id_prj);
	if (linhaProjeto.carregado)	
	{
		var info = new Array(linhaProjeto, id_prg, id_prj, id_pes);
		Requisicao(linhaProjeto, strURL, Incluir_Atividade, "Atualizando a tela", info);
	}
}

function Incluir_Atividade(ResponseXML, info)
{
	var linhaProjeto = info[0];
	var id_prg = info[1];
	var id_prj = info[2];
	var id_pes = info[3];
	
	var nodeAtividade = ResponseXML.getElementsByTagName("atividade")[0];
	var tblAtividades = linhaProjeto.nextSibling.cells(0).getElementsByTagName("table")[0];
	var ord_ati = parseInt(nodeAtividade.getElementsByTagName("ord_ati")[0].text);
	
	var linhaAtividade;
	if (tblAtividades.rows[0].cells.length == 1)	
		linhaAtividade = tblAtividades.rows[0];
	else
		linhaAtividade = tblAtividades.insertRow(ord_ati - 1);
	
	Montar_Linha_Atividade(linhaAtividade, nodeAtividade, id_prg, id_prj, id_pes);
	
	var spanOrdem;
	for (var i = ord_ati; i < tblAtividades.rows.length; i++)
	{
		spanOrdem = tblAtividades.rows[i].getElementsByTagName("span")[0];
		spanOrdem.innerText = parseInt(spanOrdem.innerText) + 1;			
	}
	
	Chamar_Atualizar_Linha_Projeto(id_prg, id_prj, id_pes, linhaProjeto)
}

function Incluir_Atividade_Copiada(id_ati_original, id_ati_novo, id_pes)
{
	var linhaAtividade = document.all("linhaAtividade_" + id_ati_original);
	var linhaProjeto = Achar_Linha_Projeto(linhaAtividade);
	Chamar_Incluir_Atividade(linhaProjeto.id_prg, linhaProjeto.id_prj, id_ati_novo, id_pes);
}

function Excluir_Atividade(id_ati, id_pes)
{
	var linhaAtividade = document.all("linhaAtividade_" + id_ati);
	var tblAtividades;
	var indLinha = linhaAtividade.rowIndex;
	var linhaProjeto = Achar_Linha_Projeto(linhaAtividade);

	if (linhaAtividade.parentElement.tagName == "TBODY")
		tblAtividades = linhaAtividade.parentElement.parentElement;
	else
		tblAtividades = linhaAtividade.parentElement;		
	tblAtividades.deleteRow(indLinha);
	
	if (tblAtividades.rows.length == 0)
		AdicionarLinhaProjetoVazio(tblAtividades, linhaProjeto.id_prg, linhaProjeto.id_prj, id_pes, linhaProjeto.posso_inc_ati, linhaProjeto.dat_ini_prev_prj);
	else if (indLinha < tblAtividades.rows.length)
	{
		for (var i = indLinha; i < tblAtividades.rows.length; i++)
		{
			spanOrdem = tblAtividades.rows[i].getElementsByTagName("span")[0];
			spanOrdem.innerText = parseInt(spanOrdem.innerText) - 1;			
		}	
	}
	
	Chamar_Atualizar_Linha_Projeto(linhaProjeto.id_prg, linhaProjeto.id_prj, id_pes, linhaProjeto);
}

function Chamar_Incluir_Projeto(id_prg, id_prj, id_pes, ord_prj)
{		
	var strURL = "../exexml/PrincipalListarProjetos.asp?id_pes=" + id_pes 
			+ "&id_prg=" + id_prg + "&id_prj=" + id_prj;
			
	var linhaPrograma = document.all("linhaPrograma_" + id_prg);
	if (linhaPrograma.carregado)	
	{
		var info = new Array(linhaPrograma, id_prg, id_prj, id_pes, ord_prj);
		Requisicao(linhaPrograma, strURL, Incluir_Projeto, "Atualizando a tela", info);
	}
}

function Incluir_Projeto(ResponseXML, info)
{
	var linhaPrograma = info[0];
	var id_prg = info[1];
	var id_prj = info[2];
	var id_pes = info[3]; 
	var ord_prj = info[4];
	var nodeProjeto = ResponseXML.getElementsByTagName("projeto");
	
	var linhaReordenar;	
	// 	debugger;
    var tblProjetos = linhaPrograma.nextSibling.cells(0).getElementsByTagName("table")[0];
	if (nodeProjeto.length == 0)
	{
		if (tblProjetos.rows[0].cells.length > 1)
		{
			ord_ultima = parseInt(tblProjetos.rows[tblProjetos.rows.length - 1].getElementsByTagName("span")[0].innerText);
			if (ord_ultima < ord_prj) 
				linhaReordenar = tblProjetos.rows.length;
			else
			{
				ord_linha = 0;
				for (var i = 0; (ord_linha < ord_prj) && (i < tblProjetos.rows.length); i++)
					ord_linha = parseInt(tblProjetos.rows[i].getElementsByTagName("span")[0].innerText);				
				linhaReordenar = i - 1;
			}
		}
	}
	else
	{
//		var ord_prj = parseInt(nodeProjeto[0].getElementsByTagName("ord_prj")[0].text);
		
		var linhaProjeto;
		if (tblProjetos.rows[0].cells.length == 1)	
			linhaProjeto = tblProjetos.rows[0];
		else
		{
			// Procurar a posição para incluir
			ord_ultima = parseInt(tblProjetos.rows[tblProjetos.rows.length - 1].getElementsByTagName("span")[0].innerText);
			if (ord_ultima < ord_prj) 
				linhaProjeto = tblProjetos.insertRow();				
			else
			{
				ord_linha = 0;
				for (var i = 0; (ord_linha < ord_prj) && (i < tblProjetos.rows.length); i++)
					ord_linha = parseInt(tblProjetos.rows[i].getElementsByTagName("span")[0].innerText);
				linhaProjeto = tblProjetos.insertRow(i - 1);
			}
		}
	
		Montar_Linha_Projeto(linhaProjeto, nodeProjeto[0], id_prg, id_pes, false, false);
		linhaReordenar = linhaProjeto.rowIndex + 1;
	}
	
	var spanOrdem;
	for (var i = linhaReordenar; i < tblProjetos.rows.length; i++)
	{
		spanOrdem = tblProjetos.rows[i].getElementsByTagName("span")[0];
		spanOrdem.innerText = parseInt(spanOrdem.innerText) + 1;
	}	
//	Chamar_Atualizar_Linha_Projeto(id_prg, id_prj, id_pes, linhaProjeto)
}