/**
 * custom_sp_menu.js
 * biblioteca de criação do menu superior
 */
var menu_custom = null;

fixMozillaZIndex = true;
_menuCloseDelay = 500;
_menuOpenDelay = 150;
_subOffsetTop = 2;
_subOffsetLeft = -2;
closeAllOnClick = true;

var lingua;
var todas_caption = "(Todas)";
var temas_caption = "Temas";
var fontes_caption = "Fontes";
var periodicidade_caption = "Periodicidade";
var indices_caption = "Índices analíticos";
var sinopse_caption = "Sinopse macroeconômica";
var seriesmais_caption = "Séries mais usadas";
var indicadores_caption = "Indicadores Ipea";
var serieshist_caption = "Séries históricas";
var ajuda_caption = "Ajuda";
var nivelgeo_caption = "Nível geográfico";
var sobre_caption = "O que é?";
var metadados_caption = "Metadados";
var direitos_caption = "Direitos de uso";
var contato_caption = "Fale conosco";
var dicas_caption = "Dicas";
var equipe_caption = "Equipe responsável";
var catalogo_caption = "Catálogo";
var estatistica_caption = "Estatística";
var calendario_caption = "Calendário";
var link_ferramentas_caption = "Ferramentas para economistas";
var link_economico_caption = "Dados nacionais";
var link_economico_inter_caption = "Dados internacionais";
var link_regional_caption = "Dados estaduais e municipais";
var link_historico_caption = "Dados históricos";
var exportacao_caption = "Exportação de arquivos";
var seriestras_caption = "Transformação de séries";
var dicionario_caption = "Dicionário de conceitos"
var dicasmeto_caption = "Dicas metodológicas";
var dicaspesos_caption = "Pesos e medidas";
var histmoeda_caption = "Histórico das alterações da moeda nacional";
var dicas_mapas = "Mapas";
var macro_caption = "Macroeconômico";
var regionais_caption = "Regional";
var social_caption = "Social";
var ipea_caption = "Números do Ipeadata";

function mnuSetLang(lingua){
  if (lingua == "English") {
    todas_caption = "(All)";
    temas_caption = "Subjects";
    fontes_caption = "Sources";
    periodicidade_caption = "Regularity";
    indices_caption = "Analytical index";
    sinopse_caption = "Economic outlook";
    seriesmais_caption = "Most request series";
    indicadores_caption = "Ipea indicators";
    serieshist_caption = "Historical series";
    ajuda_caption = "Help";
    nivelgeo_caption = "Geographic level";
    sobre_caption = "About";
    metadados_caption = "Metadata";
    direitos_caption = "Disclaimer";
    contato_caption = "Contact";
    dicas_caption = "Tips";
    equipe_caption = "Team manager";
    catalogo_caption = "Directory";
    estatistica_caption = "Statistics";
    calendario_caption = "Calendar";
    link_ferramentas_caption = "Features for economists";
    link_economico_caption = "National economic data";
    link_economico_inter_caption = "Inernational economic data";
    link_regional_caption = "State and council data";
    link_historico_caption = "Historical data";
    exportacao_caption = "Archives exportation";
    seriestras_caption = "Series transformation";
    dicionario_caption = "Concepts dictionary";
    dicasmeto_caption = "Methodological tips";
	dicaspesos_caption = "Measurements";
    histmoeda_caption = "Historical summary of brazilian currencies";
  	dicas_mapas = "Maps";
    macro_caption = "Macroeconomic database";
    regionais_caption = "Regional database";
    social_caption = "Social database";
    ipea_caption = "Ipeadata database";
  }
}

/* funções do macro  */
var MMTSize = 0;
var MMTNome = Array();
var MMTID = Array();

var MMTFFSize = 0;
var MMTFFTemID = Array();
var MMTFFTemNome = Array();
var MMTFFFntID = Array();
var MMTFFFntNome = Array();
var MMTFFVar = Array();

var MMFISize = 0;
var MMFIInstID = Array();
var MMFIInstNome = Array();
var MMFIFntID = Array();
var MMFIFntNome = Array();
var MMFIVar = Array();

var MMPSize = 0;
var MMPNome = Array();
var MMPPerID = Array();

var MMPTSize = 0;
var MMPTNome = Array();
var MMPTTemID = Array();
var MMPTPerID = Array();

var MMPFSize = 0;
var MMPFNome = Array();
var MMPFFntID = Array();
var MMPFPerID = Array();

var MMIASize = 0;
var MMIANome = Array();
var MMIAQuaID = Array();

var MMHSize = 0;
var MMHNome = Array();
var MMHTemID = Array();

function MMT(Nome, TemID){
  MMTNome[MMTSize] = Nome;
  MMTID[MMTSize] = TemID;
  MMTSize++;
}

function MMTF(TEMID, TEMNOME, FNTID, FNTNOME){
  MMTFFTemID[MMTFFSize] = TEMID;
  MMTFFTemNome[MMTFFSize] = TEMNOME;
  MMTFFFntID[MMTFFSize] = FNTID;
  MMTFFFntNome[MMTFFSize] = FNTNOME;
  MMTFFVar[MMTFFSize] = "temas" + TEMID + "_" + FNTID;
  MMTFFSize++;
}

function MMFI(INSTID, INSTITUICAO, FNTID, FNTNOME){
  MMFIInstID[MMFISize] = INSTID;
  MMFIInstNome[MMFISize] = INSTITUICAO;
  MMFIFntID[MMFISize] = FNTID;
  MMFIFntNome[MMFISize] = FNTNOME;
  MMFIVar[MMFISize] = "fontes" + INSTID + "_" + FNTID;
  MMFISize++;
}

function MMP(Nome, PerID){
  MMPNome[MMPSize] = Nome;
  MMPPerID[MMPSize] = PerID;
  MMPSize++;
}

function MMPT(Nome, TemID, PerID){
  MMPTNome[MMPTSize] = Nome;
  MMPTTemID[MMPTSize] = TemID;
  MMPTPerID[MMPTSize] = PerID;
  MMPTSize++;
}

function MMPF(Nome, FntID, PerID){
  MMPFNome[MMPFSize] = Nome;
  MMPFFntID[MMPFSize] = FntID;
  MMPFPerID[MMPFSize] = PerID;
  MMPFSize++;
}

function MMIA(Nome, QuaID){
  MMIANome[MMIASize] = Nome;
  MMIAQuaID[MMIASize] = QuaID;
  MMIASize++;
}

function MMH(Nome, TemID){
  MMHNome[MMHSize] = Nome;
  MMHTemID[MMHSize] = TemID;
  MMHSize++;
}

var MRTSize = 0;
var MRTNome = Array();
var MRTTemID = Array();

var MRTFSize = 0;
var MRTFNome = Array();
var MRTFTemID = Array();
var MRTFFntID = Array();

var MRFSize = 0;
var MRFNome = Array();
var MRFFntID = Array();

var MRNSize = 0;
var MRNNome = Array();
var MRNNivID = Array();

var MRNTSize = 0;
var MRNTNome = Array();
var MRNTNivID = Array();
var MRNTTemID = Array();

var MRNFSize = 0;
var MRNFNome = Array();
var MRNFNivID = Array();
var MRNFFntID = Array();

function MRT(Nome, TemID){
  MRTNome[MRTSize] = Nome;
  MRTTemID[MRTSize] = TemID;
  MRTSize++;
}

function MRTF(Nome, TemID, FntID){
  MRTFNome[MRTFSize] = Nome;
  MRTFTemID[MRTFSize] = TemID;
  MRTFFntID[MRTFSize] = FntID;
  MRTFSize++;
}

function MRF(Nome, FntID){
  MRFNome[MRFSize] = Nome;
  MRFFntID[MRFSize] = FntID;
  MRFSize++;
}

function MRN(Nome, NivID){
  MRNNome[MRNSize] = Nome;
  MRNNivID[MRNSize] = NivID;
  MRNSize++;
}

function MRNT(Nome, NivID, TemID){
  MRNTNome[MRNTSize] = Nome;
  MRNTNivID[MRNTSize] = NivID;
  MRNTTemID[MRNTSize] = TemID;
  MRNTSize++;
}

function MRNF(Nome, NivID, FntID){
  MRNFNome[MRNFSize] = Nome;
  MRNFNivID[MRNFSize] = NivID;
  MRNFFntID[MRNFSize] = FntID;
  MRNFSize++;
}

/* social */

var MSTSize = 0;
var MSTNome = Array();
var MSTTemID = Array();

var MSTFSize = 0;
var MSTFNome = Array();
var MSTFTemID = Array();
var MSTFFntID = Array();

var MSFSize = 0;
var MSFNome = Array();
var MSFFntID = Array();

var MSNSize = 0;
var MSNNome = Array();
var MSNNivID = Array();

var MSNTSize = 0;
var MSNTNome = Array();
var MSNTNivID = Array();
var MSNTTemID = Array();

var MSNFSize = 0;
var MSNFNome = Array();
var MSNFNivID = Array();
var MSNFFntID = Array();

function MST(Nome, TemID){
  MSTNome[MSTSize] = Nome;
  MSTTemID[MSTSize] = TemID;
  MSTSize++;
}

function MSTF(Nome, TemID, FntID){
  MSTFNome[MSTFSize] = Nome;
  MSTFTemID[MSTFSize] = TemID;
  MSTFFntID[MSTFSize] = FntID;
  MSTFSize++;
}

function MSF(Nome, FntID){
  MSFNome[MSFSize] = Nome;
  MSFFntID[MSFSize] = FntID;
  MSFSize++;
}

function MSN(Nome, NivID){
  MSNNome[MSNSize] = Nome;
  MSNNivID[MSNSize] = NivID;
  MSNSize++;
}

function MSNT(Nome, NivID, TemID){
  MSNTNome[MSNTSize] = Nome;
  MSNTNivID[MSNTSize] = NivID;
  MSNTTemID[MSNTSize] = TemID;
  MSNTSize++;
}

function MSNF(Nome, NivID, FntID){
  MSNFNome[MSNFSize] = Nome;
  MSNFNivID[MSNFSize] = NivID;
  MSNFFntID[MSNFSize] = FntID;
  MSNFSize++;
}



function criaMenuPrincipal(nome, opcao, submenu, link, figura, topo, esquerda, abrir){
  var result;
  with (result = new menuname(nome)) {
    alwaysvisible = 1;
    left = esquerda;
    orientation = "horizontal";
    style = menuStyle;
    top = topo;
  }
  with (result) {
    aI(((abrir) ? "showmenu=" + submenu + ";" : "") + "image=../img/" + figura + ";url=javascript:IrParaModuloPagina('" + opcao + "','','','','" + link + "');");
  }
  return result;
}

/**
 * Cria toda a estrutura do menu
 */
function criarItemMenu(debug){

  var elemento;
  var elementos_sub = null;
  
  var tipo = "";
  var ulink = "";
  var submenu = "";
  
  if ((this.elementos == null) && (menu_custom != null)) { //Se não houverem subitens, ã somente um item de menu
    tipo = "text=" + this.texto + ";";
    ulink = "url=" + this.url + ";";
    menu_custom.aI(tipo + ulink);
    
  }
  else { //senão é um submenu
    //Cria um novo submenu, e insere todas as referências aos seus ítens
    menu_custom = new menuname(this.nome);
    menu_custom.style = this.estilo;
    menu_custom.overflow = "scroll";
    
    for (elemento in this.elementos) {
    
      /* Se houverem elementos no array de elementos, o item receberá um tratamento de submenu */
      if (this.elementos[elemento].elementos != null) {
      
        tipo = "text=" + this.elementos[elemento].texto + ";";
        ulink = "showmenu=" + elemento + ";";
        
        /* Se a lista de subelementos for vazia, então cria uma nova lista */
        if (elementos_sub == null) 
          elementos_sub = new Array();
        
        /* Adiciona um elemento novo na lista de elementos que possuem subitens */
        elementos_sub[elemento] = this.elementos[elemento];
        
      }
      else { /* Se não houverem elementos recebe um tratamento de item de menu */
        tipo = "text=" + this.elementos[elemento].texto + ";";
        ulink = "url=" + this.elementos[elemento].url + ";";
        
      }
      
      menu_custom.aI(tipo + ulink); /* Faz referência ao item ao menu que esta na tela */
    }
    
    if (elementos_sub != null) {
      for (elemento in elementos_sub) {
        elementos_sub[elemento].criarItemMenu(1);
      }
    }
  }
  menu_custom = null;
}


/** 
 * Insere um item no menu indexado por string
 */
function inserirItem(stringindex, objMenuItem){
  if (this.elementos == null) 
    this.elementos = new Array();
  
  objMenuItem.setNome(stringindex); //Muda o nome do objeto
  this.elementos[stringindex] = objMenuItem; //Insere novo item ao array
  if (this.debug) 
    alert(objMenuItem.nome + " - " + objMenuItem.texto);
}


/**
 * Atribui um nome ao elemento
 */
function setNome(strnome){
  this.nome = strnome;
}

function MenuItem(texto, estilo, url, nome, debug){

  /* ATRIBUTOS */
  
  this.texto = texto; /* Texto apresentado no menu */
  this.elementos = null; /* Elementos internos ao menu */
  this.url = url; /* url que será aberta ao clicar no item */
  this.estilo = estilo; /* estilo que será associado ao elemento */
  this.nome = nome /* nome do item para ser referenciado */
  this.debug = debug; /* atributo usado para debug */
  /* MÉTODOS */
  this.setNome = setNome;
  this.criarItemMenu = criarItemMenu; /* Cria estrutura do menu */
  this.inserirItem = inserirItem; /* Insere novo item no menu */
}


function MMTBuild(mnuMTemas){
  for (i = 0; i < MMTSize; i++) {
    var temaitem = new MenuItem(MMTNome[i], macroeconomico3, "javascript:IrParaModuloPagina('M', 'temas', '" + MMTID[i] + "', '1', 'Ser_Temas(" + MMTID[i] + ")');");
    mnuMTemas.inserirItem("temas" + MMTID[i], temaitem);
  }
}

function MMTFBuild(mnuMTemas){
  var temIDAnterior = 0;
  for (i = 0; i < MMTFFSize; i++) {
    var inserir = true;
    if (MMTFFTemID[i] != temIDAnterior) {
      j = i + 1;
      inserir = (j < MMTFFSize) && (MMTFFTemID[i] == MMTFFTemID[j]);
      if (inserir) {
        var temafontenome = "temas" + MMTFFTemID[i] + "_todas";
        var temafonte = new MenuItem(todas_caption, macroeconomico3, "javascript:IrParaModuloPagina('M', 'temas', '" + MMTFFTemID[i] + "', '1', 'Ser_Temas(" + MMTFFTemID[i] + ")');");
        mnuMTemas.elementos["temas" + MMTFFTemID[i]].inserirItem(temafontenome, temafonte);
        
        var temafontenome = MMTFFVar[i];
        var temafonte = new MenuItem(MMTFFFntNome[i], macroeconomico3, "javascript:IrParaModuloPagina('M', 'temas', '" + MMTFFTemID[i] + "', '" + MMTFFFntID[i] + "', 'Ser_TemasFonte(" + MMTFFTemID[i] + "," + MMTFFFntID[i] + ")');");
        mnuMTemas.elementos["temas" + MMTFFTemID[i]].inserirItem(temafontenome, temafonte);
      }
    }
    else {
      var temafontenome = MMTFFVar[i];
      var temafonte = new MenuItem(MMTFFFntNome[i], macroeconomico3, "javascript:IrParaModuloPagina('M', 'temas', '" + MMTFFTemID[i] + "', '" + MMTFFFntID[i] + "', 'Ser_TemasFonte(" + MMTFFTemID[i] + "," + MMTFFFntID[i] + ")');");
      mnuMTemas.elementos["temas" + MMTFFTemID[i]].inserirItem(temafontenome, temafonte);
    }
    temIDAnterior = MMTFFTemID[i];
  }
}

function MMFIBuild(mnuMFontes){
  var MMFIInstIDAnterior = "";
  for (i = 0; i < MMFISize; i++) {
    var inserir = true;
    if (MMFIInstNome[i] != MMFIInstIDAnterior) {
      j = i + 1;
      var fonteitem = new MenuItem(MMFIInstNome[i], macroeconomico2, "javascript:IrParaModuloPagina('M', 'fontes', '" + MMFIInstID[i] + "', '', 'Ser_Fontes(" + MMFIInstID[i] + ")');");
      mnuMFontes.inserirItem("fontes" + MMFIInstNome[i], fonteitem);
      inserir = (j < MMFISize) && (MMFIInstNome[i] == MMFIInstNome[j]);
      if (inserir) {
        var fonteitem = new MenuItem(MMFIFntNome[i], macroeconomico3, "javascript:IrParaModuloPagina('M', 'fontes', '" + MMFIFntID[i] + "', '', 'Ser_Fontes(" + MMFIFntID[i] + ")');");
        mnuMFontes.elementos["fontes" + MMFIInstNome[i]].inserirItem(MMFIFntID[i], fonteitem);
      }
    }
    else {
      var fonteSubitem = new MenuItem(MMFIFntNome[i], macroeconomico3, "javascript:IrParaModuloPagina('M', 'fontes', '" + MMFIFntID[i] + "', '', 'Ser_Fontes(" + MMFIFntID[i] + ")');");
      mnuMFontes.elementos["fontes" + MMFIInstNome[i]].inserirItem(MMFIFntID[i], fonteSubitem);
    }
    MMFIInstIDAnterior = MMFIInstNome[i];
  }
}

function MMPBuild(mnuMPeriod){
  for (i = 0; i < MMPSize; i++) {
    var periodicidadeitem = new MenuItem(MMPNome[i], macroeconomico3, "javascript:IrParaModuloPagina('M', 'fontes', '" + MMPPerID[i] + "', '', 'Ser_Fontes(" + MMPPerID[i] + ")');");
    mnuMPeriod.inserirItem("periodicidade" + MMPPerID[i], periodicidadeitem);
    
    var periodicidadetipo = new MenuItem(temas_caption, macroeconomico4, "#");
    mnuMPeriod.elementos["periodicidade" + MMPPerID[i]].inserirItem("periodicidade" + MMPPerID[i] + "_temas", periodicidadetipo);
    
    var periodicidadetipo = new MenuItem(fontes_caption, macroeconomico4, "#");
    mnuMPeriod.elementos["periodicidade" + MMPPerID[i]].inserirItem("periodicidade" + MMPPerID[i] + "_fontes", periodicidadetipo);
  }
}


function MMPTBuild(mnuMPeriod){
  for (i = 0; i < MMPTSize; i++) {
    var periodicidadetemaitem = new MenuItem(MMPTNome[i], macroeconomico4, "javascript:IrParaModuloPagina('M', 'periodicidade_" + MMPTPerID[i] + "', 'temas', '" + MMPTTemID[i] + "', 'Ser_TemasPer(" + MMPTTemID[i] + ", " + MMPTPerID[i] + ")');");
    mnuMPeriod.elementos["periodicidade" + MMPTPerID[i]].elementos["periodicidade" + MMPTPerID[i] + "_temas"].inserirItem("periodicidade_tema" + MMPTPerID[i] + "_" + MMPTTemID[i], periodicidadetemaitem);
  }
}

function MMPFBuild(mnuMPeriod){
  for (i = 0; i < MMPFSize; i++) {
    var periodicidadefonteitem = new MenuItem(MMPFNome[i], macroeconomico4, "javascript:IrParaModuloPagina('M', 'periodicidade_" + MMPFPerID[i] + "', 'fontes', '" + MMPFFntID[i] + "', 'Ser_FontesPer(" + MMPFFntID[i] + ", " + MMPFPerID[i] + ")');");
    mnuMPeriod.elementos["periodicidade" + MMPFPerID[i]].elementos["periodicidade" + MMPFPerID[i] + "_fontes"].inserirItem("periodicidade_fonte" + MMPFPerID[i] + "_" + MMPFFntID[i], periodicidadefonteitem);
  }
}

function MMIABuild(mnuMIndAnalit){
  for (i = 0; i < MMIASize; i++) {
    var indice_item = new MenuItem(MMIANome[i], macroeconomico2, "javascript:IrParaModuloPagina('M', 'indices_analiticos', '', '" + MMIAQuaID[i] + "', 'Qua_Itens(" + MMIAQuaID[i] + ")');");
    mnuMIndAnalit.inserirItem("indices_analiticos" + MMIAQuaID[i], indice_item);
  }
}

function MMHBuild(mnuMSerHist){
  for (i = 0; i < MMHSize; i++) {
    var serhistoricasnome = "ser_historicas" + MMHTemID[i];
    var serhistoricasitem = new MenuItem(MMHNome[i], macroeconomico2, "javascript:IrParaModuloPagina('M', 'ser_historicas', '','" + MMHTemID[i] + "','Ser_Hist(" + MMHTemID[i] + ")')");
    mnuMSerHist.inserirItem(serhistoricasnome, serhistoricasitem);
  }
}

/* regional */

function MRTBuild(mnuRTemas){
  for (i = 0; i < MRTSize; i++) {
    var temaitem = new MenuItem(MRTNome[i], regional3, "javascript:IrParaModuloPagina('R', 'temas', '" + MRTTemID[i] + "','',  'Ser_Temas(" + MRTTemID[i] + ")')");
    mnuRTemas.inserirItem("regtemas" + MRTTemID[i], temaitem);
  }
}

function MRTFBuild(mnuRTemas){
  for (i = 0; i < MRTFSize; i++) {
    var temafontenome = "regtemas" + MRTFTemID[i] + "_" + MRTFFntID[i];
    var temafonte = new MenuItem(MRTFNome[i], regional3, "javascript:IrParaModuloPagina('R', 'temas', '" + MRTFTemID[i] + "', '" + MRTFFntID[i] + "', 'Ser_TemasSub(" + MRTFTemID[i] + "," + MRTFFntID[i] + ")');");
    mnuRTemas.elementos["regtemas" + MRTFTemID[i]].inserirItem(temafontenome, temafonte);
  }
}

function MRFBuild(mnuRFontes){
  for (i = 0; i < MRFSize; i++) {
    var fonteitem = new MenuItem(MRFNome[i], regional3, "javascript:IrParaModuloPagina('R', 'fontes', '" + MRFFntID[i] + "','',  'Ser_Fontes(" + MRFFntID[i] + ")')");
    mnuRFontes.inserirItem("regfontes" + MRFFntID[i], fonteitem);
  }
}

function MRNBuild(mnuRNivel){
  for (i = 0; i < MRNSize; i++) {
    var nivelgeograficoitem = new MenuItem(MRNNome[i], regional3, "#");
    mnuRNivel.inserirItem("nivelgeografico" + MRNNivID[i], nivelgeograficoitem);
    
    var nivelgeograficotipo = new MenuItem(temas_caption, regional4, "#");
    mnuRNivel.elementos["nivelgeografico" + MRNNivID[i]].inserirItem("nivelgeografico" + MRNNivID[i] + "_temas", nivelgeograficotipo);
    
    var nivelgeograficotipo = new MenuItem(fontes_caption, regional4, "#");
    mnuRNivel.elementos["nivelgeografico" + MRNNivID[i]].inserirItem("nivelgeografico" + MRNNivID[i] + "_fontes", nivelgeograficotipo);
  }
}

function MRNTBuild(mnuRNivel){
  for (i = 0; i < MRNTSize; i++) {
    var nivelgeograficotema = new MenuItem(MRNTNome[i], regional3, "javascript:IrParaModuloPagina('R', 'nivelgeografico_" + MRNTNivID[i] + "', 'temas', '" + MRNTTemID[i] + "', 'Ser_TemasNiv(" + MRNTTemID[i] + "," + MRNTNivID[i] + ")');");
    mnuRNivel.elementos["nivelgeografico" + MRNTNivID[i]].elementos["nivelgeografico" + MRNTNivID[i] + "_temas"].inserirItem("nivelgeografico_tema{" + MRNTNivID[i] + "_" + MRNTTemID[i], nivelgeograficotema);
  }
}

function MRNFBuild(mnuRNivel){
  for (i = 0; i < MRNFSize; i++) {
    var nivelgeograficofonte = new MenuItem(MRNFNome[i], regional3, "javascript:IrParaModuloPagina('R', 'nivelgeografico_" + MRNFNivID[i] + "', 'temas', '" + MRNFFntID[i] + "', 'Ser_FontesNiv(" + MRNFFntID[i] + "," + MRNFNivID[i] + ")');");
    mnuRNivel.elementos["nivelgeografico" + MRNFNivID[i]].elementos["nivelgeografico" + MRNFNivID[i] + "_fontes"].inserirItem("nivelgeografico_fonte{" + MRNFNivID[i] + "_" + MRNFFntID[i], nivelgeograficofonte);
  }
}

function MSTBuild(mnuRTemas){
  for (i = 0; i < MSTSize; i++) {
    var temaitem = new MenuItem(MSTNome[i], social3, "javascript:IrParaModuloPagina('S', 'temas', '" + MSTTemID[i] + "','',  'Ser_Temas(" + MSTTemID[i] + ")')");
    mnuRTemas.inserirItem("regtemas" + MSTTemID[i], temaitem);
  }
}

function MSTFBuild(mnuRTemas){
  for (i = 0; i < MSTFSize; i++) {
    var temafontenome = "regtemas" + MSTFTemID[i] + "_" + MSTFFntID[i];
    var temafonte = new MenuItem(MSTFNome[i], social3, "javascript:IrParaModuloPagina('S', 'temas', '" + MSTFTemID[i] + "', '" + MSTFFntID[i] + "', 'Ser_TemasSub(" + MSTFTemID[i] + "," + MSTFFntID[i] + ")');");
    mnuRTemas.elementos["regtemas" + MSTFTemID[i]].inserirItem(temafontenome, temafonte);
  }
}

function MSFBuild(mnuRFontes){
  for (i = 0; i < MSFSize; i++) {
    var fonteitem = new MenuItem(MSFNome[i], social3, "javascript:IrParaModuloPagina('S', 'fontes', '" + MSFFntID[i] + "','',  'Ser_Fontes(" + MSFFntID[i] + ")')");
    mnuRFontes.inserirItem("regfontes" + MSFFntID[i], fonteitem);
  }
}

function MSNBuild(mnuRNivel){
  for (i = 0; i < MSNSize; i++) {
    var nivelgeograficoitem = new MenuItem(MSNNome[i], social3, "#");
    mnuRNivel.inserirItem("socnivelgeografico" + MSNNivID[i], nivelgeograficoitem);
    
    var nivelgeograficotipo = new MenuItem(temas_caption, social4, "#");
    mnuRNivel.elementos["socnivelgeografico" + MSNNivID[i]].inserirItem("socnivelgeografico" + MSNNivID[i] + "_temas", nivelgeograficotipo);
    
    var nivelgeograficotipo = new MenuItem(fontes_caption, social4, "#");
    mnuRNivel.elementos["socnivelgeografico" + MSNNivID[i]].inserirItem("socnivelgeografico" + MSNNivID[i] + "_fontes", nivelgeograficotipo);
  }
}

function MSNTBuild(mnuRNivel){
  for (i = 0; i < MSNTSize; i++) {
    var nivelgeograficotema = new MenuItem(MSNTNome[i], social3, "javascript:IrParaModuloPagina('S', 'nivelgeografico_" + MSNTNivID[i] + "', 'temas', '" + MSNTTemID[i] + "', 'Ser_TemasNiv(" + MSNTTemID[i] + "," + MSNTNivID[i] + ")');");
    mnuRNivel.elementos["socnivelgeografico" + MSNTNivID[i]].elementos["socnivelgeografico" + MSNTNivID[i] + "_temas"].inserirItem("socnivelgeografico_temas{" + MSNTNivID[i] + "_" + MSNTTemID[i], nivelgeograficotema);
  }
}

function MSNFBuild(mnuRNivel){
  for (i = 0; i < MSNFSize; i++) {
    var nivelgeograficofonte = new MenuItem(MSNFNome[i], social3, "javascript:IrParaModuloPagina('S', 'nivelgeografico_" + MSNFNivID[i] + "', 'temas', '" + MSNFFntID[i] + "', 'Ser_FontesNiv(" + MSNFFntID[i] + "," + MSNFNivID[i] + ")');");
    mnuRNivel.elementos["socnivelgeografico" + MSNFNivID[i]].elementos["socnivelgeografico" + MSNFNivID[i] + "_fontes"].inserirItem("socnivelgeografico_fontes{" + MSNFNivID[i] + "_" + MSNFFntID[i], nivelgeograficofonte);
  }
}