incio
sGrid1=//alert('| --- TESTE CACHE NAVEGADOR ---\n| '+parent.sCliPasta+'\n| '+parent.aGlobalLogin[0]+'\n| '+parent.aGlobalLogin[1]+'\n| '+Date()+'\n| --- TESTE CACHE NAVEGADOR ---');
//var sVerPlat = document.cookie = "sVarPlat=sVerPlat;";
//alert(sVerPlat);
function foGrid() {
////////////////////////////////////////////

   this.sFCorFrisoMenu            = sFCorFrisoMenu;
   this.sFCorCurAtivo             = "#ffffff";
   this.sBCorCurAtivo1            = sBCorCurAtivo1;
   this.sBCorCurAtivo2            = sBCorCurAtivo2;
   this.sBCorCurAtivo             = this.sBCorCurAtivo1;

   this.sFCorJanAtivo             = "#06334B";//"#0000bb";
   this.sBCorJanAtivo             = "#e4e4ff";
   this.sFCorCabAtivo             = "#06334B";//"#000000";
   this.sBCorCabAtivo             = "#cccccc";
   this.sBCor2CabAtivo            = "#bbbbbb";

   this.sFCorCapAtivo             = sFCorCapAtivo;
   this.sBCorCapAtivo             = sBCorCapAtivo;

   this.sFCorTitAtivo             = "#ffffff";
   this.sBCorTitAtivo             = "#0000aa";
   this.sCorBordExtAtivo          = "#cccccc";
   this.sCorBordIntAtivo          = "#cccccc";
   this.sFCorCurInati             = "#ffffff";
   this.sBCorCurInati             = "#888888";
   this.sFCorJanInati             = "#cccccc";
   this.sBCorJanInati             = "#ffffff";
   this.sFCorCabInati             = "#ffffff";
   this.sBCorCabInati             = "#dddddd";
   this.sCorBordExtInati          = "#000044";
   this.sCorBordIntInati          = "#0000aa";
   this.sId                       = ''; //psId;
   this.aTit                      = []; //paTit;
   this.sTmpOrigTit_0a            = '';   // usado em flProcessMonitor
   this.sTmpOrigTit_0b            = '';
   this.sLastSearchedTxt          = "";
   this.iAlt                      = 10; //piAlt;
   this.iCol                      = 0;  //paTitCol.length;
   this.aTitCol                   = []; //paTitCol;
   this.aTitColVisible            = [];
   this.aOrdCol                   = [];
   this.aExpFColor                = [];
   this.aExpBColor                = [];
   this.aGrid                     = [];
   this.aMenu                     = [];
   this.iCursorLin                = 0;
   this.iArray                    = 0;
   this.iSortCol                  = -1;
   this.lRevSort                  = false;
   this.lBorda                    = false;
   this.flDesenhaGrid             = flDesenhaGrid;
   this.flMontaNullTela           = flMontaNullTela;
   this.flMontaNullLinha          = flMontaNullLinha;
   this.flMontaTela               = flMontaTela;
   this.flMontaLinha              = flMontaLinha;
   this.flMontaColunas            = flMontaColunas;
   this.flSetColuna               = flSetColuna;
   this.lSetColunas               = false;
   this.flAjustaColunas           = flAjustaColunas;
   this.flDesceLin                = flDesceLin;
   this.flSobeLin                 = flSobeLin;
   this.flDesceScrollLin          = flDesceScrollLin;
   this.flSobeScrollLin           = flSobeScrollLin;
   this.flEndTela                 = flEndTela;
   this.flTopTela                 = flTopTela;
   this.flClickLin                = flClickLin;
   this.flLocalizaLin             = flLocalizaLin;
   this.flLocaliza2Lin            = flLocaliza2Lin;
   this.flLocalizaOriginal        = flLocalizaOriginal;
   this.flRastroReg               = flRastroReg;
   this.flPgUp                    = flPgUp;
   this.flPgDn                    = flPgDn;
   this.flTopArray                = flTopArray;
   this.flEndArray                = flEndArray;
   this.lMarcacao                 = false;
   this.sMarcados                 = '/';
   this.sMarcadosOrig             = '/';
   this.flMarcado                 = flMarcado;
   this.flMarcadoOrig             = flMarcadoOrig;
   this.flMarca                   = flMarca;
   this.flDesmarca                = flDesmarca;
   this.flMarcaServer             = flMarcaServer;
   this.flMarcacao                = flMarcacao;
   this.flOnMarcando              = flOnMarcando;
   this.fiChaveAtual              = fiChaveAtual;
   this.fiFlyChaveAtual           = fiFlyChaveAtual;
   this.fiArray                   = fiArray;
   this.fsGet_aGrid               = fsGet_aGrid;
   this.lClickLin                 = true;
   this.flRefreshCall             = flRefreshCall;
   this.flRefreshCall_FromTela    = flRefreshCall_FromTela;
   this.flRefreshLinCall          = flRefreshLinCall;
   this.flRefreshScreen           = flRefreshScreen
   this.lInvisivel                = false;
   this.sQry                      = '';
   this.sQryOriginal              = '';
   this.sQrySum                   = '';
   this.sQrySum2                  = '';
   this.iChaveRefresh             = 0;
   this.flEncerraGrid             = flEncerraGrid;
   this.sDDSFile                  = '';
   this.sDDSTag                   = '';
   this.eNr0                      = '';
   this.oPai                      = null;
   this.oCaller                   = null;
   this.iWA                       = null;
   this.iSss                      = -1;
   this.sTipo                     = 'grid';
   this.oTelaEdicao               = null;
   this.oTelaRange                = null;
   this.oMenu                     = null;
   this.flTelaRange               = flTelaRange;
   this.lFuncaoEsc                = false;
   this.lTemRodape                = false;
   this.aRodape                   = [];
   this.flMontaRodape             = flMontaRodape;     
   this.flTableGridOnMouseOver    = flTableGridOnMouseOver;
   this.flTableGridOnMouseOut     = flTableGridOnMouseOut;
   this.sTipoNr0                  = '';
   this.sToolsBar                 = '';
   this.fsInterpreta              = fsInterpreta;
   this.fiChaveVizinha            = fiChaveVizinha;
   this.flMarcaInverte            = flMarcaInverte;
   this.flMarcaTudo               = flMarcaTudo;
   this.flMarcaSalva              = flMarcaSalva;
   this.flMarcaReset              = flMarcaReset;
   this.flMarcadosIgualAoOriginal = flMarcadosIgualAoOriginal;
   this.fiQtosMarcados            = fiQtosMarcados;
   this.flGridInc                 = flGridInc;
   this.flGridExc                 = flGridExc;
   this.flGridAlt                 = flGridAlt;
   this.flGridZoo                 = flGridZoo;
   this.flGridZoo2                = flGridZoo2;
// Ricardo
//   this.flGridImp                 = flGridImp; 
//
   this.lSlim                     = false;
   this.aObjSlim                  = [];
   this.lSalvouMarcados           = false;
   this.fiChaveIrma               = fiChaveIrma;
   this.fsChavesIrmas             = fsChavesIrmas;
   this.fsIrmasTias               = fsIrmasTias;
   this.faIrmasTias               = faIrmasTias;
   this.iAutoRefresh              = 0;
   this.tAutoRefresh              = 0;
   this.flAutoRefreshCall         = flAutoRefreshCall;
   this.sMnemTDoc                 = '';
   this.pTDoc                     = '';
   this.flCallAgenda              = flCallAgenda;
   this.flCallRAc                 = flCallRAc;
   this.fsIdSet                   = fsIdSet;
   this.iRecsPage                 = iGlobalRecsPage;   // isso sera mudado em foCreateGrid
   this.iPage                     = 0;
   this.iPages                    = 0;
   this.iTotRecs                  = 0;
   this.flGotoPage                = flGotoPage;
   this.flAddPage                 = flAddPage;
   this.flCheckNewPage            = flCheckNewPage;
   this.iPerc                     = 0;
   this.iLastPerc                 = 0;
   this.iLimitePerc               = 99.9;

   this.lEnded                    = false;
   this.iLargRef                  = 0;
   this.flTrataGridTable          = flTrataGridTable;
   this.iAlt0                     = 10; //piAlt;
   this.lTemIncSeq                = false;
   this.lTemAltSeq                = false;
   this.lRefreshed                = false;
   this.lAddPageRefreshed         = true;
   this.lLixeira                  = false;
   this.flGridLixeira             = flGridLixeira;
   this.flShowIconesToolsBar      = flShowIconesToolsBar;
   this.flGridRInc                = flGridRInc;
   this.sPesquisar                = '';   
   this.sPesquisarFull            = '';
   this.lEntrarIncluindo          = false;
   this.lEntrarAlterando          = false;
   this.lEntrarNaFicha            = false;
   this.sOnLoadExe                = '';
   this.lPesquisandoNr0 = false;
   this.sOldQry = '';
   this.iSssMn = -1;
   this.sRetornoCalendario = '';
   this.iDiasCalend = 0;   // nao esta sendo usado
   this.oWCalendar = null;
   this.flGotoFirst = flGotoFirst;
   this.flGotoLast  = flGotoLast;
   this.flOrderGrid = flOrderGrid;
   this.flOrderGrid2 = flOrderGrid2;
   this.lInc = 0;
   this.dAgenda = new Date();
   this.sIncMsg = '';
   this.sAltMsg = '';
   this.sZooMsg = '';
   this.sExcMsg = '';
// Ricardo
//   this.sImpMsg = '';
//
   this.sQuebraCol0 = '%$#@!';
   this.lQuebraCol = false;
   this.iQuebraCol = -1;
   this.sQuebraCol = this.sQuebraCol0;
   this.lQuebraColAcordeon = false;
   this.aQuebraColAcordeon = [];   // sQuebraExp,lEstaVisivel
   this.sQuebraColAcordeon = this.sQuebraCol0;
   this.flQuebraColAcordeon = flQuebraColAcordeon;
   this.flDeleteQuebraCol_Rows = flDeleteQuebraCol_Rows;
   this.flTots  = flTots;
   this.flTots1 = flTots1;
   this.flTots1_LerUsuario = flTots1_LerUsuario;
   this.flTots2 = flTots2;
   this.flTots3 = flTots3;
   this.flTots1_LerPontual = flTots1_LerPontual;
   this.fiChaveTo_iArray = fiChaveTo_iArray;
   this.lCursorOn = true;  // default   1
   this.sVarTmp = '';  //modelo engajamento  e select sum qdo h range

   this.sTagRefreshGridAoSalvar = false;


   this.aExpMenu =  [];
   this.flEvalExpMenu = flEvalExpMenu;
   this.aAliasColunas = [];
   this.fjAliasColunas = fjAliasColunas;
   this.fsTrocaExpMenu = fsTrocaExpMenu;
   this.iSOA = 0; // caso seja o grid de escolha da fesc, de uma soa de uma tedio

   this.lResfreshTop = false;

   this.aInLineInput_1 = new Array();
   this.aInLineInput_2 = new Array();
   this.aInLineInput_3 = new Array();
   this.aInLineChaIrma = new Array();

   this.lNoDblClick = false;
   this.lFecharPaiAoSair = false;
   this.sSqlSumFormat ='';
   this.pChaveDinamica = 0;

   this.flOnMouseDNGridEdicao = flOnMouseDNGridEdicao;
   this.flOnMouseUPGridEdicao = flOnMouseUPGridEdicao;
   this.flGridEdicaoProgramarRAc = flGridEdicaoProgramarRAc;

   this.lEncerrandoGrid=false;

   this.sFuncaoInc
   this.sFuncaoAlt
   this.sFuncaoZoo
   this.sFuncaoExc

   this.lNaoPerguntarDesejaIncluirNr0 = false;

   this.fsGridHTML = fsGridHTML;
   this.oContainer = null;

   this.sFiltros = '';
   this.aFiltrosLbl = [];
   this.aFiltrosExp = [];
   this.aFiltrosSet = [];
   this.flSetFiltro = flSetFiltro;
   this.flMontaFiltros = flMontaFiltros;

//AQUI-iChave
   //this.lIncAltSeq = false;
   this.oTelaIncAltSeq = null;
   this.iChaveSalva = 0;
}

function flOnMouseDNGridEdicao(event,pjEdicao) {
////////////////////////////////////////////////

   if ((parent.lGlobalLoginRAc==1) && ((parent.iGlobalDesenvolvedor==1) || (parent.iGlobalKeyUser==1))) {
      //alert('flOnMouseDNGridEdicao - event.button='+event.button);
      if (event.button==2) this.flGridEdicaoProgramarRAc(pjEdicao);
   }
}

function flOnMouseUPGridEdicao(event,pjEdicao) {
////////////////////////////////////////////////

   if (event.button==0) {
      //alert('flOnMouseUPGridEdicao');
      if      (pjEdicao==0) this.flGridInc();
      else if (pjEdicao==1) this.flGridAlt();
      else if (pjEdicao==2) this.flGridExc(1);
      else if (pjEdicao==3) this.flGridRInc();
     
   }
}

function flGridEdicaoProgramarRAc(pjEdicao) {   // 0-Inc, 1-Alt, 2-Exc, 3-ReInc
/////////////////////////////////////////////
   var aTipo1 = new Array();
   aTipo1.push('Incluso');
   aTipo1.push('Alterao');
   aTipo1.push('Excluso');
   aTipo1.push('Reincluso');

   if (confirm("Programar Regras de Acesso da ["+aTipo1[pjEdicao]+"] ?")) {   
      var jTipo = 3;   // 3-edio
      var sPar1 = this.sDDSFile;
      var sPar2 = this.sDDSTag;
      var aTit  = this.aTit[0].split('(');
      var sTitX = fsTrim(aTit[0]);
      var sOpt  = 'editar';
      var sVarTmp = jTipo+'~'+sPar1+'~'+sPar2+'~'+sTitX+'~'+sOpt;
      //alert('sVarTmp='+sVarTmp+', pjEdicao='+pjEdicao+', sTit='+sTitX);
      flGrid(null,'dd_files/sysRAcCapa.dda','Padrao_3','','',0,sVarTmp);
   }
}

function fjAliasColunas(psStr) {
////////////////////////////////
   return this.aAliasColunas.indexOf(psStr);
}

function fsTrocaExpMenu(psStr) {
////////////////////////////////
   var sTmp,jTmp;
   var sStr = psStr;
   var aTmp = faScanPattern('[',']',sStr);
   for (var i=0; i < aTmp.length; i++) {
      sTmp = aTmp[i];
      jTmp = this.fjAliasColunas(sTmp);
      if (jTmp>=0) {
         sTmp = '[' + aTmp[i] + ']';
         sOut = 'this.aGrid[this.iArray]['+jTmp+']';
         sStr = sStr.replace(sTmp,sOut);
      }
   }
   //alert(psStr+'\n'+sStr);
   return sStr;
}

function flEvalExpMenu() {
//////////////////////////

//alert('parent.sMnemProp='+parent.sMnemProp);
//alert('parent.sCliPasta='+parent.sCliPasta);

   var jTipo = 0;
   for (var i=0; i < this.aExpMenu.length; i++) {
      var sId  = fsTrim(this.aExpMenu[i][0]);
      var eTmp = fsTrim(this.aExpMenu[i][1]);
//alert('sId='+sId+'\neTmp='+eTmp);
      if (eTmp!=null) {
//ert(eTmp.substr(0,7).toLowerCase()+'\n'+eTmp.substr(0,8).toLowerCase()+'\n'+eTmp.substr(7,eTmp.length-7)+'\n'+eTmp.substr(8,eTmp.length-8))
         if (eTmp.substr(0,7).toLowerCase()=='enable=') {
            jTipo=0;
            eTmp = eTmp.substr(7,eTmp.length-7);
//ert(0);
         } 
         if (eTmp.substr(0,8).toLowerCase()=='visible=') {
            jTipo=1;
            eTmp = eTmp.substr(8,eTmp.length-8);
//ert(1);
         }
//ert('jTipo='+jTipo);
         var eExp = this.fsTrocaExpMenu(eTmp);   // oGridDefault.aGrid[oGridDefault.iArray]][5].length>0
                                                 // [tConf].lenght>0
         var sOpt = this.aExpMenu[i][2];
         lResExp=true;
         if (eExp.length>0) {
             eExp = 'lResExp = ' + eExp;
//alert('eExp='+eExp+', jTipo='+jTipo);
//alert('this.aGrid[this.iArray][7]='+this.aGrid[this.iArray][7]);
//alert(parent.sCliPasta);   
             eval(eExp);
//if (lResExp==true) alert('true');
//else               alert('false');
         }
   //    alert(eExp+'\n'+lResExp);
   //    alert(sId+'\n'+eEx);


         if (jTipo==0) {   // enable
            if (lResExp==false) {
               document.getElementById(sId).style.color='#a0a0a0';
               if (document.getElementById(sId).innerHTML.substr(0,13)=='<div onclick=') {
                  // nao faz nada
               } else {
                  document.getElementById(sId).innerHTML = '<div onclick="event.cancelBubble = true;" onmousedown="event.cancelBubble = true;" onmouseup="event.cancelBubble = true;">' + document.getElementById(sId).innerHTML + '</div>';
               }
            } else {
               document.getElementById(sId).style.color='#06334B';
               if (document.getElementById(sId).innerHTML.substr(0,13)=='<div onclick=') {
                  document.getElementById(sId).innerHTML = sOpt;
               }
            }
         }

         if (jTipo==1) {   // visible
//alert('lResExp='+lResExp);
            var sId2 = fsReplace(sId,'celMenu','cel2Menu');
//alert('sId2='+sId2);
//console.log('sId2='+sId2);
            if (lResExp==false) {
               document.getElementById(sId ).style.display="none";   // invisvel
//               document.getElementById(sId2).style.display="none";   // invisvel
            } else {
               document.getElementById(sId ).style.display="";       // visvel
//               document.getElementById(sId2).style.display="";       // visvel
            }
         }
      }   // if
   }   // for

   if (this.oMenu!=null) {
      for (var j=1; j< this.oMenu.aMenu.length; j++) {
         var oMenu  = document.getElementById("Menu"+j+"_"+this.sId);
         oMenu.style.left  = document.getElementById('celMenu'+j+'_'+this.sId).offsetLeft+10;
      }
   }
}

function flCheckNewPage() {
///////////////////////////

   var sId           = 'divtableGrid_'+this.sId;
   var iTop          = document.getElementById(sId).scrollTop;
   var iHeight       = document.getElementById(sId).scrollHeight;
   var iClientHeight = document.getElementById(sId).clientHeight;
   if (Math.abs(iHeight-iClientHeight)>0) {
      var iPerc      = 100*iTop/(iHeight-iClientHeight);
   } else {
      var iPerc      = 0;
   }


//   document.getElementById("div0").innerHTML = 'iTop: '+iTop+'\niHeight: '+iHeight+'\niClientHeight: '+iClientHeight+'\niPerc: '+iPerc;
//alert('iTop: '+iTop+'\niHeight: '+iHeight+'\niClientHeight: '+iClientHeight+'\niPerc: '+iPerc);


   if ((iPerc>=this.iLimitePerc) && (this.lAddPageRefreshed==true)) {

//   if ((iPerc>this.iLimitePerc) && (iPerc>this.iLastPerc) && (this.lAddPageRefreshed==true) && (Math.abs(iPerc>this.iLimitePerc)>0.5)) {  // (iPerc>this.iLastPerc) estadescendo
//      this.iLimitePerc = (this.iLimitePerc>99 ? 99 : this.iLimitePerc++);
      this.iLastPerc = iPerc;
      this.lAddPageRefreshed=false
//alert('call to flAddPage');
      this.flAddPage();
   }
}

function flAddPage() {
//////////////////////
   var iTipo = 1;
   var lRet  = false;
   var sQry  = this.sQry;
   var iPag  = Number(Number(this.iPage)+Number(iTipo));

   if (((iPag*this.iRecsPage)<this.iTotRecs)&&(iPag>=0)&&((sQry.indexOf(' skip ')>=0)||(sQry.indexOf(' group by ')>=0))) {
      var lRet   = true;
      this.iPage = iPag;
      if (sQry.indexOf(' group by ') ==-1) {
         var aQry   = sQry.split(' skip ');
         var sTm1   = fsTrim(aQry[0]);
         var sTm2   = fsTrim(aQry[1]);
         var aQry   = sTm2.split(' ');
         var sTm2   = '';
         for (var i=1; i<aQry.length; i++) {
            sTm2 += fsTrim(aQry[i])+' ';
         }
         var sQry   = sTm1 + ' skip ' + this.iPage*this.iRecsPage + ' ' + sTm2;
         this.sQry  = sQry;
      }
      lAdd = true;
      this.flRefreshCall(this.sQry,lAdd);
//      document.getElementById("divtableGrid_"+this.sId).scrollTop = 0;
   }
   return lRet;
}
//
function flGotoPage(piTipo) {
/////////////////////////////
   var lRet = false;
   var sQry = this.sQry;
   var iPag = Number(Number(this.iPage)+Number(piTipo));

   if (((iPag*this.iRecsPage)<this.iTotRecs)&&(iPag>=0)&&((sQry.indexOf(' skip ')>=0)||(sQry.indexOf(' group by ')>=0))) {
      var lRet   = true;
      this.iPage = iPag;
      if (sQry.indexOf(' group by ') ==-1) {
         var aQry   = sQry.split(' skip ');
         var sTm1   = fsTrim(aQry[0]);
         var sTm2   = fsTrim(aQry[1]);
         var aQry   = sTm2.split(' ');
         var sTm2   = '';
         for (var i=1; i<aQry.length; i++) {
            sTm2 += fsTrim(aQry[i])+' ';
         }
         var sQry   = sTm1 + ' skip ' + this.iPage*this.iRecsPage + ' ' + sTm2;
         this.sQry  = sQry;
      }
      this.lResfreshTop = true;
      this.flRefreshCall(this.sQry);
//      document.getElementById("divtableGrid_"+this.sId).scrollTop = 0;
//      this.flTopTela();
   }
   return lRet;
}
//
function flGotoFirst(piTipo) {
//////////////////////////////
   var lRet = false;
   var sQry = this.sQry;
   var iPag = 0;
   if (((iPag*this.iRecsPage)<this.iTotRecs)&&(iPag>=0)&&((sQry.indexOf(' skip ')>=0)||(sQry.indexOf(' group by ')>=0))) {
      var lRet   = true;
      this.iPage = iPag;
      if (sQry.indexOf(' group by ') ==-1) {
         var aQry   = sQry.split(' skip ');
         var sTm1   = fsTrim(aQry[0]);
         var sTm2   = fsTrim(aQry[1]);
         var aQry   = sTm2.split(' ');
         var sTm2   = '';
         for (var i=1; i<aQry.length; i++) {
            sTm2 += fsTrim(aQry[i])+' ';
         }
         var sQry   = sTm1 + ' skip ' + this.iPage*this.iRecsPage + ' ' + sTm2;
         this.sQry  = sQry;
      }
      this.lResfreshTop = true;
      this.flRefreshCall(this.sQry);
//      document.getElementById("divtableGrid_"+this.sId).scrollTop = 0;
//      this.flTopTela();
   }
   return lRet;
}
//
function flGotoLast(piTipo) {
/////////////////////////////
   var lRet = false;
   var sQry = this.sQry;
   var iPag = parseInt((this.iTotRecs-1)/this.iRecsPage);
   if (((iPag*this.iRecsPage)<this.iTotRecs)&&(iPag>=0)&&((sQry.indexOf(' skip ')>=0)||(sQry.indexOf(' group by ')>=0))) {
      var lRet   = true;
      this.iPage = iPag;
      if (sQry.indexOf(' group by ') ==-1) {
         var aQry   = sQry.split(' skip ');
         var sTm1   = fsTrim(aQry[0]);
         var sTm2   = fsTrim(aQry[1]);
         var aQry   = sTm2.split(' ');
         var sTm2   = '';
         for (var i=1; i<aQry.length; i++) {
            sTm2 += fsTrim(aQry[i])+' ';
         }
         var sQry   = sTm1 + ' skip ' + this.iPage*this.iRecsPage + ' ' + sTm2;
         this.sQry  = sQry;
      }
      this.lResfreshTop = true;
      this.flRefreshCall(this.sQry);
//      document.getElementById("divtableGrid_"+this.sId).scrollTop = 0;
//      this.flTopTela();
   }
   return lRet;
}

//
function flCallRAc() {
////////////////////////////////////////////////////////////////////////////////////////
// 1) A princpio esse cone de chamada das regras de acesso esto disponveis para:
//    a) Pastas de Docs do Sistema - TDoc 
//    b) Pastas de Docs do Usurio - TDocU
//    c) Temas e comisses         - Temas
//    d) Qdo for subpasta - isso nao esta funcionando
//    e) POPs (regras individuais)
//    f) Documentos da Pasta de Docs do Usurio - TDoc_Doc (regras individuais)
//    g) Projetos - tem q implantar 
//
// 2) Para acessar as regras de acesso o usurio tem q ser:
//    a) Se tiver acesso ao Documento ou a Pasta, ento pode ler as RAcs desses docs 
//
// 3) Para escrever nas regras de acesso o usurio tem q ser:
//    a) root
//    b) ser 1o ou 2o resp pela pasta RAc das Pastas do Sistema
//    c) ter uma regra na pasta RAc que de permissao para escrever
//    d) ser 1o ou 2o responsvel pela pasta do doc que queremos acessar as regras
//
////////////////////////////////////////////////////////////////////////////////////////
   if      (this.sMnemTDoc=='TDoc' ) flGrid(this,'dd_files/RAc.dda','RAc_1');   // NAO EXISTE MAIS, VIROU SOA
   else if (this.sMnemTDoc=='TDocU') flGrid(this,'dd_files/RAc.dda','RAc_TDocU');
//   else if (this.sMnemTDoc=='Temas') flGrid(this,'dd_files/RAc.dda','RAc_1');
   else                              flGrid(this,'dd_files/RAc.dda','RAc_2');
}
//
function fsIdSet() {
////////////////////
   var i;
   var iChave;
   var sRet = '';
   for (i=0; i<this.aGrid.length; i++) {
      iChave = this.fiFlyChaveAtual(i);
      if (i==0) sRet += iChave;
      else sRet += ','+iChave;
   }
   return sRet;
}
function flCallAgenda() {
/////////////////////////
   if (this.sDDSFile=='dd_files/Usu.dda') {
      flGrid(this,'dd_files/Agenda.dda','Agenda_3');
   } else if (this.sDDSFile=='dd_files/POPs.dda') {
      flGrid(this,'dd_files/Agenda.dda','Agenda_2');
   } else {
      flGrid(this,'dd_files/Agenda.dda','Agenda_1');
   }
}
//
function flTelaRange() {
////////////////////////
   this.oTelaRange.oPai = this;
   this.oTelaRange.flDesenhaTela(false,'',false);
}
//
function flEncerraGrid(plE_FuncaoEscRetornar) {
///////////////////////////////////////////////
//console.log('flEncerraGrid');
//console.log('this.lLixeira='+this.lLixeira);
this.aInLineInput_1 = new Array();   // embriao InLine
this.aInLineInput_2 = new Array();   // embriao InLine
this.aInLineInput_3 = new Array();   // embriao InLine
this.aInLineChaIrma = new Array();   // embriao InLine

//alert('this.sDDSFile='+this.sDDSFile+', this.sDDSTag='+this.sDDSTag);

if (this.lEncerrandoGrid==false) {
   this.lEncerrandoGrid=true;
//alert(-1);

   if (this.lLixeira) {
      //console.log('flGridLixeira(0)');
      this.lEncerrandoGrid=false
      this.flGridLixeira(0);
   } else {
//alert(0);
      this.lEnded=true;
      var lE_FuncaoEscRetornar = (plE_FuncaoEscRetornar==null) ? false : plE_FuncaoEscRetornar;
//      if ((this.sMarcados==this.sMarcadosOrig) || confirm("Os dados nao estao gravados, fechar assim mesmo ?")) {
      if ((this.sMarcados==this.sMarcadosOrig) || (true)){   // vai entrar sempre
//alert(1);

         if (this.iAutoRefresh>0) {
            this.iAutoRefresh=0;
            clearTimeout(this.tAutoRefresh);
         }
         var iWA;
         if (this.oPai!=null) {
//alert(2);

            if (this.oPai.sTipo=='grid') {
//alert(3);
               this.oPai.lInvisivel=false;
               if (this.oPai.aTit[0].substr(0,7) == 'Cockpit') {   // ATENCAO ao titulo se mudar
                  this.oPai.flTots1_LerPontual(); 
               }
// AQUI - fdy
               // coloquei a familia erp_ROT... porq os grids no tem qrys, mas funes, e ao sair do grid filho para o pai e remontar a linha, sempre vinha a linha do ult regitro do grid
               if  ((this.oPai.sDDSTag =='OOp_6') 
                  ||(this.oPai.sDDSFile=='dd_files/erp_ROT_1RegTransp.dda') 
                  ||(this.oPai.sDDSFile=='dd_files/erp_ROT_2EstUF.dda') 
                  ||(this.oPai.sDDSFile=='dd_files/erp_ROT_3Intinerarios.dda') 
                  ||(this.oPai.sDDSFile=='dd_files/erp_ROT_4Rotas.dda') 
                  ||(this.oPai.sQry.substr(this.oPai.sQry.length-2,2)=='()'))  {
                  this.oPai.flRefreshCall();  // ATENCAO - (1) Regra para refresh do grid pai qdo sair o subgrid, (2) Esta perdendo a ordenacao do grid feita pelo usuario, acho q resolvi
               } else {
//console.log('this.oPai.flRefreshLinCall() - '+this.oPai.sVarTmp);
//alert('33');
//alert('this.oPai.sQry='+this.oPai.sQry);
                  this.oPai.flRefreshLinCall();
//alert('34');
               }


               oGridDefault = this.oPai;
            } else {
               oGridDefault = null;
            }
//alert(4);

            if (this.oPai.sTipo=='tela') {
               oTelaDefault = this.oPai
            } else { 
               oTelaDefault = null;
            }
            if ((this.oPai.sTipo=='tela')&&(this.oPai.sDDFChamada==3)&&(this.oPai.iWA==0)&&(this.lFuncaoEsc==false)) {   // tela_range
               flDeletaSss(this.iSss);
            } else {
               iWA = this.oPai.iWA;
               if (iWA>=0) {
                  document.getElementById("divWorkArea_"+iWA+"_"+this.oPai.iSss).style.display="";
               }
            }
//alert(5);

            if (this.lFuncaoEsc && lE_FuncaoEscRetornar) {   //  o retorno do grid de escolha da fesc
//alert(6);

// xaqui
//               if (false) {
//alert('this.sId='+this.sId+', this.iSOA='+this.iSOA+', this.lMarcacao='+this.lMarcacao+', this.oPai.aSOAMarcados.length='+this.oPai.aSOAMarcados.length+', this.sMarcados='+this.sMarcados+', this.sMarcadosOrig='+this.sMarcadosOrig);

               if ((this.iSOA>0) && (this.lMarcacao==true) && (this.oPai.aSOAMarcados.length>0)) {
//alert(0);
                  if ((this.sMarcados!=this.sMarcadosOrig) && (this.sMarcados!='/')) {   // funcao esc de soa cujo retonro so registros marcados do grid da funco esc
//alert(1);
//alert('this.oPai.sTagSubGrid='+this.oPai.sTagSubGrid);
                     var aTmp5 = this.oPai.sTagSubGrid.split(',');
//alert('aTmp5.length='+aTmp5.length);
//                     var iLenaTmp5 = aTmp5.length;
                     for (var k=0; k<aTmp5.length; k++) {
                        sTagSOA = aTmp5[k];
         //alert('sTagSOA='+sTagSOA+'\nk='+k+'\nthis.iSOA='+this.iSOA);
                        if (sTagSOA==this.iSOA) break;
                     }


                     var sMarcadosRecentes = '/'+fsTrim(this.sMarcados).substr(this.oPai.aSOAMarcados[k].length,fsTrim(this.sMarcados).length-this.oPai.aSOAMarcados[k].length);
//alert('this.oPai.aSOAMarcados[k]='+this.oPai.aSOAMarcados[k]+'\nthis.sMarcados='+this.sMarcados+'\nsMarcadosRecentes='+sMarcadosRecentes);
                     this.oPai.aSOAMarcados[k] = fsTrim(this.sMarcados);

                     var sIn_EscId = sMarcadosRecentes=='/' ? 0 : ('0'+fsReplace(sMarcadosRecentes,'/',',')+'0'); // esse '0' so para compensar a 1a e a Ua /
//alert('this.sMarcados='+this.sMarcados);
//alert('sIn_EscId='+sIn_EscId);

                     this.oPai.iEscId      = this.fiChaveAtual(); 
                     this.oPai.iEscIdIrma1 = this.fiChaveIrma(1);
                     var oObj = this;
                     var oRequest = foCreateRequest();
                     if ((this.oPai.oPai!=null)&&(this.oPai.oPai.sTipo=='grid')) sIrmasTias = this.oPai.oPai.fsIrmasTias();
                     else sIrmasTias = '';
                     sVars = fsReplace(this.oPai.sVarsContextEsc,'&','[E_COMERCIAL]');
                     oRequest.open("GET","al_GetDDG_RetFEsc.php?sCliPasta="+parent.sCliPasta+"&sFileDDS="+this.sDDSFile+"&sTagDDS="+this.sDDSTag+"&sTDoc="+fsTDocsAncestrais(this.oPai.oPai)+"&sMnemTDoc="+fsMnemTDocsAncestrais(this.oPai.oPai)+"&sAncestrais="+fsChavesAncestrais(this.oPai.oPai)+"&sIrmasTias="+sIrmasTias+"&sEscId="+sIn_EscId+"&sEscIdIrma1="+this.oPai.iEscIdIrma1+"&sLogin="+parent.aGlobalLogin[1]+"&sRoot="+parent.sGlobalRoot+"&spOOp="+parent.sGlobal_pOOp+"&sVars="+sVars+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
                     oRequest.onreadystatechange = function() {
                      if ((oRequest.readyState==4) && (oRequest.status==200)) {
                           sMsg = oRequest.responseText;
                           if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno das Vars da FuncaoEscMarcacao='+sMsg);
                           //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno das Vars da FuncaoEscMarcacao</font>',sMsg);
                           //console.log('Retorno das Vars da FuncaoEscMarcacao='+sMsg);
                           if ((oObj.oPai!=null)&&(oObj.oPai.lEnded==false)) oObj.oPai.flVarsRetornoFuncaoEscSOAMarcados(sMsg,oObj.iSOA);
                        }
                     }
                     flIconeProcess(this.iSss,1);
                     flEnableScreen(this.iSss,false);
                     oRequest.send(null);
                  }                


               } else {   // caso default
                  // Esse trecho " igual" a um trecho da funo flEncerraGrid X flRecarregarCampoFuncaoEsc (chamada do dda) que trata o retorno da fesc. 
                  // Os 2 devem andar sincronizados

                  this.oPai.iEscId      = this.fiChaveAtual();
                  this.oPai.iEscIdIrma1 = this.fiChaveIrma(1);
                  var oObj = this;
                  var oRequest = foCreateRequest();
                  if ((this.oPai.oPai!=null)&&(this.oPai.oPai.sTipo=='grid')) sIrmasTias = this.oPai.oPai.fsIrmasTias();
                  else sIrmasTias = '';
                  sVars = fsReplace(this.oPai.sVarsContextEsc,'&','[E_COMERCIAL]');
                  oRequest.open("GET","al_GetDDG_RetFEsc.php?sCliPasta="+parent.sCliPasta+"&sFileDDS="+this.sDDSFile+"&sTagDDS="+this.sDDSTag+"&sTDoc="+fsTDocsAncestrais(this.oPai.oPai)+"&sMnemTDoc="+fsMnemTDocsAncestrais(this.oPai.oPai)+"&sAncestrais="+fsChavesAncestrais(this.oPai.oPai)+"&sIrmasTias="+sIrmasTias+"&sEscId="+this.oPai.iEscId+"&sEscIdIrma1="+this.oPai.iEscIdIrma1+"&sLogin="+parent.aGlobalLogin[1]+"&sRoot="+parent.sGlobalRoot+"&spOOp="+parent.sGlobal_pOOp+"&sVars="+sVars+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
                  oRequest.onreadystatechange = function() {
                     if ((oRequest.readyState==4) && (oRequest.status==200)) {
                        sMsg = oRequest.responseText;
                        if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno das Vars da FuncaoEsc='+sMsg);
                        //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno das Vars da FuncaoEsc</font>',sMsg);
                        if ((oObj.oPai!=null)&&(oObj.oPai.lEnded==false)) oObj.oPai.flVarsRetornoFuncaoEsc(sMsg);
                     }
                  }
                  flIconeProcess(this.iSss,1);
                  flEnableScreen(this.iSss,false);
                  oRequest.send(null);
               }
            }   // if (this.lFuncaoEsc && lE_FuncaoEscRetornar)
//alert(7);
   
            flCabecSession(this,false);
//alert(8);
         } else {   // if (this.oPai!=null)
//alert(9);
            document.getElementById('divTitSession_'+this.iSss).innerHTML = '&nbsp';
            oGridDefault = null;
            oTelaDefault = null;
            flDeletaSss(this.iSss);
//alert(10);
         }   // if (this.oPai!=null)
         document.getElementById("divWorkArea_"+this.iWA+"_"+this.iSss).innerHTML = '';
         document.getElementById("divWorkArea_"+this.iWA+"_"+this.iSss).style.display="none";
         flDeletaWA(this.iSss,this.iWA);
         if (this.oTelaRange!=null) {
//alert(11);
            if (this.lFuncaoEsc==false) this.oTelaRange.flEncerraTela(true);
//alert(12);
         }
         if      ((this.oPai!=null)&&(this.oPai.sTipo=='grid')&&(this.lFecharPaiAoSair==true)) this.oPai.flEncerraGrid();
         else if ((this.oPai!=null)&&(this.oPai.sTipo=='grid')&&(this.oPai.aGrid.length==0))   this.oPai.flEncerraGrid();
         if ( (this.oPai==null) || ((this.oPai.sTipo=='tela')&&(this.oPai.sDDFChamada==3)&&(this.lFuncaoEsc==false)&&(this.oPai.sTagSubGridRange==false)) ) {
//         if ( (this.oPai==null) || ((this.oPai.sTipo=='tela')&&(this.oPai.sDDFChamada==3)&&(this.lFuncaoEsc==false)) ) {
            flTakeMeFromRodapeBar('divSss_'+this.iSss,this.iSssMn);   // tirando o botao do rodapeBar
         }
         if (this.oPai!=null) {
            if (this.lFuncaoEsc && (lE_FuncaoEscRetornar==false)) {
               this.oPai.flVarsDesisteFuncaoEsc();
            }
         }
      }
//alert(13);
      oVar = null;
      var eBye = this.sId + ' = null;';
      //eval(eBye);   // // tirei isso em pTelaa2.js (e tireu aqui tb por coerencia) pq sequencia da inclusao IncSeq ficou comprometida - 13/11/2018
//alert(eBye);
//      this.sId=null;   // uma tentativa de destroir o obj
   }
}
//alert(1);
}

function flSalvarTodosInputInLine(psGrid) {
///////////////////////////////////////////
   //alert('flSalvarTodosInputInLine->psGrid='+psGrid);
   var oGrid;
   var eEval = 'oGrid='+psGrid+';';
   eval(eEval);
   var aInp_1  = new Array();   // var local
   var aInp_2  = new Array();
   var aInp_3  = new Array();
   var aChaves = new Array(); 
   for (i=0; i<10000; i++) {   // < 10000 de propsito 
      var pChave = oGrid.fiFlyChaveAtual(i);
      if (document.getElementById('inp-1-'+pChave+'-'+psGrid)==null) break;   // essa e a sada do loop
      aInp_1.push(document.getElementById('inp-1-'+pChave+'-'+psGrid).value);
      aInp_2.push(document.getElementById('inp-2-'+pChave+'-'+psGrid).value);
      aInp_3.push(document.getElementById('inp-3-'+pChave+'-'+psGrid).value);
      aChaves.push(pChave);
/*
      if (document.getElementById('inp-1-'+i+'-'+psGrid)==null) break;   // essa e a sada do loop
      aInp_1.push(document.getElementById('inp-1-'+i+'-'+psGrid).value);
      aInp_2.push(document.getElementById('inp-2-'+i+'-'+psGrid).value);
      aInp_3.push(document.getElementById('inp-3-'+i+'-'+psGrid).value);
      aChaves.push(oGrid.aGrid[i][oGrid.iCol]);   // oGrid.aGrid[i][oGrid.iCol=oGrid.fiFlyChaveAtual(i);  
*/
   }

   if (aChaves.length==0) alert('No h nada para salvar');
   //if (aChaves.length==0) flModal('<font color=red>Sistema</font>','No h nada para salvar');
   else {
      sInp_1  = aInp_1.join('~');
      sInp_2  = aInp_2.join('~');
      sInp_3  = aInp_3.join('~');
      sChaves = aChaves.join('~'); 
      sSinal  = sInp_1+'^'+sInp_2+'^'+sInp_3+'^'+sChaves;
   
      if (oGrid.oPai!=null) { 
         var sVars = "bl_SetInLineTodos.php?sSinal="+sSinal+"&sCliPasta="+parent.sCliPasta+"&sFileDDS="+oGrid.sDDSFile+"&sTagDDS="+oGrid.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&pDocPai="+oGrid.oPai.fiChaveAtual();
      } else {
         var sVars = "bl_SetInLineTodos.php?sSinal="+sSinal+"&sCliPasta="+parent.sCliPasta+"&sFileDDS="+oGrid.sDDSFile+"&sTagDDS="+oGrid.sDDSTag+"&sLogin="+parent.aGlobalLogin[1];
      }
//      alert('sVars='+sVars);
      var oRequest = foCreateRequest();
      oRequest.open("GET",sVars,true);
      oRequest.onreadystatechange = function() {
         if ((oRequest.readyState==4) && (oRequest.status==200)) {
            sMsg = oRequest.responseText;
            if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno da flSalvarTodosInputInLine='+sMsg);
            //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno da flSalvarTodosInputInLine</font>',sMsg);
            if (sMsg==1) {
               this.aInLineInput_1 = new Array();
               this.aInLineInput_2 = new Array();
               this.aInLineInput_3 = new Array();
               oGrid.flRefreshCall();
               if ((oGrid.sDDSFile=='dd_files/erp_ORDENS_CanalWeb_Itens.dda') || (oGrid.sDDSFile=='dd_files/erp_ORDENS_CanalWeb_Itens_TQ.dda')) {
                  flCallSysPOP(1154,oGrid);   // recalc Ordem - saida  // esse nao  1154A porque  uma chamada do menu
               }
   
            } else {
               alert(sMsg);
               //flModal('<font color=blue>Sistema</font>',sMsg);
               //document.getElementById('but-'+piLinha).style.display='';
            }
            flIconeProcess(oGrid.iSss,0);
            flEnableScreen(oGrid.iSss,true);
         }
      }
      flIconeProcess(oGrid.iSss,1);
      flEnableScreen(oGrid.iSss,false);
      oRequest.send(null);
   }
}


//var aInLineInput_1 = new Array();
//var aInLineInput_2 = new Array();
//var aInLineInput_3 = new Array();
//var aInLineChaIrma = new Array();
// essa funcao abaixo deixou de ser usada por enquanto
/*
function flSalvarInputInLine(psCampos,psTabela,psIdInputs,psGrid,piLinha,psCasoId) {   // nao esta sendo usando
////////////////////////////////////////////////////////////////////////////////////
//alert('psCampos='+psCampos+'\npsIdInputs='+psIdInputs);
   //*document.getElementById('but-'+piLinha).style.display='none';
   var aContents = new Array();
   var aIdInputs  = psIdInputs.split(',');
   for (i=0; i<aIdInputs.length; i++) {
      //alert('aIdInputs[i]='+aIdInputs[i]);
      var sElement = 'inp-'+aIdInputs[i]+'-'+piLinha+'-'+psGrid;
      //var sElement = 'inp-'+aIdInputs[i]+'-'+piLinha;
      //alert('sElement='+sElement);
      aContents.push(document.getElementById(sElement).value);
   }
   sContents = aContents.join('[,]');   // tipificando a ,  pois em campos S pode haver um , neles

   var oGrid;
   var eEval = 'oGrid='+psGrid+';';
   eval(eEval);
   var oRequest = foCreateRequest();
   var pChave = oGrid.aGrid[piLinha][oGrid.iCol];
//alert('pChave='+pChave);
   var sVars = "bl_SetInLine.php?sCasoId="+psCasoId+"&sCampos="+psCampos+"&sTabela="+psTabela+"&sContents="+sContents+"&sId="+pChave+"&sCliPasta="+parent.sCliPasta+"&sFileDDS="+oGrid.sDDSFile+"&sTagDDS="+oGrid.sDDSTag+"&sLogin="+parent.aGlobalLogin[1];
   //alert('sVars='+sVars);
   oRequest.open("GET",sVars,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno da flSalvarInputInLine='+sMsg);
         if (sMsg==1) {
            this.aInLineInput_1.splice(piLinha,1);
            this.aInLineInput_2.splice(piLinha,1);
            this.aInLineInput_3.splice(piLinha,1);
            //document.getElementById('but-'+piLinha).style.display='none';
            oGrid.flRefreshLinCall();
            if ((oGrid.sDDSFile=='dd_files/erp_ORDENS_CanalWeb_Itens.dda') || (oGrid.sDDSFile=='dd_files/erp_ORDENS_CanalWeb_Itens_TQ.dda')) {
               flCallSysPOP(1154,oGrid);   // recalc Ordem - saida - NAO ESTA SENDO USADO
            }

         } else {
            alert(sMsg);
            //*document.getElementById('but-'+piLinha).style.display='';
         }
         flIconeProcess(oGrid.iSss,0);
         flEnableScreen(oGrid.iSss,true);
      }
   }
   flIconeProcess(oGrid.iSss,1);
   flEnableScreen(oGrid.iSss,false);
   oRequest.send(null);
}
*/

//function flChangeInputInLine(psGrid,psIdInput,piLinha) {
function flChangeInputInLine(psGrid,psIdInput,pChave) {
////////////////////////////////////////////////////////
   var oGrid;
   var eEval = 'oGrid='+psGrid+';';
   eval(eEval);
//--
//   alert(psIdInput);
   var sCont = document.getElementById(psIdInput).value;
   var sNovoCont = '';
   //var iLen = sCont.length;
   for (var i=0; i<sCont.length; i++) {
      var s= sCont.substr(i,1);
      if ((s>=0) || (s<=9) || (s==',')) {
         sNovoCont += s;
      }
   }
   document.getElementById(psIdInput).value = sNovoCont;
 
//--
/*
   if (psIdInput.substr(0,5).toUpperCase()=='INP-1') oGrid.aInLineInput_1[piLinha] = document.getElementById(psIdInput).value;
   if (psIdInput.substr(0,5).toUpperCase()=='INP-2') oGrid.aInLineInput_2[piLinha] = document.getElementById(psIdInput).value;
   if (psIdInput.substr(0,5).toUpperCase()=='INP-3') oGrid.aInLineInput_3[piLinha] = document.getElementById(psIdInput).value;
*/
   if (psIdInput.substr(0,5).toUpperCase()=='INP-1') oGrid.aInLineInput_1[pChave] = document.getElementById(psIdInput).value;
   if (psIdInput.substr(0,5).toUpperCase()=='INP-2') oGrid.aInLineInput_2[pChave] = document.getElementById(psIdInput).value;
   if (psIdInput.substr(0,5).toUpperCase()=='INP-3') oGrid.aInLineInput_3[pChave] = document.getElementById(psIdInput).value;

}

//function flFocusInputInLine(psGrid,piLinha) {   // por causa da navegao pelo <Tab>
function flFocusInputInLine(psGrid,pChave) {   // por causa da navegao pelo <Tab>
/////////////////////////////////////////////
   
   //alert('piLinha='+piLinha);
   var oGrid;
   var eEval = 'oGrid='+psGrid+';';
   eval(eEval);
   //oGrid.flClickLin(piLinha);
   var iLinha = fiChaveTo_iArray[pChave];
   oGrid.flClickLin(iLinha);
}

function flOnKeyPressInLine(poObj,event) {
//////////////////////////////////////////
//console.log('poObj.value='+poObj.value);
/*
   var tecla;
   var sNoValids = 'abcdefghijklmnopqrstuvxywzABCDEFGHIJKLMNOPQRSTUVXYWZ!@#$%&*()_-+=`[{}]~^/?;:.>,<\|';
   if(window.event || !e.which) tecla = e.keyCode; // IE
   else if(e)                   tecla = e.which;   // Netscape

   var sKey = String.fromCharCode(tecla);
   if ((sNoValids.indexOf(sKey)>=0) || (sKey=='"') || (sKey=="'")) {
console.log('false-'+sKey);
      return false;
   } else {
console.log('true-'+sKey);
      return true;
   }
*/
//poObj.value='10,00';
return true;
}
function flRefreshCall_FromTela() {   // para ler a qry de novo do DDA
//////////////////////////////
   this.flRefreshCall('qryDDA');
}
//
function flRefreshCall(psQry,plAdd) {
/////////////////////////////////////
//alert('flRefreshCall');
//console.log('psQry='+psQry);
   var lAdd    = (plAdd>0);
 
   var oObj     = this;
   var sQry     = this.sQry;
   var sQrySum  = this.sQrySum;
   var sQrySum2 = this.sQrySum2;
   var lCabec  = true;
   if (psQry!=null) {
      if (psQry==false) lCabec=false;
      else sQry = psQry;
   }
   if (psQry=='qryDDA') {
      sQry='';   // vai ler do DDA
   }
   
   if (this.pChaveDinamica>0) {
      sQry     = fsReplace(sQry     ,this.pChaveDinamica,'{pChaveDinamica}');
      sQrySum  = fsReplace(sQrySum  ,this.pChaveDinamica,'{pChaveDinamica}');
      sQrySum2 = fsReplace(sQrySum2 ,this.pChaveDinamica,'{pChaveDinamica}');
      //alert('sQry='+sQry);
   }
   //console.log('flRefreshCall->sQry='+sQry);
   var oRequest = foCreateRequest();
   if (this.lFuncaoEsc) sVars = this.oPai.sVarsContextEsc;
   else sVars = '';
   // no refresh e auto refresh na questao dos ancestrais coloco o inicio como this.oPai, para ser igual qdo o grid inicia pela 1a vez
   sQry     = fsReplace(sQry     ,'+','[MAIS]');
   sQrySum  = fsReplace(sQrySum  ,'+','[MAIS]');
   sQrySum2 = fsReplace(sQrySum2 ,'+','[MAIS]');

   sQry     = fsReplace(sQry     ,'%','[PORC]');
   sQrySum  = fsReplace(sQrySum  ,'%','[PORC]');
   sQrySum2 = fsReplace(sQrySum2 ,'%','[PORC]');

   //alert('this.sMarcados='+this.sMarcados);
//   var iLensQry = sQry.length;
   if (sQry.length>0) {
      while (sQry.indexOf("  ") >= 0) {
         sQry = fsReplace(sQry,'  ',' ');
      }
   }
//   var iLensQrySum = sQrySum.length;
   if (sQrySum.length>0) {
      while (sQrySum.indexOf("  ") >= 0) {
         sQrySum = fsReplace(sQrySum,'  ',' ');
      }
   }
//   var iLensQrySum2 = sQrySum2.length;
   if (sQrySum2.length>0) {
      while (sQrySum2.indexOf("  ") >= 0) {
         sQrySum2 = fsReplace(sQrySum2,'  ',' ');
      }
   }

   if (this.oCaller!=null) {
      ioCaller_ChaveAtual = this.oCaller.fiChaveAtual();
   } else {
      ioCaller_ChaveAtual = 0;
   }

   if (this.aFiltrosSet.length>0) {
      var aTmp = [];
      for (var i in this.aFiltrosSet) aTmp.push(this.aFiltrosSet[i] ? 1 : 0);
      var sFiltrosSet = aTmp.join();   // default = ','
   } else var sFiltrosSet='';
   //console.log('sFiltrosSet='+sFiltrosSet);

   if ((this.oPai!=null)&&(this.oPai.sTipo=='grid'))  {
      //var sCmd = "al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sMarcados="+this.sMarcados+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim="+(this.lSlim==true?1:0)+"&sCalendario="+this.sRetornoCalendario+"&sTipo=1&sFileDDS="+this.sDDSFile+"&sTagDDS="+this.sDDSTag+"&sTDoc="+fsTDocsAncestrais(this.oPai)+"&sMnemTDoc="+fsMnemTDocsAncestrais(this.oPai)+"&sAncestrais="+fsChavesAncestrais(this.oPai)+"&sIrmasTias="+this.oPai.fsIrmasTias()+"&sLogin="+parent.aGlobalLogin[1]+"&sVars="+escape(sVars)+"&sQry="+escape(sQry)+"&sQrySum="+escape(sQrySum)+"&sQrySum2="+escape(sQrySum2)+"&iRecsPage="+this.iRecsPage+"&iPage="+this.iPage+"&sRoot="+parent.sGlobalRoot+"&sSearch="+this.sLastSearchedTxt+"&sId="+this.iChaveRefresh+"&spOOp="+parent.sGlobal_pOOp+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+"&sVarTmp="+this.sVarTmp;
      var sCmd = "al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sMarcados="+this.sMarcados+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim="+(this.lSlim==true?1:0)+"&sCalendario="+this.sRetornoCalendario+"&sTipo=1&sFileDDS="+this.sDDSFile+"&sTagDDS="+this.sDDSTag+"&sTDoc="+fsTDocsAncestrais(this.oPai)+"&sMnemTDoc="+fsMnemTDocsAncestrais(this.oPai)+"&sAncestrais="+fsChavesAncestrais(this.oPai)+"&sIrmasTias="+this.oPai.fsIrmasTias()+"&sLogin="+parent.aGlobalLogin[1]+"&sVars="+sVars+"&sQry="+sQry+"&sQrySum="+sQrySum+"&sQrySum2="+sQrySum2+"&iRecsPage="+this.iRecsPage+"&iPage="+this.iPage+"&sRoot="+parent.sGlobalRoot+"&sSearch="+this.sLastSearchedTxt+"&sId="+this.iChaveRefresh+"&spOOp="+parent.sGlobal_pOOp+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+"&sVarTmp="+this.sVarTmp+'&iTimeLogin='+iGlobalTimeLogin+"&ioCaller_ChaveAtual="+ioCaller_ChaveAtual+'&sPesquisarFull='+this.sPesquisarFull+'&sFiltrosSet='+sFiltrosSet;
   } else {
      //var sCmd = "al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sMarcados="+this.sMarcados+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim="+(this.lSlim==true?1:0)+"&sCalendario="+this.sRetornoCalendario+"&sTipo=1&sFileDDS="+this.sDDSFile+"&sTagDDS="+this.sDDSTag+"&sTDoc="+fsTDocsAncestrais(this.oPai)+"&sMnemTDoc="+fsMnemTDocsAncestrais(this.oPai)+"&sAncestrais="+fsChavesAncestrais(this.oPai)+"&sIrmasTias=                           &sLogin="+parent.aGlobalLogin[1]+"&sVars="+escape(sVars)+"&sQry="+escape(fsReplace(sQry,'  ',' '))+"&sQrySum="+escape(sQrySum)+"&sQrySum2="+escape(sQrySum2)+"&iRecsPage="+this.iRecsPage+"&iPage="+this.iPage+"&sRoot="+parent.sGlobalRoot+"&sSearch="+this.sLastSearchedTxt+"&sId="+this.iChaveRefresh+"&spOOp="+parent.sGlobal_pOOp+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+"&sVarTmp="+this.sVarTmp;
      var sCmd = "al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sMarcados="+this.sMarcados+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim="+(this.lSlim==true?1:0)+"&sCalendario="+this.sRetornoCalendario+"&sTipo=1&sFileDDS="+this.sDDSFile+"&sTagDDS="+this.sDDSTag+"&sTDoc="+fsTDocsAncestrais(this.oPai)+"&sMnemTDoc="+fsMnemTDocsAncestrais(this.oPai)+"&sAncestrais="+fsChavesAncestrais(this.oPai)+"&sIrmasTias=                           &sLogin="+parent.aGlobalLogin[1]+"&sVars="+sVars+"&sQry="+sQry+"&sQrySum="+sQrySum+"&sQrySum2="+sQrySum2+"&iRecsPage="+this.iRecsPage+"&iPage="+this.iPage+"&sRoot="+parent.sGlobalRoot+"&sSearch="+this.sLastSearchedTxt+"&sId="+this.iChaveRefresh+"&spOOp="+parent.sGlobal_pOOp+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+"&sVarTmp="+this.sVarTmp+'&iTimeLogin='+iGlobalTimeLogin+"&ioCaller_ChaveAtual="+ioCaller_ChaveAtual+'&sPesquisarFull='+this.sPesquisarFull+'&sFiltrosSet='+sFiltrosSet;
   }

   this.sPesquisarFull = '';   // resetando   
//alert('sCmd='+sCmd);
   //oRequest.open("GET",sCmd,true);
   var aTmp  = sCmd.split('?');
   var sProc = aTmp[0];
   var sVars = aTmp[1];
   //console.log('sCmd='+sCmd);
   //console.log('sProc='+sProc);
   //console.log('sVars='+sVars);
   oRequest.open("POST",sProc,true);
   //console.log('sQry='+sQry);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         var sMsg = oRequest.responseText;
         //console.log('sMsg='+sMsg);
         //alert('Retorno refresh-call:'+(sMsg));
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno refresh-call:'+(sMsg));
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno refresh-call</font>',sMsg);
         if ((oObj!=null)&&(oObj.lEnded==false)) {
            //alert('sMsg='+sMsg);
            flRemoveInLineElements(oObj.sId);
            oObj.flRefreshScreen(sMsg,lCabec,lAdd);
         } else if (oObj!=null) {   // fdy 10/11/18 - grid silim CUP -> incluir* -> tela de cpf -> gridNr0 -> tela incluso -> gridNr0(ou1) -> tela CPF - travava nesse caminho
            flIconeProcess(oObj.iSss,0);
            flEnableScreen(oObj.iSss,true);
         }
      }
   }
   flIconeProcess(this.iSss,1);
   flEnableScreen(this.iSss,false);
   //oRequest.send(null);
   oRequest.setRequestHeader("Content-Type","application/x-www-form-urlencoded");
   //console.log('sVars='+sVars);
   oRequest.send(sVars);
}

function flRemoveInLineElements(psGridId) {
///////////////////////////////////////////
   var sCla = "edicao-inline-"+psGridId;
   var aArr = document.getElementsByClassName(sCla);
   var iArr = aArr.length;
/*
   for (var i=0; i<iArr; i++) {
      var oObj = aArr[i];
      console.log('i/iArr='+i+'/'+iArr+', oObj='+oObj.id);
      //oObj.parentNode.removeChild(oObj);
   }
*/
   while (iArr>0) {
      var oObj = aArr[0];
      //console.log('i/iArr='+i+'/'+iArr+', oObj='+oObj.id);
      oObj.parentNode.removeChild(oObj);
      iArr=aArr.length;
   }
}

function flRefreshLinCall(psQry,piTipo) {
/////////////////////////////////////////
//console.log('flRefreshLinCall-inicio');
   var oObj  = this;
   var iCursorLin = this.iCursorLin;
//alert(this.iCursorLin);
//   oObj.flRefreshCall(psQry);    // AQUI - fdy

///*    // AQUI - fdy
// esse codigo foi paipado porque esta pegando fiChaveAtual() errado , esta colocando um 151^por exemplo. Acho que tem que tratar melhor o sinal,
// outra coisa, esse sinal tem que trazer o \sql\sxum atualizado tb.

//console.log('this.fiChaveAtual()='+this.fiChaveAtual());
   if (IsNumeric(this.fiChaveAtual())) {
//   if (false) {
//alert('1-'+this.fiChaveAtual());
      var sQry     = this.sQry;
      var sQrySum  = this.sQrySum;
      var sQrySum2 = this.sQrySum2;
      var lCabec = true;
      if (psQry!=null) {
         if (psQry==false) lCabec=false;
         else sQry = psQry;
      }
      var oRequest = foCreateRequest();
      if (this.lFuncaoEsc) sVars = this.oPai.sVarsContextEsc;   // no caso do flRefreshLinCall acho que nao ter funcao esc
      else sVars = '';
      // no refresh e auto refresh na questao dos ancestrais coloco o inicio como this.oPai, para ser igual qdo o grid inicia pela 1a vez
      sQry     = fsReplace(sQry     ,'+','[MAIS]');
      sQrySum  = fsReplace(sQrySum  ,'+','[MAIS]');
      sQrySum2 = fsReplace(sQrySum2 ,'+','[MAIS]');

      sQry     = fsReplace(sQry     ,'  ',' ');
      sQrySum  = fsReplace(sQrySum  ,'  ',' ');
      sQrySum2 = fsReplace(sQrySum2 ,'  ',' ');

   
      if ((this.oPai!=null)&&(this.oPai.sTipo=='grid'))  {
         var sCmd = "al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sCliPasta="+parent.sCliPasta+"&sMarcados="+this.sMarcados+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim="+(this.lSlim==true?1:0)+"&sCalendario="+this.sRetornoCalendario+"&sTipo=5&sFileDDS="+this.sDDSFile+"&sTagDDS="+this.sDDSTag+"&sTDoc="+fsTDocsAncestrais(this.oPai)+"&sMnemTDoc="+fsMnemTDocsAncestrais(this.oPai)+"&sAncestrais="+fsChavesAncestrais(this.oPai)+"&sIrmasTias="+this.oPai.fsIrmasTias()+"&sLogin="+parent.aGlobalLogin[1]+"&sVars="+escape(sVars)+"&sQry="+escape(fsReplace(sQry,'  ',' '))+"&sQrySum="+escape(sQrySum)+"&sQrySum2="+escape(sQrySum2)+"&iRecsPage="+this.iRecsPage+"&iPage="+this.iPage+"&sRoot="+parent.sGlobalRoot+"&sSearch="+this.sLastSearchedTxt+"&sId="+this.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin+"&sVarTmp="+this.sVarTmp;
         //console.log('comando1='+sCmd);
      } else {
         var sCmd = "al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sCliPasta="+parent.sCliPasta+"&sMarcados="+this.sMarcados+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim="+(this.lSlim==true?1:0)+"&sCalendario="+this.sRetornoCalendario+"&sTipo=5&sFileDDS="+this.sDDSFile+"&sTagDDS="+this.sDDSTag+"&sTDoc="+fsTDocsAncestrais(this.oPai)+"&sMnemTDoc="+fsMnemTDocsAncestrais(this.oPai)+"&sAncestrais="+fsChavesAncestrais(this.oPai)+"&sIrmasTias=&sLogin="+parent.aGlobalLogin[1]+"&sVars="+escape(sVars)+"&sQry="+escape(fsReplace(sQry,'  ',' '))+"&sQrySum="+escape(sQrySum)+"&sQrySum2="+escape(sQrySum2)+"&iRecsPage="+this.iRecsPage+"&iPage="+this.iPage+"&sRoot="+parent.sGlobalRoot+"&sSearch="+this.sLastSearchedTxt+"&sId="+this.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin+"&sVarTmp="+this.sVarTmp;
         //console.log('comando2='+sCmd);
      }
      //oRequest.open("GET",sCmd,true);   
      var aTmp  = sCmd.split('?');
      var sProc = aTmp[0];
      var sVars = aTmp[1];
      //console.log('sCmd='+sCmd);
      //console.log('sProc='+sProc);
      //console.log('sVars='+sVars);
//alert('sCmd='+sCmd);

      oRequest.open("POST",sProc,true);
  
      oRequest.onreadystatechange = function() {
         if ((oRequest.readyState==4) && (oRequest.status==200)) {
            sMsg = oRequest.responseText;
            if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno refresh lin-call:'+(sMsg));
            //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno refresh lin-call</font>',sMsg);
            //console.log('sMsg='+sMsg);

            //alert('Retorno refresh lin-call:'+(sMsg));
            //alert('aTmp1.length='+aTmp1.length);
            //alert('aGrid[oObj.iArray].length='+oObj.aGrid[oObj.iArray].length);
   
            lTemRegistros=false;
            if (sMsg!='') {
               aTmp1 = sMsg.split(sTokenLinhas);
               var k2 = 0;
               //var iLenaTmp1 = aTmp1.length;
               for (var i=0; i < aTmp1.length; i++) {
                  //console.log('aTmp1[i]='+aTmp1[i]+'\nsQrySum2='+sQrySum2);
                  aTmp2 = aTmp1[i].split('~');
                  //var iLenaTmp2 = aTmp2.length;
                  if (Number(aTmp2[aTmp2.length-1])<='-1') {     // eh o rodape
                     oObj.aRodape[k2] = new Array();
                     for (var j=0; j < aTmp2.length; j++) {
                        //var iLenaTmp2j = aTmp2[j].length;
                        if (aTmp2[j].length>0) {
                           oObj.aRodape[k2][j] = aTmp2[j];
                           while (oObj.aRodape[k2][j].indexOf(" ") >= 0) {
                              oObj.aRodape[k2][j] = oObj.aRodape[k2][j].replace(" ","&nbsp;");
                           }
                        } else oObj.aRodape[k2][j] = "&nbsp;";
                     }
                     ++k2;
                  } else {   // if (Number(aTmp2[aTmp2.length-1])<='-1') {     // neh o rodape  ->  CONTEUDO
                     //var iLenaTmp2 = aTmp2.length;
                     for (var j=0; j<aTmp2.length; j++) {
                     //alert('j='+j+'\naTmp[j]='+aTmp2[j]);
                        lTemRegistros=true;
                        if (oObj.aTitCol[j]!=null) {
                           var aTyp = oObj.aTitCol[j].split('-');
                           var sTyp = aTyp[1];
                           if ((sTyp=='n') && (aTmp2[j]!='')) {
                              var sInt=10; // valores default
                              var sDec=2;
                              //var iLenaTyp = aTyp.length;
                              if (aTyp.length>=3) sInt = aTyp[2];
                              if (aTyp.length>=4) sDec = aTyp[3];
                              oObj.aGrid[oObj.iArray][j] = fsFmtDecimal(aTmp2[j],sDec,true);  
                           } else {
                              oObj.aGrid[oObj.iArray][j] = aTmp2[j];
                           }
                        } else {   // caso da Chave e Chave Irmas
                           oObj.aGrid[oObj.iArray][j] = aTmp2[j];
                        }
   
   //this.flRefreshCall(this.sQryOriginal);
               //alert('oObj.iCursorLin='+oObj.iCursorLin);
                     }   // for (var j=0; j<aTmp2.length; j++) {
                  }   // if (Number(aTmp2[aTmp1.length-1])<='-1') {     // eh o rodape
               }   // for (var i=0; i < aTmp1.length; i++) {
            }
   
//alert('lTemRegistros='+lTemRegistros);
            if (lTemRegistros==true) {
               oObj.flMontaLinha(iCursorLin);
               oObj.flMontaRodape();
               flIconeProcess(oObj.iSss,0);   // (* tive q tirar isso la de baixo e colocar aqui e em maos 2 lugares (**) para nao rodar na linha (***)
               flEnableScreen(oObj.iSss,true);
               oObj.flAjustaColunas();
            } else {
//alert(oObj.sDDSFile+'-'+oObj.sDDSTag);
               if ( ((oObj.sDDSFile=='dd_files/MI.dda') && (oObj.sDDSTag=='MI_2A'))
                  ||((oObj.sDDSFile=='dd_files/Memo.dda') && (oObj.sDDSTag=='Memo_2A')) 
                  ) {
                  // Fazer nada
                  flIconeProcess(oObj.iSss,0);   // (* tive q tirar isso la de baixo e colocar aqui e em maos 2 lugares (**) para nao rodar na linha (***)
                  flEnableScreen(oObj.iSss,true);
               } else {
//alert('Pre-flRefreshCall');
                  oObj.flRefreshCall(psQry);   // linha (***)
               }
            }
            oObj.lRefreshed=true;

            // aqui Chamada automatica da hallos para o proximo formulrio
            if ((oObj.sDDSFile=='dd_files/Assessment_Temas.dda') && (parent.sMnemProp=='hallos_teste')) {
               if (piTipo==1) {   // avanar
                  if ((oObj.iArray+1)>=oObj.aGrid.length) {
                     if (parent.sMnemProp=='hallos_ing') {
                        flCallSysPOP(30000,oObj,'At the end of this activity you can no longer change. Confirms the conclusion?',oObj.fiChaveAtual());
                     } else if (parent.sMnemProp=='hallos_esp') {
                        flCallSysPOP(30000,oObj,'Al final de esta actividad ya no se puede cambiar. Confirma la conclusin?',oObj.fiChaveAtual());
                     } else {
                        flCallSysPOP(30000,oObj,'Ao finalizar esta atividade voc no poder mais alterar. Confirma concluso?',oObj.fiChaveAtual());
                     }
                  } else if ((oObj.iArray+2)>=oObj.aGrid.length) {
                     oObj.flDesceLin();
                     if (parent.sMnemProp=='hallos_ing') {
                        alert('Directing to the last question');
                        //flModal('<font color=blue>System</font>','Directing to the last question');
                     } else if (parent.sMnemProp=='hallos_esp') {
                        alert('Dirigir a la ltima pregunta');
                        //flModal('<font color=blue>Sistema</font>','Dirigir a la ltima pregunta');
                     } else {
                        alert('Direcionando para a ltima pergunta');
                        //flModal('<font color=blue>Sistema</font>','Direcionando para a ltima pergunta');
                     }
                     oObj.flGridAlt();
                  } else {
                     oObj.flDesceLin();
                     /*
                     if (parent.sMnemProp=='hallos_ing') {
                        alert('Directing to the next question');
                     } else if (parent.sMnemProp=='hallos_esp') {
                        alert('Dirigir a la siguiente pregunta');
                     } else {
                        alert('Direcionando para a prxima pergunta');
                     }
                     */
                     oObj.flGridAlt();
                  }
               } //if (piTipo==1) {

               if (piTipo==-1) {   // retornar
                  oObj.flSobeLin();
                  /*
                  if (parent.sMnemProp=='hallos_ing') {
                     alert('Directing to the previous question');
                  } else if (parent.sMnemProp=='hallos_esp') {
                     alert('Dirigir a la pregunta anterior');
                  } else {
                     alert('Direcionando para a pergunta anterior');
                  }
                  */
                  oObj.flGridAlt();
               } // if (piTipo==-1) {

               flIconeProcess(oObj.iSss,0);   // (* tive q tirar isso la de baixo e colocar aqui e em maos 2 lugares (**) para nao rodar na linha (***)
               flEnableScreen(oObj.iSss,true);
            } //if ((oObj.sDDSFile=='dd_files/Assessment_Temas.dda')) {
            //flIconeProcess(oObj.iSss,0);   // (* tive q tirar isso la de baixo e colocar aqui e em maos 2 lugares (**) para nao rodar na linha (***)
            //flEnableScreen(oObj.iSss,true);

         }
      }
      flIconeProcess(this.iSss,1);
      flEnableScreen(this.iSss,false);
      //console.log('send');
      //oRequest.send(null);
      //console.log('2) sVars='+sVars);
      oRequest.setRequestHeader("Content-Type","application/x-www-form-urlencoded");
      oRequest.send(sVars);

   } else {
//alert('2-'+this.fiChaveAtual());
      oObj.flRefreshCall(psQry);
   }
//*/  // AQUI - fdy
}

function flAutoRefreshCall(psQry) {
///////////////////////////////////
   var oObj  = this;
   var sQry   = this.sQry;
   var lCabec = true;
   if (psQry!=null) {
      if (psQry==false) lCabec=false;
      else sQry = psQry;
   }

   var oRequest = foCreateRequest();
   // no refresh e auto refresh na questao dos ancestrais coloco o inicio como this.oPai, para ser igual qdo o grid inicia pela 1a vez
   if ((this.oPai!=null)&&(this.oPai.sTipo=='grid')) oRequest.open("GET","al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim="+(this.lSlim==true?1:0)+"&sCalendario="+this.sRetornoCalendario+"&sTipo=1&sFileDDS="+this.sDDSFile+"&sTagDDS="+this.sDDSTag+"&sTDoc="+fsTDocsAncestrais(this.oPai)+"&sMnemTDoc="+fsMnemTDocsAncestrais(this.oPai)+"&sAncestrais="+fsChavesAncestrais(this.oPai)+"&sIrmasTias="+this.oPai.fsIrmasTias()+"&sLogin="+parent.aGlobalLogin[1]+"&sQry="+escape(sQry)+"&iRecsPage="+this.iRecsPage+"&iPage="+this.iPage+"&sRoot="+parent.sGlobalRoot+"&spOOp="+parent.sGlobal_pOOp+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true); 
   else                                              oRequest.open("GET","al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim="+(this.lSlim==true?1:0)+"&sCalendario="+this.sRetornoCalendario+"&sTipo=1&sFileDDS="+this.sDDSFile+"&sTagDDS="+this.sDDSTag+"&sTDoc="+fsTDocsAncestrais(this.oPai)+"&sMnemTDoc="+fsMnemTDocsAncestrais(this.oPai)+"&sAncestrais="+fsChavesAncestrais(this.oPai)+"&sIrmasTias=                           &sLogin="+parent.aGlobalLogin[1]+"&sQry="+escape(sQry)+"&iRecsPage="+this.iRecsPage+"&iPage="+this.iPage+"&sRoot="+parent.sGlobalRoot+"&spOOp="+parent.sGlobal_pOOp+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
  
//   if (this.oPai==null) oRequest.open("GET","al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim="+(this.lSlim==true?1:0)+"&sCalendario="+this.sRetornoCalendario+"&sTipo=1&sFileDDS="+this.sDDSFile+"&sTagDDS="+this.sDDSTag+"&sTDoc="+fsTDocsAncestrais(this.oPai)+"&sMnemTDoc="+fsMnemTDocsAncestrais(this.oPai)+"&sAncestrais="+fsChavesAncestrais(this.oPai)+"&sIrmasTias=                           &sLogin="+parent.aGlobalLogin[1]+"&sQry="+escape(sQry)+"&iRecsPage="+this.iRecsPage+"&iPage="+this.iPage+"&sRoot="+parent.sGlobalRoot+"&spOOp="+parent.sGlobal_pOOp+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor,true);
//   else                 oRequest.open("GET","al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim="+(this.lSlim==true?1:0)+"&sCalendario="+this.sRetornoCalendario+"&sTipo=1&sFileDDS="+this.sDDSFile+"&sTagDDS="+this.sDDSTag+"&sTDoc="+fsTDocsAncestrais(this.oPai)+"&sMnemTDoc="+fsMnemTDocsAncestrais(this.oPai)+"&sAncestrais="+fsChavesAncestrais(this.oPai)+"&sIrmasTias="+this.oPai.fsIrmasTias()+"&sLogin="+parent.aGlobalLogin[1]+"&sQry="+escape(sQry)+"&iRecsPage="+this.iRecsPage+"&iPage="+this.iPage+"&sRoot="+parent.sGlobalRoot+"&spOOp="+parent.sGlobal_pOOp+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor,true);

   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
//         alert('auto-refresh-call:'+(sMsg));
         if ((oObj!=null)&&(oObj.lEnded==false)) {
//alert(0);
            if (oObj.iAutoRefresh>0) {   // o flEncerraGrid seta essa cara pra 0
//alert('1-'+oObj.aGrid.length+'-'+oObj.aGrid[0].length+'-'+oObj.aGrid[0][0]);
               if (((oObj.aGrid.length>0)&&(oObj.aGrid[0].length>0)&&(oObj.aGrid[0][0].length>0)) || (oObj.sTipoNr0==3)) {
//alert(2);
                  oObj.flRefreshScreen(sMsg,lCabec);
               } else {
//alert(3);
                  flIconeProcess(oObj.iSss,0);
                  flEnableScreen(oObj.iSss,true);
               }
               oObj.tAutoRefresh = setTimeout(oObj.sId+'.flAutoRefreshCall()',oObj.iAutoRefresh*1000);
            }
         }
      }
   }
   if (this.iAutoRefresh>0) {
      flIconeProcess(this.iSss,1);
      flEnableScreen(this.iSss,false);
      oRequest.send(null);
   }
}

function flRefreshScreen(psMsg,plCabec,plAdd) {
///////////////////////////////////////////////
//alert('flRefreshScreen');
   //ResultSet
   var k  = 0;
   var k2 = 0;
   var iChave;

//   if (''+this.iChaveRefresh>'0') {   // chave composta
   if (this.iChaveRefresh!=0) {   // chave composta
//alert(0);
      iChave = this.iChaveRefresh;
      this.iChaveRefresh = 0;
//AQUI-iChave-Logar??
      var iChv = iChave
   } else {
//alert('1-'+this.fiChaveAtual()); 
      iChave = this.fiChaveAtual();
//AQUI-iChave-Logar??
      var iChv = 0;
   }
   aTmp1 = psMsg.split(sTokenLinhas);

   this.sQry     = aTmp1[0];
   this.sQrySum  = aTmp1[1];
   this.sQrySum2 = aTmp1[2];
   this.aTit     = aTmp1[3].split(String.fromCharCode(10));
   this.iTotRecs = aTmp1[4];
   this.pChaveDinamica= aTmp1[5];
   //alert('flRefreshScreen->this.pChaveDinamica='+this.pChaveDinamica);
   var iProxIndice = 6;

//alert('iTotRecs='+this.iTotRecs);
//   var iLenaTit = this.aTit.length;
   for (i=0; i<this.aTit.length; i++) {
      this.aTit[i] = fsReplace(this.fsInterpreta(this.aTit[i]),'_',';');
   }
   if (parent.sMnemProp=='hallos_esp') {
      this.aTit[0] = (this.lLixeira==true ? ' <span style="background-color: #BB0000;"><b>VERTEDERO</b></span> - ' : '') + this.aTit[0];
   } else if (parent.sMnemProp=='hallos_ing') {
      this.aTit[0] = (this.lLixeira==true ? ' <span style="background-color: #BB0000;"><b>DUMP</b></span> - ' : '') + this.aTit[0];
   } else {
      this.aTit[0] = (this.lLixeira==true ? ' <span style="background-color: #BB0000;"><b>LIXEIRA</b></span> - ' : '') + this.aTit[0];
   }
   if (plAdd==false) this.aGrid = new Array();
   if (plAdd==true)  k = this.aGrid.length;
//   if ((this.lFuncaoEsc==true)||(this.lPesquisandoNr0==true)) this.sBCorCurAtivo=this.sBCorCurAtivo2;
   if (this.lFuncaoEsc==true) this.sBCorCurAtivo=this.sBCorCurAtivo2;
   else                       this.sBCorCurAtivo=this.sBCorCurAtivo1;

//   alert('this.iTotRecs='+this.iTotRecs+'\nthis.sTipoNr0='+this.sTipoNr0);
//   if ((this.iTotRecs>0) || (this.sTipoNr0==3)) {
   if ((this.iTotRecs>0) || (this.sTipoNr0==2)) {
      //var iLenaTmp1 = aTmp1.length;
      for (var i=iProxIndice; i < aTmp1.length; i++) {
         aTmp2 = aTmp1[i].split('~');
         //var iLenaTmp2 = aTmp2.length;
         if (Number(aTmp2[aTmp2.length-1])<='-1') {     // eh o rodape
	         this.lTemRodape = true;
            this.aRodape[k2] = new Array();
            for (var j=0; j < aTmp2.length; j++) {
               if (aTmp2[j].length>0) {
  	               this.aRodape[k2][j] = aTmp2[j];  
                  while (this.aRodape[k2][j].indexOf(" ") >= 0) {
                     this.aRodape[k2][j] = this.aRodape[k2][j].replace(" ","&nbsp;");
	               }     
               } else this.aRodape[k2][j] = "&nbsp;";
            }
            ++k2;

   	   } else {                               // dados do grid
            this.aGrid[k] = new Array();
            //var iLenaTmp2 = aTmp2.length;
            for (var j=0; j < aTmp2.length; j++) {

               var sStr = this.sLastSearchedTxt;
               //var iLensStr = sStr.length;
               if ((sStr.length>0) && (j<(this.iCol))) {

                  var lAlfa = true;
                  for (var kk=0; kk < sStr.length; kk++) {
                     var s = sStr.substr(kk,1);
                     if (((s.toUpperCase()>='A') && (s.toUpperCase()<='Z'))==false) {
                        lAlfa = false;
                        break;
                     }
                  }
                  if (lAlfa==true) var sTmp = '/'+sStr+'/ig';
                  else var sTmp = "'"+sStr+"'";

//
// AQUI AONDE SINALIZA NO GRID O CONTEUDO DA PESQUISA
// Nao funcionou a Cor VERMELHA

                     if (aTmp2[j].indexOf("flMarcado(") >= 0) {
                     } else {
                        if (this.aTitCol[j]!=null) {
                           var aTyp = this.aTitCol[j].split('-');
                           var sTyp = aTyp[1];
                           if ((sTyp!='x') && (sTyp!='t') && (sTyp!='d')) aTmp2[j] = aTmp2[j].replace(eval(sTmp),'<i><b><span style="color: #000099;">['+sStr.toUpperCase()+']</span></b></i>');
                        } else aTmp2[j] = aTmp2[j].replace(eval(sTmp),'<i><b><span style="color: #000099;">['+sStr.toUpperCase()+']</span></b></i>');
                     }
               }


               this.aGrid[k][j] = aTmp2[j];  
               while (this.aGrid[k][j].indexOf(" ") >= 0) {
                  this.aGrid[k][j] = this.aGrid[k][j].replace(" ","&nbsp;");
               }
   
               if (this.aTitCol[j]!=null) {
                  var aTyp = this.aTitCol[j].split('-');
                  var sTyp = aTyp[1];
                  if ((sTyp=='n') && (aTmp2[j]!='')) {
                     var sInt=10; // valores default
                     var sDec=2;
                     //var iLenaTyp = aTyp.length;
                     if (aTyp.length>=3) sInt = aTyp[2];
                     if (aTyp.length>=4) sDec = aTyp[3];
                     this.aGrid[k][j] = fsFmtDecimal(aTmp2[j],sDec,true);  
                  }
               } 
            }
            ++k;
         }
      }
      this.flTrataGridTable();
//alert('iChave='+iChave);
      this.flRastroReg(iChave);
      this.flMontaTela(iChave);

//AQUI-iChave-Logar??
      if (this.fiChaveAtual()!=iChv) console.log('flRefreshScreen-AQUI-iChv='+iChv+', this.fiChaveAtual='+this.fiChaveAtual()+', this.sDDSFile='+this.sDDSFile+', this.sDDSTag='+this.sDDSTag);

      if ((this.lSlim==false) && (this.oContainer==null)) {
         flCabecSession(this,true);
      }


      if (this.lResfreshTop==true) {
         document.getElementById("divtableGrid_"+this.sId).scrollTop = 0;
         this.flTopTela();
         this.lResfreshTop = false;
      }
//alert('this.lRefreshed-->>this.sId='+this.sId+'n\this.lRefreshed='+this.lRefreshed);
      this.lRefreshed=true;
      this.lAddPageRefreshed=true;
      this.flTots();
   } else {
      if (this.lPesquisandoNr0) {
         if (parent.sMnemProp=='hallos_esp') {
            alert('Bsqueda por "'+this.sLastSearchedTxt+'", ningn registro encontrado.');
            //flModal('<font color=blue>Sistema</font>','Bsqueda por "'+this.sLastSearchedTxt+'", ningn registro encontrado.');
         } else if (parent.sMnemProp=='hallos_ing') {
            alert('Search by "'+this.sLastSearchedTxt+'", no record found.');
            //flModal('<font color=blue>System</font>','Search by "'+this.sLastSearchedTxt+'", no record found.');
         } else {
            alert('Busca por "'+this.sLastSearchedTxt+'", nenhum registro encontrado.');
            //flModal('<font color=blue>Sistema</font>','Busca por "'+this.sLastSearchedTxt+'", nenhum registro encontrado.');
         }
         this.sQry = this.sOldQry;
         this.lPesquisandoNr0 = false;

         var sQry = this.sQryOriginal;
         if (this.lLixeira==true) {

            var sQry = sQry.replace("a.lExc=","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc  =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc   =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc    =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc     =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc      =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc       =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc        =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc         =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc          =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc           =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc            =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc             =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc              =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc               =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc                =","(a.lExc-1)=");
         }   
         this.flRefreshCall(sQry);
      } else {
         if ((this.sTipoNr0<2)&&(this.lEntrarIncluindo==false)) {
            var sMsg = this.aTit[0];
            sMsg = sMsg.replace(/(<([^>]+)>)/ig,"");
            sMsg = sMsg.replace(/&nbsp;/ig," ");
            if (parent.sMnemProp=='hallos_esp') {
               alert(sMsg+', No hay registros.');
               //flModal('<font color=blue>Sistema</font>',sMsg+', No hay registros.');
            } else if (parent.sMnemProp=='hallos_ing') {
               alert(sMsg+', no records.');
               //flModal('<font color=blue>System</font>',sMsg+', no records.');
            } else {
               alert(sMsg+', no h registros.');
               //flModal('<font color=blue>Sistema</font>',sMsg+', no h registros.');
            }
         }
         if (this.lLixeira) this.flGridLixeira(0)
         else if (this.sTipoNr0!=3) this.flEncerraGrid();
      }
   }
   this.flAjustaColunas();
   flIconeProcess(this.iSss,0);
   flEnableScreen(this.iSss,true);

//alert('return flRefreshScreen');
   return true;
}
//
function flTrataGridTable() {
/////////////////////////////
   var i;
   var iDif=(this.aGrid.length-this.iAlt);
   if (iDif<0) {
      iDif= -1*iDif;
      if (iDif>this.iAlt0) {
         for (i=this.iAlt0; i<iDif; i++) {
            --this.iAlt;
            oTable=document.getElementById('tableGrid_'+this.sId).deleteRow(this.iAlt);
         }
      }
   } else if (iDif>0) {
      for (i=0; i<iDif; i++) {
         var oRow=document.getElementById('tableGrid_'+this.sId).insertRow(this.iAlt);
         oRow.id = 'linhaGrid_'+this.sId+'_'+this.iAlt;
         oRow.style.fontFamily = 'Verdana';
         oRow.style.fontSize = sFont2Size;
         oRow.style.height = "14px";
         oRow.style.whiteSpace = 'nowrap';
         var k = 0;
         for (var j=0; j<this.iCol; ++j) {
            
            aTmp = this.aTitCol[j].split("-");
            sTypCol = fsTrim(aTmp[1]);

            var oCel = oRow.insertCell(k);
            oCel.id = (this.sId+"_"+this.iAlt+"x"+j);
            oCel.style.whiteSpace = 'nowrap';
            oCel.style.borderStyle = 'solid';
            oCel.style.borderColor = '#000000';
            oCel.style.borderWidth = '0px';
            oCel.style.overflow = 'hidden';
            oCel.style.cursor   = 'default';
            oCel.style.textAlign = fsTDAlign(sTypCol);
            oCel.innerHTML = ''; 
            oCel.setAttribute('onclick', this.sId+'.flClickLin('+this.iAlt+')');
            if (this.lFuncaoEsc==true) oCel.setAttribute('ondblclick', this.sId+'.flEncerraGrid(true)');
            else  oCel.setAttribute('ondblclick', this.sId+'.flGridZoo()');
            if ((k+1)<(2*this.iCol-1)) {
               var oCel = oRow.insertCell(k+1);
               oCel.id = ('borda_'+this.sId+'_'+this.iAlt+'x'+j);
               oCel.style.borderStyle = 'solid';
               oCel.style.borderColor = '#000000';
               oCel.style.borderWidth = '0px';
               oCel.style.width = '1px';
               oCel.style.color = '#c0c0c0';
               oCel.style.textAlign = 'center';
               oCel.innerHTML='|'; 
               oCel.setAttribute('onclick', this.sId+'.flClickLin('+this.iAlt+')');
               if (this.lFuncaoEsc==true) oCel.setAttribute('ondblclick', this.sId+'.flEncerraGrid(true)');
               else  oCel.setAttribute('ondblclick', this.sId+'.flGridZoo()');
            }
            k+=2;
         }
         ++this.iAlt;
      }
   }
}
//
//function 
//
function fsTDAlign(psTypCol) {
//////////////////////////////
   var sRet = '';
   if      (psTypCol=='s')  sRet = 'left';
   else if (psTypCol=='x')  sRet = 'left';
   else if (psTypCol=='x1') sRet = 'center';
   else if (psTypCol=='x2') sRet = 'center';
   else if (psTypCol=='x3') sRet = 'center';
   else if (psTypCol=='x4') sRet = 'left';
   else if (psTypCol=='x44') sRet = 'left';
   else if (psTypCol=='x444') sRet = 'left';
   else if (psTypCol=='x4444') sRet = 'left';
   else if (psTypCol=='x5') sRet = 'center';
   else if (psTypCol=='n')  sRet = 'right';
   else if (psTypCol=='sn')  sRet = 'right';
   else if (psTypCol=='i')  sRet = 'right';
   else if (psTypCol=='d')  sRet = 'center';
   else if (psTypCol=='t')  sRet = 'center';
   else if (psTypCol=='l')  sRet = 'center';
   return sRet;
}
//
function flCall_CalSet(poObj,psTipo) {
//////////////////////////////////////
   poObj.sRetornoCalendario = psTipo; // atencao os tre pontos sao de proposito
   poObj.flRefreshCall(psTipo);
}
//
function flCall_Cal(poObj) {
////////////////////////////
   if (poObj.oWCalendar==null) {
      var d = new Date();
      poObj.oWCalendar = window.open('calendario/calendario.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sObjCallerId='+poObj.sId+'&iMes='+(d.getMonth()+1)+'&iAno='+d.getFullYear(),'Calendrio Qtux','width=310,height=350,status=no,resizable=no,top=200,left=300,dependent=yes,alwaysRaised=yes');
   } else poObj.oWCalendar.focus(); 
}
//
function flCall_CalHoje(poObj) {
////////////////////////////
   var d = new Date();
   poObj.dAgenda = d;
   poObj.sRetornoCalendario = d.getFullYear()+'-'+(d.getMonth()+1)+'-'+d.getDate();
   poObj.flRefreshCall(poObj.sQryOriginal);
}
//
function flCall_CalAmanha(poObj) {
//////////////////////////////////
   var d = new Date();
   d.setDate(d.getDate()+1);
   poObj.dAgenda = d;
   poObj.sRetornoCalendario = d.getFullYear()+'-'+(d.getMonth()+1)+'-'+(d.getDate());
   poObj.flRefreshCall(poObj.sQryOriginal);
}
//
function flCall_CalOntem(poObj) {
//////////////////////////////////
   var d = new Date();
   d.setDate(d.getDate()-1);
   poObj.dAgenda = d;
   poObj.sRetornoCalendario = d.getFullYear()+'-'+(d.getMonth()+1)+'-'+(d.getDate());
   poObj.flRefreshCall(poObj.sQryOriginal);
}
//
function flCall_CalProxDia(poObj) {
///////////////////////////////////
   var d = poObj.dAgenda;
   d.setDate(d.getDate()+1);
   poObj.dAgenda = d;
   poObj.sRetornoCalendario = d.getFullYear()+'-'+(d.getMonth()+1)+'-'+(d.getDate());
   poObj.flRefreshCall(poObj.sQryOriginal);
}
//
function flCall_CalPrevDia(poObj) {
///////////////////////////////////
   var d = poObj.dAgenda;
   d.setDate(d.getDate()-1);
   poObj.dAgenda = d;
   poObj.sRetornoCalendario = d.getFullYear()+'-'+(d.getMonth()+1)+'-'+(d.getDate());
   poObj.flRefreshCall(poObj.sQryOriginal);
}
//
function fsGridHTML() {
///////////////////////
   //
   // 1) Vars locais
   //
   var i
   var o
   var iWA
   var aTmp
   var sTitCol
   var sTypCol
   var sLenCol
   var sCriaTable = "<div id='RetornoCalendario_"+this.sId+"' style='display: none'></div>";
//   var iDescHeight = 16;   // 1o titulo
   var iDescHeight = 0;   // NO EST SENDO USADO

   if (parent.sMnemProp=='hallos_esp') {
      var sTitEncerraGrid = 'Salida';
      var sTit2Pesquisar = 'Buscar';
      var sTitRefresh = 'Recargar';
      var sTitEscolheGrid = 'Elegir';
      var sTitLixeira1 = 'Ver los registros eliminados';
      var sTitReincluir = 'Volver a incluir el registro de que se trate';

   } else if (parent.sMnemProp=='hallos_ing') {
      var sTitEncerraGrid = 'Exit';
      var sTit2Pesquisar = 'Search';
      var sTitRefresh = 'Refresh';
      var sTitEscolheGrid = 'Choose';
      var sTitLixeira1 = 'View deleted records';
      var sTitReincluir = 'Reinclude the record in question';

   } else {
      var sTitEncerraGrid = 'Sair';
      var sTit2Pesquisar = 'Buscar no grid';
      var sTitRefresh = 'Recarregar o grid';
      var sTitEscolheGrid = 'Escolher';
      var sTitLixeira1 = 'Ver registros excludos';
      var sTitReincluir = 'Reincluir o registro em questo';
   }

   // Tratando qdo  container de um mosaico
   if (this.oContainer!=null) {
//      sCriaTable += "<div id='divContainerTituloGrid_"+this.sId+"' style='text-align: left; width: 100%; color: "+this.oPai.sTitFColor+"; background-color: "+this.oPai.sTitBColor+"; font-family: Verdana; font-size: 10px;'></div>";
      sCriaTable += "<div style='xpadding: 1%;'><div id='divContainerTituloGrid_"+this.sId+"' style='background-color: "+this.oPai.sTitBColor+"; color: "+this.oPai.sTitFColor+"; width:100%; text-align: center; padding: 5px; xpadding: 1%; font-family: Verdana; font-size: 10px;'></div></div>";

   }
   //
   // 2) Linha do menu
   //
   if ((this.lSlim==false)&&(this.aMenu.length>0)&&(this.aMenu[0].length>0)) {
      if (this.oContainer!=null) {
//         sCriaTable += "<div id='divMenu_"+this.sId+"'>";   // esse div faz o scroll aparecer na tela qdo colspan=true e atrapalha
         sCriaTable += "<div id='Menu0_"+this.sId+"' style='text-align: left; width: 100%; background-color: "+this.sBCorCapAtivo+"'></div>";
//         sCriaTable += "</div>";
      } else {
         sCriaTable += "<div id='divMenu_"+this.sId+"'>";
         sCriaTable += "<div id='Menu0_"+this.sId+"' style='text-align: left; width: 100%; background-color: "+this.sBCorCapAtivo+"'></div>";
         sCriaTable += "</div>";
      }
      iDescHeight += 20;

   }
   //
   // 3) Friso
   //
   sCriaTable += "<div id='Friso_"+this.sId+"' style='height: 1px; background-color: "+this.sFCorFrisoMenu+";' onclick='flSetGridDefault("+this.sId+");'><img src='about:blank' style='height: 0px; width: 0px;'></div>"
   iDescHeight += 1;
   sCriaTable += "<div id='Friso_"+this.sId+"' style='height: 3px; background-color: "+this.sBCorCapAtivo+";' onclick='flSetGridDefault("+this.sId+");'><img src='about:blank' style='height: 0px; width: 0px;'></div>"
   iDescHeight += 3;
   // a tag img no comando acima eh por causa do IE que nao funciona o height se o div estiver vazio
   //
   //
   // 4) ToolsBar
   //
   sCriaTable += "<div class='divToolsBarGrid' id='toolsBarGrid_"+this.sId+"' style='color: "+this.sFCorCapAtivo+"; background-color: "+this.sBCorCapAtivo+"; font-family: Verdana; font-size: 14px;' onclick='flSetGridDefault("+this.sId+");'>";
   sCriaTable += "<table class='tableToolsBarGrid' id='tableToolsBarGrid_"+this.sId+"' cellspacing='0' cellpadding='0' cellmargin='0' style='border-style: solid; border-color: 000000; border-width: 0px; padding: 0px; margin: 0px; width: 100%; vertical-align: top;'><tr class='trToolsBarGrid'>";
   //
   // 5) Botao Fechar (modificado dia 01/08/2012 por ricardo)
   //
   if (this.lSlim==false) { 
      sCriaTable += "<td style='text-align: left;'>"
      if (this.lFuncaoEsc==true) {
//         sCriaTable  += "<input id='encerraGrid_"+this.sId+"' type='image' src='../erpImages/btnFechar.png' title='Fechar grid' onclick='"+this.sId+".flEncerraGrid();'><span style='font-size: 1px;'>&nbsp;</span>";
         sCriaTable  += "&nbsp;&nbsp;<input id='escolheGrid_"+this.sId+"'                        type='image' src='"+sIconeEncerrarEsc+"' title='"+sTitEscolheGrid+"' onclick='"+this.sId+".flEncerraGrid(true);'>&nbsp;";
      } 
      sCriaTable += "</td>"
   }

   // botao voltar
   sCriaTable += "<td style='text-align: left;'>";
   if (this.lFuncaoEsc==false) {
      sCriaTable += "&nbsp;";
      sCriaTable += "<img id='encerraGrid_"+this.sId+"' style='cursor: pointer;' src='"+sIconeEncerrar+"' title='"+sTitEncerraGrid+"' onclick='"+this.sId+".flEncerraGrid();'><span style='font-size: 1px;'>&nbsp;</span>";
//      sCriaTable += "<img id='btnLixeira2_"+this.sId+"'       style='cursor: pointer;' src='gifs/icone_encerrar2.gif'             title='Sair'                                  onclick='"+this.sId+".flGridLixeira(0);'>";
      sCriaTable += "&nbsp;";
   }

   // Botao SALVAR qdo edio in line
   if ((this.sDDSFile=='dd_files/erp_ORDENS_CanalWeb_Itens.dda') || (this.sDDSFile=='dd_files/erp_ORDENS_CanalWeb_Itens_TQ.dda') || ((this.sDDSFile=='dd_files/erp_LOG_Fretes_Lancamentos.dda')&&(this.sDDSTag=='Padrao_1'))) {
      sCriaTable  += "&nbsp;&nbsp;<input id='salvarInLineGrid_"+this.sId+"'type='button' title='salvar todas as ateraes' onclick=flSalvarTodosInputInLine('"+this.sId+"'); value='salvar todos'; style='cursor:pointer; vertical-align: top;')>&nbsp;";
   } 

   // boto incluir, excluir, alterar
// sCriaTable += "&nbsp;<img id='btnIncluir_"+this.sId+"'        style='cursor: pointer;' src='"+sIconeIncluir+"'                   title='"+this.sIncMsg+"'                                        onclick='"+this.sId+".flGridInc();'>";
   sCriaTable += "&nbsp;<img id='btnIncluir_"+this.sId+"'        style='cursor: pointer;' src='"+sIconeIncluir+"'                   title='"+this.sIncMsg+"'                                        onmouseup='"+this.sId+".flOnMouseUPGridEdicao(event,0);' onmousedown='"+this.sId+".flOnMouseDNGridEdicao(event,0);'>";
// sCriaTable += "&nbsp;<img id='btnReincluir_"+this.sId+"'      style='cursor: pointer;' src='gifs/icone_reincluir.gif'            title='Reincluir o registro em questo'                                 onclick='"+this.sId+".flGridRInc();'>";
// sCriaTable += "&nbsp;<img id='btnExcluir_"+this.sId+"'        style='cursor: pointer;' src='gifs/icone_excluir.gif'              title='Excluir o registro em questo'                                   onclick='"+this.sId+".flGridExc(1);'>";
// sCriaTable += "&nbsp;<img id='btnAlterar_"+this.sId+"'        style='cursor: pointer;' src='"+sIconeAlterar+"'                     title='"+this.sAltMsg+"'                            onclick='"+this.sId+".flGridAlt();'>";
   sCriaTable += "&nbsp;<img id='btnAlterar_"+this.sId+"'        style='cursor: pointer;' src='"+sIconeAlterar+"'                     title='"+this.sAltMsg+"'                            onmouseup='"+this.sId+".flOnMouseUPGridEdicao(event,1);' onmousedown='"+this.sId+".flOnMouseDNGridEdicao(event,1);'>";
   sCriaTable += "&nbsp;<img id='btnZoom_"+this.sId+"'           style='cursor: pointer;' src='"+sIconeZoom+"'                        title='"+this.sZooMsg+"'                            onclick='"+this.sId+".flGridZoo();'>";
// Ricardo
// sCriaTable += "&nbsp;<img id='btnImprimir_"+this.sId+"'       style='cursor: pointer;' src='"+sIconeImprimir+"'                    title='"+this.sImpMsg+"'                            onclick='"+this.sId+".flGridZoo();'>";
//
   if (parent.sMnemProp=='engajamento') {
      sCriaTable += "&nbsp;&nbsp;<input type='text' id='btnPesquisar_"+this.sId+"' size='45' style='vertical-align: 40%; border-width: 0px; font_family: verdana; font-size: 10px; color: #06334B; background-color: "+sBCorDoPesquisarInput+";'>";
      sCriaTable += "<img id='btn2Pesquisar_"+this.sId+"'     style='cursor: pointer;' src='"+sIconeBuscar+"' title='Buscar no grid' onclick='"+this.sId+".flLocaliza2Lin();'>";
   } else if ((parent.sMnemProp=='hallos') || (parent.sMnemProp=='hallos_esp') || (parent.sMnemProp=='hallos_ing') || (parent.sMnemProp=='havik') || (parent.sMnemProp=='hallos_teste')) {
      sCriaTable += "&nbsp;&nbsp;<input type='text' id='btnPesquisar_"+this.sId+"' size='45' style='vertical-align: top; border-width: 0px; font_family: verdana; font-size: 16px; color: #06334B; background-color: "+sBCorDoPesquisarInput+";'>";
      sCriaTable += "&nbsp;<img id='btn2Pesquisar_"+this.sId+"'     style='vertical-align: top; cursor: pointer;' src='"+sIconeBuscar+"' title='"+sTit2Pesquisar+"' onclick='"+this.sId+".flLocaliza2Lin();'>";
   } else if (parent.sMnemProp=='jbs') {
      sCriaTable += "&nbsp;&nbsp;<input type='text' id='btnPesquisar_"+this.sId+"' size='45' style='vertical-align: top; border-width: 0px; font_family: verdana; font-size: 16px; color: #A31C27; background-color: "+sBCorDoPesquisarInput+";'>";
      sCriaTable += "&nbsp;<img id='btn2Pesquisar_"+this.sId+"'     style='vertical-align: top; cursor: pointer;' src='"+sIconeBuscar+"' title='Buscar no grid' onclick='"+this.sId+".flLocaliza2Lin();'>";
   } else {
      sCriaTable += "&nbsp;&nbsp;<input type='text' id='btnPesquisar_"+this.sId+"' size='25' onkeypress='return validateKeyPress(event, VarNaoPode)'; style='vertical-align: top; border-radius: 10px 0px 0px 10px; border-color: #ffffff; border-width: 0px 0px 2px 0px; border-style: solid; font_family: verdana; font-size: 20px; color: #06334B; background-color: "+sBCorDoPesquisarInput+";'>";
      sCriaTable += "<img id='btn2Pesquisar_"+this.sId+"' style='border-color: #ffffff; border-width: 2px 0px 0px 0px; border-style: solid; vertical-align: top; cursor: pointer; border-radius: 0px 10px 0px 0px;' src='"+sIconeBuscar+"' title='"+sTit2Pesquisar+"' onclick='"+this.sId+".flLocaliza2Lin();'>";
   }
   if ((parent.sMnemProp=='salutemed') && (this.sDDSFile=='dd_files/AgPack_Chamados.dda') && (this.sDDSTag=='Padrao_3')) {
      sCriaTable += "&nbsp;<img id='btnRefresh_"+this.sId+"'        style='cursor: pointer;' src='gifs/empty.gif'              title='"+sTitRefresh+"'                       onclick='"+this.sId+".flLocalizaOriginal();'>";
   } else {
      sCriaTable += "&nbsp;<img id='btnRefresh_"+this.sId+"'        style='cursor: pointer;' src='"+sIconeRefresh+"'              title='"+sTitRefresh+"'                       onclick='"+this.sId+".flLocalizaOriginal();'>";
   }
//   sCriaTable += "&nbsp;<span id='btn2Pesquisar_"+this.sId+"' style='text-decoration: underline; cursor: pointer; font-size: 9px; color: #00aa00;' onclick='"+this.sId+".flLocaliza2Lin();'>buscar</span>";
   sCriaTable += "&nbsp;<span id='btn3Pesquisar_"+this.sId+"' style='text-decoration: underline; cursor: pointer; font-size: 9px; color: #00aa00;' onclick='"+this.sId+".flLocalizaOriginal();'>todos</span>";
//   sCriaTable += "&nbsp;<img id='btnPesquisar_"+this.sId+"'      style='cursor: pointer;' src='gifs/icone_pesquisar.gif'            title='Localizar registros'                                             onclick='"+this.sId+".flLocalizaLin();'>";
   sCriaTable += "&nbsp;<img id='btnRange_"+this.sId+"'          style='cursor: pointer;' src='gifs/icone_range.png'            title='Consultar/Montar range de consulta'                              onclick='"+this.sId+".flTelaRange();'>";
//alert(parent.jClassUser);
   sCriaTable += "&nbsp;<img id='btnRAcTDoc_"+this.sId+"'        style='cursor: pointer;' src='gifs/folder_key.png'             title='Programar as Regras de Acessos da PASTA em questo - Regras GLOBAIS'          onclick='"+this.sId+".flCallRAc();'>";
   sCriaTable += "&nbsp;<img id='btnRAcDoc_"+this.sId+"'         style='cursor: pointer;' src='gifs/script_key.png'             title='Regras de Acessos do DOCUMENTO em questo - Regras INDIVIDUAIS'  onclick='"+this.sId+".flCallRAc();'>";
   sCriaTable += "&nbsp;&nbsp;";
// sCriaTable += "&nbsp;<img id='btnExcluir_"+this.sId+"'        style='cursor: pointer;' src='"+sIconeLixeira_Por+"'           title='"+this.sExcMsg+"'                            onclick='"+this.sId+".flGridExc(1);'>";
   sCriaTable += "&nbsp;<img id='btnExcluir_"+this.sId+"'        style='cursor: pointer;' src='"+sIconeLixeira_Por+"'           title='"+this.sExcMsg+"'                            onmouseup='"+this.sId+".flOnMouseUPGridEdicao(event,2);' onmousedown='"+this.sId+".flOnMouseDNGridEdicao(event,2);'>";
   sCriaTable += "&nbsp;<img id='btnLixeira1_"+this.sId+"'       style='cursor: pointer;' src='"+sIconeLixeira_Ver+"'           title='"+sTitLixeira1+"'                            onclick='"+this.sId+".flGridLixeira(1);'>";
   sCriaTable += "&nbsp;<img id='btnReincluir_"+this.sId+"'      style='cursor: pointer;' src='"+sIconeLixeiraOut+"'            title='"+sTitReincluir+"'                           onclick='"+this.sId+".flGridRInc();'>";
//   sCriaTable += "&nbsp;<img id='btnLixeira2_"+this.sId+"'       style='cursor: pointer;' src='gifs/icone_lixeira2.gif'         title='Sair da lixeira'                             onclick='"+this.sId+".flGridLixeira(0);'>";
   sCriaTable += "&nbsp;&nbsp;";
   sCriaTable += "&nbsp;<img id='btnMarcarTudo_"+this.sId+"'     style='cursor: pointer;' src='gifs/icone_marca_tudo.gif'           title='Marcar todos os registros da pgina atual'                                       onclick='"+this.sId+".flMarcaTudo(true);'>";
   sCriaTable += "&nbsp;<img id='btnDesmarcarTudo_"+this.sId+"'  style='cursor: pointer;' src='gifs/icone_marca_desmarcatudo.gif'   title='Desmarcar todos os registros'                                    onclick='"+this.sId+".flMarcaTudo(false);'>";
   sCriaTable += "&nbsp;<img id='btnInverterMarcas_"+this.sId+"' style='cursor: pointer;' src='gifs/icone_marca_inverte.gif'        title='Inverter a marcao da pgina atual'                                             onclick='"+this.sId+".flMarcaInverte();'>";
// sCriaTable += "&nbsp;<img id='btnResetarMarcas_"+this.sId+"'  style='cursor: pointer;' src='gifs/icone_marca_reset_disable.gif'  title='Reiniciar os registros MARCADOS com a ltima configurao salva' onclick='"+this.sId+".flMarcaReset();'>";
   sCriaTable += "&nbsp;<img id='btnSalvarMarcas_"+this.sId+"'   style='cursor: pointer;' src='gifs/icone_marca_salvar_disable.gif' title='Salvar a configurao'                                           onclick='"+this.sId+".flMarcaSalva();'>";
//   sCriaTable += "&nbsp;<img id='btnAgendar_"+this.sId+"'        style='cursor: pointer;' src='gifs/icone_agenda.png'               title='Consultar/Agendar compromissos na agenda do registro em questo' onclick='"+this.sId+".flCallAgenda();'>";
   sCriaTable += "&nbsp;<img id='btnAgendar_"+this.sId+"'        style='cursor: pointer;' src='img/cal.gif'                         title='Calendrio' onclick='flCall_Cal("+this.sId+");'";
   sCriaTable += "</td>"

   if (this.lSlim==false) { 
      sCriaTable += "<td style='text-align: right;'>"
      if (this.lFuncaoEsc==true) {
         sCriaTable  += "<input id='encerraGrid_"+this.sId+"' type='image' src='../erpImages/btnFechar.png' title='Fechar grid' onclick='"+this.sId+".flEncerraGrid();'><span style='font-size: 1px;'>&nbsp;</span>";
//         sCriaTable  += "&nbsp;&nbsp;<input id='escolheGrid_"+this.sId+"'                        type='image' src='"+sIconeEncerrarEsc+"' title='Escolher' onclick='"+this.sId+".flEncerraGrid(true);'>&nbsp;";
       } 
      sCriaTable += "</td>";
   }


   // --
   if (this.sFiltros.length>0) {
      sCriaTable += '<td class="tdSetColunas" id="tdSetColunas_'+this.sId+'">';
      sCriaTable +=  '<div class="multiselect">';
      sCriaTable +=   '<div class="selectBox" onclick="showCheckboxesB('+this.sId+')">';
      sCriaTable +=    '<select>';
      sCriaTable +=     '<option>Selecione Filtros</option>';
      sCriaTable +=    '</select>';
      sCriaTable +=    '<div class="overSelect"></div>';
      sCriaTable +=   '</div>';
      sCriaTable +=   '<div class="checkboxes" id="checkboxesB_'+this.sId+'"><br>';
      var aTmp = this.sFiltros.split(',');
      for (var i in aTmp) {
         var aTm2 = aTmp[i].split(':');
         var sLbl = aTm2[0].trim();
         var lExp = false;
         var sExp = aTm2[1].trim();
         if (sExp.substr(0,1)=='*') {
            lExp = true;
            sExp = sExp.substr(1,sExp.length-1);
         }
         this.aFiltrosLbl.push(sLbl);
         this.aFiltrosExp.push(sExp);
         this.aFiltrosSet.push(lExp);
         //console.log('aTm2[0].trim()='+aTm2[0].trim()+', aTm2[1].trim()='+aTm2[1].trim());
         sCriaTable += '<label for="+i+">';
         if (this.aFiltrosSet[i]) sCriaTable += '&nbsp;&nbsp;<input type="checkbox" id="'+i+'" onclick="'+this.sId+'.flSetFiltro('+i+');" checked/>&nbsp;&nbsp;'+fsTrim(aTm2[0])+'&nbsp;&nbsp;</label>';
         else                     sCriaTable += '&nbsp;&nbsp;<input type="checkbox" id="'+i+'" onclick="'+this.sId+'.flSetFiltro('+i+');"        />&nbsp;&nbsp;'+fsTrim(aTm2[0])+'&nbsp;&nbsp;</label>';
      }
      sCriaTable +=   '</div>';  // '<div class="checkboxes" id="checkboxesA_'+this.sId+'">'
      sCriaTable +=  '</div>';   // '<div class="multiselect">'
      sCriaTable +=  '<div style="display: inline-block; vertical-align: top; font-family: arial; font-size: 12px;">';
      sCriaTable +=   '<button style="border-radius: 0px 15px 15px 0px;" onclick='+this.sId+'.flMontaFiltros();>Go</button>';
      sCriaTable +=  '</div>';
      sCriaTable += "</td>"
   }

   if (this.lSetColunas) {
      sCriaTable += '<td class="tdSetColunas" id="tdSetColunas_'+this.sId+'">';
      sCriaTable +=  '<div class="multiselect">';
      sCriaTable +=   '<div class="selectBox" onclick="showCheckboxesA('+this.sId+')">';
      sCriaTable +=    '<select>';
      sCriaTable +=     '<option>Selecione Colunas</option>';
      sCriaTable +=    '</select>';
      sCriaTable +=    '<div class="overSelect"></div>';
      sCriaTable +=   '</div>';
      sCriaTable +=   '<div class="checkboxes" id="checkboxesA_'+this.sId+'"><br>';
      for (var i in this.aTitCol) {
         var aTmp = this.aTitCol[i].split('-');
         sCriaTable += '<label for="+i+">';
         if (this.aTitColVisible[i]) sCriaTable += '&nbsp;&nbsp;<input type="checkbox" id="'+i+'" onclick="'+this.sId+'.flSetColuna('+i+');" checked/>&nbsp;&nbsp;'+fsTrim(aTmp[0])+'&nbsp;&nbsp;</label>';
         else                        sCriaTable += '&nbsp;&nbsp;<input type="checkbox" id="'+i+'" onclick="'+this.sId+'.flSetColuna('+i+');"        />&nbsp;&nbsp;'+fsTrim(aTmp[0])+'&nbsp;&nbsp;</label>';
      }
      sCriaTable +=   '</div>';  // '<div class="checkboxes" id="checkboxesA_'+this.sId+'">'
      sCriaTable +=  '</div>';   // '<div class="multiselect">'
      sCriaTable +=  '<div style="display: inline-block; vertical-align: top; font-family: arial; font-size: 12px;">';
      sCriaTable +=   '<button style="border-radius: 0px 15px 15px 0px;" onclick='+this.sId+'.flMontaColunas();>Go</button>';
      sCriaTable +=  '</div>';
      sCriaTable += "</td>"
   }
   // --

   sCriaTable  += "</tr></table>";
   sCriaTable += "</div>";



   iDescHeight += 16;


   //
   // 6) Cabecalhos das Colunas do Grid
   //
   sCriaTable  += "<div  id='divcabec_tableGrid_"+this.sId+"' style='text-align: left; width: 100%; background-color: "+this.sBCorCabAtivo+"; border-style: solid; border-color: #ff0000; border-width: 0px;'>";
   sCriaTable  += "<table id='cabec_tableGrid_"+this.sId+"' cellspacing='0' cellpadding='0' cellmargin='0' style='border-style: solid; border-color: "+this.sCorBordExtAtivo+"; border-width: 0px; padding: 0px; margin: 0px;' onmouseover='"+this.sId+".flTableGridOnMouseOver();' onmouseout='"+this.sId+".flTableGridOnMouseOut();'>";
   sCriaTable  += "<tr style = 'background-color: "+this.sBCorCabAtivo+"; font-family: Verdana; font-size: "+sFont2Size+"; height: 14px;'>";
   for (var j=0; j<this.iCol; j++) {
      aTmp = this.aTitCol[j].split("-");
      var sTmp1 = fsTrim(aTmp[0]);
      if (sTmp1.substr(0,1)=='{') {   // exemplo em erp_OP_Insumos.dda
         sTmp1 = sTmp1.substr(1,sTmp1.length-2);
         var sTmp2='';
         var eTmp = 'sTmp2 = '+sTmp1;
         eval(eTmp);
         //alert('eTmp='+eTmp+'\nsTmp2='+sTmp2);
         sTmp1 = sTmp2;
      }
      sTitCol = '&nbsp;<b>'+sTmp1+'</b>&nbsp';
//    sTitCol = '&nbsp;'+fsTrim(aTmp[0])+'&nbsp';
      sTypCol = fsTrim(aTmp[1]);
      sCriaTable += "<td nowrap='nowrap' id='"+this.sId+"_"+j+"' style='border-style: solid; border-color: #000000; border-width: 0px; overflow: hidden; cursor: pointer; text-align: "+fsTDAlign(sTypCol)+"; font-family: Verdana; font-size: "+sFontSize+"; color: "+this.sFCorCabAtivo+";' onclick='"+this.sId+".flOrderGrid("+j+",true)'>"+sTitCol+"</td>";
//    sCriaTable += "<td  style='white-space: nowrap; border-style: solid; border-color: #000000; border-width: 0px; overflow: hidden; cursor: pointer; text-align: "+fsTDAlign(sTypCol)+"; font-family: Verdana; font-size: "+sFontSize+"; color: "+this.sFCorCabAtivo+";' onclick='flOrderGrid("+this.sId+","+j+",true)'><div id='"+this.sId+"_"+j+"' title='"+sTitCol+"' style='overflow: hidden; width: 100%;'>"+sTitCol+"</div></td>";
      // coluna entre colunas
//    if (j < (this.iCol-1)) sCriaTable += "<td id='borda_"+this.sId+"_"+j+"' style='border-style: solid; border-color: #000000; border-width: 0px; width: 1px; text-align: center; color: "+this.sCorBordIntAtivo+"; background-color: "+this.sCorBordIntAtivo+";'>|</td>";
      if (j < (this.iCol-1)) sCriaTable += "<td id='borda_"+this.sId+"_"+j+"' style='color: #FFFFFF; border-right-style: solid; border-right-color: "+this.sBCorCabAtivo+"; border-right-width: 1px; text-align: center;'>&nbsp;</td>";
   }
   j=this.iCol;
   sCriaTable += "<td nowrap='nowrap' id='"+this.sId+"_"+j+"' style='border-style: solid; border-color: #000000; border-width: 0px; overflow: hidden; cursor: pointer; text-align: "+fsTDAlign(sTypCol)+"; font-family: Verdana; font-size: "+sFontSize+"; color: "+this.sFCorCabAtivo+";'>&nbsp;</td>";
   sCriaTable += "</tr>";
   sCriaTable += "</table>";
   sCriaTable += "</div>";
   iDescHeight += 14;

   //iDescHeightPart1 = iDescHeight;
   //
   // 7) Linhas do Grid
   //
   sCriaTable  += "<div id='divtableGrid_"+this.sId+"' style='overflow-x: auto  ; overflow-y: scroll; width: 100%; border: solid #00ff00 0px;' xonscroll='"+this.sId+".flCheckNewPage();'>";
// if (this.lSlim==false) sCriaTable  += "<div id='divtableGrid_"+this.sId+"' style='height:100%; overflow: scroll;'>";
// else                   sCriaTable  += "<div id='divtableGrid_"+this.sId+"' style='height: 50%; overflow: scroll;'>";
   sCriaTable += "<table id='tableGrid_"+this.sId+"' cellspacing='0' cellpadding='0' cellmargin='0' style='border: solid "+this.sCorBordExtAtivo+" 0px; padding: 0px; margin: 0px;' onmouseover='"+this.sId+".flTableGridOnMouseOver();' onmouseout='"+this.sId+".flTableGridOnMouseOut();'>";

   // <COL - larguras
/*
   for (var j = 0; j < this.iCol; j++) {
      sCriaTable += "<col width='5' />";
      if (j<(this.iCol-1)) sCriaTable += "<col width='5' />";
      else                 sCriaTable += "<col width='*' />";
   }
*/ 
   for (var i = 0; i < this.iAlt; i++) {
      sCriaTable += "<tr class='linhasGrid' id='linhaGrid_"+this.sId+"_"+i+"' style='font-family: Verdana; font-size: "+sFont2Size+"; height: 14px;'>";
      // COLUNAS DA LINHA DO GRID
      for (var j = 0; j < this.iCol; j++) {
         aTmp = this.aTitCol[j].split("-");
         sTypCol = fsTrim(aTmp[1]);
         if (this.lFuncaoEsc==true) {
            if (navigator.appName=='Microsoft Internet Explorer') {
               sCriaTable += "<td nowrap='nowrap'><span class='celulasGrid' id='"+this.sId+"_"+i+"x"+j+"' style='overflow:hidden; xwhite-space: nowrap; border-style: solid; border-color: #000000; border-width: 0px; overflow: hidden; cursor: default; text-align: "+fsTDAlign(sTypCol)+";' onclick='"+this.sId+".flClickLin("+i+");' ondblclick='"+this.sId+".flEncerraGrid(true);'></span></td>";
            } else {
               sCriaTable += "<td nowrap='nowrap' class='celulasGrid' id='"+this.sId+"_"+i+"x"+j+"' style='overflow:hidden; xwhite-space: nowrap; border-style: solid; border-color: #000000; border-width: 0px; overflow: hidden; cursor: default; text-align: "+fsTDAlign(sTypCol)+";' onclick='"+this.sId+".flClickLin("+i+");' ondblclick='"+this.sId+".flEncerraGrid(true);'></td>";
            }
         } else {
            if (this.lNoDblClick==false) {
               if (navigator.appName=='Microsoft Internet Explorer') {
                  sCriaTable += "<td nowrap='nowrap'><span class='CelulasGrid' id='"+this.sId+"_"+i+"x"+j+"' style='overflow:hidden; xwhite-space: nowrap; border-style: solid; border-color: #000000; border-width: 0px; overflow: hidden; cursor: default; text-align: "+fsTDAlign(sTypCol)+";' onclick='"+this.sId+".flClickLin("+i+");' ondblclick='"+this.sId+".flGridZoo();'></span></td>";
               } else {
//                sCriaTable += "<td nowrap='nowrap' class='CelulasGrid' id='"+this.sId+"_"+i+"x"+j+"' style='overflow:hidden; xwhite-space: nowrap; border-style: solid; border-color: #000000; border-width: 0px; overflow: hidden; cursor: default; text-align: "+fsTDAlign(sTypCol)+";' onclick='"+this.sId+".flClickLin("+i+");' ondblclick='"+this.sId+".flGridZoo();'></td>";
//                sCriaTable += "<td nowrap='nowrap'                     id='"+this.sId+"_"+j+"'       style='overflow:hidden;                       border-style: solid; border-color: #000000; border-width: 0px; overflow: hidden; cursor: pointer; text-align: "+fsTDAlign(sTypCol)+"; font-family: Verdana; font-size: "+sFontSize+"; color: "+this.sFCorCabAtivo+";' onclick='"+this.sId+".flOrderGrid("+j+",true)'>"+sTitCol+"</td>";
                  sCriaTable += "<td nowrap='nowrap'                     id='"+this.sId+"_"+i+"x"+j+"' style='overflow:hidden;                       border-style: solid; border-color: #000000; border-width: 0px; overflow: hidden; cursor: default; text-align: "+fsTDAlign(sTypCol)+";' onclick='"+this.sId+".flClickLin("+i+");' ondblclick='"+this.sId+".flGridZoo();'></td>";
               }
            } else {
               if (navigator.appName=='Microsoft Internet Explorer') {
                  sCriaTable += "<td nowrap='nowrap'><span class='CelulasGrid' id='"+this.sId+"_"+i+"x"+j+"' style='overflow:hidden; xwhite-space: nowrap; border-style: solid; border-color: #000000; border-width: 0px; overflow: hidden; cursor: default; text-align: "+fsTDAlign(sTypCol)+";' onclick='"+this.sId+".flClickLin("+i+");'></span></td>";
               } else {
//                sCriaTable += "<td nowrap='nowrap' class='CelulasGrid' id='"+this.sId+"_"+i+"x"+j+"' style='overflow:hidden; xwhite-space: nowrap; border-style: solid; border-color: #000000; border-width: 0px; overflow: hidden; cursor: default; text-align: "+fsTDAlign(sTypCol)+";' onclick='"+this.sId+".flClickLin("+i+");'></td>";
//                sCriaTable += "<td nowrap='nowrap'                     id='"+this.sId+"_"+j+"'       style='overflow:hidden;                       border-style: solid; border-color: #000000; border-width: 0px; overflow: hidden; cursor: pointer; text-align: "+fsTDAlign(sTypCol)+"; font-family: Verdana; font-size: "+sFontSize+"; color: "+this.sFCorCabAtivo+";' onclick='"+this.sId+".flOrderGrid("+j+",true)'>"+sTitCol+"</td>";
                  sCriaTable += "<td nowrap='nowrap'                     id='"+this.sId+"_"+i+"x"+j+"' style='overflow:hidden;                       border-style: solid; border-color: #000000; border-width: 0px; overflow: hidden; cursor: default; text-align: "+fsTDAlign(sTypCol)+";' onclick='"+this.sId+".flClickLin("+i+");'></td>";
               }
            }
         }
         // coluna entre colunas
         if (j < (this.iCol-1)) sCriaTable += "<td id='borda_"+this.sId+"_"+i+"x"+j+"' style='color: "+this.sFCorCabAtivo+"; border-right-style: solid; border-right-color: #eaeaea; border-right-width: 1px; text-align: center;'>&nbsp;</td>";
      }
      j=this.iCol;
      sCriaTable += "<td class='CelulasGrid' id='"+this.sId+"_"+i+"x"+j+"' style='border-style: solid; border-color: #000000; border-width: 0px; overflow: hidden; cursor: default; text-align: "+fsTDAlign(sTypCol)+";' onclick='"+this.sId+".flClickLin("+i+");' ondblclick='"+this.sId+".flGridZoo();'>&nbsp;</td>";
      sCriaTable += "</tr>";
   }

   iDescHeight += 20*this.aRodape.length;
   
   //
   // 8) Totais do Grid (isso tem q estar numa tabela a parte, fixa n rodape)
   //
/*
   for (var i=0; i < this.aRodape.length; i++) {
      sCriaTable += "<tr class='linhasRodapeGrid' id='rodapeGrid_"+this.sId+"_"+i+"' style = 'background-color: "+this.sBCorCabAtivo+"; color: "+this.sFCorCabAtivo+"; font-family: Verdana; font-size: "+sFont2Size+"; height: 14px;'>";
      // COLUNAS DA LINHA TOTAIS DO GRID
      for (var j = 0; j < this.iCol; j++) { 
         aTmp = this.aTitCol[j].split("-");
         sTypCol = fsTrim(aTmp[1]);
         sCriaTable += "<td class='CelulasRodapeGrid' id='rodape_"+this.sId+"_"+i+"x"+j+"' style='white-space: nowrap; border-style: solid; border-color: #000000; border-width: 0px; overflow: hidden; cursor: default; text-align: "+fsTDAlign(sTypCol)+";'></td>";
         // coluna entre colunas
         if (j < (this.iCol-1)) sCriaTable += "<td id='rodape_borda_"+this.sId+"_"+i+"x"+j+"' style='border-style: solid; border-color: #000000; border-width: 0px; width: 1px; text-align: center;'>|</td>";
      }
      sCriaTable += "</tr>";
   }
   sCriaTable += "</tr>";
*/


   sCriaTable += "</table>";
   if (this.iPages>1) {
      sCriaTable += "<div style='font-family: Verdana; font-size: 13px; width: 100%; background-color: #e0e0e0; color: 00AA00; vertical-align: middle;'>";
      sCriaTable += "&nbsp;&nbsp;<span style='font-size:9px; text-decoration: underline; cursor: pointer;' onclick='"+this.sId+".flGotoPage(-1);'>Anterior</span>&nbsp;&nbsp;<span style='font-size:9px; text-decoration: underline; cursor: pointer;' onclick='"+this.sId+".flGotoPage(1);'>Prxima pgina</span>";
      sCriaTable += "<div style='font-family: Verdana; font-size: 3px; width: 100%; background-color: #e0e0e0; color: 00AA00;'>";
      sCriaTable += "&nbsp;";
      sCriaTable += "</div>";
      sCriaTable += "</div>";
   } else {
      sCriaTable += "<div style='font-family: Verdana; font-size: 7px; width: 100%; background-color: #e0e0e0; color: 00AA00;'>";
      sCriaTable += "&nbsp;";
      sCriaTable += "</div>";
   }
   sCriaTable += "</div>";
   //
   sCriaTable  += "<div style='text-align: left; width: 100%; background-color: "+this.sBCorCabAtivo+"; border-style: solid; border-color: #ff0000; border-width: 0px;'>";
   sCriaTable  += "<table id='rodape_tableGrid_"+this.sId+"' cellspacing='0' cellpadding='0' cellmargin='0' style='border-style: solid; border-color: "+this.sCorBordExtAtivo+"; border-width: 0px; padding: 0px; margin: 0px;'>";
//   var iLenaRodape = this.aRodape.length;
   for (var i=0; i < this.aRodape.length; i++) {
      sCriaTable  += "<tr class='linhasRodapeGrid' id='rodapeGrid_"+this.sId+"_"+i+"' style = 'background-color: "+this.sBCorCabAtivo+"; color: "+this.sFCorCabAtivo+"; font-family: Verdana; font-size: "+sFont2Size+"; height: 14px;'>";
      for (var j = 0; j < this.iCol; j++) { 
         aTmp = this.aTitCol[j].split("-");
         sTypCol = fsTrim(aTmp[1]);
         sCriaTable += "<td class='CelulasRodapeGrid' id='rodape_td_"+this.sId+"_"+i+"x"+j+"' style='white-space: nowrap; border-style: solid; border-color: #000000; border-width: 0px; overflow: hidden; cursor: default; text-align: "+fsTDAlign(sTypCol)+"; font-family: Verdana; font-size: "+Number(sFontSize)+Number(2)+"; color: "+this.sFCorCabAtivo+";'<b><div id='rodape_"+this.sId+"_"+i+"x"+j+"' style='overflow: hidden; width: 100%;'></div></b></td>";
         if (j < (this.iCol-1)) sCriaTable += "<td id='rodape_borda_"+this.sId+"_"+i+"x"+j+"' style='color: #FFFFFF; border-right-style: solid; border-right-color: #c0c0c0; border-right-width: 1px; text-align: center;'>&nbsp</td>";
      }
      j=this.iCol;
      sCriaTable += "<td class='CelulasRodapeGrid' id='rodape_borda_"+this.sId+"_"+i+"x"+j+"' style='border-style: solid; border-color: #000000; border-width: 0px; overflow: hidden; cursor: default; text-align: "+fsTDAlign(sTypCol)+";'>&nbsp;</td>";
      sCriaTable += "</tr>";
   }
   //
   sCriaTable += "</table>";
   sCriaTable += "</div>";
   //
   // 9) Tratando WorkArea -
   //
   if ((this.lSlim==false)&&(this.oContainer==null)&&(this.oPai!=null)) {
      iWA = this.oPai.iWA;
      if (iWA>=0) document.getElementById("divWorkArea_"+iWA+"_"+this.oPai.iSss).style.display="none";
   }

   return sCriaTable;
}

/// ---> funo de terceiros - controle select colunas do grid
function showCheckboxesA(poObj) {
/////////////////////////////////
   var checkboxes = document.getElementById("checkboxesA_"+poObj.sId);
   if (checkboxes.style.display=="block") {
      checkboxes.style.display = "none";
      checkboxes.style.visibility = "hidden";
   } else {
      checkboxes.style.display = "block";
      checkboxes.style.visibility = "visible";
   }
}
function showCheckboxesB(poObj) {
/////////////////////////////////
   var checkboxes = document.getElementById("checkboxesB_"+poObj.sId);
   if (checkboxes.style.display=="block") {
      checkboxes.style.display = "none";
      checkboxes.style.visibility = "hidden";
   } else {
      checkboxes.style.display = "block";
      checkboxes.style.visibility = "visible";
   }
}
///

function flMontaColunas() {
///////////////////////////
   //alert(this.sId);
   var checkboxes = document.getElementById("checkboxesA_"+this.sId);
   checkboxes.style.display = "none";

   for (var j=0; j<this.iCol; j++) {
      if (this.aTitColVisible[j]) {
         document.getElementById(this.sId+'_'+j).style.display = "";
         if (document.getElementById('borda_'+this.sId+'_'+j)!=null) document.getElementById('borda_'+this.sId+'_'+j).style.display = "";
      } else {
         document.getElementById(this.sId+'_'+j).style.display = "none";
         if (document.getElementById('borda_'+this.sId+'_'+j)!=null) document.getElementById('borda_'+this.sId+'_'+j).style.display = "none";
      }
      for (var i = 0; i < this.iAlt; i++) {
         if (this.aTitColVisible[j]) {
            document.getElementById(this.sId+'_'+i+'x'+j).style.display = "";
            if (document.getElementById('borda_'+this.sId+'_'+i+'x'+j)!=null) document.getElementById('borda_'+this.sId+'_'+i+'x'+j).style.display = "";
         } else {
            document.getElementById(this.sId+'_'+i+'x'+j).style.display = "none";
            if (document.getElementById('borda_'+this.sId+'_'+i+'x'+j)!=null) document.getElementById('borda_'+this.sId+'_'+i+'x'+j).style.display = "none";
         }
      }
   }
   this.flAjustaColunas();
}

function flSetColuna(piCol) {
/////////////////////////////
   this.aTitColVisible[piCol] = !this.aTitColVisible[piCol];
}

function flMontaFiltros() {
///////////////////////////
   //alert(this.sId);
   var checkboxes = document.getElementById("checkboxesB_"+this.sId);
   checkboxes.style.display = "none";
   this.flRefreshCall('qryDDA');
}

function flSetFiltro(piCol) {
/////////////////////////////
   this.aFiltroSet[piCol] = !this.aFiltroSet[piCol];
}

function flDesenhaGrid(piChave) {
/////////////////////////////////
//   console.log('flDesenhaGrid');
   //iDescHeightPart1=0;
   var sCriaTable = this.fsGridHTML();
//console.log('sCriaTable='+sCriaTable);
   //
   // 10) Colocando a string HTML no seu container
   //
   
   if (this.oContainer!=null) {
      if (this.oPai.sTipo=='mosaico') {
         var iConteinerHeight = this.oContainer.offsetHeight;
         var sLC = this.oPai.fsGetLCfromContainerId(this.oContainer.id);   // td_1x2_oMosaico1
         var jLC = this.oPai.fj_aLC_Find(sLC);
         var iConteinerHeight = this.oPai.aHeight[jLC];
      } else {   // 'tela'
         iConteinerHeight=200;
         //sCriaTable+='<br>';
      }
      this.oContainer.innerHTML = sCriaTable;
   } else {
      if (this.lSlim==false) {
         if ((this.sDDSFile=='dd_files/Assessment_Temas.dda') && (parent.sMnemProp=='hallos_teste')) {
            document.getElementById("divWorkArea_"+this.iWA+"_"+this.iSss).style.display="none";
         } else {
            document.getElementById("divWorkArea_"+this.iWA+"_"+this.iSss).style.display="";
         }
         document.getElementById("divWorkArea_"+this.iWA+"_"+this.iSss).innerHTML=sCriaTable;
      } else {
         document.getElementById("divWorkArea_"+this.iWA+"_"+this.iSss).innerHTML+=sCriaTable;
      }
   }
   //
   // 11) Setagem pos innerHTML
   //

   if (oGridDefault==null) oGridDefault = this
   else flSetGridDefault(this);

   this.flShowIconesToolsBar();
   if ((this.lSlim==false) && (this.oContainer==null)) {
      flCabecSession(this,true);
   }

   if (this.oContainer!=null) {
    //if (document.getElementById("divMenu_"+this.sId)!=null)      document.getElementById("divMenu_"+this.sId).style.display="none";
    //if (document.getElementById("Friso_"+this.sId)!=null)        document.getElementById("Friso_"+this.sId).style.display="none";
    //if (document.getElementById("toolsBarGrid_"+this.sId)!=null) document.getElementById("toolsBarGrid_"+this.sId).style.display="none";
      if (document.getElementById("divContainerTituloGrid_"+this.sId)!=null) {
         document.getElementById("divContainerTituloGrid_"+this.sId).innerHTML = this.aTit[0];
         document.getElementById("divContainerTituloGrid_"+this.sId).style.display="";
      }
   }

   i1 = document.getElementById('toolsBarGrid_'+this.sId).offsetHeight;
   i2 = document.getElementById('divcabec_tableGrid_'+this.sId).offsetHeight;
   i3 = 0;
   if ((this.lSlim==false)&&(this.aMenu.length>0)&&(this.aMenu[0].length>0)) {
      i3 = 20;//document.getElementById('divMenu_'+this.sId).offsetHeight;
        i3 +=2; // friso
   }

   if (this.oContainer!=null) {
      if (this.oPai.sTipo=='mosaico') {
         var iRefencia = document.getElementById('divcabec_tableGrid_'+this.sId).offsetTop+document.getElementById('divcabec_tableGrid_'+this.sId).offsetHeight;
         document.getElementById('divtableGrid_'+this.sId).style.height = iConteinerHeight-iRefencia;
      } else {
         document.getElementById('divtableGrid_'+this.sId).style.height = iConteinerHeight;
      } 
   } else {
      if (this.lSlim) document.getElementById('divtableGrid_'+this.sId).style.height = 20*14+7;//(this.iAlt)*14+7;//(parent.document.getElementById('Frame_WA').offsetHeight/2) - (20+14*fiDeep(this)) - i1 - i2 - i3 -1-1;
      else {
         document.getElementById('divtableGrid_'+this.sId).style.height =  parent.document.getElementById('Frame_WA').offsetHeight    - (20+24*fiDeep(this)) - i1 - i2 - i3 -1-1-40;
      }
   }


   this.flMontaNullTela();
   this.flMontaTela(piChave);
   this.flTots();
   return true;
}
//
function flShowIconesToolsBar() {
/////////////////////////////////
   document.getElementById('encerraGrid_'       + this.sId).style.display='none';
   document.getElementById('btnIncluir_'        + this.sId).style.display='none';
   document.getElementById('btnExcluir_'        + this.sId).style.display='none';  
   document.getElementById('btnAlterar_'        + this.sId).style.display='none';  
   document.getElementById('btnZoom_'           + this.sId).style.display='none';     
   document.getElementById('btnLixeira1_'       + this.sId).style.display='none';
   document.getElementById('btnReincluir_'      + this.sId).style.display='none';
//   document.getElementById('btnLixeira2_'       +this.sId).style.display='none'; 

   document.getElementById('btnRefresh_'        + this.sId).style.display='none'; 
   document.getElementById('btnPesquisar_'      + this.sId).style.display='none'; 
   document.getElementById('btn2Pesquisar_'     + this.sId).style.display='none'; 
   document.getElementById('btn3Pesquisar_'     + this.sId).style.display='none'; 
   document.getElementById('btnRange_'          + this.sId).style.display='none'; 
   document.getElementById('btnRAcTDoc_'        + this.sId).style.display='none';  
   document.getElementById('btnRAcDoc_'         + this.sId).style.display='none';   
   document.getElementById('btnMarcarTudo_'     + this.sId).style.display='none'; 
   document.getElementById('btnDesmarcarTudo_'  + this.sId).style.display='none'; 
   document.getElementById('btnInverterMarcas_' + this.sId).style.display='none'; 
// document.getElementById('btnResetarMarcas_'  + this.sId).style.display='none'; 
   document.getElementById('btnSalvarMarcas_'   + this.sId).style.display='none';  
   document.getElementById('btnAgendar_'        +this.sId).style.display='none'; 
// Ricardo
//   document.getElementById('btnImprimir_'        +this.sId).style.display='none'; 
//
   if (this.oContainer==null) document.getElementById('encerraGrid_'+this.sId).style.display='';
   if (this.lLixeira==false) {
      if (this.lSlim==false) {
         if (this.sToolsBar.toLowerCase().indexOf('incluir')>=0) document.getElementById('btnIncluir_'+this.sId).style.display='';
         if (this.sToolsBar.toLowerCase().indexOf('excluir')>=0) document.getElementById('btnExcluir_'+this.sId).style.display='';  
         if (this.sToolsBar.toLowerCase().indexOf('alterar')>=0) document.getElementById('btnAlterar_'+this.sId).style.display='';  
// Ricardo
//         if (this.sToolsBar.toLowerCase().indexOf('imprimir')>=0) document.getElementById('btnImprimir_'+this.sId).style.display='';  
//
         if (this.sToolsBar.toLowerCase().indexOf('excluir')>=0) document.getElementById('btnLixeira1_'+this.sId).style.display='';
         if ((this.sDDSFile=='dd_files/TDoc.dda')&&(this.sDDSTag=='Padrao_1')&&(parent.jClassUser<=1)) document.getElementById('btnRAcTDoc_'+this.sId).style.display='';
         if ((this.sDDSFile=='dd_files/TDoc.dda')&&(this.sDDSTag=='TDocU' )&&(parent.jClassUser<=1)) document.getElementById('btnRAcTDoc_'+this.sId).style.display='';
//         if (this.sDDSFile=='dd_files/AtasTemas.dda')                       document.getElementById('btnRAcTDoc_'+this.sId).style.display='';
//         if (this.sDDSFile=='dd_files/TDoc_Doc.dda')                        document.getElementById('btnRAcDoc_' +this.sId).style.display='';
      } else {
         document.getElementById('encerraGrid_'+this.sId).style.display='none';
      }
      if (this.lMarcacao==true) {
         document.getElementById('btnMarcarTudo_'+this.sId).style.display=''; 
         document.getElementById('btnDesmarcarTudo_'+this.sId).style.display=''; 
         document.getElementById('btnInverterMarcas_'+this.sId).style.display=''; 
         if ((this.lSlim==false) && (this.lFuncaoEsc==false)) {
  //        document.getElementById(this.sId+'_ResetarMarcas').style.display=''; 
  //        document.getElementById('btnSalvarMarcas_'+this.sId).style.display='';  
         }
      }
   } else {
      document.getElementById('btnReincluir_'+this.sId).style.display='';
//      document.getElementById('btnLixeira2_'+this.sId).style.display=''; 
   }
   if (this.sToolsBar.toLowerCase().indexOf('zoom')>=0) document.getElementById('btnZoom_'+this.sId).style.display='';     
   if (this.sToolsBar.toLowerCase().indexOf('pesquisar')>=0) {
      document.getElementById('btnPesquisar_'+this.sId).style.display='';     
      document.getElementById('btn2Pesquisar_'+this.sId).style.display='';     
//      document.getElementById('btn3Pesquisar_'+this.sId).style.display='';     
   }
   if ((this.lLixeira==false)&&(this.oTelaRange!=null)) document.getElementById('btnRange_'+this.sId).style.display='';
   document.getElementById('btnRefresh_'+this.sId).style.display='';     
//   if (this.sDDSFile=='dd_files/Agenda.dda') document.getElementById('btnAgendar_'+this.sId).style.display='';
   if ((parent.jClassUser==4) && (this.sDDSFile=='dd_files/erp_CC.dda')) document.getElementById('encerraGrid_'+this.sId).style.display='none';
}
//
function flMontaRodape() {
//////////////////////////
   //console.log('this.sSqlSumFormat='+this.sSqlSumFormat);
   //alert('this.sDDSFile='+this.sDDSFile);
   var aTmp = this.sSqlSumFormat.split('/');
   for (var i=0; i < this.aRodape.length; i++) {
      for (var j=0; j < this.iCol; j++) {
         var sId  = 'rodape_'+this.sId+'_'+i+'x'+j;
         var oObj = document.getElementById(sId); 
         if (oObj !=null) {
            if (aTmp[j] !=null) {
               var aTmp2 = aTmp[j].split('-');
               if (aTmp2.length>0) var sTyp = aTmp2[0];
               else                var sTyp = 'n';
               if (aTmp2.length>1) var sLen = aTmp2[1];
               else                var sLen = 12;
               if (aTmp2.length2>2) var sDec = aTmp2[2];
               else                var sDec = 2;
               if (sTyp=='n') {
                  oObj.innerHTML = fsFormatNumber(this.aRodape[i][j],sDec);
               } else {
                  oObj.innerHTML = this.aRodape[i][j];
               }
            } else {
               oObj.innerHTML = this.aRodape[i][j];
            }
         }
      }
   }
}
//
function flMontaTela(piChaveAtual) {
////////////////////////////////////
   var iLargElev = 16;
   var iLargCols = 0;

   this.lQuebraCol = (this.iQuebraCol>=0);
   this.flDeleteQuebraCol_Rows();
   this.flRastroReg(piChaveAtual);
//console.log('this.iAlt='+this.iAlt);
   for (var i = 0; i < this.iAlt; i++) {
      this.flMontaLinha(i);
   }

   this.flMontaRodape();
   this.flAjustaColunas();
}

function flAjustaColunas() {
////////////////////////////
   // Ajustando largura das colunas

   var iLin=1;
   for (var i = 0; i < this.iAlt; i++) {
      var sLin = document.getElementById("linhaGrid_"+this.sId+"_"+i);
      if ((sLin!=null) && (sLin.style.display=='')) {
         iLin=i;
         break;
      }
   }

   for (var j = 0; j < this.iCol; j++) { 
      var iDif = (document.getElementById(this.sId+"_"+iLin+"x"+j).offsetWidth - document.getElementById(this.sId+"_"+j).offsetWidth);   // coluna e seu titulo
      var aTmp = this.aTitCol[j].split("-");
      var sTyp = fsTrim(aTmp[1]);
      if ((iDif>0) && (sTyp!='l')) {          // tratando titulo da coluna
         document.getElementById(this.sId+"_"+j).style.width          = document.getElementById(this.sId+"_"+iLin+"x"+j).offsetWidth;
      } else if ((iDif<0) || (sTyp=='l')) {   // tratando coluna
         document.getElementById(this.sId+"_"+iLin+"x"+j).style.width = document.getElementById(this.sId+"_"+j).offsetWidth;
      }

      // Tratando os rodaps - sum
      // Rodap 0
      var oObj = document.getElementById('rodape_'+this.sId+'_'+0+'x'+j);
      if (oObj!=null) {
         if (this.iQuebraCol==j) {
            oObj.style.display = 'none';
            document.getElementById('rodape_td_'   +this.sId+'_'+0+'x'+j).style.display = 'none';
            document.getElementById('rodape_borda_'+this.sId+'_'+0+'x'+j).style.display = 'none';
         } else {
            oObj.innerHTML += '&nbsp;';
            oObj.style.width = document.getElementById(this.sId+"_"+iLin+"x"+j).offsetWidth;
         }
      }
     
      // Rodap 1
      var oObj = document.getElementById('rodape_'+this.sId+'_'+1+'x'+j);
      if (oObj!=null) {
         if (this.iQuebraCol==j) {
            oObj.style.display = 'none';
            document.getElementById('rodape_td_'   +this.sId+'_'+1+'x'+j).style.display = 'none';
            document.getElementById('rodape_borda_'+this.sId+'_'+1+'x'+j).style.display = 'none';
         } else {
            oObj.innerHTML += '&nbsp;';
            oObj.style.width = document.getElementById(this.sId+"_"+iLin+"x"+j).offsetWidth;
         }
      }
      // se tiver mais rodapes - colocar aqui
   }   // for

   var iDif = (document.getElementById('linhaGrid_'+this.sId+"_1").offsetWidth - (document.getElementById('divcabec_tableGrid_'+this.sId).offsetWidth));
   if (iDif<0) document.getElementById(this.sId+"_"+iLin+"x"+this.iCol).style.width = document.getElementById(this.sId+"_"+iLin+"x"+this.iCol).offsetWidth-(iDif);
   document.getElementById(this.sId+"_"+this.iCol).innerHTML='&nbsp;';
   this.lQuebraCol=false;
   return true;
}

function getWidthOfText(txt, fontname, fontsize){   // funo de 3o
/////////////////////////////////////////////////
    if(getWidthOfText.c === undefined){
        getWidthOfText.c=document.createElement('canvas');
        getWidthOfText.ctx=getWidthOfText.c.getContext('2d');
    }
    getWidthOfText.ctx.font = fontsize + ' ' + fontname;
    return getWidthOfText.ctx.measureText(txt).width;
}

function flMontaTelaTeste(piChaveAtual) {
////////////////////////////////////
   var iLargElev = 16;
   var iLargCols = 0;

   this.lQuebraCol = (this.iQuebraCol>=0);
   this.flDeleteQuebraCol_Rows();
   this.flRastroReg(piChaveAtual);
   for (var i = 0; i < this.iAlt; i++) {
      this.flMontaLinha(i);
   }

   this.flMontaRodape();

   for (var j = 0; j < this.iCol; j++) { 
      var oColuna     = document.getElementById(this.sId+"_"+1+"x"+j);
      var oTitulo     = document.getElementById(this.sId+"_"+j);
      var oRodap0     = document.getElementById('rodape_'+this.sId+'_'+0+'x'+j);
      var oRodap1     = document.getElementById('rodape_'+this.sId+'_'+1+'x'+j);
      // se tiver mais rodapes - colocar aqui

      var iLenColuna  = oColuna.offsetWidth;
      var iLenTitulo  = oTitulo.offsetWidth;
      var iLenRodap0  = oRodap0!==null ? oRodap0.offsetWidth : 0;
      var iLenRodap1  = oRodap1!==null ? oRodap1.offsetWidth : 0;
      // se tiver mais rodapes - colocar aqui
      
      var iLenMax     = 0;    
      var iLenMax     = iLenColuna>iLenMax ? iLenColuna : iLenMax;
      var iLenMax     = iLenTitulo>iLenMax ? iLenTitulo : iLenMax;
      var iLenMax     = iLenRodap0>iLenMax ? iLenRodap0 : iLenMax;
      var iLenMax     = iLenRodap1>iLenMax ? iLenRodap1 : iLenMax;
      // se tiver mais rodapes - colocar aqui

      document.getElementById(this.sId+"_"+1+"x"+j).style.width = iLenMax;
      document.getElementById(this.sId+"_"      +j).style.width = iLenMax;
      document.getElementById('rodape_'+this.sId+"_"+0+"x"+j).style.width = iLenMax;
      document.getElementById('rodape_'+this.sId+"_"+1+"x"+j).style.width = iLenMax;
      // se tiver mais rodapes - colocar aqui


      // 1/4
      var oObj = oColuna;
/*
      oObj.style.width = iLenMax;
      while (oObj.offsetWidth<iLenMax) {
         if (document.getElementById(this.sId+"_"+j).style.textAlign=='left' ) {
            oObj.innerHTML =         oObj.innerHTML+'-';
            alert(0);
         } else if (document.getElementById(this.sId+"_"+j).style.textAlign=='right') {
            oObj.innerHTML = '-'+oObj.innerHTML;
            alert(1);
         } else {                                                                 
            oObj.innerHTML = '-'+oObj.innerHTML+'-'
            alert(2);
         }
         alert('1) oColuna.offsetWidth='+oObj.offsetWidth+'\niLenMax='+iLenMax);
         oObj.style.width = iLenMax;
         alert('2) oColuna.offsetWidth='+oObj.offsetWidth+'\niLenMax='+iLenMax);
         oObj.innerHTML = '111';
         break;
      }
*/
      // 2/4
/*
      var oObj = oTitulo;
      oObj.style.width = iLenMax;
      while (oObj.offsetWidth<iLenMax) {
         if      (document.getElementById(this.sId+"_"+j).style.textAlign=='left' ) oObj.innerHTML =         oObj.innerHTML+'&nbsp';
         else if (document.getElementById(this.sId+"_"+j).style.textAlign=='right') oObj.innerHTML = '&nbsp'+oObj.innerHTML;
         else                                                                       oObj.innerHTML = '&nbsp'+oObj.innerHTML+'&nbsp'
         oObj.style.width = iLenMax;
         alert('oTitulo.offsetWidth='+oObj.offsetWidth+'\niLenMax='+iLenMax);
      }

      // 3/4
      var oObj = oRodap0;
      oObj.style.width = iLenMax;
      while (oObj.offsetWidth<iLenMax) {
         if      (document.getElementById(this.sId+"_"+j).style.textAlign=='left' ) oObj.innerHTML =         oObj.innerHTML+'&nbsp';
         else if (document.getElementById(this.sId+"_"+j).style.textAlign=='right') oObj.innerHTML = '&nbsp'+oObj.innerHTML;
         else                                                                       oObj.innerHTML = '&nbsp'+oObj.innerHTML+'&nbsp'
         oObj.style.width = iLenMax;
         alert('oRodap0.offsetWidth='+oObj.offsetWidth+'\niLenMax='+iLenMax);
      }

      // 4/4
      var oObj = oRodap1;
      oObj.style.width = iLenMax;
      while (oObj.offsetWidth<iLenMax) {
         if      (document.getElementById(this.sId+"_"+j).style.textAlign=='left' ) oObj.innerHTML =         oObj.innerHTML+'&nbsp';
         else if (document.getElementById(this.sId+"_"+j).style.textAlign=='right') oObj.innerHTML = '&nbsp'+oObj.innerHTML;
         else                                                                       oObj.innerHTML = '&nbsp'+oObj.innerHTML+'&nbsp'
         oObj.style.width = iLenMax;
         alert('oRodap1.offsetWidth='+oObj.offsetWidth+'\niLenMax='+iLenMax);
      }
      // se tiver mais rodapes - colocar aqui
*/
   }   // j
   this.lQuebraCol=false;
   return true;
}



function flMontaNullTela() {
///////////////////////////////////
   for (var i = 0; i < this.iAlt; i++) this.flMontaNullLinha(i);
   return true;
}
function fsCorLinhaGrid(piLinha) {
///////////////////////////////////
   var sRet;
   if ((Math.floor(piLinha/2)) == (piLinha/2)) sRet = sBCorJanAtivo;
   else sRet = sBCorJanAtivo2;
   return sRet;
}
function flDeleteQuebraCol_Rows() {
///////////////////////////////////
//   var a = document.getElementsByName('quebra_col_'+this.sId);
   var oTable = document.getElementById('tableGrid_'+this.sId);
   var a      = oTable.rows;
//   var iLena = a.length;
   for (var i=0; i < a.length; i++) {
      if (a[i].id=='quebra_col_'+this.sId) {
         oTable.deleteRow(a[i].rowIndex);
      }
   }
   this.sQuebraCol = '%$#@!';
   return true;
}

function flQuebraColAcordeon(psCont) {
//////////////////////////////////////
   var iLinha=0;
   this.sQuebraColAcordeon = psCont;
   for (var ij in this.aQuebraColAcordeon) {
      var aTmpp = this.aQuebraColAcordeon[ij];

      var sQCol = aTmpp[0];
      if (this.sQuebraColAcordeon==sQCol) {
         this.aQuebraColAcordeon[ij][1]=1;
         iLinha=this.aQuebraColAcordeon[ij][2];
      } else {
         this.aQuebraColAcordeon[ij][1]=0;
      }
   }
   this.flMontaTela(iLinha);
}

function flMontaLinha(piLinha) {
////////////////////////////////////////
//alert('1) piLinha='+piLinha+'\nthis.iCursorLin='+this.iCursorLin);
   var i = Number(this.iArray)-Number(this.iCursorLin)+Number(piLinha);
   for (var j = 0; j < this.iCol; j++) {

      var sCabCel  = document.getElementById(this.sId+"_"+j);
      var sCel     = document.getElementById(this.sId+"_"+piLinha+"x"+j);

      if (sCel==null) return false;   // ao final da incluso de itens da OSa, posso sair do grid de itens e o confirmar ainda estar rodando e ao final desse ele fara um refresh em cel==null

      var sCabCel2 = document.getElementById("borda_"+this.sId+"_"+j);
      var sCel2    = document.getElementById("borda_"+this.sId+"_"+piLinha+"x"+j);

      if (this.lQuebraCol==true) {
         sCabCel.style.display="";
         sCel.style.display="";
         if (j<(this.iCol-1)) {
            sCabCel2.style.display="";
            sCel2.style.display="";
         }
      }
//      var iLenaGrid = this.aGrid.length;
      if (piLinha < this.aGrid.length) {
         var aTmp  = this.aTitCol[j].split("-");
         var sTitCol = fsTrim(aTmp[0]);
         var sTyp  = fsTrim(aTmp[1]);

         var sCont = this.aGrid[i][j];
         var eCont = this.iTotRecs==0 ? '...' : this.fsGet_aGrid(i,j);

         if (sCont!=null) {
            var pChave = this.fiFlyChaveAtual(piLinha);
            //console.log('pChave='+pChave);
            if ((document.getElementById('inp-1-'+pChave+'-'+this.sId)!=null) && (sCont.indexOf("id='inp-1-{pChave}-")>=0) && (this.aInLineChaIrma[pChave]==this.fsGet_aGrid(piLinha,this.iCol+1))) continue;
            if ((document.getElementById('inp-2-'+pChave+'-'+this.sId)!=null) && (sCont.indexOf("id='inp-2-{pChave}-")>=0) && (this.aInLineChaIrma[pChave]==this.fsGet_aGrid(piLinha,this.iCol+1))) continue;
            if ((document.getElementById('inp-3-'+pChave+'-'+this.sId)!=null) && (sCont.indexOf("id='inp-3-{pChave}-")>=0) && (this.aInLineChaIrma[pChave]==this.fsGet_aGrid(piLinha,this.iCol+1))) continue;
/*
            if ((document.getElementById('inp-1-'+piLinha+'-'+this.sId)!=null) && (sCont.indexOf("id='inp-1-{piLinha}-")>=0) && (this.aInLineChaIrma[piLinha]==this.fsGet_aGrid(piLinha,this.iCol+1))) continue;
            if ((document.getElementById('inp-2-'+piLinha+'-'+this.sId)!=null) && (sCont.indexOf("id='inp-2-{piLinha}-")>=0) && (this.aInLineChaIrma[piLinha]==this.fsGet_aGrid(piLinha,this.iCol+1))) continue;
            if ((document.getElementById('inp-3-'+piLinha+'-'+this.sId)!=null) && (sCont.indexOf("id='inp-3-{piLinha}-")>=0) && (this.aInLineChaIrma[piLinha]==this.fsGet_aGrid(piLinha,this.iCol+1))) continue;
*/
         } 
  
         // Quebra COLUNA 
         if ((this.lQuebraCol==true)&&(j==this.iQuebraCol)) {
            sCabCel.style.display="none";
            sCel.style.display="none";
            if (j<(this.iCol-1)) {
               sCel2.style.display="none";
               sCabCel2.style.display="none";
            }

            if (this.sQuebraCol!=sCont) {   // quando surge um 'sub titulo'
//--------
               if (this.lQuebraColAcordeon==true) {
                  this.sQuebraColAcordeon = this.aGrid[this.iCursorLin][j];
                  this.sQuebraCol = sCont;
                  var aTmp = new Array();
                  aTmp.push(sCont);
                  if (this.sQuebraCol==this.sQuebraColAcordeon) aTmp.push(1);
                  else                                          aTmp.push(0);
                  aTmp.push(this.aGrid[i][this.iCol]);
                  var iCont=-1;
                  for (var ij in this.aQuebraColAcordeon) {
                     var aTmpp = this.aQuebraColAcordeon[ij];
                     var sQCol = aTmpp[0];
                     if (sQCol==sCont) {
                        iCont=ij;
                        break;
                     }
                  }
                  if (iCont>=0) {
                     this.aQuebraColAcordeon[iCont] = aTmp;
                  } else {
                     this.aQuebraColAcordeon.push(aTmp);   // [0]->sCont, [1]->Visivel, [2]->Chave
                  }
               } else this.sQuebraCol = sCont;
//--------
               oTable = document.getElementById('tableGrid_'+this.sId);
               oRow   = document.getElementById('linhaGrid_'+this.sId+'_'+piLinha);
               oRow   = oTable.insertRow(oRow.rowIndex);
               oRow.id = 'quebra_col_'+this.sId;
               oGrid = this;
               if (this.lQuebraColAcordeon==true) oRow.onclick = function() {oGrid.flQuebraColAcordeon(sCont);}
               if (this.lQuebraColAcordeon==true) oRow.style.cursor = 'pointer';
//             document.getElementById('quebra_col_'+this.sId).addEventListener('click',alert(0));
               var oCel = oRow.insertCell(0);
               if (parent.sMnemProp=='engajamento') {
                  oCel.colSpan = this.iCol*2-1;
                  oCel.style.height='24px';
                  oCel.style.verticalAlign = 'middle';            
                  oCel.style.fontFamily = 'Verdana';
                  oCel.style.fontSize = '11px';
                  oCel.style.borderStyle = 'solid';
                  oCel.innerHTML = sTitCol+': <b>'+sCont+'</b>';
                  oCel.style.backgroundColor='#ffffff';
                  oCel.style.borderWidth = 0;
                  oCel.style.borderBottomColor = '#AC1447';
                  oCel.style.borderBottomWidth = 3;
   //               document.getElementById('borda_'+this.sId+'_'+piLinha+'x'+j).style.display='none';
               } else {
                  oCel.colSpan = this.iCol*2-1;
                  oCel.style.height='24px';
                  oCel.style.verticalAlign = 'middle';            
                  oCel.style.fontFamily = 'Verdana';
                  oCel.style.fontSize = '11px';
                  oCel.style.borderWidth = 'thin';
                  oCel.style.borderColor = this.sFCorCapAtivo;
                  oCel.style.borderStyle = 'solid';
                  oCel.style.color=this.sFCorCapAtivo;
                  oCel.style.backgroundColor='#d0d0F0';
                  oCel.innerHTML = sTitCol+': <b>'+sCont+'</b>';
//                  document.getElementById('borda_'+this.sId+'_'+piLinha+'x'+j).style.display='none';
               }   // if (parent.sMnemProp=='engajamento')
            }   // if (this.sQuebraCol!=sCont)
         }   // if ((this.lQuebraCol==true)&&(j==this.iQuebraCol))

         if (this.iTotRecs==0) {
            sCel.innerHTML = "&nbsp;...&nbsp;";
         } else {


            // fore color
//            var iLenaExpFColorj = this.aExpFColor[j].length;
            if (this.aExpFColor[j].length>0) {
               var sColor='';
               var eExpColor = fsReplace(this.aExpBColor[j],'fcolor=','sColor=')+';';   //  fcolor='#AAAAAA'
//                  var eExpColor = this.aExpFColor[j];
               eval(eExpColor);
               sCel.style.color=sColor;
            }

            // background color
//            var iLenaExpBColorj = this.aExpBColor[j].length;
            if (this.aExpBColor[j].length>0) {
               var sColor='';
               var eExpColor = fsReplace(this.aExpBColor[j],'bcolor=','sColor=')+';';   //  bcolor='#AAAAAA'
//                  var eExpColor = this.aExpBColor[j];
               eval(eExpColor);
               if (piLinha == this.iCursorLin) {
                  sCel.style.backgroundColor='#FF7F50';
                  sCel2.style.backgroundColor='#FF7F50';
               } else {
                  sCel.style.backgroundColor=sColor;
                  sCel2.style.backgroundColor=sColor;
               }
            }

            if (sTyp=="l") { 
               if ((sCont!=null) && (sCont.indexOf('js.this.flMarcado(')>=0)) {  // (sCont!=null) ocorre qdo o grid esta sem conteudo (entrar incluindo)
                  if (this.flMarcadoOrig(this.fiFlyChaveAtual(i))==true) {
                     if (eCont==0) { 
                          sCel.innerHTML = '<input type="checkbox" onclick="'+this.sId+'.flOnMarcando('+piLinha+');"/>';
//                          sCel.innerHTML = '<input type="image" src="gifs/CheckButton10.gif" onclick="'+this.sId+'.flOnMarcando('+piLinha+');"/>';
                     } else {
                          sCel.innerHTML = '<input type="checkbox" CHECKED onclick="'+this.sId+'.flOnMarcando('+piLinha+');"/>';
//                          sCel.innerHTML = '<input type="image" src="gifs/CheckButton01.jpg" onclick="'+this.sId+'.flOnMarcando('+piLinha+');"/>';
                     }
                  } else {
   
                     if (eCont==0) { 
                          sCel.innerHTML = '<input type="checkbox" onclick="'+this.sId+'.flOnMarcando('+piLinha+');"/>';
   //                       sCel.innerHTML = '<input type="image" src="gifs/CheckButton00.gif" onclick="'+this.sId+'.flOnMarcando('+piLinha+');"/>';
                     } else {
                          sCel.innerHTML = '<input type="checkbox" CHECKED onclick="'+this.sId+'.flOnMarcando('+piLinha+');"/>';
   //                       sCel.innerHTML = '<input type="image" src="gifs/CheckButton11.jpg" onclick="'+this.sId+'.flOnMarcando('+piLinha+');"/>';
                     }
   
                  }
               } else {
   //               if (eCont==0) { 
   //                   sCel.innerHTML = '<input type="image" src="gifs/CheckButton00.jpg"/>';
   //               } else sCel.innerHTML = '&nbsp;<input type="image" src="gifs/CheckButton01.jpg"/>&nbsp;';
                  if (eCont==0) sCel.innerHTML = '[No]';
                  else          sCel.innerHTML = '[Sim]';
   //                  if (eCont==0) { 
   //                       sCel.innerHTML = '<input type="checkbox"/>';
   //                  } else {
   //                       sCel.innerHTML = '<input type="checkbox" CHECKED;/>';
   //                  }
               }
            } else if (sTyp=='x') {   // link
               eCont= eCont.replace(/(<([^>]+)>)/ig,"");
               eCont= eCont.replace(/&nbsp;/ig," ");
               sCel.innerHTML = '<span style="text-decoration: underline; cursor: pointer;" onclick="flOpenLink('+this.sId+','+"'"+eCont+"'"+');">'+eCont+'</span>';
            } else if (sTyp=='x1') {  // TDoc_Doc
               sCel.innerHTML = '<span style="text-decoration: underline; cursor: pointer;" onclick="'+this.sId+'.flClickLin('+piLinha+');flTDocU('+this.sId+',7);">'+eCont+'</span>';
            } else if (sTyp=='x2') {  // TDoc_Doc
               sCel.innerHTML = '<span style="                            cursor: pointer;" onclick="'+this.sId+'.flClickLin('+piLinha+');flTDoc_Doc('+this.sId+');">'+eCont+'</span>';
            } else if (sTyp=='x3') {  // TDoc_Doc
               sCel.innerHTML = '<span style="                            cursor: pointer;" onclick="'+this.sId+'.flClickLin('+piLinha+');flTDocUA('+this.sId+',7);">'+eCont+'</span>';
            } else if (sTyp=='x4') {  // Agenda   
               sCel.innerHTML = '<span style="text-decoration: underline; cursor: pointer;" onclick="'+this.sId+'.flClickLin('+piLinha+');flAgendaClick('+this.sId+',7);">'+eCont+'</span>';
            } else if (sTyp=='x44') {  // Agenda-sntese
               sCel.innerHTML = '<span style="text-decoration: underline; cursor: pointer;" onclick="'+this.sId+'.flClickLin('+piLinha+');flAgendaSinteseClick('+this.sId+',7);">'+eCont+'</span>';   
            } else if (sTyp=='x444') {  // Agenda-sntese-sub
               sCel.innerHTML = '<span style="text-decoration: underline; cursor: pointer;" onclick="'+this.sId+'.flClickLin('+piLinha+');flAgendaSinteseClickSubordinado('+this.sId+',7);">'+eCont+'</span>';
            } else if (sTyp=='x4444') {  // Carga Vaga
               sCel.innerHTML = '<span style="text-decoration: underline; cursor: pointer;" onclick="'+this.sId+'.flClickLin('+piLinha+');flCargaVaga('+this.sId+',7);">'+eCont+'</span>';      
            } else if (sTyp=='x5') {  // span com cor de backgrund
               sCel.innerHTML = '&nbsp;<span style="background-color: '+eCont+'" onclick="'+this.sId+'.flClickLin('+piLinha+')">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp</span>';
   //            sCel.innerHTML = '&nbsp;<span style="background-color: '+eCont+'" onclick="'+this.sId+'.flClickLin('+piLinha+')">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp&nbsp;&nbsp;&nbsp&nbsp;&nbsp;&nbsp;</span>';
   //            sCel.innerHTML = '<span style="background-color: #00AA00;" onclick="'+this.sId+'.flClickLin('+piLinha+')">&nbsp;&nbsp;&nbsp;&nbsp;</span>';
            } else if (sTyp=='d') {   // data
               sCel.innerHTML = "&nbsp;"+fdDbToVarGrid(eCont)+"&nbsp;";
            } else if (sTyp=='t') {   // datatime
               sCel.innerHTML = "&nbsp;"+ftDbToVarGrid(eCont)+"&nbsp;";
            } else {
               eCont=(piLinha == this.iCursorLin) ? fsReplace(eCont,'{color}',this.sFCorCurAtivo) : fsReplace(eCont,'{color}',this.sFCorJanAtivo);
               eCont=fsReplace(eCont,'&nbsp;',' ');   // um codigo html tipo span nas expressoes fica muito restrito 
               eCont=fsReplace(eCont,'_',';');
               eCont=fsReplace(eCont,'{this}',this.sId);
               eCont=fsReplace(eCont,'{sCliPasta}',parent.sCliPasta);
   //            eCont=fsReplace(eCont,'_','&#95_');   // o nome da pasta pode ter um _
               eCont=fsReplace(eCont,'{piLinha}',piLinha);
               eCont=fsReplace(eCont,'{pChave}',this.fiFlyChaveAtual(piLinha));
               eCont=fsReplace(eCont,'this.',this.sId+'.');
               eCont=fsReplace(eCont,'this,',this.sId+',');
               if (navigator.appName=='Microsoft Internet Explorer') {
                  eCont=fsReplace(eCont,'inherit','000000');
               }
               if (eCont.toUpperCase().indexOf('</TABLE>') >= 0) {   //  uma table na celula
                  sCel.innerHTML = eCont;
               } else {         
                  if (sCel==null) {
                     // nao faz nada -- no erp_ORDENS_CanalWeb_Itens.dda qdo edita um inline e salva e sai e volta, as vezes da um erro -> sCel is null
                  } else {
                     sCel.innerHTML = "&nbsp;"+eCont+"&nbsp;";
                  }
               }
            }
         }   // else -> (this.iTotRecs==0)
      } else {   //  (piLinha < this.aGrid.length)
         sCel.innerHTML = "&nbsp;";
         if ((this.lQuebraCol==true)&&(j==this.iQuebraCol)) {
            sCel.style.display="none";
            sCabCel.style.display="none";
            if (j<(this.iCol-1)) {
               sCel2.style.display="none";
               sCabCel2.style.display="none";
            }
         }
      }
   }   // for
   var sLin = document.getElementById("linhaGrid_"+this.sId+"_"+piLinha);
   if (piLinha == this.iCursorLin) {

      if (this.lCursorOn==true)  {
         sLin.style.backgroundColor=this.sBCorCurAtivo;
         sLin.style.color=this.sFCorCurAtivo;
      } else if (navigator.appName=='Microsoft Internet Explorer') {
         sLin.style.backgroundColor='ffffff';
         sLin.style.color=this.sFCorCurAtivo;
      } else {
         sLin.style.backgroundColor='inherit';
         sLin.style.color='inherit';
      }
      this.flEvalExpMenu();
/*
         if (document.getElementById(this.sId+"_"+piLinha+"x"+0).offsetTop < (document.getElementById("divtableGrid_"+this.sId).scrollTop)) {
            document.getElementById("divtableGrid_"+this.sId).scrollTop = document.getElementById(this.sId+"_"+piLinha+"x"+0).offsetTop;
         }
   
         if (document.getElementById(this.sId+"_"+piLinha+"x"+0).offsetTop+document.getElementById(this.sId+"_"+piLinha+"x"+0).offsetHeight > (document.getElementById("divtableGrid_"+this.sId).scrollTop)+document.getElementById("divtableGrid_"+this.sId).offsetHeight) {
            document.getElementById("divtableGrid_"+this.sId).scrollTop = document.getElementById(this.sId+"_"+piLinha+"x"+0).offsetTop+document.getElementById(this.sId+"_"+piLinha+"x"+0).offsetHeight-document.getElementById("divtableGrid_"+this.sId).offsetHeight;
         }
*/

   } else {
   
      sLin.style.backgroundColor=fsCorLinhaGrid(piLinha);
      sLin.style.color=this.sFCorJanAtivo;
   }

   var pChave = this.fiFlyChaveAtual(piLinha);
   if (document.getElementById('inp-1-'+pChave+'-'+this.sId)!=null) {  //  essa eh a forma de saber q  um grid com edicao inline, pois aqui mesmo q seja 1 vez ele ja vai existir
      this.aInLineChaIrma[pChave] = this.fsGet_aGrid(i,this.iCol+1);   //
   }
/*
   if (document.getElementById('inp-1-'+piLinha+'-'+this.sId)!=null) {   //  essa eh a forma de saber q  um grid com edicao inline, pois aqui mesmo q seja 1 vez ele ja vai existir
      this.aInLineChaIrma[piLinha] = this.fsGet_aGrid(i,this.iCol+1);   // i = Number(this.iArray)-Number(this.iCursorLin)+Number(piLinha);  // inicio da funcao
   }
*/
   //var iLenaGrid = this.aGrid.length;
   if ((piLinha >= this.aGrid.length)&&(piLinha >=50)) sLin.style.display='none';   // >50 ??
   else sLin.style.display='';

   //console.log('this.lQuebraColAcordeon='+this.lQuebraColAcordeon);
//--------
   if (this.lQuebraColAcordeon==true) {
      if (piLinha < this.aGrid.length) {
         sCont = this.aGrid[i][this.iQuebraCol];
         for (var ij in this.aQuebraColAcordeon) {
            var aTmpp = this.aQuebraColAcordeon[ij];
            var sQCol = aTmpp[0];
            var lEVis = aTmpp[1];
      
            //console.log('sQCol='+sQCol+', lEVis='+lEVis+', sCont='+sCont);
            //if (sQCol==sCont) console.log('break');
            if (sQCol==sCont) break;   // sempre vai achar
         }
         if (lEVis==0) {
            //console.log('display=none');
            sLin.style.display='none';
         } else {
            //console.log('display=');
            sLin.style.display='';
         }
      }
   }
//--------
   //alert('final');
   return true;
}
//
function flOpenLink_DocsConsulta(psCaller,psFileExt) {   // FUNCAO DEDICADA AO IPD
//////////////////////////////////////////////////////

   sFileExt = psFileExt;
   sFileExt = fsReplace(psFileExt,' ','_');
   var sLink = '/docs_consulta/'+sFileExt;
   window.open(sLink);
}
//
function flMontaNullLinha(piLinha) {
/////////////////////////////////////////////
   for (var j = 0; j < this.iCol; j++) {
      document.getElementById(this.sId+"_"+piLinha+"x"+j).innerHTML = "&nbsp;";
   }
   document.getElementById("linhaGrid_"+this.sId+"_"+piLinha).style.backgroundColor = fsCorLinhaGrid(piLinha);
   return true;
}
function flClickLin(piLinha) {
//////////////////////////////////////
   if (this.lClickLin==true) {
      flSetGridDefault(this);
      var iOldLin = this.iCursorLin;
//      var iLenaGrid = this.aGrid.length;
      if ((Number(this.iArray) + Number(piLinha-iOldLin)) < this.aGrid.length) {
         this.iCursorLin = piLinha;
         this.iArray     = Number(this.iArray) + Number(piLinha-iOldLin);
         this.flMontaLinha(iOldLin);
         this.flMontaLinha(this.iCursorLin);
         this.flAjustaColunas();
      }
   } else {
      this.lClickLin=true;
   }
}
function oflLocalizaLin() {
/////////////////////////////////
   flSetGridDefault(this);
   var i0 = 0;
   var sSearch = prompt("Qual o texto a ser procurado ?",this.sLastSearchedTxt);
   if (sSearch==this.sLastSearchedTxt) {
      i0 = this.iArray+1;
   } else {
      this.sLastSearchedTxt = sSearch;
   }
   var sStr;
   var l=0;
   var i;
   var j;
//   var iLenaGrid = this.aGrid.length;
   for (i=i0; i<this.aGrid.length; i++) {
//      var iLenaGridi = this.aGrid[i].length;
      for (j=0; j<this.aGrid[i].length; j++) {
         sStr = this.fsGet_aGrid(i,j) + '';   // +''  para forcar o conteudo a ser tornar uma string
         if (sStr.toUpperCase().indexOf(sSearch.toUpperCase()) >= 0) {
            this.iArray = i;
            this.flMontaTela();
            l=1;
            break;
         }
      if (l==1) break;
      }
   }
}
function flLocalizaLin() {
////////////////////////
   flSetGridDefault(this);
   var sSearch = prompt("Pesquisar por ?",this.sLastSearchedTxt);
   if (sSearch==this.sLastSearchedTxt) {

   } else {
      if (this.sPesquisar!='') {
         this.sLastSearchedTxt = sSearch;
         
         this.lPesquisandoNr0 = true;
         if (this.sQryOriginal.indexOf(' group by ') >= 0) {
            var aTmp = this.sQryOriginal.split(' group by ');
            this.sOldQry = this.sQry;
            this.sQry = aTmp[0] + " and ("+ this.sPesquisar +") group by " + aTmp[1];
         } else {
            var aTmp = this.sQryOriginal.split(' order by ');
            this.sOldQry = this.sQry;
            this.sQry = aTmp[0] + " and ("+ this.sPesquisar +") order by " + aTmp[1];
         }
         this.flRefreshCall(this.sQry);
      } else { 

         var i0 = 0;
         if (sSearch==this.sLastSearchedTxt) {
            i0 = this.iArray+1;
         } else {
            this.sLastSearchedTxt = sSearch;
         }
         var sStr;
         var l=0;
         var i;
         var j;
//         var iLenaGrid = this.aGrid.length;
         for (i=i0; i<this.aGrid.length; i++) {
//            var iLenaGridi = this.aGrid[i].length;
            for (j=0; j<this.aGrid[i].length; j++) {
               sStr = this.fsGet_aGrid(i,j) + '';   // +''  para forcar o conteudo a ser tornar uma string
               if (sStr.toUpperCase().indexOf(sSearch.toUpperCase()) >= 0) {
                  this.iArray = i;
                  this.flMontaTela();
                  l=1;
                  break;
               }
            }
            if (l==1) break;
         }
         if (l==0) alert('No foi localizado.');
         //if (l==0) flModal('<font color=blue>Sistema</font>','No foi localizado.');
      }
   }
}
//
function fiChaveTo_iArray(piChave) {
////////////////////////////////////
//   var iLenaGrid = this.aGrid.length;
   for (var i=0; i<this.aGrid.length; i++) {
      if (this.aGrid[i][this.iCol]==piChave) break;
   }
   return (i<this.aGrid.length ? i : -1);
}
//
function flLocaliza2Lin() {
///////////////////////////
//console.log('this.sQryOriginal='+this.sQryOriginal);
//console.log('this.sQry='+this.sQry);
   flSetGridDefault(this);
   var sSearch = document.getElementById('btnPesquisar_'+this.sId).value;
//   sSearch = fsRemoverAcentos(sSearch);
//   if (sSearch==this.sLastSearchedTxt) {
   if (false) {
   } else {
      if (this.sPesquisar!='') {
         this.sLastSearchedTxt = fsTrim(sSearch+'');
         var aTmp = this.sLastSearchedTxt.split(" ");
         var sTmp = '';
//         var iLenaTmp = aTmp.length;
         for (var i=1; i<aTmp.length; i++) {
            if (fsTrim(aTmp[i])!='') sTmp += ' and ('+fsReplace(this.sPesquisar,'0}',i+'}')+')';
         }
         var sPesquisarTmp    = this.sPesquisar + sTmp;
         this.sPesquisarFull  = sPesquisarTmp;   // ser usado em al_GetDDG.php qdo this.sQry for uma funo ao invs de um qry convencional
         this.lPesquisandoNr0 = true;

         if (this.sQryOriginal.substr(this.sQryOriginal.length-2,2)=='()') {   //  um processo, uma funo - no fazer nada
            //
         } else {              
            if (this.sQryOriginal.indexOf(' group by ') >= 0) {
               var aTmp = this.sQryOriginal.split(' group by ');
               this.sOldQry = this.sQry;
               this.sQry = aTmp[0] + " and ("+ sPesquisarTmp +") group by " + aTmp[1];
            } else {
               var aTmp = this.sQryOriginal.split(' order by ');
               this.sOldQry = this.sQry;
               this.sQry = aTmp[0] + " and ("+ sPesquisarTmp +") order by " + aTmp[1];
            }
   
            if (this.iSortCol>=0) {
               aTmp = this.sQry.split(' order by ');
               this.sQry = aTmp[0] + ' order by ' + this.aOrdCol[this.iSortCol];;
            }
         }

         var sQry = this.sQry;
         //console.log('sQry='+sQry);

         if (this.lLixeira==true) {

            var sQry = sQry.replace("a.lExc=","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc  =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc   =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc    =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc     =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc      =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc       =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc        =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc         =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc          =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc           =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc            =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc             =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc              =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc               =","(a.lExc-1)=");
            var sQry = sQry.replace("a.lExc                =","(a.lExc-1)=");
         }   

         this.iPage=0;
         this.flRefreshCall(sQry);
      } else {
         var i0 = 0;
         if (sSearch==this.sLastSearchedTxt) {
            i0 = this.iArray+1;
         } else {
            this.sLastSearchedTxt = sSearch;
         }
         var sStr;
         var l=0;
         var i;
         var j;
//         var iLenaGrid = this.aGrid.length;
         for (i=i0; i<this.aGrid.length; i++) {
//            var iLenaGridi = this.aGrid[i].length;
            for (j=0; j<this.aGrid[i].lengt; j++) {
               sStr = this.fsGet_aGrid(i,j) + '';   // +''  para forcar o conteudo a ser tornar uma string
               if (sStr.toUpperCase().indexOf(sSearch.toUpperCase()) >= 0) {
                  this.iArray = i;
                  this.flMontaTela();
                  l=1;
                  break;
               }
            }
            if (l==1) break;
         }
         if (l==0) alert('No foi localizado.');
         //if (l==0) flModal('<font color=red>Sistema</font>','No foi localizado.');
      }
   }
}

function flLocalizaOriginal() {
///////////////////////////////
//alert('flLocalizaOriginal');
   flSetGridDefault(this);
   var sSearch = document.getElementById('btnPesquisar_'+this.sId).value;
//   sSearch = fsRemoverAcentos(sSearch);
      if (this.sPesquisar!='') {
         this.sLastSearchedTxt = '';
         this.lPesquisandoNr0 = true;
         this.sQry =  this.sQryOriginal;
         if (this.iSortCol>=0) {
            aTmp = this.sQry.split(' order by ');
            this.sQry = aTmp[0] + ' order by ' + this.aOrdCol[this.iSortCol];;
         }
//         this.flRefreshCall(this.sQry);  // (*)
      }
      sQry = this.sQry;
      if (this.lLixeira==true) {   // criar uma regra geral
         var sQry = sQry.replace("a.lExc=","(a.lExc-1)=");
         var sQry = sQry.replace("a.lExc =","(a.lExc-1)=");
         var sQry = sQry.replace("a.lExc  =","(a.lExc-1)=");
         var sQry = sQry.replace("a.lExc   =","(a.lExc-1)=");
         var sQry = sQry.replace("a.lExc    =","(a.lExc-1)=");
         var sQry = sQry.replace("a.lExc     =","(a.lExc-1)=");
         var sQry = sQry.replace("a.lExc      =","(a.lExc-1)=");
         var sQry = sQry.replace("a.lExc       =","(a.lExc-1)=");
         var sQry = sQry.replace("a.lExc        =","(a.lExc-1)=");
         var sQry = sQry.replace("a.lExc         =","(a.lExc-1)=");
         var sQry = sQry.replace("a.lExc          =","(a.lExc-1)=");
         var sQry = sQry.replace("a.lExc           =","(a.lExc-1)=");
         var sQry = sQry.replace("a.lExc            =","(a.lExc-1)=");
         var sQry = sQry.replace("a.lExc             =","(a.lExc-1)=");
         var sQry = sQry.replace("a.lExc              =","(a.lExc-1)=");
         var sQry = sQry.replace("a.lExc               =","(a.lExc-1)=");
         var sQry = sQry.replace("a.lExc                =","(a.lExc-1)=");
      }   
     
//alert('flLocalizaOriginal-flRefreshCall');
      if (this.oContainer==null)  this.flRefreshCall(sQry);  // (*)
      else                        this.flRefreshCall_FromTela();
}

function flOrderGrid2(psOrderby) {   // vc passa o order by
//////////////////////////////////
      if (psOrderby != '') {
         aTmp = this.sQry.split(' order by ');
         this.sQry = aTmp[0] + ' order by ' + psOrderby;
         this.flRefreshCall(this.sQry);
      }
}


function flOrderGrid(piCol,plReverse) {
///////////////////////////////////////
   if ((this.aOrdCol[piCol]+'').indexOf('.')>=0) {   //  uma expressao de alias - um order by
      if (this.iSortCol != piCol) {
         this.iSortCol = piCol;
         this.iQuebraCol = (this.iQuebraCol==-1 ? -1 : piCol);
//         this.sQry =  this.sQryOriginal;
         aTmp = this.sQry.split(' order by ');
         this.sQry = aTmp[0] + ' order by ' + this.aOrdCol[piCol];
         this.flRefreshCall(this.sQry);
      }
   } else {
      var iChaveAtual = this.fiChaveAtual();  // psGrid.fiChaveAtual();  ??
      if (plReverse) {
         if (this.iSortCol != piCol) {
            this.lRevSort = false;
            this.iSortCol = piCol;
            this.aGrid = this.aGrid.sort(flSortArray);
         } else {
            if (this.lRevSort==true) {
               this.lRevSort = false;
               this.aGrid = this.aGrid.sort(flSortArray);
            } else {
               this.lRevSort = true;
               this.aGrid = this.aGrid.sort(flRevSortArray);
            }
         }
      } else {
         if (this.lRevSort==false) this.aGrid = this.aGrid.sort(flSortArray);
         else this.aGrid = this.aGrid.sort(flRevSortArray);
      }
      this.flMontaTela(iChaveAtual);
   }
}

function flSortArray(pa1,pa2) {
///////////////////////////////////////
   var i;
   var s
   var s1 = '';
   var s2 = '';
   var sOrdCol = oGridDefault.aOrdCol[oGridDefault.iSortCol] + '';  // para forcar um nr (sigle) virar string
   var aTmp = sOrdCol.split(',');
//   var iLenaTmp = aTmp.length;
   for (i=0; i<aTmp.length; i++) {
      if (aTmp[i].indexOf('val(')>=0) {
         s   = aTmp[i].replace('val(','');
         s   = s.replace(')','');
         s0  = ('00000000000000000000'+pa1[Number(s)])
         s1 += s0.substr(s0.length-20,20);

         s0  = ('00000000000000000000'+pa2[Number(s)])
         s2 += s0.substr(s0.length-20,20);         
      } else {
         s1 += (pa1[Number(aTmp[i])]+'                                                                                                    ').substr(0,100);
         s2 += (pa2[Number(aTmp[i])]+'                                                                                                    ').substr(0,100);
      } 
   }
   return((s1<s2) ? -1 : ((s1>s2) ? 1 : 0));
}
function flSortSingleArray(pa1,pa2) {
///////////////////////////////////////
   var s1 = pa1[0];
   var s2 = pa2[0];
   return((s1<s2) ? -1 : ((s1>s2) ? 1 : 0));
}
function flRevSortArray(pa1,pa2) {
///////////////////////////////////////////
   var i;
   var s
   var s1 = '';
   var s2 = '';
   var sOrdCol = oGridDefault.aOrdCol[oGridDefault.iSortCol] + '';  // para forca um nr (sigle) virar string
   var aTmp = sOrdCol.split(',');
//   var iLenaTmp = aTmp.length;
   for (i=0; i<aTmp.length; i++) {
      if (aTmp[i].indexOf('val(')>=0) {
         s   = aTmp[i].replace('val(','');
         s   = s.replace(')','');
         s0  = ('00000000000000000000'+pa2[Number(s)])
         s1 += s0.substr(s0.length-20,20);

         s0  = ('00000000000000000000'+pa1[Number(s)])
         s2 += s0.substr(s0.length-20,20);         
      } else {
         s1 += (pa2[Number(aTmp[i])]+'                                                                                                    ').substr(0,100);
         s2 += (pa1[Number(aTmp[i])]+'                                                                                                    ').substr(0,100);
      } 
   }
   return((s1<s2) ? -1 : ((s1>s2) ? 1 : 0));
}
function flDesceLin() {
//////////////////////////////
   if (aSss[this.iSss][1]==true) return false;   // se disable return false
   flSetGridDefault(this);
   var iOldLin = this.iCursorLin;
   if (++this.iCursorLin>=this.iAlt) {
      this.iCursorLin=iOldLin;
//      var iLenaGrid = this.aGrid.length;
      if (++this.iArray>=this.aGrid.length) this.iArray = this.aGrid.length-1;
      else this.flMontaTela();
   } else {
//      var iLenaGrid = this.aGrid.length;
      if (++this.iArray>=this.aGrid.length) {
         this.iArray = this.aGrid.length-1;
         this.iCursorLin   = iOldLin;
      } else {
         this.flMontaLinha(iOldLin);
         this.flMontaLinha(this.iCursorLin);
         this.flAjustaColunas();
      }
   }
   return true;
}
function flSobeLin() {
/////////////////////////////
   if (aSss[this.iSss][1]==true) return false;   // se disable return false
   flSetGridDefault(this);
   var iOldLin = this.iCursorLin;
   if (--this.iCursorLin<0) {
      this.iCursorLin=iOldLin;
      if (--this.iArray<0) this.iArray = 0;
      else this.flMontaTela();
   } else {
      if (--this.iArray<0) {
         this.iArray = 0;
         this.iCursorLin   = iOldLin;
      } else {
         this.flMontaLinha(iOldLin);
         this.flMontaLinha(this.iCursorLin);
         this.flAjustaColunas();
      }
   }
   return true;
}
function flDesceScrollLin(piLin) {
////////////////////////////////// desce a linha mantendo o cursor no mesmo lugar
   if (aSss[this.iSss][1]==true) return false;   // se disable return false
   flSetGridDefault(this);
   for (var i=1; i<=piLin; i++) {
//      var iLenaGrid = this.aGrid.length;
      if (++this.iArray>=this.aGrid.length) this.iArray = this.aGrid.length-1
      else this.flMontaTela();
   }
   return true;
}
function flSobeScrollLin(piLin) {
///////////////////////////////// sobe a linha mantendo o cursor no mesmo lugar
   if (aSss[this.iSss][1]==true) return false;   // se disable return false
   flSetGridDefault(this);
   for (var i=1; i<=piLin; i++) {
      if (--this.iArray<0) this.iArray = 0;
      else this.flMontaTela();
   }
   return true;
}
function flPgDn() {
/////////////////////////
//document.getElementById("divtableGrid_"+this.sId).scrollTop = document.getElementById(this.sId+"_"+piLinha+"x"+0).offsetTop;
//this.iCursorLin
//   console.log('aSss[this.iSss][1]='+aSss[this.iSss][1]);
   if (aSss[this.iSss][1]==true) return false;   // se disable return false
   var iAlt = Math.round(document.getElementById("divtableGrid_"+this.sId).offsetHeight/document.getElementById(this.sId+"_0x0").offsetHeight);
   var iOldLin = this.iCursorLin;
   flSetGridDefault(this);
   if (this.iCursorLin+iAlt>=this.iAlt) {  // caso grid com scroll do browser this.iAlt = this.aGrid.length e this.iCursorLin=this.iArray
      // nao faz nada
   } else {
      this.iCursorLin += iAlt;
      this.iArray += iAlt;
//      var iLenaGrid = this.aGrid.length;
      if (this.iArray>=this.aGrid.length) {
         this.iArray = this.aGrid.length-1;
         this.iCursorLin = this.iAlt-1;
      }
      this.flMontaLinha(iOldLin);
      this.flMontaLinha(this.iCursorLin);
      this.flAjustaColunas();
   }
   return true;
}
function flPgUp() {
/////////////////////////

   if (aSss[this.iSss][1]==true) return false;   // se disable return false
   var iAlt = Math.round(document.getElementById("divtableGrid_"+this.sId).offsetHeight/document.getElementById(this.sId+"_0x0").offsetHeight);
   var iOldLin = this.iCursorLin;
   flSetGridDefault(this);
   if (this.iCursorLin-iAlt<0) {  // caso grid com scroll do browser this.iAlt = this.aGrid.length e this.iCursorLin=this.iArray
      // nao faz nada
   } else {
      this.iCursorLin -= iAlt;
      this.iArray -= iAlt;
      if (this.iArray<0) {
         this.iArray = 1;
         this.iCursorLin = 1;
      }
      this.flMontaLinha(iOldLin);
      this.flMontaLinha(this.iCursorLin);
      this.flAjustaColunas();
   }
   return true;
}
function flEndArray() {
//////////////////////////////
   if (aSss[this.iSss][1]==true) return false;   // se disable return false
   flSetGridDefault(this);
   this.iArray = this.aGrid.length-1;
   this.iCursorLin   = this.iAlt-1;
   this.flMontaTela();
   return true;
}
function flTopArray() {
//////////////////////////////
   if (aSss[this.iSss][1]==true) return false;   // se disable return false
   flSetGridDefault(this);
   this.iArray = 0;
   this.iCursorLin   = 0;
   this.flMontaTela();
   return true;
}
function flEndTela() {
/////////////////////////////
   if (aSss[this.iSss][1]==true) return false;   // se disable return false
   flSetGridDefault(this);
   var iOldLin = this.iCursorLin;
//   var iLenaGrid = this.aGrid.length;
   if (this.aGrid.length > this.iAlt) {
      this.iArray += (this.iAlt-this.iCursorLin-1);
      this.iCursorLin    = this.iAlt-1;
   } else {
      this.iArray  = this.aGrid.length-1;
      this.iCursorLin    = this.aGrid.length-1;
   }
   this.flMontaLinha(iOldLin);
   this.flMontaLinha(this.iCursorLin);
   this.flAjustaColunas();
   return true;
}
function flTopTela() {
//////////////////////
   if (aSss[this.iSss][1]==true) return false;   // se disable return false
   flSetGridDefault(this);
   var iOldLin = this.iCursorLin;
   this.iArray -= (this.iCursorLin);
   this.iCursorLin   = 0 ;
   this.flMontaLinha(iOldLin);
   this.flMontaLinha(this.iCursorLin);
   this.flAjustaColunas();
   return true;
}
function flRastroReg(piChaveAtual) {
////////////////////////////////////

//   if (piChaveAtual > 0) {
   if (piChaveAtual!=0) {   // chave composta
      this.iArray = this.fiArray(piChaveAtual);
      if (this.iArray<0) this.iArray=0;
   }
   var iPrimeiroReg = (this.iArray-this.iCursorLin);
   if (iPrimeiroReg<0) {
      this.iCursorLin = this.iArray;
   } else {
      var iUltimoReg = Number(this.iArray)+Number(this.iAlt)-Number(this.iCursorLin);
//      var iLenaGrid = this.aGrid.length;
      if (iUltimoReg > (this.aGrid.length)) {   // (iUltimoReg > (this.aGrid.length-1))
         if (this.aGrid.length-1 > this.iAlt) { 
            this.iCursorLin = Number(this.iCursorLin) + Number(iUltimoReg-(this.aGrid.length));
         } else {
            this.iCursorLin = this.iArray;
         }
      }
   }
   return true;
}

function flMarcado(ppChave) {
/////////////////////////////
//alert(0);
//alert('flMarcado this.sId='+this.sId);
//alert('flMarcado ppChave='+ppChave);
//alert('flMarcado this.sMarcados='+this.sMarcados);
   return (this.sMarcados.indexOf('/'+ ppChave + '/') >= 0);
}
function flMarcadoOrig(ppChave) {
/////////////////////////////////
   return (this.sMarcadosOrig.indexOf('/'+ ppChave + '/') >= 0);
}
function flMarca(ppChave) {
///////////////////////////
   this.sMarcados += (ppChave + '/');
   var oObj
   oObj = document.getElementById('btnSalvarMarcas_'+this.sId);
   if (oObj!=null) oObj.src='gifs/icone_marca_salvar.gif';
   oObj = document.getElementById('btnResetarMarcas_'+this.sId);
   if (oObj!=null) oObj.src='gifs/icone_marca_reset.gif';
}
function flDesmarca(ppChave) {
//////////////////////////////
   this.sMarcados = this.sMarcados.replace('/'+ppChave+ '/','/');
   var oObj
   oObj = document.getElementById('btnSalvarMarcas_'+this.sId);
   if (oObj!=null) oObj.src='gifs/icone_marca_salvar.gif';
   oObj = document.getElementById('btnResetarMarcas_'+this.sId);
   if (oObj!=null) oObj.src='gifs/icone_marca_reset.gif';
}
function flMarcaServer(piTipo,ppChave,piMarcado) {
//////////////////////////////////////////////////
   if (piTipo==1) {   // agendamento II
      var oObj = this;
      var oRequest = foCreateRequest();
      oRequest.open("GET","bl_SetMarcaServer.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&piTipo="+piTipo+"&ppChave="+ppChave+"&piMarcado="+piMarcado+"&piLogin="+parent.aGlobalLogin[1]+"&psAncestrais="+fsChavesAncestrais(oObj),true);
      oRequest.onreadystatechange = function() {
         if ((oRequest.readyState==4) && (oRequest.status==200)) {
            sMsg = oRequest.responseText;
    //            alert('Retorno flMarcaServer='+sMsg);
            if (sMsg==1) {
               if (piMarcado==0) oObj.flDesmarca(ppChave);
               else           oObj.flMarca(ppChave);
               oObj.flRefreshCall(oObj.sQry);
               //oObj.flMontaTela();
            }
            flIconeProcess(iSss,0);
            flEnableScreen(iSss,true);
         }
      }
      var iSss = this.iSss;
      flIconeProcess(iSss,1);
      flEnableScreen(iSss,false);
      oRequest.send(null);
   }
}
function flMarcacao(ppChave) {
//////////////////////////////
   if (this.flMarcado(ppChave)==true) {   // esta marcado
      this.flDesmarca(ppChave)        ;   // desmarquei
   } else { // nao esta marcado
      this.flMarca(ppChave)           ;   // marquei
   }

   var oObj = this;

   // Chamadas dedicadas - somar cargaao marcar OCa - montagem carga
   if ((this.sDDSFile=='dd_files/erp_Ordens_PreOCa_CapaOrdem.dda') 
    || (this.sDDSFile=='dd_files/erp_Ordens_PreOCa.dda')
    || (this.sDDSFile=='dd_files/erp_FIN_Titulos_versaoA_TQ.dda')
    || (this.sDDSFile=='dd_files/erp_LOG_Fretes_Lancamentos.dda')
    || (this.sDDSFile=='dd_files/erp_FIN_Comissoes_Lancamentos.dda')
    || (this.sDDSFile=='dd_files/erp_FIN_Comissoes_Lancamentos_TQ.dda')
    || (this.sDDSFile=='dd_files/erp_FIN_Comissoes_Itens.dda')
    ) {
      

      var oRequest = foCreateRequest();
      //if (this.oPai!=null) oRequest.open("GET","processos/OCa_Carregar_SumMarcadas.php?sCliPasta="+parent.sCliPasta+"&sMarcados="+this.sMarcados+"&sMarcadosPai="+this.oPai.sMarcados+"&sQrySum="+this.sQrySum2+"&sLogin="+parent.aGlobalLogin[1]+"&sAncestrais="+fsChavesAncestrais(this),true);
      //else                 oRequest.open("GET","processos/OCa_Carregar_SumMarcadas.php?sCliPasta="+parent.sCliPasta+"&sMarcados="+this.sMarcados+                                     "&sQrySum="+this.sQrySum2+"&sLogin="+parent.aGlobalLogin[1]+"&sAncestrais="+fsChavesAncestrais(this),true);

      if (this.oPai!=null) oRequest.open("GET","al_GetDDG_Carregar_SumMarcadas.php?sCliPasta="+parent.sCliPasta+"&sMarcados="+this.sMarcados+"&sMarcadosPai="+this.oPai.sMarcados+"&sQrySum="+this.sQrySum2+"&sLogin="+parent.aGlobalLogin[1]+"&sAncestrais="+fsChavesAncestrais(this)+'&iTimeLogin='+iGlobalTimeLogin,true);
      else                 oRequest.open("GET","al_GetDDG_Carregar_SumMarcadas.php?sCliPasta="+parent.sCliPasta+"&sMarcados="+this.sMarcados+                                     "&sQrySum="+this.sQrySum2+"&sLogin="+parent.aGlobalLogin[1]+"&sAncestrais="+fsChavesAncestrais(this)+'&iTimeLogin='+iGlobalTimeLogin,true);

      oRequest.onreadystatechange = function() {
         if ((oRequest.readyState==4) && (oRequest.status==200)) {
            sMsg = oRequest.responseText;
            if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno de al_GetDDG_Carregar_SumMarcadas.php='+sMsg);
            //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno de al_GetDDG_Carregar_SumMarcadas.php</font>',sMsg);
            //alert('Retorno de al_GetDDG_Carregar_SumMarcadas.php='+sMsg);
//            var iLensMsg = sMsg.length;
            if (sMsg.length>0) {
               //alert('sMsg='+sMsg);

               var k2=1;
               var aTmp2 = sMsg.split('~');
               oObj.aRodape[k2] = new Array();
//               var iLenaTmp2 = aTmp2.length;
               for (var j=0; j < aTmp2.length; j++) {
//                  var iLenaTmp2j = aTmp2[j].length;
                  if (aTmp2[j].length>0) {
                     oObj.aRodape[k2][j] = aTmp2[j];
                     while (oObj.aRodape[k2][j].indexOf(" ") >= 0) {
                        oObj.aRodape[k2][j] = oObj.aRodape[k2][j].replace(" ","&nbsp;");
                     }
                  } else oObj.aRodape[k2][j] = "&nbsp;";
               }
               oObj.flMontaRodape();

            }
         }
      }

      oRequest.send(null);
   } else {
      this.flMontaRodape();
   }

}
function flMarcaTudo(plMarca) {
///////////////////////////////
   var iChave = 0;
//   var iLenaGrid = this.aGrid.length;
   for (var i=0; i<this.aGrid.length; i++) {
      iChave = this.fiFlyChaveAtual(i);
      
      if ((this.flMarcado(iChave)==false)&&(plMarca==true )) this.flMarca(iChave);
      if ((this.flMarcado(iChave)==true )&&(plMarca==false)) this.flDesmarca(iChave);
   }
//alert('plMarca='+plMarca);
   this.flMontaTela(this.fiChaveAtual());
   return true;
}
function flMarcaInverte() {
///////////////////////////
console.log('this.sId='+this.sId);
   var iChave = 0;
//   var iLenaGrid = this.aGrid.length;
   for (var i=0; i<this.aGrid.length; i++) {
      iChave = this.fiFlyChaveAtual(i);
      if (this.flMarcado(iChave)==false) this.flMarca(iChave);
      else this.flDesmarca(iChave);
   }
   this.flMontaTela(this.fiChaveAtual());
}
function flMarcaSalva() {
/////////////////////////
   if (this.sMarcados != this.sMarcadosOrig) flMarcacaoCallAJAXPost(this,this.sDDSFile,this.sDDSTag);
}
function flMarcaReset() {
/////////////////////////
   if (this.sMarcados != this.sMarcadosOrig) {
      this.sMarcados = this.sMarcadosOrig;
      this.flMontaTela(this.fiChaveAtual());
      document.getElementById('btnSalvarMarcas_'+this.sId).src='gifs/icone_marca_salvar_disable.gif';
      document.getElementById('btnResetarMarcas_'+this.sId).src='gifs/icone_marca_reset_disable.gif';
   }
}
function fiQtosMarcados() {
///////////////////////////
   return this.sMarcados.split('/').length-2;
}
function flMarcadosIgualAoOriginal() {
//////////////////////////////////////  // nao esta sendo usada
   var aTmp1 = this.sMarcados.split('/').sort(flSortSingleArray);
   var aTmp2 = this.sMarcadosOrig.split('/').sort(flSortSingleArray);
   var sTmp1 = aTmp1.toString();
   var sTmp2 = aTmp2.toString();
   var lRet  = (sTmp1==sTmp2);
   return lRet;
}
function flOnMarcando(piLinha) {
////////////////////////////////
   flSetGridDefault(this);
   var iOldLin = this.iCursorLin;
   this.iCursorLin   = piLinha;
   this.iArray = Number(Number(this.iArray)+Number(piLinha)-Number(iOldLin));  // atencao tive que usar Number(...)
   this.flMontaLinha(iOldLin);
   this.flMontaLinha(this.iCursorLin);
   var pChave = this.fiChaveAtual();
   this.flMarcacao(pChave);
   this.flMontaLinha(this.iCursorLin);
   if (this.sDDSFile=='dd_files/Projetos_Prestacoes.dda') {   // dedicado, depois montar um tag para isso  
      flEnableScreen(this.iSss,true);
      this.flRefreshCall(this.sQry);
   } else this.flAjustaColunas();

//aki
}
function fiArray(piChave) {
///////////////////////////
   flSetGridDefault(this);
//alert('piChave='+piChave);
   var i = fiAscan(this.aGrid,'oGridDefault.fiFlyChaveAtual(i)=="'+piChave+'"');  // as aspas por causa da chave composta
   return i;
}
function fiChaveVizinha(piTipo) {
////////////////////////////////
// piTipo = 1 -> Nao considerar a marcacao
// piTipo = 2 -> Considerar a marcacao
//
   var iChave = 0;
   var i = 0;
   var j = 1;
//   var iLenaGrid = this.aGrid.length;
   while (this.aGrid.length>(Number(this.iArray)+Number(j))) {
      i = this.aGrid[Number(this.iArray)+Number(j)][this.iCol];
      ++j;
      if ( (piTipo==1) || (!(this.flMarcado(i))) ) {
         iChave=i;
         break;
      }
   }
   if (iChave==0) {
      var j = 1;
      while ((this.iArray-j)>=0) {
         i = this.aGrid[this.iArray-j][this.iCol];
         ++j;
         if ( (piTipo==1) || (!(this.flMarcado(i))) ) { 
            iChave=i;
            break;
         }
      }
   }
   this.iChaveRefresh = iChave;
   return iChave;
}
function fiChaveIrma(pi) {   // fiChaveIrma(0) == fiChaveAtual(0)
//////////////////////////
   var i = -1;
//   var iLenaGrid = this.aGrid.length;
   //var iLenaGrid2 = this.aGrid[this.iArray].length;
   if ((this.aGrid.length>0) && (this.iArray>=0) && (this.aGrid[this.iArray].length>(this.iCol+pi))) i = this.aGrid[this.iArray][this.iCol+pi]; 

   i = fsReplace((i+''),'&nbsp;',' ')

   i = fsReplace((i+''),';',' ')
   return i;
}
//
function fsChavesIrmas() {
//////////////////////////
   var i    = 0  ;
   var sRet = '' ;
   if    (this.fiChaveIrma(++i) != -1) {
      sRet +=       this.fiChaveIrma(i);
   }
   while (this.fiChaveIrma(++i) != -1) {
      sRet += '/' + this.fiChaveIrma(i);
   }
   return sRet;
}
function fsIrmasTias() {
////////////////////////
   var sRet  = ''   ;
   if ((this!=null)&&(this.sTipo=='grid')) {
      var oGrid = this ;
      sRet += oGrid.fsChavesIrmas();
/*
      while ((oGrid.oPai!=null) && (oGrid.oPai.sTipo=='grid')) {
         oGrid = oGrid.oPai;
         sRet += '~' + oGrid.fsChavesIrmas();
      }
*/
      while ( ((oGrid.sTipo=='tela')&&(oGrid.oTPai!=null)) || ((oGrid.sTipo!='tela')&&(oGrid.oPai!=null)) ) {
         if (oGrid.sTipo=='tela') oGrid = oGrid.oTPai;
         else                     oGrid = oGrid.oPai;
         if (oGrid.sTipo=='grid') sRet += '~' + oGrid.fsChavesIrmas();

      }
   }
   return sRet;
}
//
function faIrmasTias() {
////////////////////////
   var aRet = new Array();
   var sStr = this.fsIrmasTias();
   var aTmp = sStr.split('~');
//   var iLenaTmp = aTmp.length;
   for (var i=0; i<aTmp.length; i++) {
      aRet.push(aTmp[i].split('/'));
   }   
   return aRet;
}

function fiChaveAtual() {
/////////////////////////
   var i = 0;
//   var iLenaGrid = this.aGrid.length;
   if ((this.aGrid.length>0) && (this.iArray>=0)) i = this.aGrid[this.iArray][this.iCol];
   return i;
}

function fiFlyChaveAtual(piArray) {
///////////////////////////////////
   //console.log('this.sId='+this.sId+', piArray='+piArray);
//   var iLenaGrid = this.aGrid.length;
   if (piArray<this.aGrid.length) {
      var i = this.aGrid[piArray][this.iCol];
   } else {
      var i=-1;
   }
   return i;
}
function fsGet_aGrid(pi,pj) {
/////////////////////////////
   var sRet = fsTrim(String(this.aGrid[pi][pj]));
   if (sRet.indexOf('js.')>=0) {
      var eExp = 'var xRet = (' + sRet.replace('js.','') + ');';
      eval(eExp);
      sRet = xRet;
   }
   return sRet;
}
function flMoveWidthCol(event,poBorda) {
////////////////////////////////////////
   if (oGridDefault != null) {
      var i;
      var s;
      var sId;
      var oObj;
      var aArr;
      if (oGridDefault.lBorda) {
         sId = poBorda.id.substr(-(poBorda.id.length-6));
         oObj = document.getElementById(sId);
         if (giX0==0) {
            giX0=event.clientX;
            giW0=oObj.offsetWidth;
         }
         aArr = sId.split("_");
         s    = aArr[0]+"_";
         aArr = aArr[1].split("x");
         s   += aArr[1];
         oObj = document.getElementById(s);
         oObj.style.width = giW0 + (event.clientX-giX0);
         for (i=0; i<oGridDefault.iAlt; i++) {
            aArr = sId.split("_");
            s    = aArr[0]+"_";
            aArr = aArr[1].split("x");
            s   += i+"x"+aArr[1];
            oObj = document.getElementById(s);
            oObj.style.width = giW0 + (event.clientX-giX0);
         }
      }
   }
}
function flMouseDnWidthCol(poBorda) {
//////////////////////////////////////////////
   if (oGridDefault != null) {
      oGridDefault.lBorda=true;
      giX0=0;
      giW0=0;
      aArr = poBorda.id.substr(-(poBorda.id.length-6)).split("_");
      flSetGridDefault(eval(aArr[0]));  // eval(aArr[0]) - acessao o obj cujo nome = aArr[0]
   }
}
function flSetGridDefault(psGrid) {
///////////////////////////////////
   oGridDefault=psGrid;
}
function fsInterpreta(psStr) {
//////////////////////////////
   var sRet  = psStr;
   var sPageControl  = "&nbsp;&nbsp;&nbsp;&nbsp;<span style='font-size:9px; text-decoration: underline; cursor: pointer;' onclick='"+this.sId+".flGotoPage(-1);'>Anterior</span>&nbsp;&nbsp;<span style='font-size:9px; text-decoration: underline; cursor: pointer;' onclick='"+this.sId+".flGotoPage(1);'>Prxima</span>";
       sPageControl += "&nbsp;&nbsp;&nbsp;&nbsp;<span style='font-size:9px; text-decoration: underline; cursor: pointer;' onclick='"+this.sId+".flGotoFirst();'>Primeira</span>&nbsp;&nbsp;<span style='font-size:9px; text-decoration: underline; cursor: pointer;' onclick='"+this.sId+".flGotoLast();'>ltima</span>";
   var sRet  = fsReplace(sRet,'{PageControl}',sPageControl);

//AQUI-iChave
   if ((this.oPai!=null) && (this.oPai.sTipo=='grid')) sRet = fsReplace(sRet,'{ChaveSalva_1}',this.oPai.iChaveSalva);
   
   var aTmp  = faScanPattern('{','}',sRet);
   var aArr  = new Array();
   var sTmp  = '';  
   var sEval = '';
   var i;
   for (i in aTmp) {
      sTmp = aTmp[i];
//console.log('fsInterpreta->sTmp='+sTmp);
      eval('sEval = fsTrim(' + sTmp + ');');
      sRet = fsReplace(sRet,'{'+sTmp+'}',sEval);
   }

//   sRet = sRet.replace(/(<([^>]+)>)/ig,"");
//   sRet = sRet.replace(/&nbsp;/ig," ");

//   sRet = fsReplace(sRet,'[','<span style="color: #E23621;">&nbsp;<b><i>');
   sRet = fsReplace(sRet,'[',' <span style="background-color: #FFFFFF; color: #06334B;">&nbsp;<b><i>');
   sRet = fsReplace(sRet,']','</i></b>&nbsp;</span>');
   return sRet; 
}

function foCreateGrid(poObjCaller,psMsg,piSss,plSlim,plEsc,psSearch,piSssMn,psVarTmp,poObjCaller2,piSOA,poContainer) {
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
//console.log('foCreateGrid');
   //aInLineInput_1 = new Array();   // embriao do InLine
   //aInLineInput_2 = new Array();   // embriao InLine
   //aInLineInput_3 = new Array();   // embriao InLine
   //aInLineChaIrma = new Array();   // embriao InLine   -> iInLineSerial

//alert('sGlobal_RAc_MenuGrid='+parent.sGlobal_RAc_MenuGrid);
//alert('sGlobal_pUNeg='+parent.sGlobal_pUNeg);
//console.log('psMsg='+psMsg);
//alert('piSOA='+piSOA);
   var sSearch = (psSearch==null) ? "" : psSearch;
   var lEsc = (plEsc==null) ? false : plEsc;
   var iSss = piSss;
//alert('iSss3='+iSss);
   var i;
   var j;
   var aTmp1 = psMsg.split(sTokenLinhas);   // $sTokenLinhas = '^'
   var aTmp2;
   var aTmp3;
   var k = 0;
   var k2= 0;
   var oGrid;
   var oCaller          = poObjCaller;
   var iProxIndice      = aTmp1[0];
   var sDDSFile         = aTmp1[1];
   var sDDSTag          = aTmp1[2];
   var sQry             = aTmp1[3];
   var sQryOriginal     = aTmp1[4];
   var sQrySum          = aTmp1[5];
   var sQrySum2         = aTmp1[6];
   var sTit             = aTmp1[7];
   var sTitCol          = aTmp1[8];  
   var sMenu            = aTmp1[9];
   var eNr0             = aTmp1[10];
   var sTipoNr0         = aTmp1[11];
   var iCursor0         = aTmp1[12]=='1' ? 1 : 0;
   var sToolsBar        = aTmp1[13];
   var iAutoRefr        = aTmp1[14];
   var lMarcacao        = (fsTrim(aTmp1[15])=='true');
   var sMarcados        = aTmp1[16];
//alert('sMarcados='+sMarcados);
   var sMnemTDoc        = aTmp1[17];
   var pTDoc            = aTmp1[18];
   var iTotRecs         = Number(aTmp1[19]);
   var lInc             = Number(aTmp1[20]);
   var lEntrarIncluindo = (fsTrim(aTmp1[21])=='true');
   var lEntrarAlterando = (fsTrim(aTmp1[22])=='true');
   var lEntrarNaFicha   = (fsTrim(aTmp1[23])=='true');
   var sPesquisar       = aTmp1[24];
   var sOnLoadExe       = aTmp1[25];
   var iPages           = aTmp1[26];
   var sIncMsg          = aTmp1[27];
   var sAltMsg          = aTmp1[28];
   var sZooMsg          = aTmp1[29];
   var sExcMsg          = aTmp1[30];
   var sCursorOn        = aTmp1[31];
   var sTagRefreshGridAoSalvar = aTmp1[32];
   var sAliasColunas    = aTmp1[33];
   var sRecsPage        = aTmp1[34];
   var sNoDblClick      = aTmp1[35];
   var sSqlSumFormat    = aTmp1[36];
   var pChaveDinamica   = aTmp1[37];
   var sFuncaoInc       = aTmp1[38];
   var sFuncaoAlt       = aTmp1[39];
   var sFuncaoZoo       = aTmp1[40];
   var sFuncaoExc       = aTmp1[41];
   var lNaoPerguntarDesejaIncluirNr0 = (fsTrim(aTmp1[42])=='true');
   var lSetColunas      = (fsTrim(aTmp1[43])=='true');
   var sFiltros         = aTmp1[44];

/*
*/

//
   var lNr0             = (iTotRecs==0);
   var lOk              = true;
   flIconeProcess(iSss,0);
   flEnableScreen(iSss,true);
//lInc=1;  // ATENCAO
//console.log('lInc='+lInc);
   if ((sTipoNr0=='0') && (lNr0==true)) {
//console.log('xRet='+eNr0+';'); 
     eval('xRet='+eNr0+';');
      if ((oCaller!=null) && (oCaller.sTipo=='tela')) {
         flEnableScreen(iSss,true);
      }
      if (lEsc) {
//         alert('FEsc sem registro');
      }
      lOk = false;
   } else if ((sTipoNr0=='1') && (lNr0==true)) { 
      if ((oCaller!=null)&&(oCaller.lTemIncSeq==true)) lOk=true;
      else {
         if (sSearch!='') {
            alert('Busca por "'+sSearch+'", nenhum registro encontrado.');
            //flModal('<font color=red>Sistema</font>','Busca por "'+sSearch+'", nenhum registro encontrado.');
            lOk = false;
         } else {
            if (lInc==1) {               
               if ((lEntrarIncluindo) || (lNaoPerguntarDesejaIncluirNr0)) lOk = true;
               else lOk=confirm("No h registros, deseja incluir ?");
               //else lOk=flModalConfirm('<font color=red>Sistema</font>','No h registros, deseja incluir ?','','',function(callback){lOk=callback;});
            }
            if (lInc==0) {
               alert("No h registros, e voc no tem permisso para incluir.");
               //flModal('<font color=red>Sistema</font>','No h registros, e voc no tem permisso para incluir.');
               lOk = false;
            }
         }
      }
   } else if ((sTipoNr0=='2') && (lNr0==true)) {   // incluir representante comercial
      if (lInc==1) lOk=true;
      if (lInc==0) {
         alert("Sem permisso para incluir.");
         //flModal('<font color=red>Sistema</font>','Sem permisso para incluir.');
         lOk = false;
      }
   } else if ((sTipoNr0=='3') && (lNr0==true)) {   // mostrar grid mesmo sem registros
      lOk = true;
   }
   if (lOk) {
      ++iTotGrids;
      var sId          = "oGrid"+iTotGrids;
      oGrid            = new foGrid();
      oGridDefault     = oGrid;

      oGrid.sId        = sId;
      oGrid.oPai       = oCaller;
      oGrid.oCaller    = poObjCaller2;
      oGrid.sMnemTDoc  = sMnemTDoc;
      oGrid.pTDoc      = pTDoc;
      oGrid.iTotRecs   = iTotRecs;
      oGrid.lFuncaoEsc = lEsc;
      

      if (oGrid.lFuncaoEsc==true) oGrid.sBCorCurAtivo=oGrid.sBCorCurAtivo2;
      else                        oGrid.sBCorCurAtivo=oGrid.sBCorCurAtivo1;

      if (plSlim) oGrid.iWA = oGrid.oPai.iWA + 1;
      else        oGrid.iWA = fiNovaWA(iSss,oGrid,oCaller);

      if (oGrid.oPai==null) oGrid.iSss = iSss;
      else oGrid.iSss = oGrid.oPai.iSss;

//alert('iSss4='+iSss+'\noGridoPai='+oGrid.oPai+'\noGrid.iSss='+oGrid.iSss);

      if (plSlim) oGrid.iAlt = 100; //12;
      else oGrid.iAlt=100; // iRecsPorPage em WA
      oGrid.iAlt0    = oGrid.iAlt;

      oGrid.sDDSFile = sDDSFile;
      oGrid.sDDSTag  = sDDSTag;
      oGrid.sQry     = sQry;

      oGrid.sQryOriginal = sQryOriginal;
      oGrid.sQrySum  = sQrySum;
      oGrid.sQrySum2 = sQrySum2;
      oGrid.aTit     = sTit.split(String.fromCharCode(10));
//      var iLenoGrid = oGrid.aTit.length;
      for (var i=0; i<oGrid.aTit.length; i++) oGrid.aTit[i] = fsReplace(oGrid.fsInterpreta(oGrid.aTit[i]),'_',';');
      //Titulos das colunas
      aTmp3 = sTitCol.split(String.fromCharCode(10));
//      var iLenaTmp3 = aTmp3.length;
      for (var i=0; i<aTmp3.length; i++) {
         var aTmp4 = aTmp3[i].split(';'); 
         oGrid.aTitCol[i] = fsReplace(aTmp4[0],'_',';');
         oGrid.aTitColVisible[i] = true;
//         var iLenaTmp4 = aTmp4.length;
         if (aTmp4.length>=2) oGrid.aOrdCol[i] = aTmp4[1];
         else oGrid.aOrdCol[i] = i;

         if ((aTmp4.length>=3) && (fsTrim(aTmp4[2]).substr(0,6)=='quebra')) oGrid.iQuebraCol = i;
         this.lQuebraCol = (oGrid.iQuebraCol>=0);

         if ((aTmp4.length>=3) && (fsTrim(aTmp4[2]).substr(0,15)=='quebra+acordeon')) oGrid.lQuebraColAcordeon = true;

         if ((aTmp4.length>=3) && (fsTrim(aTmp4[2]).substr(0,7)=='fcolor=')) {
            oGrid.aExpFColor[i] = fsTrim(aTmp4[2])
         } else if ((aTmp4.length>=4) && (fsTrim(aTmp4[3]).substr(0,7)=='fcolor=')) {
            oGrid.aExpFColor[i] = fsTrim(aTmp4[2])
         } else {
            oGrid.aExpFColor[i] = '';
         }
          
         if ((aTmp4.length>=3) && (fsTrim(aTmp4[2]).substr(0,7)=='bcolor=')) {   // bcolor='#AAAAAA'
            oGrid.aExpBColor[i] = fsTrim(aTmp4[2])
//alert('i='+i+'\n'+fsTrim(aTmp4[2]));
         } else if ((aTmp4.length>=4) && (fsTrim(aTmp4[3]).substr(0,7)=='bcolor=')) {
            oGrid.aExpBColor[i] = fsTrim(aTmp4[2])
         } else {
            oGrid.aExpBColor[i] = '';
         }
      }
      oGrid.iCol  = oGrid.aTitCol.length;
      oGrid.aMenu = sMenu.split('~');
      oGrid.eNr0  = eNr0;
      oGrid.sTipoNr0 = sTipoNr0;
      oGrid.sToolsBar = sToolsBar;
      oGrid.iAutoRefresh = iAutoRefr;
      oGrid.lMarcacao = lMarcacao;

      // marcados - trantando o caso de um grid de uma una fesc de um soa
      var sSOAMarcados = '';
//alert('1)piSOA='+piSOA);
      if (piSOA>0) {   // eh uma funcao esc chamada de um soa oCaller existe e  uma tela de edio
         oGrid.iSOA = piSOA;
         var aTmp5 = oCaller.sTagSubGrid.split(',');
//         var iLenaTmp5 = aTmp5.length;
         for (var k=0; k<aTmp5.length; k++) {
            sTagSOA = aTmp5[k];
//alert('2)sTagSOA='+sTagSOA+'\nk='+k+'\npiSOA='+piSOA+'\noCaller.sTagSubGrid='+oCaller.sTagSubGrid);
            if (sTagSOA==piSOA) break;
         }
//alert('3)piSOA='+piSOA+'\nk='+k+'\noCaller.aSOAMarcados[k]='+oCaller.aSOAMarcados[k]+'\noCaller.sTagSubGrid='+oCaller.sTagSubGrid);
         sSOAMarcados = oCaller.aSOAMarcados[k];
      }

      oGrid.sMarcados = sSOAMarcados=='' ? sMarcados : sSOAMarcados;   // oCaller.aSOAMarcados[jSOA]
//alert('oGrid.sId='+oGrid.sId+'\noGrid.sMarcados='+oGrid.sMarcados+'\nsSOAMarcados='+sSOAMarcados);
      oGrid.sMarcadosOrig = oGrid.sMarcados;
      oGrid.lSlim = plSlim;
      oGrid.sPesquisar = sPesquisar;
      oGrid.sLastSearchedTxt = sSearch;
      oGrid.iSssMn = piSssMn;
      oGrid.sVarTmp= psVarTmp;
      oGrid.lEntrarIncluindo = lEntrarIncluindo;
      oGrid.lEntrarAlterando = lEntrarAlterando;
      oGrid.lEntrarNaFicha   = lEntrarNaFicha;
      oGrid.lInc = lInc;
      oGrid.sOnLoadExe = sOnLoadExe;
      oGrid.iPages = iPages;
      oGrid.iRecsPage = sRecsPage;

//console.log('oGrid.iRecsPage='+oGrid.iRecsPage);
      oGrid.lNoDblClick = sNoDblClick.toLowerCase()=='true';
      oGrid.sSqlSumFormat = sSqlSumFormat;
      oGrid.pChaveDinamica = pChaveDinamica;
//console.log('pChaveDinamica='+pChaveDinamica);

      oGrid.sFuncaoInc = sFuncaoInc;
      oGrid.sFuncaoAlt = sFuncaoAlt;
      oGrid.sFuncaoZoo = sFuncaoZoo;
      oGrid.sFuncaoExc = sFuncaoExc;

      oGrid.lNaoPerguntarDesejaIncluirNr0 = lNaoPerguntarDesejaIncluirNr0;
      oGrid.lSetColunas = lSetColunas;
      oGrid.sFiltros    = sFiltros;
      //alert('sFuncaoInc='+sFuncaoInc+'\nsFuncaoAlt='+sFuncaoAlt+'\nsFuncaoZoo='+sFuncaoZoo+'\nsFuncaoExc='+sFuncaoExc);

      if (parent.sMnemProp=='hallos_esp') {
         oGrid.sIncMsg = (sIncMsg=='') ? 'Incluir un NUEVO registro' : sIncMsg;
         oGrid.sAltMsg = (sAltMsg=='') ? 'Registro de ficha de datos de cambio en cuestin' : sAltMsg;
         oGrid.sZooMsg = (sZooMsg=='') ? 'Ver el registro de datos en cuestin' : sZooMsg;
         oGrid.sExcMsg = (sExcMsg=='') ? 'Ponga el registro de que se trate como eliminados en la Papelera de reciclaje' : sExcMsg;
      } else {
         oGrid.sIncMsg = (sIncMsg=='') ? 'Incluir um NOVO Registro' : sIncMsg;
         oGrid.sAltMsg = (sAltMsg=='') ? 'Alterar dados da Ficha do Registro em questo' : sAltMsg;
         oGrid.sZooMsg = (sZooMsg=='') ? 'Consultar a Ficha do Registro em questo' : sZooMsg;
         oGrid.sExcMsg = (sExcMsg=='') ? 'Colocar o Registro em questo como excludo na Lixeira' : sExcMsg;
// Ricardo
//      oGrid.sImpMsg = (sImpMsg=='') ? 'Imprimir Registro em questo' : sImpMsg;
//
      }
      oGrid.lCursorOn = (sCursorOn=='1');
      oGrid.sTagRefreshGridAoSalvar = sTagRefreshGridAoSalvar=='true';
      oGrid.aAliasColunas = sAliasColunas.split('~');   // exemplo -> de aAliasColunas = array('tConc','','','tIni','','tConf','tInu'); // this.aGrid[this.iArray][5].length==0   ->    [tConf].length==0 -> 

      //ResultSet e Rodapes
      k = 0;
      k2= 0;
//      var iLenaTmp1 = aTmp1.length;
      for (var i=iProxIndice; i < aTmp1.length; i++) {   // CONTINUACAO DO INDICE DO VETOR aTmp1
         aTmp2 = aTmp1[i].split('~');
//console.log('i='+i+', aTmp2.length='+aTmp2.length);
//         var iLenaTmp2 = aTmp2.length;
         if (Number(aTmp2[aTmp2.length-1])<='-1') {      // eh o rodape
            oGrid.lTemRodape = true;
            oGrid.aRodape[k2] = new Array();
            for (var j=0; j < aTmp2.length; j++) {
//               var iLenaTmp2j = aTmp2[j].length;
               if (aTmp2[j].length>0) {
  	               oGrid.aRodape[k2][j] = aTmp2[j];  
                  while (oGrid.aRodape[k2][j].indexOf(" ") >= 0) {
                     oGrid.aRodape[k2][j] = oGrid.aRodape[k2][j].replace(" ","&nbsp;");
		            }     
               } else oGrid.aRodape[k2][j] = "&nbsp;";
            }
            ++k2;
  	      } else {                               // dados do grid
            oGrid.aGrid[k] = new Array();
//            var iLenaTmp2 = aTmp2.length;
            for (var j=0; j < aTmp2.length; j++) {
               
               if ((oGrid.sLastSearchedTxt!=null) && (oGrid.sLastSearchedTxt!='') || ((oGrid.oPai!=null) && (oGrid.oPai.sTipo=='tela') && (oGrid.oPai.sDDFChamada!=3) && (oGrid.oPai.sVarsRetornoFuncaoEsc.length>0) && (oGrid.lFuncaoEsc))) {   // tela_edicao -> grid funcao esc

                  if ((oGrid.sLastSearchedTxt!=null) && (oGrid.sLastSearchedTxt!='')) var sStr = oGrid.sLastSearchedTxt;
                  else                                                                var sStr = oGrid.oPai.fsGetVar(oGrid.oPai.sVarEsc);
//                  var iLensStr = sStr.length;
                  if ((sStr.length>0) && (j<(oGrid.iCol))) {

/*
                     sStr = sStr.replace('[','\[');
                     sStr = sStr.replace('^','\^');
                     sStr = sStr.replace('$','\$');
                     sStr = sStr.replace('.','\.');
                     sStr = sStr.replace('|','\|');
                     sStr = sStr.replace('?','\?');
                     sStr = sStr.replace('*','\*');
                     sStr = sStr.replace('+','\+');
                     sStr = sStr.replace('(','\(');
                     sStr = sStr.replace(')','\)');
                     sStr = sStr.replace('/','\/');
*/
                     var lAlfa = true;
                     
                     for (var kk=0; kk < sStr.length; kk++) {
                        var s = sStr.substr(kk,1);
                        if (((s.toUpperCase()>='A') && (s.toUpperCase()<='Z'))==false) {
                           lAlfa = false;
                           break;
                        }
                     }
                     if (lAlfa==true) var sTmp = '/'+sStr+'/ig';
                     else var sTmp = "'"+sStr+"'";

//                     var sTmp = '/'+sStr+'/ig';
//
// AQUI AONDE SINALIZA NO GRID O CONTEUDO DA PESQUISA
// Nao funcionou as Cor VERMELHA 

                     if (aTmp2[j].indexOf("flMarcado(") >= 0) {
                     } else {

                        if (oGrid.aTitCol[j]!=null) {
                           var aTyp = oGrid.aTitCol[j].split('-');
                           var sTyp = aTyp[1];
                           if ((sTyp!='x') && (sTyp!='t') && (sTyp!='d')) aTmp2[j] = aTmp2[j].replace(eval(sTmp),'<i><b><span style="color: #0000999;">['+sStr.toUpperCase()+']</span></b></i>');
//                           if (sTyp!='x') aTmp2[j] = aTmp2[j].replace(eval(sTmp),'<i><b><span style="color: #000099;">'+sStr.toUpperCase()+'</span></b></i>');
                        } else aTmp2[j] = aTmp2[j].replace(eval(sTmp),'<i><b><span style="color: #000099;">['+sStr.toUpperCase()+']</span></b></i>');
                     }

//                     aTmp2[j] = fsIReplace(aTmp2[j],sStr,sStr.toUpperCase());
//                     sStr = sStr.toUpperCase();
//                     aTmp2[j] = fsReplace(aTmp2[j],sStr,'<b.../b>');
//                     aTmp2[j] = fsReplace(aTmp2[j],'<b.../b>','<i><b>'+sStr+'</b></i>');
                  }
               } 
//if (j==0) console.log('k='+k+', j='+j+',aTmp2[j]='+aTmp2[j]);
               oGrid.aGrid[k][j] = aTmp2[j];
               if (oGrid.aTitCol[j]!=null) {
                  var aTyp = oGrid.aTitCol[j].split('-');
                  var sTyp = aTyp[1];
                  if ((sTyp=='n') && (aTmp2[j]!='')) {
                     var sInt=10; // valores default
                     var sDec=2;
                     //var iLenaTyp = aTyp.length;
                     if (aTyp.length>=3) sInt = aTyp[2];
                     if (aTyp.length>=4) sDec = aTyp[3];
                     oGrid.aGrid[k][j] = fsFmtDecimal(aTmp2[j],sDec,true);  
                  }
               }

               while (oGrid.aGrid[k][j].indexOf(" ") >= 0) {
                  oGrid.aGrid[k][j] = oGrid.aGrid[k][j].replace(" ","&nbsp;");
               }
            }
            ++k;
         }
      }

//      if (oGrid.aGrid.length>oGrid.iAlt) oGrid.iAlt = oGrid.aGrid.length+1;   // ALTURA DO GRID
//      oGrid.iAlt = oGrid.aGrid.length+1;

      if (oGrid.iRecsPage>oGrid.iAlt) {
         if (plSlim) oGrid.iAlt = oGrid.iAlt; //100; //12;
         else oGrid.iAlt=oGrid.aGrid.length+1; // iRecsPorPage em WA
         oGrid.iAlt0    = oGrid.iAlt;
      }

      if (iCursor0==1) oGrid.iArray = oGrid.aGrid.length-1;

      if ((oGrid.lTemRodape==false)&&(oGrid.lMarcacao==true)) {
         oGrid.lTemRodape = true;
         oGrid.aRodape[0] = new Array();
         for (var j=0; j < oGrid.iCol; j++) {
            oGrid.aRodape[0][j] = "&nbsp;";
         }
      }
      if (oGrid.lTemRodape==true) {
         //oGrid.iAlt=oGrid.iAlt-1;
      }
      if ((oGrid.oPai!=null) && (oGrid.oPai.sTipo=='tela') && (oGrid.oPai.sDDFChamada=='3') && (oGrid.lFuncaoEsc==false) && (oGrid.oPai.sTagSubGridRange==false)) {
         oGrid.oTelaRange = oGrid.oPai;
         oGrid.oTelaRange.oPai = oGrid;
         if (!plSlim) flEnableScreen(iSss,true);
      }

      eval(sId+"=oGrid;");

      if (oGrid.oPai==null) flPutMeIntoRodapeBar(oGrid.iSss,'divSss_'+oGrid.iSss,oGrid.aTit[0]);   // veio do menu, nova sessao, tratar rodapeSssBar

      //aqui retorno grid qdo nr=1
      //if ((oGrid.oPai!=null) && (oGrid.oPai.sTipo=='tela') && (oGrid.oPai.sDDFChamada!=3) && (oGrid.aGrid.length==1) && !(piSOA>0)) {   // tela_edicao -> grid funcao esc -> retornar o pId escolhido
//      var iLenoGrid = oGrid.aGrid.length;
      // aqui erro cep SIM - erro SIM
/*
      console.log('1-'+(oGrid.oPai!=null)?'sim':'nao');
      if (oGrid.oPai!=null) console.log('2-'+oGrid.oPai.sTipo=='tela'?'sim':'nao');
      console.log('3-'+(oGrid.aGrid.length==1)?'sim':'nao');
      console.log('4-piSOA='+piSOA);
      console.log('5-'+(lEsc==true)?'sim':'nao');
*/
    //if ((oGrid.oPai!=null) && (oGrid.oPai.sTipo=='tela') && (oGrid.aGrid.length==1) && !(piSOA>0) && (lEsc==true)) {   // tela_edicao -> grid funcao esc -> retornar o pId escolhido
      if ((oGrid.oPai!=null) && (oGrid.oPai.sTipo=='tela') && (oGrid.aGrid.length==1)               && (lEsc==true)) {   // tela_edicao -> grid funcao esc -> retornar o pId escolhido
    //                                                                                tirei o !(piSOA>0) pq no soa nao trazia ... ver se vai gerar algum impacto, inclusivo no soa com marcao - fdy 03/04/2019
         // AQUI CASO DA FUNCAO ESC QDO SO TEM UM REGISTRO E RETORNA O CARA AUTOMATICAMENTE
         oGrid.flEncerraGrid(true);
      } else {
//         var iLenaMenu = oGrid.aMenu.length;
//         var iLenaMenu0 = oGrid.aMenu[0].length;
         if ((oGrid.aMenu.length>0)&&(oGrid.aMenu[0].length>0)) {
            //oGrid.iAlt=oGrid.iAlt-1;
         }
         oGrid.oContainer = poContainer;

         if (poContainer!=null) {
            //console.log('poContainer.id='+poContainer.id+', sTipo='+oGrid.oPai.sTipo);
            if (oGrid.oPai.sTipo=='tela') {
               for (var iE_Grid in oGrid.oPai.aE_Grid) {
                  var sTdId = oGrid.oPai.aE_Grid[iE_Grid][0];
                  if (sTdId==poContainer.id) {
                     oGrid.oPai.aE_Grid[iE_Grid][3] = oGrid;
                     //console.log('sTdId='+sTdId+', iE_Grid='+iE_Grid,'oGrid.oPai.aE_Grid[iE_Grid][3].sId='+oGrid.oPai.aE_Grid[iE_Grid][3].sId+', Nome do Grid='+oGrid.oPai.aE_Grid[iE_Grid][2]);
                     
                  }
               }
            }
            if ((oGrid.oPai.sTipo=='tela') || (oGrid.oPai.sTipo=='mosaico')) {
               for (var iContainerObjs in oGrid.oPai.aContainerObjs) {
                  var sTdId = oGrid.oPai.aContainerObjs[iContainerObjs][0];
                  if (sTdId==poContainer.id) {
                     oGrid.oPai.aContainerObjs[iContainerObjs][2]= oGrid;
//console.log('oGrid.sId='+oGrid.sId+', sGrid='+oGrid.oPai.aContainerObjs[iContainerObjs][1]);
                  }
               }
            }
         }
         oGrid.flDesenhaGrid(0);
         oGrid.oMenu = foCreateMenuDD(oGrid,oGrid.aMenu);
         oGrid.flEvalExpMenu();   // se for avaliada as expressao ao monta ro menu nao precisar chama de novo

         if (((sTipoNr0=='1')||(sTipoNr0=='2')) && (lNr0==true)) { 
            oGrid.iArray = -1; 
//alert('xRet='+eNr0+';');
//console.log('xRet='+eNr0+';');
            eval('xRet='+eNr0+';');

         } else if ((sDDSFile=='dd_files/Assessment_Temas.dda') && (parent.sMnemProp=='hallos_teste')) {

            oGrid.flGridAlt();

         } else {




//alert('iSss4b='+iSss+'\noGridoPai='+oGrid.oPai+'\noGrid.iSss='+oGrid.iSss+'\noGrid.sId='+oGrid.sId+'\lEntrarIncluindo='+lEntrarIncluindo);
            if (lEntrarIncluindo==true) oGrid.flGridInc();
            else if (lEntrarAlterando==true) oGrid.flGridAlt();
            else if (lEntrarNaFicha  ==true) oGrid.flGridZoo();
            else if (oGrid.sOnLoadExe!='') eval("xRet="+oGrid.sOnLoadExe+";");



         }
      }

      if (oGrid.iAutoRefresh>0) {
         oGrid.tAutoRefresh = setTimeout(oGrid.sId+'.flAutoRefreshCall()',oGrid.iAutoRefresh*1000);
      }

   } else {
      if (poObjCaller==null) {
         flDeletaSss(piSss);
         iGlobalSssEmFoco = iOldGlobalSssEmFoco;
         flAccordionCollapse(iOldGlobalSssEmFoco);
      }
   }
   return(oGrid);
}
//
function flCloseSssFromRodape(e,piSss) {
//////////////////////////////////////
   e.stopPropagation();
   document.getElementById('divTitSession_'+piSss).innerHTML = '&nbsp';
   oGridDefault = null;
   oTelaDefault = null;
   flDeletaSss(piSss);
   var iTotWA = aWA[piSss-1].length;
   for (var i=0; i<iTotWA; i++) {
      document.getElementById("divWorkArea_"+i+"_"+piSss).innerHTML = '';
      document.getElementById("divWorkArea_"+i+"_"+piSss).style.display="none";
      flDeletaWA(piSss,i);
      if (i>0) {
         document.getElementById('divTitSession_'+piSss+'_'+i).innerHTML = '';
         document.getElementById('linTitSession_'+piSss+'_'+i).style.display = 'none';
      }
   }
   flTakeMeFromRodapeBar('divSss_'+piSss,-1);
}
//
function flUpdateMeInRodapeBar(piSss,psMyId,psTit) {
////////////////////////////////////////////////////
//console.log('flUpdateMeInRodapeBar-psTit='+psTit);
   var aTmp = psTit.split('(');
   sTit = aTmp[0].replace(/<\/?[^>]+>/gi, '');   // isso retira as tags do titulo, equiv a strip_tags do php, o titulo da LIXEIRA nao aparecia, achei melhor limpar as tags para aparecer em oDivSss independente de ser LIXEIRA
   sTit = sTit.replace('&nbsp',' ');
   aTmp = sTit.split(';dd&#95;files');
   sTit = aTmp[0];
   sTit = sTit.replace(';',' ');
   if ( ((parent.sMnemProp=='SIM') || (parent.sMnemProp=='EcoHortaPucRJ')) && (piSss==2) ) {   // piSss==2  a 1a aba - n caso a aba esttica do MENU
      sTit = '<br>'+sTit+'<br><br>';
      sXXX = '';
   } else {
      sXXX = '&nbsp;<img style="border: 1px solid #000000; border-radius: 10px; width: 10px; height:10px;" src="erpImages/ico_Sss_fechar.png">&nbsp;';
   }
   sTable = "<table cellspacing='0' cellpadding='0' cellmargin='0' style='border-style: solid; border-color: 000000; border-width: 0px; padding: 0px; margin: 0px; width: 100%; vertical-align: middle; text-align: center; font-family: Verdana; font-size: 10px;'><tr><td  onclick=docWorkArea.flAccordionCollapse("+piSss+")>{sTit}</td><td style='vertical-align: middle;' onclick=docWorkArea.flCloseSssFromRodape(event,"+piSss+");>{sXXX}</td></tr></table>";


   oDivSss = parent.document.getElementById(psMyId);
   if ((oDivSss!=null)&&(sTit.length>30)) {
      var sTitt = sTit.substr(0,30) + " ...";
      sTable = fsReplace(sTable,'{sTit}',sTitt);
      sTable = fsReplace(sTable,'{sXXX}',sXXX);
      oDivSss.innerHTML = sTable;
      oDivSss.title = sTit;
   } else {
      sTable = fsReplace(sTable,'{sTit}',sTit);
      sTable = fsReplace(sTable,'{sXXX}',sXXX);
      oDivSss.innerHTML = sTable;
   }
}
//
function flPutMeIntoRodapeBar(piSss,psMyId,psTit) {
///////////////////////////////////////////////////
//console.log('flPutMeIntoRodapeBar-psTit='+psTit+', psMyId='+psMyId+', piSss='+piSss);
   var aTmp = psTit.split('(');
   sTit = aTmp[0].replace(/<\/?[^>]+>/gi, '');   // isso retira as tags do titulo, equiv a strip_tags do php, o titulo da LIXEIRA nao aparecia, achei melhor limpar as tags para aparecer em oDivSss independente de ser LIXEIRA
   sTit = sTit.replace('&nbsp',' ');
   aTmp = sTit.split(';dd&#95;files');
   sTit = aTmp[0];
   sTit = sTit.replace(';',' ');
   if ( ((parent.sMnemProp=='SIM') || (parent.sMnemProp=='EcoHortaPucRJ')) && (piSss==2) ) {   // piSss==2  a 1a aba - n caso a aba esttica do MENU
      sTit = '<br>'+sTit+'<br><br>';
      sXXX = '';
   } else {
      sXXX = '&nbsp;<img style="border: 1px solid #000000; border-radius: 10px; width: 10px; height:10px;" src="erpImages/ico_Sss_fechar.png">&nbsp;';
   }
   sTable = "<table cellspacing='0' cellpadding='0' cellmargin='0' style='border-style: solid; border-color: 000000; border-width: 0px; padding: 0px; margin: 0px; width: 100%; vertical-align: middle; text-align: center; font-family: Verdana; font-size: 10px;'><tr><td  onclick=docWorkArea.flAccordionCollapse("+piSss+")>{sTit}</td><td style='vertical-align: middle;' onclick=docWorkArea.flCloseSssFromRodape(event,"+piSss+");>{sXXX}</td></tr></table>";
   
   //
   var oNovoDivSss = parent.document.createElement("td");
   oNovoDivSss.setAttribute('id',psMyId);
   parent.document.getElementById("rodapeSssBar").appendChild(oNovoDivSss);
   o2NovoDivSss = parent.document.getElementById(psMyId);
   o2NovoDivSss.style.backgroundColor = this.sSssBotaoColor; //'#4B95AA';
   o2NovoDivSss.style.color           = '#ffffff';
   o2NovoDivSss.style.width           = '90px';
   o2NovoDivSss.style.fontFamily      = 'Verdana';
   o2NovoDivSss.style.fontSize        = '10px';
   o2NovoDivSss.style.textAlign       = 'center';
   oNovoDivSss.style.cursor           = 'pointer';
   if (sTit.length>30) {
      var sTitt = sTit.substr(0,30) + " ...";
      sTable = fsReplace(sTable,'{sTit}',sTitt);
      sTable = fsReplace(sTable,'{sXXX}',sXXX);
      o2NovoDivSss.innerHTML = sTable;
      o2NovoDivSss.title = sTit;
   } else {
      sTable = fsReplace(sTable,'{sTit}',sTit);
      sTable = fsReplace(sTable,'{sXXX}',sXXX);
      o2NovoDivSss.innerHTML = sTable;
   }
   oNovoDivSss.onclick = function() {
      parent.docWorkArea.flAccordionCollapse(piSss);
   }
   flAccordionCollapse(piSss);
}
//
function oldflUpdateMeInRodapeBar(piSss,psMyId,psTit) {
////////////////////////////////////////////////////
   var aTmp = psTit.split('(');
   sTit = aTmp[0].replace(/<\/?[^>]+>/gi, '');   // isso retira as tags do titulo, equiv a strip_tags do php, o titulo da LIXEIRA nao aparecia, achei melhor limpar as tags para aparecer em oDivSss independente de ser LIXEIRA
   sTit = sTit.replace('&nbsp',' ');
   aTmp = sTit.split(';dd&#95;files');
   sTit = aTmp[0];
   oDivSss = parent.document.getElementById(psMyId);
   if ((oDivSss!=null)&&(sTit.length>30)) {
      oDivSss.innerHTML = sTit.substr(0,30) + " ...";
      oDivSss.title = sTit;
   } else {
      oDivSss.innerHTML = sTit;
   }
}
//
function oldflPutMeIntoRodapeBar(piSss,psMyId,psTit) {
///////////////////////////////////////////////////
   var aTmp = psTit.split('(');
   sTit = aTmp[0].replace(/<\/?[^>]+>/gi, '');   // isso retira as tags do titulo, equiv a strip_tags do php, o titulo da LIXEIRA nao aparecia, achei melhor limpar as tags para aparecer em oDivSss independente de ser LIXEIRA
   sTit = sTit.replace('&nbsp',' ');
   aTmp = sTit.split(';dd&#95;files');
   sTit = aTmp[0];
   
   //
   var oNovoDivSss = parent.document.createElement("td");
   oNovoDivSss.setAttribute('id',psMyId);
   parent.document.getElementById("rodapeSssBar").appendChild(oNovoDivSss);
   o2NovoDivSss = parent.document.getElementById(psMyId);
   o2NovoDivSss.style.backgroundColor = this.sSssBotaoColor; //'#4B95AA';
   o2NovoDivSss.style.color           = '#ffffff';
   o2NovoDivSss.style.width           = '90px';
   o2NovoDivSss.style.fontFamily      = 'Verdana';
   o2NovoDivSss.style.fontSize        = '10px';
   o2NovoDivSss.style.textAlign       = 'center';
   oNovoDivSss.style.cursor           = 'pointer';
   if (sTit.length>30) {
      o2NovoDivSss.innerHTML = sTit.substr(0,30) + " ...";
      o2NovoDivSss.title = sTit;
   } else o2NovoDivSss.innerHTML = sTit;
   oNovoDivSss.onclick = function() {
      parent.docWorkArea.flAccordionCollapse(piSss);
   }

   flAccordionCollapse(piSss);
}
//
function flTakeMeFromRodapeBar(psMyId,piSssMn) {
////////////////////////////////////////////////
   oDivSss = parent.document.getElementById(psMyId);
   parent.document.getElementById("rodapeSssBar").removeChild(oDivSss);   
   if ((piSssMn>-1)&&(fiSssExiste(piSssMn))) {
      flAccordionCollapse(piSssMn);   
   } else {
      var iSssVizinho = fiSssVizinho();
      if (iSssVizinho==0) iSssVizinho = fiSssProxVizinho(0);
      flAccordionCollapse(iSssVizinho);
   }
}
//
//
function flKeyPress1(e) {
///////////////////////////////
   if ((oGridDefault != null) && (oGridDefault.lInvisivel==false)) {
      var oGrid = oGridDefault
      var keynum;
      if (window.event) keynum = e.keyCode;                                                 // IE
      else if(e.which)  keynum = e.which;                                                   // Netscape/Firefox/Opera

      if (e.modifiers) {
          var lAltKey = e.modifiers & Event.ALT_MASK;
          var lCtrKey = e.modifiers & Event.CONTROL_MASK;
          var lShfKey = e.modifiers & Event.SHIFT_MASK;
          var lXXXKey = e.modifiers & Event.META_MASK;
      } else {
          var lAltKey = e.altKey;
          var lCtrKey = e.ctrlKey;
          var lShfKey = e.shiftKey;
          var lXXXKey = false;
      }

      if   (keynum==40)  oGrid.flDesceLin();                                            // seta para baixo
      if   (keynum==38)  oGrid.flSobeLin();                                             // seta para cima
      if   (keynum==35)  oGrid.flEndTela();                                             // end
      if   (keynum==36)  oGrid.flTopTela();                                             // home
      if   (keynum==34)  oGrid.flPgDn();                                                // pgdn
      if   (keynum==33)  oGrid.flPgUp();                                                // pgup
//      if  (keynum==32)  oGrid.flOnMarcando(oGrid.iCursorLin);                           // barra essa barra se confunde com um barra da edicao qdo o grid eh slim
//      if  (keynum==46)  oGrid.flEndArray();                                             // del
//      if  (keynum==45)  oGrid.flTopArray();                                             // ins
//      if  ((keynum==9)&&(oGrid.lFuncaoEsc==true)&&(lShfKey==false)) oGrid.flEncerraGrid(true);   // enter
//      if  ((keynum==9)&&(oGrid.lFuncaoEsc==true)&&(lShfKey==true )) oGrid.flEncerraGrid();       // ???
      if  ((keynum==9)&&(oGrid.lFuncaoEsc==true)) oGrid.flEncerraGrid(true);           // ins  
      if  ((keynum==45)&&(oGrid.lFuncaoEsc==true)) oGrid.flEncerraGrid(true);           // ins  
      if  ((keynum==46)&&(oGrid.lFuncaoEsc==true)) oGrid.flEncerraGrid();               // del
      if   (keynum==116) return true;                                                   // F5
   }
//   document.getElementById('pqp').innerHTML="1-" + keynum;
   return false;
}
//
//
function flGridLixeira(piTipo) {
////////////////////////////////
//console.log('flGridLixeira, piTipo='+piTipo);
//a.lExc = 0
   document.getElementById('btnPesquisar_'+this.sId).value = '';
   this.iPage = 0;
   this.sLastSearchedTxt='';
   var sQry;
   sQry = this.sQryOriginal;
   if (piTipo==0) {   // fora da lixeira
      var sQry = sQry.replace("(a.lExc-1)","a.lExc");
      this.lLixeira = false;
      this.sQry = sQry;
      this.flShowIconesToolsBar();
      this.flRefreshCall();
//      this.flRefreshLinCall();
      if (document.getElementById('divMenu_'+this.sId)!=null) document.getElementById('divMenu_'+this.sId).style.display = '';
   } else {           // dentro da lixeira
      this.lLixeira = true;   // criar uma regra geral
      var sQry = sQry.replace("a.lExc=","(a.lExc-1)=");
      var sQry = sQry.replace("a.lExc =","(a.lExc-1)=");
      var sQry = sQry.replace("a.lExc  =","(a.lExc-1)=");
      var sQry = sQry.replace("a.lExc   =","(a.lExc-1)=");
      var sQry = sQry.replace("a.lExc    =","(a.lExc-1)=");
      var sQry = sQry.replace("a.lExc     =","(a.lExc-1)=");
      var sQry = sQry.replace("a.lExc      =","(a.lExc-1)=");
      var sQry = sQry.replace("a.lExc       =","(a.lExc-1)=");
      var sQry = sQry.replace("a.lExc        =","(a.lExc-1)=");
      var sQry = sQry.replace("a.lExc         =","(a.lExc-1)=");
      var sQry = sQry.replace("a.lExc          =","(a.lExc-1)=");
      var sQry = sQry.replace("a.lExc           =","(a.lExc-1)=");
      var sQry = sQry.replace("a.lExc            =","(a.lExc-1)=");
      var sQry = sQry.replace("a.lExc             =","(a.lExc-1)=");
      var sQry = sQry.replace("a.lExc              =","(a.lExc-1)=");
      var sQry = sQry.replace("a.lExc               =","(a.lExc-1)=");
      var sQry = sQry.replace("a.lExc                =","(a.lExc-1)=");
      this.sQry = sQry;
      this.flShowIconesToolsBar();
      this.flRefreshCall();
      if (document.getElementById('divMenu_'+this.sId)!=null) document.getElementById('divMenu_'+this.sId).style.display = 'none';
   }
}
//
function flGridInc() {   // essa funcao deve retornar o ID do cara incluido ou 0 caso nao incluiu
//////////////////////
   if (this.lInc==0) alert("Sem pemisso para incluir.");
   //if (this.lInc==0) flModal('<font color=red>Sistema</font>','Sem pemisso para incluir.');
   else {

      if ((this.sFuncaoInc.length)>0) {
         //alert('this.sFuncaoInc='+this.sFuncaoInc);
         var eEval = 'xRet='+this.sFuncaoInc+';';
         //alert('eEval='+eEval);
         eval(eEval);
      } else {

         if ((this.sDDSFile=='dd_files/CI.dda') && ((this.sDDSTag=='CI_1') || (this.sDDSTag=='CI_1A'))) {
            flGridIncCI(this);
         } else if ((this.sDDSFile=='dd_files/MI.dda') && ((this.sDDSTag=='MI_1') || (this.sDDSTag=='MI_1A'))) {
            flGridIncMI(this);
         } else if ((this.sDDSFile=='dd_files/Memo.dda') && ((this.sDDSTag=='Memo_1') || (this.sDDSTag=='Memo_1A'))) { // Memorando
            flGridIncMemo(this);
         } else if (this.sDDSFile=='dd_files/TI.dda') {
            flGridIncTI(this);
         } else if ((this.sDDSFile=='dd_files/Oficio.dda') && ((this.sDDSTag=='Oficio_1') || (this.sDDSTag=='Oficio_1A'))) {
            flGridIncOficio(this);
         } else if (this.sDDSFile=='dd_files/TopAta.dda') {
            flGridIncTopAta(this);
         } else if ((this.sDDSFile=='dd_files/NC.dda') || (this.sDDSFile=='dd_files/NC2.dda')) {// && (this.sDDSTag=='NC_1')) {
            flGridIncNC(this);
   
         } else if (this.sDDSFile=='dd_files/Projetos.dda') {// && (this.sDDSTag=='NC_1')) {
            flGridIncProj(this);
   
         } else if ((this.sDDSFile=='dd_files/Sug.dda') && (this.sDDSTag=='Padrao_1')) {
            flGridIncSug(this);
         } else if ((this.sDDSFile=='dd_files/Den.dda') && (this.sDDSTag=='Padrao_1')) {
            flGridIncDen(this);
         } else if ((this.sDDSFile=='dd_files/POPs.dda')) {
            flGridIncPOP(this);
         } else if ((this.sDDSFile=='dd_files/pizzaped.dda')) {
            flGridIncPizzaPed(this);
         } else if (  ((this.sDDSFile=='dd_files/erp_PreNF_RFis_Financeiro_CCusto.dda')    || (this.sDDSFile=='dd_files/erp_PreNF_RFis_Financeiro_CCusto_TQ.dda'))    && (this.sDDSTag=='Padrao_1')) {
            this.flGridAlt(this.sDDSFile,'Padrao_2');
         } else if (  ((this.sDDSFile=='dd_files/erp_PreNF_RFis_Financeiro_CContabil.dda') || (this.sDDSFile=='dd_files/erp_PreNF_RFis_Financeiro_CContabil_TQ.dda')) && (this.sDDSTag=='Padrao_1')) {
            this.flGridAlt(this.sDDSFile,'Padrao_2');
         } else {
            var oObj = this;
            //var oRequest = foCreateRequest();
            //oRequest.open("GET","axl_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=0&sFileDDS="+this.sDDSFile+"&sTagDDS="+this.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(this)+"&sMnemTDoc="+fsMnemTDocsAncestrais(this)+"&sAncestrais="+fsChavesAncestrais(this)+"&sIrmasTias="+this.fsIrmasTias()+"&sId=0"+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);

//AQUI-iChave
            var aPar = new Array();
            aPar.push(['sCliPasta'      , parent.sCliPasta           ]);
            aPar.push(['pCiaLogin'      , parent.pCiaLogin           ]);
            aPar.push(['iCompany'       , parent.iGlobalCompany      ]);
            aPar.push(['sDDFChamada'    , 0                          ]);
            aPar.push(['sFileDDS'       , this.sDDSFile              ]);
            aPar.push(['sTagDDS'        , this.sDDSTag               ]);
            aPar.push(['sLogin'         , parent.aGlobalLogin[1]     ]);
            aPar.push(['sTDoc'          , fsTDocsAncestrais(this)    ]);
            aPar.push(['sMnemTDoc'      , fsMnemTDocsAncestrais(this)]);
            aPar.push(['sAncestrais'    , fsChavesAncestrais(this)   ]);
            aPar.push(['sIrmasTias'     , this.fsIrmasTias()         ]);
            aPar.push(['sId'            , 0                          ]);
            aPar.push(['spOOp'          , parent.sGlobal_pOOp        ]);
            aPar.push(['sRoot'          , parent.sGlobalRoot         ]);
            aPar.push(['iDesenvolvedor' , parent.iGlobalDesenvolvedor]);
            aPar.push(['iGlobalKeyUser' , parent.iGlobalKeyUser      ]);
            aPar.push(['iTimeLogin'     , iGlobalTimeLogin           ]);
            var sPar = fsParParaPHP(aPar);
            var oRequest = foCreateRequest();
            oRequest.open("GET","al_GetDDF.php?"+sPar,true);

            oRequest.onreadystatechange = function() {
               if ((oRequest.readyState==4) && (oRequest.status==200)) {
                  sMsg = oRequest.responseText;
                  if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno-Incluindo:'+sMsg);
                  //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno-Incluindo</font>',sMsg);
                  if ((oObj!=null)&&(oObj.lEnded==false)) {
                     if (sMsg.substr(0,2)=='-1') {
                        flIconeProcess(iSss,0);
                        flEnableScreen(iSss,true);
                        aTmp = sMsg.split('~');
                        sTmp = aTmp[0];
                        sTmp = sTmp.substr(2,sTmp.length-2);
                        if (sTmp.length>0) {
                           //oObj.flEncerraGrid();
                           alert(sTmp);
                           //flModal('<font color=blue>Sistema</font>',sTmp);
                        } else alert('Sem permisso para incluir');
                        //} else flModal('<font color=red>Sistema</font>','Sem permisso para incluir');
                     } else {
                        foCreateTela(oObj,sMsg,false,iSss);
                     }
                  }
               }
            }	
            var iSss = this.iSss;
      //alert('iSSs6='+iSss+"\n"+this.iSss+"\n"+this.sId);
            flIconeProcess(iSss,1);
            flEnableScreen(iSss,false);
            oRequest.send(null);
         }
      }
   }
}
function flGridExc(piTipo) { 
////////////////////////////
   var oObj = this;
   if (piTipo==1) var lConf=confirm("Confirma a exclusao do registro em QUESTO ?");
   else var lConf=confirm("Confirma a exclusao do(s) registro(s) MARCADO(s) ?");
   if (lConf==true) {
      this.fiChaveVizinha(piTipo);
      var oRequest = foCreateRequest();
      if (piTipo==1) oRequest.open("GET","bl_SetExc.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sFileDDS="+this.sDDSFile+"&sTagDDS="+this.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sAncestrais="+fsChavesAncestrais(this)+"&sIrmasTias="+this.fsIrmasTias()+"&sIds=/"+this.fiChaveAtual()+"/"+"&sId="+this.fiChaveAtual()+"&sTDocsAncestrais="+fsTDocsAncestrais(this)+"&sMnemTDocsAncestrais="+fsMnemTDocsAncestrais(this)+"&spOOp="+parent.sGlobal_pOOp+"&sTipoExc=0"+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
      else           oRequest.open("GET","bl_SetExc.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sFileDDS="+this.sDDSFile+"&sTagDDS="+this.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sAncestrais="+fsChavesAncestrais(this)+"&sIrmasTias="+this.fsIrmasTias()+"&sIds=" +this.sMarcados         +"&sId="+this.fiChaveAtual()+"&sTDocsAncestrais="+fsTDocsAncestrais(this)+"&sMnemTDocsAncestrais="+fsMnemTDocsAncestrais(this)+"&spOOp="+parent.sGlobal_pOOp+"&sTipoExc=0"+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
      oRequest.onreadystatechange = function() {
         if ((oRequest.readyState==4) && (oRequest.status==200)) {
            sMsg = oRequest.responseText;
            if (parent.lEmailUsuLiberarMsgPlat==1) alert("Retorno-Excluir:"+sMsg);
            //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno-Excluir</font>',sMsg);
            if ((oObj!=null)&&(oObj.lEnded==false)) {
               if (sMsg.substr(0,2)=='-1') {
                  flIconeProcess(iSss,0);
                  flEnableScreen(iSss,true);
                  aTmp = sMsg.split('~');
                  sTmp = aTmp[0];
                  sTmp = sTmp.substr(2,sTmp.length-2);
                  //var iLensTmp = sTmp.length;
                  if (sTmp.length>0) alert(sTmp);
                  //if (sTmp.length>0) flModal('<font color=blue>Sistema</font>',sTmp);
                  else               alert('Sem permisso para excluir');
                  //else               flModal('<font color=red>Sistema</font>','Sem permisso para excluir');
               } else if ((Number(sMsg)==1)) {
                  oObj.aInLineChaIrma = new Array();
                  oObj.flRefreshCall();
// aqui chamada de processos automaticos

               // esse codigo  para chamar processos de recalcular qdo ha alguma alterao em uma ordem, recebimento ..
               // em pGrid1.js no excluir e no reincluir - em pTela2.js no apos salvar o incluir e o alterar

               // (1) inicio - chamada automatica de processos ao final do salvar da tela de edio - ORDEM
               // -------------------------------------------------------------------------------------

                  if ((oObj.sDDSFile=='dd_files/erp_ORDENS_Itens.dda') 
                   || (oObj.sDDSFile=='dd_files/erp_ORDENS_Itens_Impostos.dda')
                   || (oObj.sDDSFile=='dd_files/erp_ORDENS_Itens_TQ.dda')
                   || (oObj.sDDSFile=='dd_files/erp_ORDENS_Itens_Impostos_TQ.dda')) {

                     if (oObj.oPai.sDDSTag=='Padrao_1') { 
                        flCallSysPOP('1154A',oObj);   // recalc Ordem - saida
                     } else {
                        flCallSysPOP(1152,oObj);   // recalc Ordem - entrada
                     }
                  }
               // fim - chamada automatica de processos ao final do salvar da tela de edio - ORDEM


               // (2) inicio - chamada automatica de processos ao final do salvar da tela de edio - RECEBIMENTO
               // -------------------------------------------------------------------------------------------
//alert(oObj.sDDSFile);
                  if ((oObj.sDDSFile=='dd_files/erp_PreNF_RFis.dda') 
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Fiscal.dda') 
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Financeiro.dda') 
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_AdequacaoSPED.dda')
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_TQ.dda')
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Fiscal_TQ.dda') 
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Financeiro_TQ.dda') 
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_AdequacaoSPED_TQ.dda')) {
                     flCallSysPOP(1212,oObj);   // recalc Receb
//alert(oObj.sDDSFile);
                  }
//alert(oObj.sDDSFile);
                  if ((oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Itens.dda') 
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Itens_Fiscal.dda') 
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Itens_Financeiro.dda')
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Itens_Impostos_Fiscal.dda')
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Itens_AdequacaoSPED.dda')

                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Itens_TQ.dda') 
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Itens_Fiscal_TQ.dda') 
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Itens_Financeiro_TQ.dda')
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Itens_Impostos_Fiscal_TQ.dda')
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Itens_AdequacaoSPED_TQ.dda')) {
                     flCallSysPOP(1213,oObj);   // recalc Receb
//alert(oObj.sDDSFile);
                  }
               // fim - chamada automatica de processos ao final do salvar da tela de edio - RECEBIMENTO

               // (3) inicio - chamada automatica de processos ao final do salvar da tela de edio - PRENF - SAIDA
               // ---------------------------------------------------------------------------------------------
                  if ((oObj.sDDSFile=='dd_files/erp_PreNF.dda') || (oObj.sDDSFile=='dd_files/erp_PreNF_TQ.dda')) {
                     flCallSysPOP('1217A',oObj);   // recalc - capa
                  }

                  if ((oObj.sDDSFile=='dd_files/erp_PreNF_Itens.dda') || (oObj.sDDSFile=='dd_files/erp_PreNF_Itens_TQ.dda')) {
                     flCallSysPOP('1218A',oObj);   // recalc - linha
                  }
               // fim - chamada automatica de processos ao final do salvar da tela de edio - PRENF - SAIDA

               // (4) inicio - chamada automatica de processos ao final do salvar da tela de edio - NFe_SN
               // -------------------------------------------------------------------------------------------
                  if (oObj.sDDSFile=='dd_files/erp_NFLinha_Manual_SN.dda') {
                     flCallSysPOP(563,oObj);   // recalc NFeSN
                  }
               // fim - chamada automatica de processos ao final do salvar da tela de edio - RECEBIMENTO


// fim chamada de processos automaticos
               } else {
                  flIconeProcess(iSss,0);
                  flEnableScreen(iSss,true);
                  aTmp = sMsg.split('~');
                  if (aTmp.length>1) {
                     sAlert = aTmp[1];
                     alert(sAlert);
                     //flModal('<font color=blue>Sistema</font>',sAlert);
                  } else {
                     alert('Problema ao excluir o(s) registro(s)');
                     //flModal('<font color=red>Sistema</font>','Problema ao excluir o(s) registro(s)');
                  }
               }
            }
         }
      }
      var iSss = this.iSss;
      flIconeProcess(iSss,1);
      flEnableScreen(iSss,false);
      oRequest.send(null);
   }
}
function flGridRInc() { 
///////////////////////
   piTipo=1;
   var oObj = this;
   if (piTipo==1) var lConf=confirm("Confirma a reincluso do registro em QUESTO ?");
   else var lConf=confirm("Confirma a reinclusao do(s) registro(s) MARCADO(s) ?");
   if (lConf==true) {
      this.fiChaveVizinha(piTipo);
      var oRequest = foCreateRequest();
      if (piTipo==1) oRequest.open("GET","bl_SetExc.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sFileDDS="+this.sDDSFile+"&sTagDDS="+this.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sAncestrais="+fsChavesAncestrais(this)+"&sIrmasTias="+this.fsIrmasTias()+"&sIds=/"+this.fiChaveAtual()+"/"+"&sId="+this.fiChaveAtual()+"&sTDocsAncestrais="+fsTDocsAncestrais(this)+"&sMnemTDocsAncestrais="+fsMnemTDocsAncestrais(this)+"&spOOp="+parent.sGlobal_pOOp+"&sTipoExc=1"+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
      else           oRequest.open("GET","bl_SetExc.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sFileDDS="+this.sDDSFile+"&sTagDDS="+this.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sAncestrais="+fsChavesAncestrais(this)+"&sIrmasTias="+this.fsIrmasTias()+"&sIds=" +this.sMarcados         +"&sId="+this.fiChaveAtual()+"&sTDocsAncestrais="+fsTDocsAncestrais(this)+"&sMnemTDocsAncestrais="+fsMnemTDocsAncestrais(this)+"&spOOp="+parent.sGlobal_pOOp+"&sTipoExc=1"+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
      oRequest.onreadystatechange = function() {
         if ((oRequest.readyState==4) && (oRequest.status==200)) {
            sMsg = oRequest.responseText;
            if (parent.lEmailUsuLiberarMsgPlat==1) alert("Retorno-Reincluir:"+sMsg);
            //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno-Reincluir</font>',sMsg);
            if ((oObj!=null)&&(oObj.lEnded==false)) {
               if (sMsg.substr(0,2)=='-1') {
                  flIconeProcess(iSss,0);
                  flEnableScreen(iSss,true);
                  //alert('Sem permisso para re-incluir');
                  aTmp = sMsg.split('~');
                  sTmp = aTmp[0];
                  sTmp = sTmp.substr(2,sTmp.length-2);
                  //var iLensTmp = sTmp.length;
                  if (sTmp.length>0) alert(sTmp);
                  //if (sTmp.length>0) flModal('<font color=blue>Sistema</font>',sTmp);
                  else               alert('Sem permisso para reincluir');
                  //else               flModal('<font color=red>Sistema</font>','Sem permisso para reincluir');
               } else if ((Number(sMsg)==1)) {
                  oObj.aInLineChaIrma = new Array();
                  oObj.flRefreshCall();

// aqui chamada de processos automaticos

               // esse codigo  para chamar processos de recalcular qdo ha alguma alterao em uma ordem, recebimento ..
               // em pGrid1.js no excluir e no reincluir - em pTela2.js no apos salvar o incluir e o alterar

               // (1) inicio - chamada automatica de processos ao final do salvar da tela de edio - ORDEM
               // -------------------------------------------------------------------------------------

                  if ((oObj.sDDSFile=='dd_files/erp_ORDENS_Itens.dda') 
                   || (oObj.sDDSFile=='dd_files/erp_ORDENS_Itens_Impostos.dda')
                   || (oObj.sDDSFile=='dd_files/erp_ORDENS_Itens_TQ.dda')
                   || (oObj.sDDSFile=='dd_files/erp_ORDENS_Itens_Impostos_TQ.dda')) {

                     if (oObj.oPai.sDDSTag=='Padrao_1') { 
                        flCallSysPOP('1154A',oObj);   // recalc Ordem - saida
                     } else {
                        flCallSysPOP(1152,oObj);   // recalc Ordem - entrada
                     }
                  }
               // fim - chamada automatica de processos ao final do salvar da tela de edio - ORDEM


               // (2) inicio - chamada automatica de processos ao final do salvar da tela de edio - RECEBIMENTO
               // -------------------------------------------------------------------------------------------
                  if ((oObj.sDDSFile=='dd_files/erp_PreNF_RFis.dda') 
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Fiscal.dda') 
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Financeiro.dda')
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_TQ.dda')
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Fiscal_TQ.dda') 
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Financeiro_TQ.dda')) {
                     flCallSysPOP(1212,oObj);   // recalc Receb
                  }

                  if ((oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Itens.dda')
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Itens_Fiscal.dda')
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Itens_Financeiro.dda')
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Itens_Impostos_Fiscal.dda')
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Itens_TQ.dda')
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Itens_Fiscal_TQ.dda')
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Itens_Financeiro_TQ.dda')
                   || (oObj.sDDSFile=='dd_files/erp_PreNF_RFis_Itens_Impostos_Fiscal_TQ.dda')) {
                     flCallSysPOP(1213,oObj);   // recalc Receb
                  }
               // fim - chamada automatica de processos ao final do salvar da tela de edio - RECEBIMENTO

               // (3) inicio - chamada automatica de processos ao final do salvar da tela de edio - PRENF - SAIDA
               // ---------------------------------------------------------------------------------------------
                  if ((oObj.sDDSFile=='dd_files/erp_PreNF.dda') || (oObj.sDDSFile=='dd_files/erp_PreNF_TQ.dda')) {
                     flCallSysPOP('1217A',oObj);   // recalc - capa
                  }

                  if ((oObj.sDDSFile=='dd_files/erp_PreNF_Itens.dda') || (oObj.sDDSFile=='dd_files/erp_PreNF_Itens_TQ.dda')) {
                     flCallSysPOP('1218A',oObj);   // recalc - linha
                  }
               // fim - chamada automatica de processos ao final do salvar da tela de edio - PRENF - SAIDA

               // (4) inicio - chamada automatica de processos ao final do salvar da tela de edio - NFe_SN
               // -------------------------------------------------------------------------------------------
                  if (oObj.sDDSFile=='dd_files/erp_NFLinha_Manual_SN.dda') {
                     flCallSysPOP(563,oObj);   // recalc NFeSN
                  }
               // fim - chamada automatica de processos ao final do salvar da tela de edio - RECEBIMENTO


// fim chamada de processos automaticos
               } else alert('Problema ao reincluir o(s) registro(s)');
               //} else flModal('<font color=red>Sistema</font>','Problema ao reincluir o(s) registro(s)');
               
            }
         }
      }
      var iSss = this.iSss;
      flIconeProcess(iSss,1);
      flEnableScreen(iSss,false);
      oRequest.send(null);
   }
}
function flGridAlt(psDDSFile,psDDSTag) { 
////////////////////////////////////////
if (this.iTotRecs>0) {
if (''+this.fiChaveAtual()>'0') {

   sDDSFile = psDDSFile==null ? this.sDDSFile : psDDSFile;
   sDDSTag  = psDDSTag ==null ? this.sDDSTag  : psDDSTag;


   if ((sDDSFile=='dd_files/CI.dda') && ((sDDSTag=='CI_1') || (sDDSTag=='CI_1A') || (sDDSTag=='CI_1D'))) {
      flGridAltCI(this);
   } else if ((sDDSFile=='dd_files/MI.dda') && ((sDDSTag=='MI_1') || (sDDSTag=='MI_1A') || (sDDSTag=='MI_1D'))) {
      flGridAltMI(this);
   } else if ((sDDSFile=='dd_files/Memo.dda') && ((sDDSTag=='Memo_1') || (sDDSTag=='Memo_1A') || (sDDSTag=='Memo_1D'))) { // Memorando
      flGridAltMemo(this);
   } else if (sDDSFile=='dd_files/TI.dda') {
      flGridAltTI(this);
      flCallSysPOP(7,this)
   } else if ((sDDSFile=='dd_files/Oficio.dda') && ((sDDSTag=='Oficio_1') || (sDDSTag=='Oficio_1A') || (sDDSTag=='Oficio_1D'))) {
      flGridAltOficio(this);
   } else if (sDDSFile=='dd_files/TopAta.dda') {
      var iCol = 5;
      if (sDDSTag=='TopAta_3') iCol = 5 //iCol = 9
      if ((this.aGrid[this.iArray][iCol]=='') || (sDDSTag=='TopAta_2') || (sDDSTag=='TopAta_4')) {
         flGridAltTopAta(this);
      } else {
         alert('Esse Tpico est encerrado');
         //flModal('<font color=red>Sistema</font>','Esse Tpico est encerrado');
      }
   } else if ((sDDSFile=='dd_files/NC.dda') || (this.sDDSFile=='dd_files/NC2.dda')) {// && (sDDSTag=='NC_1')) {
      flGridAltNC(this);
//      if (sDDSTag.substr(0,4)!='NC_1') flCallSysPOP(18,this);
      flCallSysPOP(18,this);

      } else if (this.sDDSFile=='dd_files/Projetos.dda') {// && (this.sDDSTag=='NC_1')) {
         flGridAltProj(this);


   } else if ((sDDSFile=='dd_files/Sug.dda') && (sDDSTag=='Padrao_1')) {
      flGridAltSug(this);
   } else if ((sDDSFile=='dd_files/Den.dda') && (sDDSTag=='Padrao_1')) {
      flGridAltDen(this);
   } else if ((sDDSFile=='dd_files/POPs.dda')) {
      flGridAltPOP(this);
   } else if ((sDDSFile=='dd_files/pizzaped.dda')) {
      flGridAltPizzaPed(this);
//   } else if (sDDSFile=='dd_files/TDoc_Doc.dda') {
//      flGridAltTDoc_Doc(this);
   } else {
      var oObj = this;
      //var oRequest = foCreateRequest();
      //oRequest.open("GET","axl_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=1&sFileDDS="+sDDSFile+"&sTagDDS="+sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(this)+"&sMnemTDoc="+fsMnemTDocsAncestrais(this)+"&sAncestrais="+fsChavesAncestrais(this)+"&sIrmasTias="+this.fsIrmasTias()+"&sId="+this.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
//AQUI-iChave
      var aPar = new Array();
      aPar.push(['sCliPasta'      , parent.sCliPasta           ]);
      aPar.push(['pCiaLogin'      , parent.pCiaLogin           ]);
      aPar.push(['iCompany'       , parent.iGlobalCompany      ]);
      aPar.push(['sDDFChamada'    , 1                          ]);
      aPar.push(['sFileDDS'       , sDDSFile                   ]);
      aPar.push(['sTagDDS'        , sDDSTag                    ]);
      aPar.push(['sLogin'         , parent.aGlobalLogin[1]     ]);
      aPar.push(['sTDoc'          , fsTDocsAncestrais(this)    ]);
      aPar.push(['sMnemTDoc'      , fsMnemTDocsAncestrais(this)]);
      aPar.push(['sAncestrais'    , fsChavesAncestrais(this)   ]);
      aPar.push(['sIrmasTias'     , this.fsIrmasTias()         ]);
      aPar.push(['sId'            , this.fiChaveAtual()        ]);
      aPar.push(['spOOp'          , parent.sGlobal_pOOp        ]);
      aPar.push(['sRoot'          , parent.sGlobalRoot         ]);
      aPar.push(['iDesenvolvedor' , parent.iGlobalDesenvolvedor]);
      aPar.push(['iGlobalKeyUser' , parent.iGlobalKeyUser      ]);
      aPar.push(['iTimeLogin'     , iGlobalTimeLogin           ]);
      var sPar = fsParParaPHP(aPar);
      var oRequest = foCreateRequest();
      oRequest.open("GET","al_GetDDF.php?"+sPar,true);

      oRequest.onreadystatechange = function() {
         if ((oRequest.readyState==4) && (oRequest.status==200)) {
            sMsg = oRequest.responseText;
            if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno-Alterando:'+sMsg);
            //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno-Alterando</font>',sMsg);
            if ((oObj!=null)&&(oObj.lEnded==false)) {
               if (sMsg.substr(0,2)=='-1') {
                  flIconeProcess(iSss,0);
                  flEnableScreen(iSss,true);
                  aTmp = sMsg.split('~');
                  sTmp = aTmp[0];
                  sTmp = sTmp.substr(2,sTmp.length-2);
                  //var iLensTmp = sTmp.length;
                  if (sTmp.length>0) alert(sTmp);
                  //if (sTmp.length>0) flModal('<font color=blue>Sistema</font>',sTmp);
                  else               alert('Sem permisso para alterar');
                  //else               flModal('<font color=red>Sistema</font>','Sem permisso para alterar');
               } else {
                  var oTela = foCreateTela(oObj,sMsg,false,iSss);
               }
            }
         }
      }
      var iSss = this.iSss;
      flIconeProcess(iSss,1);
      flEnableScreen(iSss,false);
      oRequest.send(null);
   }
}
}
}

function flGridZoo() {
//////////////////////
if (this.iTotRecs>0) {

//alert(this.sDDSFile);
   if ((this.sDDSFile=='dd_files/CI.dda') && ((this.sDDSTag=='CI_1') || (this.sDDSTag=='CI_1A') || (this.sDDSTag=='CI_1B') || (this.sDDSTag=='CI_1C') || (this.sDDSTag=='CI_1D'))) {
      flGridZooCI(this);
   } else if ((this.sDDSFile=='dd_files/MI.dda') && ((this.sDDSTag=='MI_1') || (this.sDDSTag=='MI_1A') || (this.sDDSTag=='MI_1B') || (this.sDDSTag=='MI_1C') || (this.sDDSTag=='MI_1D') )) {
      flGridZooMI(this);
   } else if ((this.sDDSFile=='dd_files/Memo.dda') && ((this.sDDSTag=='Memo_1') || (this.sDDSTag=='Memo_1A') || (this.sDDSTag=='Memo_1B') || (this.sDDSTag=='Memo_1C') || (this.sDDSTag=='Memo_1D') )) { // Memorando
      flGridZooMemo(this);
   } else if (this.sDDSFile=='dd_files/TI.dda') {
      flGridZooTI(this);
      flCallSysPOP(7,this);
   } else if ((this.sDDSFile=='dd_files/Oficio.dda') && ((this.sDDSTag=='Oficio_1') || (this.sDDSTag=='Oficio_1A')  || (this.sDDSTag=='Oficio_1B') || (this.sDDSTag=='Oficio_1C') || (this.sDDSTag=='Oficio_1D'))) {
      flGridZooOficio(this);
   } else if (this.sDDSFile=='dd_files/TopAta.dda') {
      flGridZooTopAta(this);
   } else if ((this.sDDSFile=='dd_files/NC.dda') || (this.sDDSFile=='dd_files/NC2.dda')) {// && (this.sDDSTag=='NC_1')) {
      flGridZooNC(this);
//      if (this.sDDSTag.substr(0,4)!='NC_1') flCallSysPOP(18,this);
      flCallSysPOP(18,this);

   } else if (this.sDDSFile=='dd_files/Projetos.dda') {// && (this.sDDSTag=='NC_1')) {
      flGridZooProj(this);

   } else if ((this.sDDSFile=='dd_files/Sug.dda') && (this.sDDSTag=='Padrao_1')) {
      flGridZooSug(this);
   } else if ((this.sDDSFile=='dd_files/Den.dda') && (this.sDDSTag=='Padrao_1')) {
      flGridZooDen(this);
   } else if ((this.sDDSFile=='dd_files/POPs.dda')) {
      flGridZooPOP(this);
   } else if ((this.sDDSFile=='dd_files/pizzaped.dda')) {
      flGridZooPizzaPed(this);
//   } else if (this.sDDSFile=='dd_files/TDoc_Doc.dda') {
//      flGridZooTDoc_Doc(this);
   } else if (this.sDDSFile=='dd_files/TopAta_TDoc.dda') {
      if (this.fiChaveIrma(1)=='NC') {   // ??????	rever

         flGridZooNC(this);
         flCallSysPOP(18,this);
      } else if (this.fiChaveIrma(1)=='CI')   flGridZooCI(this) 
      else if (this.fiChaveIrma(1)=='MI')     flGridZooMI(this) 
      else if (this.fiChaveIrma(1)=='Memo')   flGridZooMemo(this) // Memorando
      else if (this.fiChaveIrma(1)=='TI')     flGridZooTI(this) 
      else if (this.fiChaveIrma(1)=='Oficio') flGridZooOficio(this) 
      else this.flGridZoo2();
   } else {
      this.flGridZoo2();
   }
}
}

function flGridZoo2() {
//////////////////////
   var oObj = this;
   //var oRequest = foCreateRequest();
   //oRequest.open("GET","axl_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=2&sFileDDS="+this.sDDSFile+"&sTagDDS="+this.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(this)+"&sMnemTDoc="+fsMnemTDocsAncestrais(this)+"&sAncestrais="+fsChavesAncestrais(this)+"&sIrmasTias="+this.fsIrmasTias()+"&sId="+this.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
//AQUI-iChave
   var aPar = new Array();
   aPar.push(['sCliPasta'      , parent.sCliPasta           ]);
   aPar.push(['pCiaLogin'      , parent.pCiaLogin           ]);
   aPar.push(['iCompany'       , parent.iGlobalCompany      ]);
   aPar.push(['sDDFChamada'    , 2                          ]);
   aPar.push(['sFileDDS'       , this.sDDSFile              ]);
   aPar.push(['sTagDDS'        , this.sDDSTag               ]);
   aPar.push(['sLogin'         , parent.aGlobalLogin[1]     ]);
   aPar.push(['sTDoc'          , fsTDocsAncestrais(this)    ]);
   aPar.push(['sMnemTDoc'      , fsMnemTDocsAncestrais(this)]);
   aPar.push(['sAncestrais'    , fsChavesAncestrais(this)   ]);
   aPar.push(['sIrmasTias'     , this.fsIrmasTias()         ]);
   aPar.push(['sId'            , this.fiChaveAtual()        ]);
   aPar.push(['spOOp'          , parent.sGlobal_pOOp        ]);
   aPar.push(['sRoot'          , parent.sGlobalRoot         ]);
   aPar.push(['iDesenvolvedor' , parent.iGlobalDesenvolvedor]);
   aPar.push(['iGlobalKeyUser' , parent.iGlobalKeyUser      ]);
   aPar.push(['iTimeLogin'     , iGlobalTimeLogin           ]);
   var sPar = fsParParaPHP(aPar);
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?"+sPar,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno-Zoom:'+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno-Zoom:</font>',sMsg);
         if ((oObj!=null)&&(oObj.lEnded==false)) foCreateTela(oObj,sMsg,false,iSss);
      }
   }
   var iSss = this.iSss;
   flIconeProcess(iSss,1);
   flEnableScreen(iSss,false);
   oRequest.send(null);
}
//
function flChamaXML(poGrid,psXML,piLinha) {
////////////////////////////////////////////////////////////
// /qtux/samba/NFe/sinais/Security_1/35120810291834000157550010000000036-nfe.xml
   sXML = fsReplace(psXML,";","_");
   poGrid.flClickLin(piLinha);

   //if (sXML.indexOf('/NFe_Saida_XML')>=0) {   //  uma nota de saida
   var aArr = [109,115,34396,37609,34262,30869,3048];

   if ( (flInArray(parent.aGlobalLogin[1],aArr)) ){//|| (parent.aGlobalLogin[2].indexOf("@qtux") != -1) ) {
      if ((sXML.indexOf('/NFe_Saida_XML')>=0) || (sXML.indexOf('/NFeEnviadas')>=0)) {   // . uma nota de saida
         window.open(sXML);
      } else {
         window.open('../'+parent.sCliPasta+'/'+parent.sGlobalPathAnexos+'/NFe_Entrada_XML/Processadas/'+sXML);
      }
   } else {
      alert('Sem Permisso');
      //flModal('<font color=red>Sistema</font>','Sem Permisso');
   }
//   poGrid.fiChaveAtual()==4 ? flGrid(poGrid,'dd_files/Assessment_CUP_Emails.dda','Padrao_1') : flGrid(poGrid,'dd_files/Assessment_Temas.dda','Padrao_'+piTag)
}
//
function flChamaGridAssessmentTemasRange(poGrid,piTag,piLinha) {
////////////////////////////////////////////////////////////
   poGrid.flClickLin(piLinha);
   if (piTag==1) window.open('../../FullPlat/processos/HALLOS_ResultadosHTML.php?sCliPasta='+parent.sCliPasta+'&iCompany='+parent.iGlobalCompany+'&sId='+poGrid.fiChaveIrma(1)+'&sIdPai='+poGrid.fiChaveIrma(2)+'&sLogin='+poGrid.fiChaveAtual()+'&sRoot='+parent.sGlobalRoot+'&jTpVis=2');
   else          window.open('../../FullPlat/processos/HALLOS_ResultadosHTML.php?sCliPasta='+parent.sCliPasta+'&iCompany='+parent.iGlobalCompany+'&sId='+poGrid.fiChaveIrma(1)+'&sIdPai='+poGrid.fiChaveIrma(2)+'&sLogin='+poGrid.fiChaveAtual()+'&sRoot='+parent.sGlobalRoot+'&jTpVis=2&jTriNeg=1');
}
function flChamaGridAssessmentTemasRange2(poGrid,piTag,piLinha) {
////////////////////////////////////////////////////////////
   poGrid.flClickLin(piLinha);
   if (piTag==1) window.open('../../FullPlat/processos/HALLOS_Resultados.php?sCliPasta='+parent.sCliPasta+'&iCompany='+parent.iGlobalCompany+'&sId='+poGrid.fiChaveIrma(1)+'&sIdPai='+poGrid.fiChaveIrma(2)+'&sLogin='+poGrid.fiChaveAtual()+'&sRoot='+parent.sGlobalRoot+'&jTpVis=2&lImp=1');
   else          window.open('../../FullPlat/processos/HALLOS_Resultados.php?sCliPasta='+parent.sCliPasta+'&iCompany='+parent.iGlobalCompany+'&sId='+poGrid.fiChaveIrma(1)+'&sIdPai='+poGrid.fiChaveIrma(2)+'&sLogin='+poGrid.fiChaveAtual()+'&sRoot='+parent.sGlobalRoot+'&jTpVis=2&jTriNeg=1&lImp=1');
}
function flChamaGridAssessmentTemasRangeRICARDO(poGrid,piTag,piLinha) {
////////////////////////////////////////////////////////////
   poGrid.flClickLin(piLinha);
   if (piTag==1) window.open('../../FullPlat/processos/HALLOS_Resultados_NOVO.php?sCliPasta='+parent.sCliPasta+'&iCompany='+parent.iGlobalCompany+'&sId='+poGrid.fiChaveIrma(1)+'&sIdPai='+poGrid.fiChaveIrma(2)+'&sLogin='+poGrid.fiChaveAtual()+'&sRoot='+parent.sGlobalRoot+'&jTpVis=2&lImp=1');
   else          window.open('../../FullPlat/processos/HALLOS_Resultados_NOVO.php?sCliPasta='+parent.sCliPasta+'&iCompany='+parent.iGlobalCompany+'&sId='+poGrid.fiChaveIrma(1)+'&sIdPai='+poGrid.fiChaveIrma(2)+'&sLogin='+poGrid.fiChaveAtual()+'&sRoot='+parent.sGlobalRoot+'&jTpVis=2&jTriNeg=1&lImp=1');
}

function flChamaGridAssessmentTemas(poGrid,piTag,piLinha) {
////////////////////////////////////////////////////////////
   poGrid.flClickLin(piLinha);
   poGrid.fiChaveAtual()==4 ? flGrid(poGrid,'dd_files/Assessment_CUP_Emails.dda','Padrao_1') : flGrid(poGrid,'dd_files/Assessment_Temas.dda','Padrao_'+piTag)
}
function flChamaGridAssessmentTemasQuestoes(poGrid,piLinha) {
/////////////////////////////////////////////////////////////
   poGrid.flClickLin(piLinha);
   poGrid.flGridAlt();
}


function flChamaGridAssessmentTemasQuestoesLer(poGrid,piLinha) {
/////////////////////////////////////////////////////////////
   poGrid.flClickLin(piLinha);
   poGrid.flGridZoo();
}


function flChamaGridAssessmentTemasQuestoes360(poGrid,piTag,piLinha) {
///////////////////////////////////////////////////////////////////
   poGrid.flClickLin(piLinha);
   poGrid.flGridAlt(poGrid.sDDSFile,'Padrao_'+piTag);
}
function flChamaGridAssessment360(poGrid,piTag,piLinha) {
/////////////////////////////////////////////////////////
   poGrid.flClickLin(piLinha);
   if (piTag==1) {
      flGrid(poGrid,'dd_files/Assessment_360.dda','Padrao_'+piTag)
   } else if (piTag==4) {
      flGrid(poGrid,'dd_files/Assessment_Temas_360.dda','Padrao_1')
   }
}

function flCallSysPOPInLine(poGrid,piLinha,piSysPOP) {
//////////////////////////////////////////////////////
   poGrid.flClickLin(piLinha);
   flCallSysPOP(piSysPOP,poGrid,'',poGrid.fiChaveAtual())
}

//
//
//

//(poObj,psDDSFile,psDDSTag,piSssMn,piChave) {
function flFicha(poObj,psDDS,psTag,piSss,piChave,poContainer) {
///////////////////////////////////////////////////////////////
//console.log('piSss='+piSss);
   //console.log('flFicha');
   //var oRequest = foCreateRequest();
   //oRequest.open("GET","axl_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=2&sFileDDS="+psDDS+"&sTagDDS="+psTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc=&sMnemTDoc=&sAncestrais=&sIrmasTias=&sId="+piChave+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
//AQUI-iChave
   var aPar = new Array();
   aPar.push(['sCliPasta'      , parent.sCliPasta           ]);
   aPar.push(['pCiaLogin'      , parent.pCiaLogin           ]);
   aPar.push(['iCompany'       , parent.iGlobalCompany      ]);
   aPar.push(['sDDFChamada'    , 2                          ]);
   aPar.push(['sFileDDS'       , psDDS                      ]);
   aPar.push(['sTagDDS'        , psTag                      ]);
   aPar.push(['sLogin'         , parent.aGlobalLogin[1]     ]);
   aPar.push(['sTDoc'          , ''                         ]);
   aPar.push(['sMnemTDoc'      , ''                         ]);
   aPar.push(['sAncestrais'    , ''                         ]);
   aPar.push(['sIrmasTias'     , ''                         ]);
   aPar.push(['sId'            , piChave                    ]);
   aPar.push(['spOOp'          , parent.sGlobal_pOOp        ]);
   aPar.push(['sRoot'          , parent.sGlobalRoot         ]);
   aPar.push(['iDesenvolvedor' , parent.iGlobalDesenvolvedor]);
   aPar.push(['iGlobalKeyUser' , parent.iGlobalKeyUser      ]);
   aPar.push(['iTimeLogin'     , iGlobalTimeLogin           ]);
   var sPar = fsParParaPHP(aPar);
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?"+sPar,true);

   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno Ficha: '+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno Ficha</font>',sMsg);
         if ((poObj==null)||((poObj!=null)&&(poObj.lEnded==false))) {
            var oTela = foCreateTela(poObj,sMsg,false,iSss,false,"",piSss,null,"","",poContainer);
         }
//foCreateTela(poObjPai,psMsg,plRefresh,piSss,plSlim,psProcesso,piSssMn,poCaller,psIncSeqCall,psAltSeqCall)
      }
   }
   if (poObj==null) var iSss = fiNovaSss();
   else             var iSss = poObj.iSss;
   flIconeProcess(iSss,1);
   flEnableScreen(iSss,false);
   oRequest.send(null);
}
function flGridRoot(poObj,psDDS,psTag,psQry,psSearch,piSssMn) {
///////////////////////////////////////////////////////////////
    if (parent.sGlobalRoot==0) alert('No disponvel');
    //if (parent.sGlobalRoot==0) flModal('<font color=red>Sistema</font>','No disponvel');
    else flGrid(poObj,psDDS,psTag,psQry,psSearch,piSssMn);
}
function flGrid_Usu(poObj,psDDS,psTag,psQry,psSearch,piSssMn) {
///////////////////////////////////////////////////////////////
   if (parent.aGlobalLogin[2].indexOf("@qtux") != -1) { //  qtux
      flGrid(poObj,psDDS,psTag,psQry,psSearch,piSssMn);
   } else if ((parent.sCliPasta=='mianogames') && (parent.aGlobalLogin[1]!=3)) { //Miano Games com a ID Do Funcionrio: Fernanda
      alert('No disponvel');
      //flModal('<font color=blue>Sistema</font>','No disponvel');
   } else {
      flGrid(poObj,psDDS,psTag,psQry,psSearch,piSssMn);
   }
}
function flGridLateralFromTela(psDDSFile,psDDSTag,poObj) {
//////////////////////////////////////////////////////////
//alert(poObj.sId);
   oCaller = poObj.oPai;
   flGrid(null,psDDSFile,psDDSTag,'','',oCaller.iSss,'',oCaller);
}
function flGrid(poObj,psDDS,psTag,psQry,psSearch,piSssMn,psVarTmp,poCaller,poContainer) {
///////////////////////////////////////////////////////////////////////////////////////// - todos os tipos sao 0, o tipo 1 significa entrar pesquisando por uma string psSearch
//
//console.log("grid");
//alert(parent.lGlobal_POL_Copiar);
//alert('sOOp='+parent.sGlobal_pOOp+'\nsCOp='+parent.sGlobal_pCOp+'\nsUO='+parent.sGlobal_pUO+'\nsUFis='+parent.sGlobal_pUFis);
//alert('psDDS='+psDDS+'\npsTag='+psTag);
//alert(iGlobalTimeLogin);
//alert('parent.sGlobal_pUNeg='+parent.sGlobal_pUNeg);
//if (poContainer!=null) console.log('poContainer.id='+poContainer.id);
psDDS = fsReplace(psDDS,';','_');   // sim_FIN_Lcmto.dda -> <lnk_ctr1>
psTag = fsReplace(psTag,';','_');
//if (poCaller==null) console.log('psDDS='+psDDS+', psTag='+psTag+', piSssMn='+piSssMn+', psVarTmp='+psVarTmp);
//else { 
//   if (poCaller.oTelaEdicao==null) console.log('psDDS='+psDDS+', psTag='+psTag+', piSssMn='+piSssMn+', psVarTmp='+psVarTmp+',poCaller='+poCaller.sId);
//   else                            console.log('psDDS='+psDDS+', psTag='+psTag+', piSssMn='+piSssMn+', psVarTmp='+psVarTmp+',poCaller='+poCaller.sId+', poCaller.oTelaEdicao='+poCaller.oTelaEdicao.sId);
//}
   if (psQry   ==null) psQry='';
   if (psSearch==null) psSearch='';
   if (piSssMn ==null) piSssMn =-1;
   if (psVarTmp==null) psVarTmp='';

   if (poCaller!=null) {
      ioCaller_ChaveAtual = poCaller.fiChaveAtual();
   } else {
      ioCaller_ChaveAtual = 0;
   }
   var oRequest = foCreateRequest();
   if (psQry!='') {   // quem chamou ja passou a qry do grid

      psQry = fsReplace(psQry,'  ',' ');

      psQry = psQry.replace(/</g,'[MENOR]').replace(/>/g,'[MAIOR]');
      psVarTmp = psVarTmp.replace(/</g,'[MENOR]').replace(/>/g,'[MAIOR]');

      if ((poObj!=null)&&(poObj.sTipo=='grid')) {   // tem pai e  um grid
//alert('&sMarcadosPai='+poObj.sMarcados);

         if ((poObj.oPai!=null)&&(poObj.oPai.sTipo=='grid')) {   // tem avo
//alert(1); 
//AQUI-iChave-1/4
            oRequest.open("GET","al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim=0&sCalendario=&sTipo=0&sFileDDS="+psDDS+"&sTagDDS="+psTag+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sLogin="+parent.aGlobalLogin[1]+"&sQry="+psQry+"&iRecsPage="+iGlobalRecsPage+"&iPage=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&sSearch="+psSearch+"&sVarTmp="+psVarTmp+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+"&ioCaller_ChaveAtual="+ioCaller_ChaveAtual+'&sMarcadosPai='+poObj.sMarcados+'&iTimeLogin='+iGlobalTimeLogin+'&pChaveSalva_1='+poObj.iChaveSalva,true);
         } else {   // nao tem avo
//alert(2); 
//AQUI-iChave-2/4
            oRequest.open("GET","al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim=0&sCalendario=&sTipo=0&sFileDDS="+psDDS+"&sTagDDS="+psTag+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sLogin="+parent.aGlobalLogin[1]+"&sQry="+psQry+"&iRecsPage="+iGlobalRecsPage+"&iPage=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&sSearch="+psSearch+"&sVarTmp="+psVarTmp+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+"&ioCaller_ChaveAtual="+ioCaller_ChaveAtual+'&sMarcadosPai='+poObj.sMarcados+'&iTimeLogin='+iGlobalTimeLogin+'&pChaveSalva_1='+poObj.iChaveSalva,true);
         }
      } else {   // else do tem pai e  um grid
//alert(3); 
         oRequest.open("GET","al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim=0&sCalendario=&sTipo=0&sFileDDS="+psDDS+"&sTagDDS="+psTag+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias=&sLogin="+parent.aGlobalLogin[1]+"&sQry="+psQry+"&iRecsPage="+iGlobalRecsPage+"&iPage=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&sSearch="+psSearch+"&sVarTmp="+psVarTmp+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+"&ioCaller_ChaveAtual="+ioCaller_ChaveAtual+'&iTimeLogin='+iGlobalTimeLogin,true);
                                              //console.log(parent.sGlobal_pUNeg+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim=0&sCalendario=&sTipo=0&sFileDDS="+psDDS+"&sTagDDS="+psTag+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias=&sLogin="+parent.aGlobalLogin[1]+"&sQry="+psQry+"&iRecsPage="+iGlobalRecsPage+"&iPage=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&sSearch="+psSearch+"&sVarTmp="+psVarTmp+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&ioCaller_ChaveAtual="+ioCaller_ChaveAtual+'&iTimeLogin='+iGlobalTimeLogin);
                     //alert("al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim=0&sCalendario=&sTipo=0&sFileDDS="+psDDS+"&sTagDDS="+psTag+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias=&sLogin="+parent.aGlobalLogin[1]+"&sQry="+psQry+"&iRecsPage="+iGlobalRecsPage+"&iPage=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&sSearch="+psSearch+"&sVarTmp="+psVarTmp+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&ioCaller_ChaveAtual="+ioCaller_ChaveAtual);
      }

   } else {   // quem chamou nao passou a qry do grid

      if ((poObj!=null)&&(poObj.sTipo=='grid')) {   // tem pai e  um grid

         if ((poObj.oPai!=null)&&(poObj.oPai.sTipo=='grid')) {   // tem avo
//alert(4); 
//AQUI-iChave-3/4
            oRequest.open("GET","al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim=0&sCalendario=&sTipo=0&sFileDDS="+psDDS+"&sTagDDS="+psTag+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sLogin="+parent.aGlobalLogin[1]+"&iRecsPage="+iGlobalRecsPage+"&iPage=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&sSearch="+psSearch+"&sVarTmp="+psVarTmp+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+"&ioCaller_ChaveAtual="+ioCaller_ChaveAtual+'&sMarcadosPai='+poObj.sMarcados+'&iTimeLogin='+iGlobalTimeLogin+'&pChaveSalva_1='+poObj.iChaveSalva,true);
         } else {   // nao tem avo
//alert(5); 
//AQUI-iChave-4/4
            oRequest.open("GET","al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim=0&sCalendario=&sTipo=0&sFileDDS="+psDDS+"&sTagDDS="+psTag+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sLogin="+parent.aGlobalLogin[1]+"&iRecsPage="+iGlobalRecsPage+"&iPage=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&sSearch="+psSearch+"&sVarTmp="+psVarTmp+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+"&ioCaller_ChaveAtual="+ioCaller_ChaveAtual+'&sMarcadosPai='+poObj.sMarcados+'&iTimeLogin='+iGlobalTimeLogin+'&pChaveSalva_1='+poObj.iChaveSalva,true);
         }
      } else {   // else do tem pai e  um grid
//alert(6); 
         oRequest.open("GET","al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim=0&sCalendario=&sTipo=0&sFileDDS="+psDDS+"&sTagDDS="+psTag+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias=&sLogin="+parent.aGlobalLogin[1]+"&iRecsPage="+iGlobalRecsPage+"&iPage=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&sSearch="+psSearch+"&sVarTmp="+psVarTmp+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+"&ioCaller_ChaveAtual="+ioCaller_ChaveAtual+'&iTimeLogin='+iGlobalTimeLogin,true);
      }
   }

   oRequest.onreadystatechange = function() {
//      alert('oRequest.readyState='+oRequest.readyState+'\noRequest.status='+oRequest.status);
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
//console.log('oGrid.sMsg='+sMsg);
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno Grid: '+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno Grid</font>',sMsg);
//alert('iSss2='+iSss);
         if ((poObj==null)||((poObj!=null)&&(poObj.lEnded==false))) {
//alert('pre-create');
            foCreateGrid(poObj,sMsg,iSss,false,false,psSearch,piSssMn,psVarTmp,poCaller,0,poContainer);
//alert('pos-create');
         }
//alert('fim2');
      }	 
   }

//alert('poObj='+poObj);
   if (poObj==null) {
      var iSss = fiNovaSss();
//alert('iSss1a='+iSss);
      if (iSss==-1) alert('Excesso de recursos'); // atencao nao posso deixar prosseguir - criar novas abas
      //if (iSss==-1) flModal('<font color=red>Sistema</font>','Excesso de recursos'); // atencao nao posso deixar prosseguir - criar novas abas
   } else {
      var iSss = poObj.iSss;
//alert('iSss1b='+iSss);
   }

   flIconeProcess(iSss,1);
   flEnableScreen(iSss,false);
   oRequest.send(null); 
//alert('send');
}

function fl2Grid(poObj,psDDS,psTag,psQry,psThis) {
//////////////////////////////////////////
//
   if (psQry==null) psQry='';
   var oRequest = foCreateRequest();
   if (psQry!='') {
      if ((poObj!=null)&&(poObj.sTipo=='grid')) {
         oRequest.open("GET","al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim=0&sCalendario=&sTipo=0&sFileDDS="+psDDS+"&sTagDDS="+psTag+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sLogin="+parent.aGlobalLogin[1]+"&sQry="+psQry+"&iRecsPage="+iGlobalRecsPage+"&iPage=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+'&iTimeLogin='+iGlobalTimeLogin,true)
      } else {
         oRequest.open("GET","al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim=0&sCalendario=&sTipo=0&sFileDDS="+psDDS+"&sTagDDS="+psTag+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias=&sLogin="+parent.aGlobalLogin[1]+"&sQry="+psQry+"&iRecsPage="+iGlobalRecsPage+"&iPage=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+'&iTimeLogin='+iGlobalTimeLogin,true)
      }
   } else {
      if ((poObj!=null)&&(poObj.sTipo=='grid')) {
         oRequest.open("GET","al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim=0&sCalendario=&sTipo=0&sFileDDS="+psDDS+"&sTagDDS="+psTag+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sLogin="+parent.aGlobalLogin[1]+"&iRecsPage="+iGlobalRecsPage+"&iPage=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+'&iTimeLogin='+iGlobalTimeLogin,true)
      } else {
         oRequest.open("GET","al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim=0&sCalendario=&sTipo=0&sFileDDS="+psDDS+"&sTagDDS="+psTag+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias=&sLogin="+parent.aGlobalLogin[1]+"&iRecsPage="+iGlobalRecsPage+"&iPage=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+'&iTimeLogin='+iGlobalTimeLogin,true)
      }
   }
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno Grid2: '+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno Grid</font>',sMsg);
         if ((poObj==null)||((poObj!=null)&&(poObj.lEnded==false))) foCreateGrid(poObj,sMsg,iSss,false);
      }	 
   }

   if (poObj==null) {
      var iSss = fiNovaSss();
      if (iSss==-1) alert('Excesso de recursos'); // atencao nao posso deixar prosseguir - criar novas abas
      //if (iSss==-1) flModal('<font color=red>Sistema</font>','Excesso de recursos'); // atencao nao posso deixar prosseguir - criar novas abas
   } else {
      var iSss = poObj.iSss;
   }
   flIconeProcess(iSss,1);
   flEnableScreen(iSss,false);
   oRequest.send(null); 
}

function flGridSlim(poObj,psDDS,psTag,piDDFChamada,poObjCtrl) {
///////////////////////////////////////////////////////////////
   if (poObjCtrl==null) poObjCtrl = poObj;
   var oRequest = foCreateRequest();
   if (piDDFChamada==0) { 
      oRequest.open("GET","al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim=1&sCalendario=&sTipo=0&sFileDDS="+psDDS+"&sTagDDS="+psTag+"&sTDoc=&sMnemTDoc=&sAncestrais=0&sIrmasTias=&sLogin="+parent.aGlobalLogin[1]+"&iRecsPage="+iGlobalRecsPage+"&iPage=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   } else {
      oRequest.open("GET","al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim=1&sCalendario=&sTipo=0&sFileDDS="+psDDS+"&sTagDDS="+psTag+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sLogin="+parent.aGlobalLogin[1]+"&iRecsPage="+iGlobalRecsPage+"&iPage=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   }
   poObjCtrl_fiChaveAtual = poObjCtrl.fiChaveAtual();
   poObjCtrl_iArray = poObjCtrl.iArray;
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno Grid Slim: '+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno Grid Slim</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {
            var oGrid = foCreateGrid(poObj,sMsg,iSss,true);
            poObjCtrl.aObjSlim.push(oGrid);

            if ((poObjCtrl.sDDSFile=='dd_files/CI.dda') && ((poObjCtrl.sDDSTag=='CI_1') || (poObjCtrl.sDDSTag=='CI_1A') || (poObjCtrl.sDDSTag=='CI_1B') || (poObjCtrl.sDDSTag=='CI_1C') || (poObjCtrl.sDDSTag=='CI_1D'))) {   // escrever CI
               var sTDoc = 'CI';
               if (piDDFChamada==0) {   // inc
                  var oEdit = foCreateEditorSlim2(poObjCtrl,sTDoc,'fMsg',0,'Novo Comunicado');
                  poObjCtrl.aObjSlim.push(oEdit);
               } else if (piDDFChamada==1) {   // alt
                  var oEdit = foCreateEditorSlim2(poObjCtrl,sTDoc,'fMsg',poObjCtrl_fiChaveAtual,'Comunicado - '+poObjCtrl.aGrid[poObjCtrl_iArray][0]);
                  poObjCtrl.aObjSlim.push(oEdit);
               } else {   // zoom
                  var oEdit = foCreateEditorSlim2(poObjCtrl,sTDoc,'fMsg',poObjCtrl_fiChaveAtual,'Comunicado - '+poObjCtrl.aGrid[poObjCtrl_iArray][0],true);
                  poObjCtrl.aObjSlim.push(oEdit);
               }
            } else if ((poObjCtrl.sDDSFile=='dd_files/MI.dda') && ((poObjCtrl.sDDSTag=='MI_1') || (poObjCtrl.sDDSTag=='MI_1A') || (poObjCtrl.sDDSTag=='MI_1B') || (poObjCtrl.sDDSTag=='MI_1C') || (poObjCtrl.sDDSTag=='MI_1D'))) {   // escrever MI
               var sTDoc = 'MI';
               if (piDDFChamada==0) {   // inc(!), encaminhar(?)
                  var oEdit = foCreateEditorSlim2(poObjCtrl,sTDoc,'fMsg',0,'Nova mensagem',false,false);
                  poObjCtrl.aObjSlim.push(oEdit);
               } else if (piDDFChamada==1) {   // alt
                  var oEdit1 = foCreateEditorSlim2(poObjCtrl,sTDoc,'fMsg',poObjCtrl_fiChaveAtual,'Mensagem - '+poObjCtrl.aGrid[poObjCtrl_iArray][0],false,false,0,poObjCtrl.fiChaveIrma(1));
                  poObjCtrl.aObjSlim.push(oEdit1);
               } else {   // zoom
                  var oEdit = foCreateEditorSlim2(poObjCtrl,sTDoc,'fMsg',poObjCtrl_fiChaveAtual,'Mensagem - '+poObjCtrl.aGrid[poObjCtrl_iArray][0],true,null,4,poObjCtrl.fiChaveIrma(1));
                  poObjCtrl.aObjSlim.push(oEdit);
               }
            } else if ((poObjCtrl.sDDSFile=='dd_files/MI.dda') && ((poObjCtrl.sDDSTag=='MI_2')||(poObjCtrl.sDDSTag=='MI_2A')||(poObjCtrl.sDDSTag=='MI_4')||(poObjCtrl.sDDSTag=='MI_Agenda_1'))) {  
               // encaminhar mi
               var sTDoc = 'MI';
               if (piDDFChamada==0) { 
                  var oEdit2 = foCreateEditorSlim2(poObj,sTDoc,'fMsg',poObjCtrl_fiChaveAtual,'',true,null,4,poObjCtrl.fiChaveIrma(1));
                  poObjCtrl.aObjSlim.push(oEdit2);
                  var oEdit1 = foCreateEditorSlim2(poObj,sTDoc,'fMsg',poObjCtrl_fiChaveAtual,'',false,false,2,poObjCtrl.fiChaveIrma(1));
                  poObjCtrl.aObjSlim.push(oEdit1);
   
               }
            } else if ((poObjCtrl.sDDSFile=='dd_files/Memo.dda') && ((poObjCtrl.sDDSTag=='Memo_1') || (poObjCtrl.sDDSTag=='Memo_1A') || (poObjCtrl.sDDSTag=='Memo_1B') || (poObjCtrl.sDDSTag=='Memo_1C') || (poObjCtrl.sDDSTag=='Memo_1D'))) {   // escrever Memo
               var sTDoc = 'Memo';
               if (piDDFChamada==0) {   // inc(!), encaminhar(?)
                  var oEdit = foCreateEditorSlim2(poObjCtrl,sTDoc,'fMsg',0,'Novo memorando',false,false);
                  poObjCtrl.aObjSlim.push(oEdit);
               } else if (piDDFChamada==1) {   // alt
                  var oEdit1 = foCreateEditorSlim2(poObjCtrl,sTDoc,'fMsg',poObjCtrl_fiChaveAtual,'Memorando - '+poObjCtrl.aGrid[poObjCtrl_iArray][0],false,false,0,poObjCtrl.fiChaveIrma(1));
                  poObjCtrl.aObjSlim.push(oEdit1);
               } else {   // zoom
                  var oEdit = foCreateEditorSlim2(poObjCtrl,sTDoc,'fMsg',poObjCtrl_fiChaveAtual,'Memorando - '+poObjCtrl.aGrid[poObjCtrl_iArray][0],true,null,4,poObjCtrl.fiChaveIrma(1));
                  poObjCtrl.aObjSlim.push(oEdit);
               }
            } else if ((poObjCtrl.sDDSFile=='dd_files/Memo.dda') && ((poObjCtrl.sDDSTag=='Memo_2')||(poObjCtrl.sDDSTag=='Memo_2A')||(poObjCtrl.sDDSTag=='Memo_4')||(poObjCtrl.sDDSTag=='Memo_Agenda_1'))) {  
               // encaminhar memorando
               var sTDoc = 'Memo';
               if (piDDFChamada==0) { 
                  var oEdit2 = foCreateEditorSlim2(poObj,sTDoc,'fMsg',poObjCtrl_fiChaveAtual,'',true,null,4,poObjCtrl.fiChaveIrma(1));
                  poObjCtrl.aObjSlim.push(oEdit2);
                  var oEdit1 = foCreateEditorSlim2(poObj,sTDoc,'fMsg',poObjCtrl_fiChaveAtual,'',false,false,2,poObjCtrl.fiChaveIrma(1));
                  poObjCtrl.aObjSlim.push(oEdit1);
   
               }
            } else if ((poObjCtrl.sDDSFile=='dd_files/Oficio.dda') && ((poObjCtrl.sDDSTag=='Oficio_1') || (poObjCtrl.sDDSTag=='Oficio_1A') || (poObjCtrl.sDDSTag=='Oficio_1B') || (poObjCtrl.sDDSTag=='Oficio_1C') || (poObjCtrl.sDDSTag=='Oficio_1D'))) {   // escrever Oficio
               var sTDoc = 'Oficio';
               if (piDDFChamada==0) {   // inc
                  var oEdit = foCreateEditorSlim2(poObjCtrl,sTDoc,'fMsg',0,'Novo Ofcio');
                  poObjCtrl.aObjSlim.push(oEdit);
               } else if (piDDFChamada==1) {   // alt
                  var oEdit = foCreateEditorSlim2(poObjCtrl,sTDoc,'fMsg',poObjCtrl_fiChaveAtual,'Ofcio - '+poObjCtrl.aGrid[poObjCtrl_iArray][0]);
                  poObjCtrl.aObjSlim.push(oEdit);
               } else {   // zoom
                  var oEdit = foCreateEditorSlim2(poObjCtrl,sTDoc,'fMsg',poObjCtrl_fiChaveAtual,'Ofcio - '+poObjCtrl.aGrid[poObjCtrl_iArray][0],true);
                  poObjCtrl.aObjSlim.push(oEdit);
               }
            } else if ((poObjCtrl.sDDSFile=='dd_files/TI.dda') && ((poObjCtrl.sDDSTag=='TI_2')||(poObjCtrl.sDDSTag=='TI_4'))) {   // encaminhar ti ??? tirar pois e obsoleto
               var sTDoc = 'TI';
               if (piDDFChamada==0) { 
                  var oEdit2 = foCreateEditorSlim2(poObj,sTDoc,'fMsg',poObjCtrl_fiChaveAtual,'',true,null,5);
                  poObjCtrl.aObjSlim.push(oEdit2);
                  var oEdit1 = foCreateEditorSlim2(poObj,sTDoc,'fMsg',poObjCtrl_fiChaveAtual,'',false,true,2);
                  poObjCtrl.aObjSlim.push(oEdit1);
               }
            }
         }	 
      }
   }
   if (poObj==null) {
      var iSss = fiNovaSss();
      if (iSss==-1) alert('Excesso de recursos'); // atencao nao posso deixar prosseguir - criar novas abas
      //if (iSss==-1) flModal('<font color=red>Sistema</font>','Excesso de recursos'); // atencao nao posso deixar prosseguir - criar novas abas
   } else {
      var iSss = poObj.iSss;
   }
   flIconeProcess(iSss,1);
   flEnableScreen(iSss,true);
   oRequest.send(null);
}
function flGridEsc(poObj,psDDS,psTag,psVars,piSOA) {   // da funcao esc()
////////////////////////////////////////////////////
   if (piSOA>0) {  
      var aTmp5 = poObj.sTagSubGrid.split(',');
      //var iLenaTmp5 = aTmp5.length;
      for (var k=0; k<aTmp5.length; k++) {
         sTagSOA = aTmp5[k];
         if (sTagSOA==piSOA) break;
      }
      sMarcados=poObj.aSOAMarcados[k];
//alert('sMarcados='+sMarcados);
   } else {
      sMarcados='/';
   }
   var oRequest = foCreateRequest();
   if ((poObj.oPai!=null) && (poObj.oPai.sTipo=='grid')) {
//alert("1)al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sMarcados="+sMarcados+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim=0&sCalendario=&sTipo=2&sFileDDS="+psDDS+"&sTagDDS="+psTag+"&sTDoc="+fsTDocsAncestrais(poObj.oPai)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj.oPai)+"&sAncestrais="+fsChavesAncestrais(poObj.oPai)+"&sIrmasTias="+poObj.oPai.fsIrmasTias()+"&sVars="+escape(psVars)+"&sLogin="+parent.aGlobalLogin[1]+"&iRecsPage="+iGlobalRecsPage+"&iPage=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor);
      oRequest.open("GET","al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sDDFChamada="+poObj.sDDFChamada+"&sMarcados="+sMarcados+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim=0&sCalendario=&sTipo=2&sFileDDS="+psDDS+"&sTagDDS="+psTag+"&sTDoc="+fsTDocsAncestrais(poObj.oPai)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj.oPai)+"&sAncestrais="+fsChavesAncestrais(poObj.oPai)+"&sIrmasTias="+poObj.oPai.fsIrmasTias()+"&sVars="+escape(psVars)+"&sLogin="+parent.aGlobalLogin[1]+"&iRecsPage="+iGlobalRecsPage+"&iPage=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   } else {
//alert("2)al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sDDFChamada="+poObj.sDDFChamada+"&sMarcados="+sMarcados+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim=0&sCalendario=&sTipo=2&sFileDDS="+psDDS+"&sTagDDS="+psTag+"&sTDoc=&sMnemTDoc=&sAncestrais=&sIrmasTias=&sVars="+escape(psVars)+"&sLogin="+parent.aGlobalLogin[1]+"&iRecsPage="+iGlobalRecsPage+"&iPage=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor);
      oRequest.open("GET","al_GetDDG.php?sGlobal_pUNeg="+parent.sGlobal_pUNeg+"&sDDFChamada="+poObj.sDDFChamada+"&sMarcados="+sMarcados+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sSlim=0&sCalendario=&sTipo=2&sFileDDS="+psDDS+"&sTagDDS="+psTag+"&sTDoc=&sMnemTDoc=&sAncestrais=&sIrmasTias=&sVars="+escape(psVars)+"&sLogin="+parent.aGlobalLogin[1]+"&iRecsPage="+iGlobalRecsPage+"&iPage=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   }
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridFuncaoEsc='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridFuncaoEsc</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) foCreateGrid(poObj,sMsg,iSss,false,true,null ,null ,null ,null ,piSOA);
         if (document.getElementById('fEsc_'+poObj.sVarEsc+'_'+poObj.sId)==null) { // no faz nada
         } else {
            if ((poObj!=null) && (poObj.sTipo=='tela')) {
               if (poObj.lTirarGiffEsc_NoRetornoDaFesc) document.getElementById('fEsc_'+poObj.sVarEsc+'_'+poObj.sId).style.display="none";
            } else {
               document.getElementById('fEsc_'+poObj.sVarEsc+'_'+poObj.sId).style.display="none";
            }
         }
      } 
   }
   if (poObj==null) {
      var iSss = fiNovaSss();
      if (iSss==-1) alert('Excesso de recursos'); // atencao nao posso deixar prosseguir - criar novas abas
      //if (iSss==-1) flModal('<font color=red>Sistema</font>','Excesso de recursos'); // atencao nao posso deixar prosseguir - criar novas abas
   } else {
      var iSss = poObj.iSss;
   }
   flIconeProcess(iSss,1);
   flEnableScreen(iSss,false);
   oRequest.send(null);
}
// dedicado ao suprimento, erp chama sem opcao de incluir
function flGridSup() {
//////////////////////
   if (parent.jClassUser==1) flGrid(null,"dd_files/Sup.dda","Padrao_1","","",this.iSss);   // nao pode incluir suprimentos
   else flGrid(null,"dd_files/Sup.dda","Padrao_2","","",this.iSss);
}
//

//
function flIncRoot(psDDSFile,psDDSTag,piSssMn) {   // essa funcao deve retornar o ID do cara incluido ou 0 caso nao incluiu
////////////////////////////////////////////////
   if (parent.sGlobalRoot==0) alert('No disponvel');
   //if (parent.sGlobalRoot==0) flModal('<font color=red>Sistema</font>','No disponvel');
   else flInc(psDDSFile,psDDSTag,piSssMn);
}

function flInc(psDDSFile,psDDSTag,piSssMn,poCaller,psIncSeqCall) {   // essa funcao deve retornar o ID do cara incluido ou 0 caso nao incluiu
//////////////////////////////////////////////////////////////////
//console.log('psDDSFile='+psDDSFile+', psDDSTag='+psDDSTag+', piSssMn='+piSssMn);
   var oCaller = poCaller;   //(poCaller==null) ? null : poCaller;
//alert('psIncSeqCall='+psIncSeqCall);
   var sIncSeqCall = (psIncSeqCall==null) ? '' : psIncSeqCall;
   //var oRequest = foCreateRequest();
   //oRequest.open("GET","axl_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=0&sFileDDS="+psDDSFile+"&sTagDDS="+psDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc=&sMnemTDoc=&sAncestrais=&sIrmasTias=&sId=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);

//AQUI-iChave
   var aPar = new Array();
   aPar.push(['3sCliPasta'     , parent.sCliPasta           ]);
   aPar.push(['pCiaLogin'      , parent.pCiaLogin           ]);
   aPar.push(['iCompany'       , parent.iGlobalCompany      ]);
   aPar.push(['sDDFChamada'    , 0                          ]);
   aPar.push(['sFileDDS'       , psDDSFile                  ]);
   aPar.push(['sTagDDS'        , psDDSTag                   ]);
   aPar.push(['sLogin'         , parent.aGlobalLogin[1]     ]);
   aPar.push(['sTDoc'          , ''                         ]);
   aPar.push(['sMnemTDoc'      , ''                         ]);
   aPar.push(['sAncestrais'    , ''                         ]);
   aPar.push(['sIrmasTias'     , ''                         ]);
   aPar.push(['sId'            , 0                          ]);
   aPar.push(['spOOp'          , parent.sGlobal_pOOp        ]);
   aPar.push(['sRoot'          , parent.sGlobalRoot         ]);
   aPar.push(['iDesenvolvedor' , parent.iGlobalDesenvolvedor]);
   aPar.push(['iGlobalKeyUser' , parent.iGlobalKeyUser      ]);
   aPar.push(['iTimeLogin'     , iGlobalTimeLogin           ]);
   var sPar = fsParParaPHP(aPar);
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?"+sPar,true);

   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno flInc:'+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno flInc:</font>',sMsg);
         if (sMsg.substr(0,2)=='-1') alert('Sem permisso para incluir');
         //if (sMsg.substr(0,2)=='-1') flModal('<font color=red>Sistema</font>','Sem permisso para incluir');
         else foCreateTela(null,sMsg,false,iSss,false,"",piSssMn,oCaller,sIncSeqCall);
      }
   }
   var iSss = fiNovaSss();
   oRequest.send(null);
}
//
function flAlt(poObj,psDDSFile,psDDSTag,piSssMn,piChave,poCaller) {
///////////////////////////////////////////////////////////////////
//console.log('flAlt-poObj.sId='+poObj.sId+', psDDSFile='+psDDSFile+', psDDSTag='+psDDSTag+', piSssMn='+piSssMn+', piChave='+piChave+', poObj.sTipo='+poObj.sTipo);
//AQUI-iChave
//   var oRequest = foCreateRequest();
//alert(piChave);
// vou ter que fazer nesse caso dedicado aa senha do usuario o root=1

   if (piChave==null) piChave = parent.aGlobalLogin[1];  // pLogin

   if (poObj==null) {
//console.log('1');
      //var sGet = "axl_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=1&sFileDDS="+psDDSFile+"&sTagDDS="+psDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc=&sMnemTDoc=&sAncestrais=&sIrmasTias=&sId="+piChave+"&spOOp="+parent.sGlobal_pOOp+"&sRoot=1"+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin;

//AQUI-iChave
      var aPar = new Array();
      aPar.push(['sCliPasta'      , parent.sCliPasta           ]);
      aPar.push(['pCiaLogin'      , parent.pCiaLogin           ]);
      aPar.push(['iCompany'       , parent.iGlobalCompany      ]);
      aPar.push(['sDDFChamada'    , 1                          ]);
      aPar.push(['sFileDDS'       , psDDSFile                  ]);
      aPar.push(['sTagDDS'        , psDDSTag                   ]);
      aPar.push(['sLogin'         , parent.aGlobalLogin[1]     ]);
      aPar.push(['sTDoc'          , ''                         ]);
      aPar.push(['sMnemTDoc'      , ''                         ]);
      aPar.push(['sAncestrais'    , ''                         ]);
      aPar.push(['sIrmasTias'     , ''                         ]);
      aPar.push(['sId'            , piChave                    ]);
      aPar.push(['spOOp'          , parent.sGlobal_pOOp        ]);
      aPar.push(['sRoot'          , 1                          ]);
      aPar.push(['iDesenvolvedor' , parent.iGlobalDesenvolvedor]);
      aPar.push(['iGlobalKeyUser' , parent.iGlobalKeyUser      ]);
      aPar.push(['iTimeLogin'     , iGlobalTimeLogin           ]);
      var sPar = fsParParaPHP(aPar);

   } else if (poObj.sTipo=='html') {
//console.log('2');
      //var sGet = "axl_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=1&sFileDDS="+psDDSFile+"&sTagDDS="+psDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc=&sMnemTDoc=&sAncestrais="+piChave+"&sIrmasTias=&sId="+piChave+"&spOOp="+parent.sGlobal_pOOp+"&sRoot=1"+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin;

//AQUI-iChave
      var aPar = new Array();
      aPar.push(['sssCliPasta'    , parent.sCliPasta           ]);
      aPar.push(['pCiaLogin'      , parent.pCiaLogin           ]);
      aPar.push(['iCompany'       , parent.iGlobalCompany      ]);
      aPar.push(['sDDFChamada'    , 1                          ]);
      aPar.push(['sFileDDS'       , psDDSFile                  ]);
      aPar.push(['sTagDDS'        , psDDSTag                   ]);
      aPar.push(['sLogin'         , parent.aGlobalLogin[1]     ]);
      aPar.push(['sTDoc'          , ''                         ]);
      aPar.push(['sMnemTDoc'      , ''                         ]);
      aPar.push(['sAncestrais'    , piChave                    ]);
      aPar.push(['sIrmasTias'     , ''                         ]);
      aPar.push(['sId'            , piChave                    ]);
      aPar.push(['spOOp'          , parent.sGlobal_pOOp        ]);
      aPar.push(['sRoot'          , 1                          ]);
      aPar.push(['iDesenvolvedor' , parent.iGlobalDesenvolvedor]);
      aPar.push(['iGlobalKeyUser' , parent.iGlobalKeyUser      ]);
      aPar.push(['iTimeLogin'     , iGlobalTimeLogin           ]);
      var sPar = fsParParaPHP(aPar);

   } else {
//console.log('3');
      var sGet = "axl_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=1&sFileDDS="+psDDSFile+"&sTagDDS="+psDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+piChave+"&spOOp="+parent.sGlobal_pOOp+"&sRoot=1"+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin;

//AQUI-iChave
      var aPar = new Array();
      aPar.push(['qsCliPasta'     , parent.sCliPasta            ]);
      aPar.push(['pCiaLogin'      , parent.pCiaLogin            ]);
      aPar.push(['iCompany'       , parent.iGlobalCompany       ]);
      aPar.push(['sDDFChamada'    , 1                           ]);
      aPar.push(['sFileDDS'       , psDDSFile                   ]);
      aPar.push(['sTagDDS'        , psDDSTag                    ]);
      aPar.push(['sLogin'         , parent.aGlobalLogin[1]      ]);
      aPar.push(['sTDoc'          , fsTDocsAncestrais(poObj)    ]);
      aPar.push(['sMnemTDoc'      , fsMnemTDocsAncestrais(poObj)]);
      aPar.push(['sAncestrais'    , fsChavesAncestrais(poObj)   ]);
      aPar.push(['sIrmasTias'     , poObj.fsIrmasTias()         ]);
      aPar.push(['sId'            , piChave                     ]);
      aPar.push(['spOOp'          , parent.sGlobal_pOOp         ]);
      aPar.push(['sRoot'          , 1                           ]);
      aPar.push(['iDesenvolvedor' , parent.iGlobalDesenvolvedor ]);
      aPar.push(['iGlobalKeyUser' , parent.iGlobalKeyUser       ]);
      aPar.push(['iTimeLogin'     , iGlobalTimeLogin            ]);
      var sPar = fsParParaPHP(aPar);
   }
   //console.log('sGet='+sGet);
   //oRequest.open("GET",sGet,true);
//AQUI-iChave
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?"+sPar,true);


   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno flAlt:'+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno flAlt</font>',sMsg);
         if ((poObj==null)||((poObj!=null)&&(poObj.lEnded==false))) {
            var oTela = foCreateTela(poObj,sMsg,false,iSss,false,"",piSssMn,poCaller);
         }
      }
   }
   if (poObj==null) var iSss = fiNovaSss();
   else             var iSss = poObj.iSss;
   flIconeProcess(iSss,1);
   flEnableScreen(iSss,true);
   oRequest.send(null);
}
//
function flRangeRoot(poObj,psDDSFile,psDDSTag,piSssMn) {
////////////////////////////////////////////////////////
   if (parent.sGlobalRoot==0) alert('No disponvel');
   //if (parent.sGlobalRoot==0) flModal('<font color=red>Sistema</font>','No disponvel');
   else flRange(poObj,psDDSFile,psDDSTag,piSssMn);
}
//
function flRange(poObj,psDDSFile,psDDSTag,piSssMn) {
////////////////////////////////////////////////////
//   console.log('psDDSFile='+psDDSFile+', psDDSTag='+psDDSTag);
//   if (poObj.oPai!=null) console.log('poObj='+poObj.sId+', poObj.oPai='+poObj.oPai.sId);
//   else console.log('poObj='+poObj.sId);
   var oRequest = foCreateRequest();
   if (poObj==null)                                         oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=3&sFileDDS="+psDDSFile+"&sTagDDS="+psDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc=&sMnemTDoc=&sAncestrais=&sIrmasTias=&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   else if ((poObj.oPai==null)||(poObj.oPai.sTipo=='tela')) oRequest.open("GET","al_GetDDF.php?sId="+poObj.fiChaveAtual()+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=3&sFileDDS="+psDDSFile+"&sTagDDS="+psDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc=&sMnemTDoc=&sAncestrais=&sIrmasTias=&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   else                                                     oRequest.open("GET","al_GetDDF.php?sIdPai="+poObj.oPai.fiChaveAtual()+"&sId="+poObj.fiChaveAtual()+"&sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=3&sFileDDS="+psDDSFile+"&sTagDDS="+psDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc=&sMnemTDoc=&sAncestrais=&sIrmasTias=&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert("Retorno para a tela de range: "+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno para a tela de range</font>',sMsg);
         if ((poObj==null)||((poObj!=null)&&(poObj.lEnded==false))) foCreateTela(poObj,sMsg,false,iSss,false,"",piSssMn);
      }
   }
   if (poObj==null) {
      var iSss = fiNovaSss();
      if (iSss==-1) alert('Excesso de recursos'); // atencao nao posso deixar prosseguir - criar novas abas
      //if (iSss==-1) flModal('<font color=red>Sistema</font>','Excesso de recursos'); // atencao nao posso deixar prosseguir - criar novas abas
   } else {
      var iSss = poObj.iSss;
   }
   flIconeProcess(iSss,1);
   flEnableScreen(iSss,true);
   oRequest.send(null);
}
//
function flOpenGraph(psDDFile,psDDTag) {
////////////////////////////////////////
   // tirar o sDSN da linha de comando
   var sLink = 'http://'+document.domain+parent.sGlobalSubDomain+'/al_GetGraph.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sFileGraph='+psDDFile+'&sNrTag='+psDDTag+'&sLogin='+parent.aGlobalLogin[1]+'&sDSN='+parent.sGlobalDSN;   //+document.domain+parent.sGlobalSubDomain+'/'+parent.sGlobalPathAnexos+'/'+sFileExt;
   window.open(sLink);
}
//
function flRangeGraph(psDDSFile,psDDSTag) {
///////////////////////////////////////////
   
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=4&sFileDDS="+psDDSFile+"&sTagDDS="+psDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc=&sMnemTDoc=&sAncestrais=&sIrmasTias=&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno RangeGraph='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno RangeGraph</font>',sMsg);
         foCreateTela(null,sMsg,false,iSss);
      }
   }
   var iSss = fiNovaSss();
   if (iSss==-1) alert('Excesso de recursos'); // atencao nao posso deixar prosseguir - criar novas abas
   //if (iSss==-1) flModal('<font color=red>Sistema</font>','Excesso de recursos'); // atencao nao posso deixar prosseguir - criar novas abas
   flIconeProcess(iSss,1);
   flEnableScreen(iSss,true);
   oRequest.send(null);
}
//
function flRangeProcesso(psDDSFile,psDDSTag,psProcesso,poCaller) {
//////////////////////////////////////////////////////////////////
   var oRequest = foCreateRequest();
//alert('iTimeLogin='+iGlobalTimeLogin);
   if (poCaller==null) oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=5&sFileDDS="+psDDSFile+"&sTagDDS="+psDDSTag+"&sId=&sLogin="+parent.aGlobalLogin[1]+"&sTDoc=&sMnemTDoc=&sAncestrais=&sIrmasTias=&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   else                oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=5&sFileDDS="+psDDSFile+"&sTagDDS="+psDDSTag+"&sId="+poCaller.fiChaveAtual()+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc=&sMnemTDoc=&sAncestrais=&sIrmasTias=&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno RangeProcesso='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno RangeProcesso</font>',sMsg);
         foCreateTela(poCaller,sMsg,false,iSss,false,psProcesso);
      }
   }
   var iSss = fiNovaSss();
   if (iSss==-1) alert('Excesso de recursos'); // atencao nao posso deixar prosseguir - criar novas abas
   //if (iSss==-1) flModal('<font color=red>Sistema</font>','Excesso de recursos'); // atencao nao posso deixar prosseguir - criar novas abas
   flIconeProcess(iSss,1);
   flEnableScreen(iSss,true);
   oRequest.send(null);
}
//
function flRangeRelRoot(psDDSFile,psDDSTag,psProcesso,poCaller) {
/////////////////////////////////////////////////////////////////
   if (parent.sCliPasta == 'mianogames' && psDDSFile == 'dd_files/AgPack_Chamados.dda' && psDDSTag == 'RANGE_1') {
      var sId    = parent.aGlobalLogin[1];
      var sEmail = parent.aGlobalLogin[2];
      if ((sId==3) || (sId==54) || (sEmail.indexOf("@qtux") != -1)) {
         flRangeRel(psDDSFile,psDDSTag,psProcesso,poCaller);
      } else {
         alert('No disponvel');
         //flModal('<font color=red>Sistema</font>','No disponvel');
      }
   } else {
      if (parent.sGlobalRoot==0) alert('No disponvel');
      //if (parent.sGlobalRoot==0) flModal('<font color=red>Sistema</font>','No disponvel');
      else flRangeRel(psDDSFile,psDDSTag,psProcesso,poCaller);
   }
}
//
function flRangeRel(psDDSFile,psDDSTag,psProcesso,poCaller) {
//////////////////////////////////////////////////////////////////
   var oRequest = foCreateRequest();
   if (poCaller==null)                   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=6&sFileDDS="+psDDSFile+"&sTagDDS="+psDDSTag+"&sId=&sLogin="+parent.aGlobalLogin[1]+"&sTDoc=&sMnemTDoc=&sAncestrais=&sIrmasTias=&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   else if (poCaller.oPai==null)         oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=6&sFileDDS="+psDDSFile+"&sTagDDS="+psDDSTag+"&sId="+poCaller.fiChaveAtual()+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc=&sMnemTDoc=&sAncestrais=&sIrmasTias=&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   else if (poCaller.oPai.sTipo!='grid') oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=6&sFileDDS="+psDDSFile+"&sTagDDS="+psDDSTag+"&sId="+poCaller.fiChaveAtual()+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc=&sMnemTDoc=&sAncestrais=&sIrmasTias=&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   else                                  oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=6&sFileDDS="+psDDSFile+"&sTagDDS="+psDDSTag+"&sIdPai="+poCaller.oPai.fiChaveAtual()+"&sId="+poCaller.fiChaveAtual()+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc=&sMnemTDoc=&sAncestrais=&sIrmasTias=&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno RangeRel='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno RangeRel</font>',sMsg);
         foCreateTela(poCaller,sMsg,false,iSss,false,psProcesso);
      }
   }
   var iSss = fiNovaSss();
   if (iSss==-1) alert('Excesso de recursos'); // atencao nao posso deixar prosseguir - criar novas abas
   //if (iSss==-1) flModal('<font color=red>Sistema</font>','Excesso de recursos'); // atencao nao posso deixar prosseguir - criar novas abas
   flIconeProcess(iSss,1);
   flEnableScreen(iSss,true);
   oRequest.send(null);
}
//
function flTDocU(poObj,piInd) {
///////////////////////////////
   var iInd = (piInd==null) ? 2 : piInd;
//   var jModelo = poObj.aGrid[poObj.iArray][2];
//   var jModelo = poObj.aGrid[poObj.iArray][iInd];
//   if (jModelo==0) flGrid(poObj,'dd_files/TDoc_Doc.dda','TDoc_Doc_1');
//   if (jModelo==1) flGrid(poObj,'dd_files/TDoc_Doc.dda','TDoc_Doc_1');
//   if (jModelo==2) flGrid(poObj,'dd_files/TDoc_Doc.dda','TDoc_Doc_1');
   flGrid(poObj,'dd_files/TDoc_Doc.dda','TDoc_Doc_1');
}
//
function flTDocUA(poObj,piInd) {
////////////////////////////////
//   var iInd = (piInd==null) ? 2 : piInd;
////   var jModelo = poObj.aGrid[poObj.iArray][2];
//   var jModelo = poObj.aGrid[poObj.iArray][iInd];
//   if (jModelo==0) flGrid(poObj,'dd_files/TDoc_Doc.dda','TDoc_Doc_1A');
//   if (jModelo==1) flGrid(poObj,'dd_files/TDoc_Doc.dda','TDoc_Doc_1A');
//   if (jModelo==2) flGrid(poObj,'dd_files/TDoc_Doc.dda','TDoc_Doc_1A');

   flGrid(poObj,'dd_files/TDoc_Doc.dda','TDoc_Doc_1A');
}
//
function flTDoc_Doc(poObj) {
////////////////////////////
   flGrid(poObj,'dd_files/Anexos.dda','Anexos_TDoc_Doc_1');
}
//
function flAgendaClick(poObj) {
///////////////////////////////

   var pAviso = poObj.fiChaveIrma(2);
   var pPOP   = poObj.fiChaveIrma(3);
   if (pPOP>0) {   // pop
      flGrid(poObj,'dd_files/POPs.dda','POPs_Agenda_1');
   } else if (pAviso==1) {   // recebimento de ci
      flGrid(poObj,'dd_files/CI.dda','CI_Agenda_1');
   } else if (pAviso==2) {   // recebimento de mi
      flGrid(poObj,'dd_files/MI.dda','MI_Agenda_1');
   } else if ((pAviso==5) || (pAviso==7)) {   // recebimento de tarefa ou atualizacao de tarefa
      flGrid(poObj,'dd_files/TI.dda','TI_Agenda_1');
   } else if ((pAviso==6) || (pAviso==8) || (pAviso==11)) {   // leitura e conclusao de tarefa e aviso de vcmto
      flGrid(poObj,'dd_files/TI.dda','TI_Agenda_2');
   } else if (pAviso==9) {   // recebimento de ofcio
      flGrid(poObj,'dd_files/Oficio.dda','Oficio_Agenda_1');
   }
//   flCallSysPOP(37,poObj,'',poObj.fiChaveAtual(),0)
}
//
function flAgendaSinteseClick(poObj) { /// cockpit
//////////////////////////////////////
   var pPId   = poObj.fiChaveAtual();

        if (pPId==10) flGrid(null,"dd_files/Agenda2.dda","Padrao_1");
   else if (pPId==11) flGrid(null,"dd_files/Agenda2.dda","Padrao_2");
//   else if (pPId==12) flGrid(null,"dd_files/Agenda2.dda","Padrao_3");
   else if (pPId==12) flGrid(null,"dd_files/Agenda2.dda","Padrao_2");
   else if (pPId==13) flGrid(null,"dd_files/Agenda2.dda","Padrao_4");
   else if (pPId==14) flGrid(null,"dd_files/Agenda2.dda","Padrao_5");
   else if (pPId==15) flGrid(null,"dd_files/Agenda2.dda","Padrao_6");
   else if (pPId==16) flGrid(null,"dd_files/Agenda2.dda","Padrao_7");
   else if (pPId==17) flGrid(null,"dd_files/Agenda2.dda","Padrao_8");
   else if (pPId==18) flGrid(null,"dd_files/Agenda2.dda","Padrao_9");
   else if (pPId==19) flGrid(null,"dd_files/Agenda2.dda","Padrao_10");

   else if (pPId==21) flGrid(null,"dd_files/MI.dda","MI_1B");
   else if (pPId==22) flGrid(null,"dd_files/MI.dda","MI_2A");

   else if (pPId==23) flGrid(null,"dd_files/Memo.dda","Memo_1B");
   else if (pPId==24) flGrid(null,"dd_files/Memo.dda","Memo_2A");

   else if (pPId==31) flGrid(null,"dd_files/CI.dda","CI_1B");
   else if (pPId==32) flGrid(null,"dd_files/CI.dda","CI_2A");

   else if (pPId==41) flGrid(null,"dd_files/TI.dda","TI_1B");
   else if (pPId==42) flGrid(null,"dd_files/TI.dda","TI_1C");
   else if (pPId==43) flGrid(null,"dd_files/TI.dda","TI_1D");
   else if (pPId==44) flGrid(null,"dd_files/TI.dda","TI_2B");
   else if (pPId==45) flGrid(null,"dd_files/TI.dda","TI_2C");
   else if (pPId==46) flGrid(null,"dd_files/TI.dda","TI_2D");

   else if (pPId==51) flGrid(null,"dd_files/AgPack_Chamados_TEC.dda","Padrao_2");
   else if (pPId==52) flGridRoot(null,"dd_files/AgPack_Chamados.dda","Padrao_3");

   else if (pPId==61) flGrid(null,"dd_files/Agenda3.dda","Padrao_1");
   else if (pPId==62) flGrid(null,"dd_files/Agenda3.dda","Padrao_3");
   else if (pPId==63) flGrid(null,"dd_files/Agenda3.dda","Padrao_4");
   else if (pPId==64) flGrid(null,"dd_files/Agenda3.dda","Padrao_5");
   else if (pPId==65) flGrid(null,"dd_files/Agenda3.dda","Padrao_6");

   else if (pPId==71) flGrid(null,"dd_files/Eq.dda"  ,"Eq_5");
   else if (pPId==72) flGrid(null,"dd_files/POPs.dda","POPs_5");
   else if (pPId==73) flGrid(null,"dd_files/TDoc.dda","TDocU2");
   else if (pPId==74) flGrid(null,"dd_files/AtasTemas.dda","AtasTemas_3");
   else if (pPId==75) flGrid(null,"dd_files/UFis.dda","UFis_1");
   else if (pPId==76) flGrid(null,"dd_files/POPs.dda","POPs_9");

   else if (pPId==8)     flGrid(null,"dd_files/OOp.dda","OOp_3");
   else if (pPId==10008) flGrid(null,"dd_files/OOp.dda","OOp_3B");

   else if (pPId==82) flGrid(null,"dd_files/NC2.dda","Padrao_82"); // 82-NC para vencer que sou o Relator
   else if (pPId==83) flGrid(null,"dd_files/NC2.dda","Padrao_83"); // 83-NC para vencer que sou o Responsvel
   else if (pPId==84) flGrid(null,"dd_files/NC2.dda","Padrao_84"); // 84-NC para vencer que estou envolvido
   else if (pPId==85) flGrid(null,"dd_files/NC2.dda","Padrao_85"); // 85-NC vencidas que sou o Relator
   else if (pPId==86) flGrid(null,"dd_files/NC2.dda","Padrao_86"); // 86-NC vencidas que sou o Responsvel
   else if (pPId==87) flGrid(null,"dd_files/NC2.dda","Padrao_87"); // 87-NC vencidas que estou envolvido
   else if (pPId==88) flGrid(null,"dd_files/NC2.dda","Padrao_22"); // 88-nao conformidade atualizacoes vc e o resp
   else if (pPId==89) flGrid(null,"dd_files/NC2.dda","Padrao_55"); // 89-nao conformidade em andamento q vc e o resp
      
   else if (pPId==92) flGrid(null,"dd_files/NC2.dda","Padrao_0");
   else if (pPId==93) flGrid(null,"dd_files/NC2.dda","Padrao_1");
   else if (pPId==94) flGrid(null,"dd_files/NC2.dda","Padrao_2");
   else if (pPId==95) flGrid(null,"dd_files/NC2.dda","Padrao_3");
   else if (pPId==97) flGrid(null,"dd_files/NC2.dda","Padrao_4");
   else if (pPId==98) flGrid(null,"dd_files/NC2.dda","Padrao_5");
   else if (pPId==99) flGrid(null,"dd_files/NC2.dda","Padrao_6");

   else if (pPId==101) flGrid(null,"dd_files/TopAta.dda","TopAta_1A");
   else if (pPId==102) flGrid(null,"dd_files/TopAta.dda","TopAta_2");

//   else if (pPId==105) flGrid(null,"dd_files/TopAta.dda","TopAta_2AA");
//   else if (pPId==106) flGrid(null,"dd_files/TopAta.dda","TopAta_2AA");
   else if (pPId==105) flGrid(null,"dd_files/AtasTemas.dda","AtasTemas_1B");
   else if (pPId==106) flGrid(null,"dd_files/AtasTemas.dda","AtasTemas_1A");

   else if (pPId==113) flGrid(null,"dd_files/POPs.dda","POPs_11"); // Revisados nos ltimos 30 dias para eu saber

   else if (pPId==301) flGrid(null,"dd_files/Treinamentos_Agendar.dda","Padrao_1A");  // 301-Treinamentos agendados para eu fazer
   else if (pPId==302) flGrid(null,"dd_files/Treinamentos_Agendar.dda","Padrao_1B");  // 302-Treinamentos que j fiz
   else if (pPId==303) flGrid(null,"dd_files/Treinamentos_Agendar.dda","Padrao_1C");  // 303-Treinamentos agendados para eu ministrar
   else if (pPId==304) flGrid(null,"dd_files/Treinamentos_Agendar.dda","Padrao_1D");  // 304-Treinamentos que j ministrei
   else if (pPId==305) flGrid(null,"dd_files/Treinamentos_Agendar.dda","Padrao_1E");  // 305-Treinamentos agendados que no participei
   else if (pPId==306) flGrid(null,"dd_files/Treinamentos_Agendar.dda","Padrao_1F");  // 306-Treinamentos para concluir

   else if (pPId==307) flGrid(null,"dd_files/POPs.dda","POPs_5A");   // 307-Revises vencidas para eu fazer
   else if (pPId==308) flGrid(null,"dd_files/POPs.dda","POPs_5AA");  // 308-Revises que devo fazer nos prximos 15 dias

   else if (pPId==401) flGrid(null,"dd_files/Questionarios_Participantes.dda","Padrao_2A"); // 401-Questionrios para eu responder
   else if (pPId==402) flGrid(null,"dd_files/Questionarios_Participantes.dda","Padrao_2B"); // 402-Questionrios que j respondi
   else if (pPId==403) flGrid(null,"dd_files/Questionarios_Participantes.dda","Padrao_2C"); // 403-Questionrios que j respondi com pendncia 

   else if (pPId==451) flGrid(null,"dd_files/Projetos.dda","Padrao_1A"); // 451-Projetos que sou responsvel
   else if (pPId==452) flGrid(null,"dd_files/Projetos.dda","Padrao_1B"); // 452-Projetos que inclui
   else if (pPId==453) flGrid(null,"dd_files/Projetos.dda","Padrao_1C"); // 453-Projetos que participo
   else if (pPId==454) flGrid(null,"dd_files/Projetos.dda","Padrao_1D"); // 454-Projetos que atualizaram e no li

   else if (pPId==901) flGrid(null,"dd_files/NC2.dda","Padrao_901"); // 901 - No conformidade | Autor | E est(o) para vencer nos prximo 5 dias
   else if (pPId==902) flGrid(null,"dd_files/NC2.dda","Padrao_902"); // 902 - No conformidade | Autor | E que atualizaram e venceram
   else if (pPId==903) flGrid(null,"dd_files/NC2.dda","Padrao_903"); // 902 - No conformidade | Autor | E venceram
   else if (pPId==904) flGrid(null,"dd_files/NC2.dda","Padrao_904"); // 904 - No conformidade | Relator | E que atualizaram e venceram
   else if (pPId==905) flGrid(null,"dd_files/NC2.dda","Padrao_905"); // 905 - No conformidade | Responsvel | E que atualizaram e venceram
   else if (pPId==906) flGrid(null,"dd_files/NC2.dda","Padrao_906"); // 906 - No conformidade | Envolvido | E que atualizaram e venceram

   else if (pPId==10000) flGrid(null,"dd_files/Agenda.dda","Padrao_1A");

   else if (pPId==10001) flGrid(null,"dd_files/Agenda2.dda","Padrao_22");

}
//
function flAgendaSinteseClickSubordinado(poObj) {
///////////////////////////////////////////
   var pPId   = poObj.fiChaveAtual();

//        if (pPId==10) flGrid(null,"dd_files/Agenda2.dda","Padrao_1B");
//   else if (pPId==11) flGrid(null,"dd_files/Agenda2.dda","Padrao_2B");
//   else if (pPId==12) flGrid(null,"dd_files/Agenda2.dda","Padrao_3");
//   else if (pPId==13) flGrid(null,"dd_files/Agenda2.dda","Padrao_4");
//   else if (pPId==14) flGrid(null,"dd_files/Agenda2.dda","Padrao_5");
//   else if (pPId==15) flGrid(null,"dd_files/Agenda2.dda","Padrao_6");
//   else if (pPId==16) flGrid(null,"dd_files/Agenda2.dda","Padrao_7B");
//   else if (pPId==17) flGrid(null,"dd_files/Agenda2.dda","Padrao_8B");
//   else if (pPId==18) flGrid(null,"dd_files/Agenda2.dda","Padrao_9B");
//   else if (pPId==19) flGrid(null,"dd_files/Agenda2.dda","Padrao_10B");


        if (pPId==10) flGrid(poObj,"dd_files/Agenda2.dda","Padrao_1B");
   else if (pPId==11) flGrid(poObj,"dd_files/Agenda2.dda","Padrao_2B");
   else if (pPId==12) flGrid(null,"dd_files/Agenda2.dda","Padrao_3");
   else if (pPId==13) flGrid(null,"dd_files/Agenda2.dda","Padrao_4");
   else if (pPId==14) flGrid(null,"dd_files/Agenda2.dda","Padrao_5");
   else if (pPId==15) flGrid(null,"dd_files/Agenda2.dda","Padrao_6");
   else if (pPId==16) flGrid(poObj,"dd_files/Agenda2.dda","Padrao_7B");
   else if (pPId==17) flGrid(poObj,"dd_files/Agenda2.dda","Padrao_8B");
   else if (pPId==18) flGrid(poObj,"dd_files/Agenda2.dda","Padrao_9B");
   else if (pPId==19) flGrid(poObj,"dd_files/Agenda2.dda","Padrao_10B");

//   else if (pPId==21) flGrid(null,"dd_files/MI.dda","MI_1B");
//   else if (pPId==22) flGrid(null,"dd_files/MI.dda","MI_2A");

   else if (pPId==31) flGrid(null,"dd_files/CI.dda","CI_1BB");
   else if (pPId==32) flGrid(null,"dd_files/CI.dda","CI_2AB");

   else if (pPId==41) flGrid(null,"dd_files/TI.dda","TI_1BB");
   else if (pPId==42) flGrid(null,"dd_files/TI.dda","TI_1CB");
   else if (pPId==43) flGrid(null,"dd_files/TI.dda","TI_1DB");
   else if (pPId==44) flGrid(null,"dd_files/TI.dda","TI_2BB");
   else if (pPId==45) flGrid(null,"dd_files/TI.dda","TI_2CB");
   else if (pPId==46) flGrid(null,"dd_files/TI.dda","TI_2DB");

   else if (pPId==61) flGrid(null,"dd_files/Agenda3.dda","Padrao_1B");
   else if (pPId==62) flGrid(null,"dd_files/Agenda3.dda","Padrao_3B");
   else if (pPId==63) flGrid(null,"dd_files/Agenda3.dda","Padrao_4B");
   else if (pPId==64) flGrid(null,"dd_files/Agenda3.dda","Padrao_5B");
   else if (pPId==65) flGrid(null,"dd_files/Agenda3.dda","Padrao_6B");

   else if (pPId==71) flGrid(null,"dd_files/Eq.dda"  ,"Eq_5B");
   else if (pPId==72) flGrid(null,"dd_files/POPs.dda","POPs_5B");
   else if (pPId==73) flGrid(null,"dd_files/TDoc.dda","TDocU2B");
   else if (pPId==74) flGrid(null,"dd_files/AtasTemas.dda","AtasTemas_3B");
   else if (pPId==75) flGrid(null,"dd_files/UFis.dda","UFis_1B");

   else if (pPId==8) flGrid(null,"dd_files/OOp.dda","OOp_4");
   
   else if (pPId==91) flGrid(null,"dd_files/NC2.dda","Padrao_0");
   else if (pPId==93) flGrid(null,"dd_files/NC2.dda","Padrao_1");
   else if (pPId==94) flGrid(null,"dd_files/NC2.dda","Padrao_2");
   else if (pPId==95) flGrid(null,"dd_files/NC2.dda","Padrao_3");
   else if (pPId==97) flGrid(null,"dd_files/NC2.dda","Padrao_4");
   else if (pPId==98) flGrid(null,"dd_files/NC2.dda","Padrao_5");
   else if (pPId==99) flGrid(null,"dd_files/NC2.dda","Padrao_6");

   else if (pPId==101) flGrid(poObj,"dd_files/Agendamentos.dda","Padrao_2BB");

   else if (pPId==113) flGrid(null,"dd_files/POPs.dda","POPs_11"); // Revisados nos ltimos 30 dias para eu saber

   else if (pPId==301) flGrid(poObj,"dd_files/Treinamentos_Agendar.dda","Padrao_1AA"); // 301-Treinamentos que participo
   else if (pPId==303) flGrid(poObj,"dd_files/Treinamentos_Agendar.dda","Padrao_1CC"); // 303-Treinamentos que ministro

   else if (pPId==451) flGrid(poObj,"dd_files/Projetos.dda","Padrao_1AA"); // 451-Projetos que sou responsvel
   else if (pPId==453) flGrid(poObj,"dd_files/Projetos.dda","Padrao_1CC"); // 453-Projetos que participo

   else if (pPId==10000) flGrid(null,"dd_files/AgendaB.dda","Padrao_1A");

   else if (pPId==10001) flGrid(null,"dd_files/Agenda2.dda","Padrao_22B");

}
//
function flCargaVaga(poObj) {
/////////////////////////////
   var pPId   = poObj.fiChaveAtual();

        if (pPId==10)  flGrid(poObj,"dd_files/Agendamentos_Resp.dda","Padrao_2");
   else if (pPId==42)  flGrid(poObj,"dd_files/TI.dda","TI_1CBB");
   else if (pPId==45)  flGrid(poObj,"dd_files/TI.dda","TI_2CBB");

   else if (pPId==71)  flGrid(poObj,"dd_files/Eq.dda"  ,"Eq_5BB");
   else if (pPId==72)  flGrid(poObj,"dd_files/POPs.dda","POPs_5BB");
   else if (pPId==73)  flGrid(poObj,"dd_files/TDoc.dda","TDocU2BB");
   else if (pPId==74)  flGrid(poObj,"dd_files/AtasTemas.dda","AtasTemas_4");
   else if (pPId==75)  flGrid(poObj,"dd_files/UFis.dda","UFis_1BB");

   else if (pPId==8)   flGrid(poObj,"dd_files/OOp.dda","OOp_4");
   
   else if (pPId==94)  flGrid(poObj,"dd_files/NC2.dda","Padrao_2B");
   else if (pPId==100) flGrid(poObj,"dd_files/Agendamentos.dda","Padrao_2B");
   else if (pPId==101) flGrid(poObj,"dd_files/Agendamentos.dda","Padrao_2BB");

   else if (pPId==301) flGrid(poObj,"dd_files/Treinamentos_Agendar.dda","Padrao_1AA"); // 301-Treinamentos que participo
   else if (pPId==303) flGrid(poObj,"dd_files/Treinamentos_Agendar.dda","Padrao_1CC"); // 303-Treinamentos que ministro

   else if (pPId==451) flGrid(poObj,"dd_files/Projetos.dda","Padrao_1AA"); // 451-Projetos que sou responsvel
   else if (pPId==453) flGrid(poObj,"dd_files/Projetos.dda","Padrao_1CC"); // 453-Projetos que participo

}
//
function flAnotacoes(piSssMn) {
///////////////////////////////

   foCreateEditor(null,'Usu','fAnot',parent.aGlobalLogin[1],'Bloco de Notas',null,null,null,null,piSssMn);
}
//
function flReport(poObj,psDDRFile) {
////////////////////////////////////
//   window.open("http://qtuxjundiai.zapto.org/governancacorporativa/v1/bl_GetDDR.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sTipo=1&sFileDDR="+psDDRFile);
}
//
function flProcess(poObj,psProcess) {
   flCallAJAX(poObj.sId,400,psProcess);
}
function flMonitoraProcess(poObj) {
   flCallAJAX(poObj.sId,401,"pProcessMonitor.php");
}
function flCGDShowDoc(poObj) {
//////////////////////////////
   flCallAJAX(poObj.sId,600);
}

function flTableGridOnMouseOver() {
///////////////////////////////////
   this.lMouseWheel = true;
}
function flTableGridOnMouseOut() {
//////////////////////////////////
   this.lMouseWheel = false;
}

//
//
//
//

//
// CI
//

function flGridIncCI(poGrid) { // DEDICADO
//////////////////////////////
   var poObj = poGrid;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=0&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridIncCI='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridIncCI</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {
            if (sMsg.substr(0,2)=='-1') {
               flIconeProcess(iSss,0);
               flEnableScreen(iSss,true);
               alert('Sem permisso para incluir');
               //flModal('<font color=red>Sistema</font>','Sem permisso para incluir');
            } else {
               var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               poObj.aObjSlim.push(oTela);
               flGridSlim(poObj,'dd_files/OOp.dda','OOp_CI_1',0);
            }
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flGridAltCI(poGrid) { // DEDICADO
//////////////////////////////
   var poObj = poGrid;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=1&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridAltCI='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridAltCI</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {
            if (sMsg.substr(0,2)=='-1') {
               flIconeProcess(iSss,0);
               flEnableScreen(iSss,true);
               aTmp = sMsg.split('~');
               sTmp = aTmp[0];
               sTmp = sTmp.substr(2,sTmp.length-2);
               //var iLensTmp = sTmp.length;
               if (sTmp.length>0) alert(sTmp);
               //if (sTmp.length>0) flModal('<font color=blue>Sistema</font>',sTmp);
               else               alert('Sem permisso para alterar');
               //else               flModal('<font color=red>Sistema</font>','Sem permisso para alterar');
            } else {
               var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               poObj.aObjSlim.push(oTela);
               flGridSlim(poObj,'dd_files/OOp.dda','OOp_CI_1',1);
            }
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flGridZooCI(poGrid) { // DEDICADO
//////////////////////////////
   var poObj = poGrid;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=2&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridZooCI='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridZooCI</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {
            var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
            poObj.aObjSlim.push(oTela);
            flGridSlim(poObj,'dd_files/CI_OOp.dda','CI_OOp_1',2);
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flSalvaCI(poTela) {  // dedicado
////////////////////////////
   poGrid = poTela.oPai
   iChave = poGrid.fiChaveAtual();

   var oTela = poGrid.aObjSlim[0];
   var oGrid = poGrid.aObjSlim[1];
   var oEdit = poGrid.aObjSlim[2];

   oTela.iSalvaEnvia = 0;
   oTela.lSalvouTela = false;
   oTela.flOnSubmit();

//   setTimeout('fl1EnviaCI(poGrid,iChave)',1000);

}
function flEnviaCI(poTela) {  // dedicado
////////////////////////////
   poGrid = poTela.oPai
   iChave = poGrid.fiChaveAtual();

   var oTela = poGrid.aObjSlim[0];
   var oGrid = poGrid.aObjSlim[1];
   var oEdit = poGrid.aObjSlim[2];
   
   oTela.iSalvaEnvia = 1;
   oTela.lSalvouTela = false;
   oTela.flOnSubmit();

//   setTimeout('fl1EnviaCI(poGrid,iChave)',1000);

}
function fl1EnviaCI(poGrid,piChave) {
/////////////////////////////////////
   eval('poPGrid = poGrid;');
   piPChave = piChave
   var oTela = poGrid.aObjSlim[0];
   var oGrid = poGrid.aObjSlim[1];
   var oEdit = poGrid.aObjSlim[2];
   if ((oTela.lSalvouTela==true) && (oTela.lUploading==false)) {
      oEdit.lSalvouTxt = false;
      oEdit.iChaveSalva = piChave;
      eExp = 'oFrameTxt=document.getElementById("frame_'+oEdit.sId+'");';
      eval(eExp);

      sIFrameNome = document.getElementById('frame_'+oEdit.sId).name;
      oFrame = eval("window." + sIFrameNome);
      oFrame.flAjaxSave();
   
      oGrid.lSalvouMarcados = false;
      flMarcacaoCallAJAXPostSlim(oGrid,oGrid.sDDSFile,oGrid.sDDSTag,piChave);
      setTimeout('fl2EnviaCI(poPGrid,piPChave)',1000);
      
   } else setTimeout('fl1EnviaCI(poPGrid,piPChave)',1000);
}
function fl2EnviaCI(poGrid,piChave) {
/////////////////////////////////////
   eval('poPGrid = poGrid;');
   piPChave = piChave
   var oTela = poGrid.aObjSlim[0];
   var oGrid = poGrid.aObjSlim[1];
   var oEdit = poGrid.aObjSlim[2];
   if ((oTela.lSalvouTela==true) && (oEdit.lSalvouTxt==true) && (oGrid.lSalvouMarcados==true)) {
      if (oTela.iSalvaEnvia==1) flCallSysPOP(1,poPGrid,null,piChave);   // essa  a dif entre salvar e enviar
      flTrataPosSalvaTelaEdicao(oTela,piChave);
      poGrid.aObjSlim = new Array;
   } else setTimeout('fl2EnviaCI(poPGrid,piPChave)',1000);
}

//
// MI
//

function flGridIncMI(poGrid) { // DEDICADO
//////////////////////////////
   var poObj = poGrid;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=0&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridIncMI='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridIncMI</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {
            if (sMsg.substr(0,2)=='-1') {
               flIconeProcess(iSss,0);
               flEnableScreen(iSss,true);
               alert('Sem permisso para incluir');
               //flModal('<font color=red>Sistema</font>','Sem permisso para incluir');
            } else {
               var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               poObj.aObjSlim.push(oTela);
               flGridSlim(poObj,'dd_files/Usu.dda','Usu_MI_1',0);
            }
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flGridAltMI(poGrid) { // DEDICADO
//////////////////////////////
   var poObj = poGrid;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=1&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridAltMI='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridAltMI</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {
            if (sMsg.substr(0,2)=='-1') {
               flIconeProcess(iSss,0);
               flEnableScreen(iSss,true);
               alert('Sem permisso para alterar');
               //flModal('<font color=red>Sistema</font>','Sem permisso para alterar');
            } else {
               var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               poObj.aObjSlim.push(oTela);
               flGridSlim(poObj,'dd_files/Usu.dda','Usu_MI_1',1);
            }
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}
//
function flGridZooMILer(poGrid) { // DEDICADO
/////////////////////////////////
   var poObj = poGrid;

   this_oPai_fiChaveAtual = this.oPai.fiChaveAtual();
   this_oPai_iArray = this.oPai.iArray;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=2&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridZooMI='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridZooMI</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {
            var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
            poObj.aObjSlim.push(oTela);
            foCreateEditor(this.oPai,'MI','fMsg',this_oPai_fiChaveAtual,'Lendo a mensagem - '+this.oPai.aGrid[this_oPai_iArray][1]+' / '+this.oPai.aGrid[this_oPai_iArray][2],true,false,null,4)&&flCallSysPOP(4,this.oPai)
//            if (poObj.sDDSTag=='MI_1D') flGridSlim(poObj,'dd_files/MI_Usu.dda','MI_Usu_2',2);
//	      else  flGridSlim(poObj,'dd_files/MI_Usu.dda','MI_Usu_1',2);
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}
//
function flGridZooMI(poGrid) { // DEDICADO
//////////////////////////////
   var poObj = poGrid;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=2&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridZooMI='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridZooMI</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {
            var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
            poObj.aObjSlim.push(oTela);
            if (poObj.sDDSTag=='MI_1D') flGridSlim(poObj,'dd_files/MI_Usu.dda','MI_Usu_2',2);
	    else  flGridSlim(poObj,'dd_files/MI_Usu.dda','MI_Usu_1',2);
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flSalvaMI(poTela) {  // dedicado
////////////////////////////
   if (poTela.oPai.sTipo=='grid') poGrid = poTela.oPai;
   //if ((poTela.oPai.oPai!=null)&&(poTela.oPai.oPai.sTipo=='grid')) {   //   encaminhar
//      poTela.iIdRec = 0;       // o encaminhar  um falso alterar
      //poGrid = poTela.oPai.oPai;
   //}
   iChave = poGrid.fiChaveAtual();

   var oTela = poGrid.aObjSlim[0];
   var oGrid = poGrid.aObjSlim[1];
//   var oEdit = poGrid.aObjSlim[2];
   var oEdit = poGrid.aObjSlim.length>3 ? poGrid.aObjSlim[3] : poGrid.aObjSlim[2];

   oTela.iSalvaEnvia = 0;
   oTela.lSalvouTela = false;
   oTela.flOnSubmit();

}
function flEnviaMI(poTela) {  // dedicado
////////////////////////////
   if (poTela.oPai.sTipo=='grid') poGrid = poTela.oPai;
   //if ((poTela.oPai.oPai!=null)&&(poTela.oPai.oPai.sTipo=='grid')) {   //   encaminhar
//      poTela.iIdRec = 0;       // o encaminhar  um falso alterar
      //poGrid = poTela.oPai.oPai;
   //}

   iChave = poGrid.fiChaveAtual();

   var oTela = poGrid.aObjSlim[0];
   var oGrid = poGrid.aObjSlim[1];
//   var oEdit = poGrid.aObjSlim[2];
   var oEdit = poGrid.aObjSlim.length>3 ? poGrid.aObjSlim[3] : poGrid.aObjSlim[2];

   oTela.iSalvaEnvia = 1;
   oTela.lSalvouTela = false;
   oTela.flOnSubmit();

}
function fl1EnviaMI(poGrid,piChave) {
/////////////////////////////////////
   eval('poPGrid = poGrid;');
   piPChave = piChave
   var oTela = poGrid.aObjSlim[0];
   var oGrid = poGrid.aObjSlim[1];
//   var oEdit = poGrid.aObjSlim[2];
   var oEdit = poGrid.aObjSlim.length>3 ? poGrid.aObjSlim[3] : poGrid.aObjSlim[2];
   if ((oTela.lSalvouTela==true) && (oTela.lUploading==false)) {
      oEdit.lSalvouTxt = false;
      oEdit.iChaveSalva = piChave;
      eExp = 'oFrameTxt=document.getElementById("frame_'+oEdit.sId+'");';
      eval(eExp);

      sIFrameNome = document.getElementById('frame_'+oEdit.sId).name;
      oFrame = eval("window." + sIFrameNome);
      oFrame.flAjaxSave();
   
      oGrid.lSalvouMarcados = false;
      flMarcacaoCallAJAXPostSlim(oGrid,oGrid.sDDSFile,oGrid.sDDSTag,piChave);
      setTimeout('fl2EnviaMI(poPGrid,piPChave)',1000);
      
   } else setTimeout('fl1EnviaMI(poPGrid,piPChave)',1000);
}
function fl2EnviaMI(poGrid,piChave) {
/////////////////////////////////////
//alert('fl2EnviaMI');
   eval('poPGrid = poGrid;');
   piPChave = piChave
   var oTela = poGrid.aObjSlim[0];
   var oGrid = poGrid.aObjSlim[1];
//   var oEdit = poGrid.aObjSlim[2];
   var oEdit = poGrid.aObjSlim.length>3 ? poGrid.aObjSlim[3] : poGrid.aObjSlim[2];
//alert('oTela.iSalvaEnvia='+oTela.iSalvaEnvia+'\noEdit.lSalvouTxt='+oEdit.lSalvouTxt+'\noGrid.lSalvouMarcados='+oGrid.lSalvouMarcados+'\noTela.lSalvouTela='+oTela.lSalvouTela);
   if ((oTela.lSalvouTela==true) && (oEdit.lSalvouTxt==true) && (oGrid.lSalvouMarcados==true)) {
      if (oTela.iSalvaEnvia==1) flCallSysPOP(3,poPGrid,null,piChave,1);  // essa eh a diferenca entre salvar e enviar
      else                      flCallSysPOP(5,poPGrid,null,piChave);
      flTrataPosSalvaTelaEdicao(oTela,piChave);
      poGrid.aObjSlim = new Array;
      if (oTela.oPai.sTipo=='editor') oTela.oPai.flEncerraEditor();
   } else setTimeout('fl2EnviaMI(poPGrid,piPChave)',1000);
}

function flRespondeMI(poObj) {
//////////////////////////////
   if (poObj.sTipo=='grid'  ) {
      var oEdit1 = foCreateEditor     (poObj,'MI','fMsg',poObj.fiChaveAtual(),'Respondendo a Mensagem - '+poObj.aGrid[poObj.iArray][0]+' / '+poObj.aGrid[poObj.iArray][1],false,false,false,2);
      var oEdit2 = foCreateEditorSlim2(poObj,'MI','fMsg',poObj.fiChaveAtual(),'Respondendo a Mensagem - '+poObj.aGrid[poObj.iArray][0]+' / '+poObj.aGrid[poObj.iArray][1],true,null,4,poObj.fiChaveIrma(1));
   } else if (poObj.sTipo=='editor') {
      var oEdit1 = foCreateEditor     (poObj,'MI','fMsg',poObj.oPai.fiChaveAtual(),'Respondendo a Mensagem - '+poObj.oPai.aGrid[poObj.oPai.iArray][0]+' / '+poObj.oPai.aGrid[poObj.oPai.iArray][1],false,false,false,2);
      var oEdit2 = foCreateEditorSlim2(poObj,'MI','fMsg',poObj.oPai.fiChaveAtual(),'Respondendo a Mensagem - '+poObj.oPai.aGrid[poObj.oPai.iArray][0]+' / '+poObj.oPai.aGrid[poObj.oPai.iArray][1],true,null,4,poObj.oPai.fiChaveIrma(1));
   }
}

function flEncaminhaMI(poObj) {
//////////////////////////////

   var oObj = poObj.oPai;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=1&sFileDDS=dd_files/MI.dda&sTagDDS=MI_22"+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(oObj)+"&sLogin="+parent.aGlobalLogin[1]+"&sIrmasTias="+oObj.fsIrmasTias()+"&sId="+oObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno Encaminha MI='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno Encaminha MI</font>',sMsg);
         if ((oObj!=null)&&(oObj.lEnded==false)) {
            var oTela = foCreateTela(oObj,sMsg,false,iSss,true);
            oObj.aObjSlim.push(oTela);
            flGridSlim(oObj,'dd_files/Usu.dda','Usu_MI_1',0,oObj);
         }
      }
   }
   var iSss = oObj.iSss;
   oRequest.send(null);
}

function flTrataRespostaMI(poObj,piTipo) {
//////////////////////////////////////////
// piTipo = 1 -> Salvar
// piTipo = 2 -> Enviar
   oEdit = poObj;
   sIFrameNome = document.getElementById('frame_'+oEdit.sId).name;
   var oRequest = foCreateRequest();
   oRequest.open('GET','processos/CC_SalvarResposta_Mensagem.php?sCliPasta='+parent.sCliPasta+'&pCiaLogin='+parent.pCiaLogin+'&iCompany='+parent.iGlobalCompany+'&sId='+oEdit.oPai.oPai.fiChaveAtual()+'&sLogin='+parent.aGlobalLogin[1]+'&sPathFS='+parent.sGlobalPathFS+'&fiChave='+oEdit.oPai.oPai.fiChaveIrma(1),true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         var sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno processos CC_SalvarResposta_MI: '+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=red>Retorno processos CC_SalvarResposta_MI</font>',sMsg);

         if (sMsg=='0') {
            alert('Erro executando processos/CC_SalvarResposta_MI.php');
            //flModal('<font color=red>Sistema</font>','Erro executando processos/CC_SalvarResposta_MI.php');
         } else {
            iLastId = sMsg; // nao local
            oEdit.lSalvouTxt = false;
            oEdit.iChaveSalva=iLastId;
            sIFrameNome = document.getElementById('frame_'+oEdit.sId).name;
            oFrame = eval("window." + sIFrameNome);
            oFrame.flAjaxSave();
            if (piTipo==2) {   // enviar
               setTimeout('flEnviaRespostaMI(oEdit,oEdit.oPai.oPai,iLastId)',1000);
            } else {
//               alert("A mensagem foi salva na pasta 'Escrever mensagens'");
               oEdit.flEncerraEditor();
               oEdit.oPai.flEncerraEditor();
            }           
         }
      }     
   }   
   oRequest.send(null);
}

function flEnviaRespostaMI(poEdit,poGrid,piChave) {
///////////////////////////////////////////////////
   eval('poPGrid = poGrid;');
   piPChave = piChave
   if (poEdit.lSalvouTxt==true) {
      flCallSysPOP(3,poPGrid,null,piChave,1);
      flEnableScreen(poPGrid.iSss,true);
      poEdit.flEncerraEditor();
      if (poEdit.oPai.oPai!=null) poEdit.oPai.flEncerraEditor();
   } else setTimeout('flEnviaRespostaMI(poPGrid,piPChave)',1000);
}

//
// Memo
//

function flGridIncMemo(poGrid) { // DEDICADO
//////////////////////////////
   var poObj = poGrid;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=0&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridIncMemo='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridIncMemo</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {
            if (sMsg.substr(0,2)=='-1') {
               flIconeProcess(iSss,0);
               flEnableScreen(iSss,true);
               alert('Sem permisso para incluir');
               //flModal('<font color=red>Sistema</font>','Sem permisso para incluir');
            } else {
               var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               poObj.aObjSlim.push(oTela);
               flGridSlim(poObj,'dd_files/OOp.dda','OOp_Memo_1',0);
            }
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flGridAltMemo(poGrid) { // DEDICADO
//////////////////////////////
   var poObj = poGrid;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=1&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridAltMemo='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridAltMemo</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {
            if (sMsg.substr(0,2)=='-1') {
               flIconeProcess(iSss,0);
               flEnableScreen(iSss,true);
               alert('Sem permisso para alterar');
               //flModal('<font color=red>Sistema</font>','Sem permisso para alterar');
            } else {
               var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               poObj.aObjSlim.push(oTela);
               flGridSlim(poObj,'dd_files/OOp.dda','OOp_Memo_1',1);
            }
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}
//
function flGridZooMemoLer(poGrid) { // DEDICADO
/////////////////////////////////
   var poObj = poGrid;

   this_oPai_fiChaveAtual = this.oPai.fiChaveAtual();
   this_oPai_iArray = this.oPai.iArray;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=2&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridZooMemo='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridZooMemo</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {
            var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
            poObj.aObjSlim.push(oTela);
            foCreateEditor(this.oPai,'Memo','fMsg',this_oPai_fiChaveAtual,'Lendo a mensagem - '+this.oPai.aGrid[this_oPai_iArray][1]+' / '+this.oPai.aGrid[this_oPai_iArray][2],true,false,null,4)&&flCallSysPOP(52,this.oPai)
//            if (poObj.sDDSTag=='Memo_1D') flGridSlim(poObj,'dd_files/Memo_OOp.dda','Memo_OOp_2',2);
//	      else  flGridSlim(poObj,'dd_files/Memo_OOp.dda','Memo_OOp_1',2);
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}
//
function flGridZooMemo(poGrid) { // DEDICADO
//////////////////////////////
   var poObj = poGrid;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=2&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridZooMemo='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridZooMemo</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {
            var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
            poObj.aObjSlim.push(oTela);
            if (poObj.sDDSTag=='Memo_1D') flGridSlim(poObj,'dd_files/Memo_OOp.dda','Memo_OOp_2',2);
	    else  flGridSlim(poObj,'dd_files/Memo_OOp.dda','Memo_OOp_1',2);
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flSalvaMemo(poTela) {  // dedicado
////////////////////////////
   if (poTela.oPai.sTipo=='grid') poGrid = poTela.oPai;
   //if ((poTela.oPai.oPai!=null)&&(poTela.oPai.oPai.sTipo=='grid')) {   //   encaminhar
//      poTela.iIdRec = 0;       // o encaminhar  um falso alterar
      //poGrid = poTela.oPai.oPai;
   //}
   iChave = poGrid.fiChaveAtual();

   var oTela = poGrid.aObjSlim[0];
   var oGrid = poGrid.aObjSlim[1];
//   var oEdit = poGrid.aObjSlim[2];
   var oEdit = poGrid.aObjSlim.length>3 ? poGrid.aObjSlim[3] : poGrid.aObjSlim[2];

   oTela.iSalvaEnvia = 0;
   oTela.lSalvouTela = false;
   oTela.flOnSubmit();

}
function flEnviaMemo(poTela) {  // dedicado
////////////////////////////
   if (poTela.oPai.sTipo=='grid') poGrid = poTela.oPai;
   //if ((poTela.oPai.oPai!=null)&&(poTela.oPai.oPai.sTipo=='grid')) {   //   encaminhar
//      poTela.iIdRec = 0;       // o encaminhar  um falso alterar
      //poGrid = poTela.oPai.oPai;
   //}

   iChave = poGrid.fiChaveAtual();

   var oTela = poGrid.aObjSlim[0];
   var oGrid = poGrid.aObjSlim[1];
//   var oEdit = poGrid.aObjSlim[2];
   var oEdit = poGrid.aObjSlim.length>3 ? poGrid.aObjSlim[3] : poGrid.aObjSlim[2];

   oTela.iSalvaEnvia = 1;
   oTela.lSalvouTela = false;
   oTela.flOnSubmit();

}
function fl1EnviaMemo(poGrid,piChave) {
/////////////////////////////////////
   eval('poPGrid = poGrid;');
   piPChave = piChave
   var oTela = poGrid.aObjSlim[0];
   var oGrid = poGrid.aObjSlim[1];
//   var oEdit = poGrid.aObjSlim[2];
   var oEdit = poGrid.aObjSlim.length>3 ? poGrid.aObjSlim[3] : poGrid.aObjSlim[2];
   if ((oTela.lSalvouTela==true) && (oTela.lUploading==false)) {
      oEdit.lSalvouTxt = false;
      oEdit.iChaveSalva = piChave;
      eExp = 'oFrameTxt=document.getElementById("frame_'+oEdit.sId+'");';
      eval(eExp);

      sIFrameNome = document.getElementById('frame_'+oEdit.sId).name;
      oFrame = eval("window." + sIFrameNome);
      oFrame.flAjaxSave();
   
      oGrid.lSalvouMarcados = false;
      flMarcacaoCallAJAXPostSlim(oGrid,oGrid.sDDSFile,oGrid.sDDSTag,piChave);
      setTimeout('fl2EnviaMemo(poPGrid,piPChave)',1000);
      
   } else setTimeout('fl1EnviaMemo(poPGrid,piPChave)',1000);
}
function fl2EnviaMemo(poGrid,piChave) {
/////////////////////////////////////
//alert('fl2EnviaMemo');
   eval('poPGrid = poGrid;');
   piPChave = piChave
   var oTela = poGrid.aObjSlim[0];
   var oGrid = poGrid.aObjSlim[1];
//   var oEdit = poGrid.aObjSlim[2];
   var oEdit = poGrid.aObjSlim.length>3 ? poGrid.aObjSlim[3] : poGrid.aObjSlim[2];
//alert('oTela.iSalvaEnvia='+oTela.iSalvaEnvia+'\noEdit.lSalvouTxt='+oEdit.lSalvouTxt+'\noGrid.lSalvouMarcados='+oGrid.lSalvouMarcados+'\noTela.lSalvouTela='+oTela.lSalvouTela);
   if ((oTela.lSalvouTela==true) && (oEdit.lSalvouTxt==true) && (oGrid.lSalvouMarcados==true)) {
      if (oTela.iSalvaEnvia==1) flCallSysPOP(51,poPGrid,null,piChave,1);  // essa eh a diferenca entre salvar e enviar
      else                      flCallSysPOP(53,poPGrid,null,piChave);
      flTrataPosSalvaTelaEdicao(oTela,piChave);
      poGrid.aObjSlim = new Array;
      if (oTela.oPai.sTipo=='editor') oTela.oPai.flEncerraEditor();
   } else setTimeout('fl2EnviaMemo(poPGrid,piPChave)',1000);
}

function flRespondeMemo(poObj) {
//////////////////////////////
   if (poObj.sTipo=='grid') {
      var oEdit1 = foCreateEditor     (poObj,'Memo','fMsg',poObj.fiChaveAtual(),'Respondendo o Memorando - '+poObj.aGrid[poObj.iArray][0]+' / '+poObj.aGrid[poObj.iArray][1],false,false,false,2);
      var oEdit2 = foCreateEditorSlim2(poObj,'Memo','fMsg',poObj.fiChaveAtual(),'Respondendo o Memorando - '+poObj.aGrid[poObj.iArray][0]+' / '+poObj.aGrid[poObj.iArray][1],true,null,4,poObj.fiChaveIrma(1));
   } else if (poObj.sTipo=='editor') {
      var oEdit1 = foCreateEditor     (poObj,'Memo','fMsg',poObj.oPai.fiChaveAtual(),'Respondendo o Memorando - '+poObj.oPai.aGrid[poObj.oPai.iArray][0]+' / '+poObj.oPai.aGrid[poObj.oPai.iArray][1],false,false,false,2);
      var oEdit2 = foCreateEditorSlim2(poObj,'Memo','fMsg',poObj.oPai.fiChaveAtual(),'Respondendo o Memorando - '+poObj.oPai.aGrid[poObj.oPai.iArray][0]+' / '+poObj.oPai.aGrid[poObj.oPai.iArray][1],true,null,4,poObj.oPai.fiChaveIrma(1));
   }
}

function flEncaminhaMemo(poObj) {
//////////////////////////////

   var oObj = poObj.oPai;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=1&sFileDDS=dd_files/Memo.dda&sTagDDS=Memo_22"+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(oObj)+"&sLogin="+parent.aGlobalLogin[1]+"&sIrmasTias="+oObj.fsIrmasTias()+"&sId="+oObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno Encaminha Memo='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno Encaminha Memo</font>',sMsg);
         if ((oObj!=null)&&(oObj.lEnded==false)) {
            var oTela = foCreateTela(oObj,sMsg,false,iSss,true);
            oObj.aObjSlim.push(oTela);
            flGridSlim(oObj,'dd_files/OOp.dda','OOp_Memo_1',0,oObj);
         }
      }
   }
   var iSss = oObj.iSss;
   oRequest.send(null);
}

function flTrataRespostaMemo(poObj,piTipo) {
//////////////////////////////////////////
// piTipo = 1 -> Salvar
// piTipo = 2 -> Enviar
   oEdit = poObj;
   sIFrameNome = document.getElementById('frame_'+oEdit.sId).name;
   var oRequest = foCreateRequest();
   oRequest.open('GET','processos/CC_SalvarResposta_Memorando.php?sCliPasta='+parent.sCliPasta+'&pCiaLogin='+parent.pCiaLogin+'&iCompany='+parent.iGlobalCompany+'&sId='+oEdit.oPai.oPai.fiChaveAtual()+'&sLogin='+parent.aGlobalLogin[1]+'&sPathFS='+parent.sGlobalPathFS+'&fiChave='+oEdit.oPai.oPai.fiChaveIrma(1),true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         var sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno processos CC_SalvarResposta_Memo: '+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Sistema</font>',sMsg);

         if (sMsg=='0') {
            alert('Erro executando processos/CC_SalvarResposta_Memo.php');
            //flModal('<font color=red>Sistema</font>','Erro executando processos/CC_SalvarResposta_Memo.php');
         } else {
            iLastId = sMsg; // nao local
            oEdit.lSalvouTxt = false;
            oEdit.iChaveSalva=iLastId;
            sIFrameNome = document.getElementById('frame_'+oEdit.sId).name;
            oFrame = eval("window." + sIFrameNome);
            oFrame.flAjaxSave();
            if (piTipo==2) {   // enviar
               setTimeout('flEnviaRespostaMemo(oEdit,oEdit.oPai.oPai,iLastId)',1000);
            } else {
//               alert("A mensagem foi salva na pasta 'Escrever mensagens'");
               oEdit.flEncerraEditor();
               oEdit.oPai.flEncerraEditor();
            }           
         }
      }     
   }   
   oRequest.send(null);
}

function flEnviaRespostaMemo(poEdit,poGrid,piChave) {
///////////////////////////////////////////////////
   eval('poPGrid = poGrid;');
   piPChave = piChave
   if (poEdit.lSalvouTxt==true) {
      flCallSysPOP(51,poPGrid,null,piChave,1);
      flEnableScreen(poPGrid.iSss,true);
      poEdit.flEncerraEditor();
      if (poEdit.oPai.oPai!=null) poEdit.oPai.flEncerraEditor();
   } else setTimeout('flEnviaRespostaMemo(poPGrid,piPChave)',1000);
}


//
// TI
//

function flGridIncTI(poGrid) { // DEDICADO
//////////////////////////////
   var poObj = poGrid;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=0&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridIncTI='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridIncTI</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            if (sMsg.substr(0,2)=='-1') {
               flIconeProcess(iSss,0);
               flEnableScreen(iSss,true);
               alert('Sem permisso para incluir');
               //flModal('<font color=red>Sistema</font>','Sem permisso para incluir');
            } else {
               var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               poObj.aObjSlim.push(oTela);
               var oEdit = foCreateEditorSlim2(poObj,'TI','fMsg',0,'',false,false,2);
               poObj.aObjSlim.push(oEdit);
            }
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flGridAltTI(poGrid) { // DEDICADO
//////////////////////////////
   var poObj = poGrid;

   poObj_fiChaveAtual = poObj.fiChaveAtual();
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=1&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridAltTI='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridAltTI</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            if (sMsg.substr(0,2)=='-1') {
               flIconeProcess(iSss,0);
               flEnableScreen(iSss,true);
               aTmp = sMsg.split('~');
               sTmp = aTmp[0];
               sTmp = sTmp.substr(2,sTmp.length-2);
               if (sTmp.length>0) alert(sTmp);
               //if (sTmp.length>0) flModal('<font color=blue>Sistema</font>',sTmp);
               else               alert('Sem permisso para alterar');
               //else               flModal('<font color=red>Sistema</font>','Sem permisso para alterar');
            } else {
               var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               poObj.aObjSlim.push(oTela);
               var oEdit2 = foCreateEditorSlim2(poObj,'TI','fMsg',poObj_fiChaveAtual,'',true,null,5);
               poObj.aObjSlim.push(oEdit2);
               var oEdit1 = foCreateEditorSlim2(poObj,'TI','fMsg',poObj_fiChaveAtual,'',false,false,2);
               poObj.aObjSlim.push(oEdit1);
            }
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flGridZooTI(poGrid) { // DEDICADO
//////////////////////////////
   var poObj = poGrid;
   poObj_fiChaveAtual = poObj.fiChaveAtual();
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=2&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridZooTI='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridZooTI</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
            poObj.aObjSlim.push(oTela);
            var oEdit = foCreateEditorSlim2(poObj,'TI','fMsg',poObj_fiChaveAtual,'',true,null,5);
            poObj.aObjSlim.push(oEdit);
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flSalvaTI(poTela) {  // dedicado
////////////////////////////
   if (poTela.oPai.sTipo=='grid')                                  poGrid = poTela.oPai;
//   if ((poTela.oPai.oPai!=null)&&(poTela.oPai.oPai.sTipo=='grid')) poGrid = poTela.oPai.oPai; nao sei se precisa, nao funcionou qdo a TI estava dentro dos projetos
   iChave = poGrid.fiChaveAtual();

   var oTela = poGrid.aObjSlim[0];
   var oEdit = poGrid.aObjSlim.length>2 ? poGrid.aObjSlim[2] : poGrid.aObjSlim[1];

   oTela.iSalvaEnvia = 0;
   oTela.lSalvouTela = false;
   oTela.flOnSubmit();

}
function flEnviaTI(poTela) {  // dedicado
////////////////////////////
   if (poTela.oPai.sTipo=='grid') poGrid = poTela.oPai;
// paipei - o salvarti estava paipado
//   if ((poTela.oPai.oPai!=null)&&(poTela.oPai.oPai.sTipo=='grid')) {   //   encaminhar
////      poTela.iIdRec = 0;       // o encaminhar . um falso alterar
//      poGrid = poTela.oPai.oPai;
//   }

   iChave = poGrid.fiChaveAtual();

   var oTela = poGrid.aObjSlim[0];
   var oEdit = poGrid.aObjSlim.length>2 ? poGrid.aObjSlim[2] : poGrid.aObjSlim[1];
//   var oEdit = poGrid.aObjSlim[2];
   
   oTela.iSalvaEnvia = 1;
   oTela.lSalvouTela = false;
   oTela.flOnSubmit();

}
function fl1EnviaTI(poGrid,piChave) {
/////////////////////////////////////
   eval('poPGrid = poGrid;');
   piPChave = piChave
   var oTela = poGrid.aObjSlim[0];
   var oEdit = poGrid.aObjSlim.length>2 ? poGrid.aObjSlim[2] : poGrid.aObjSlim[1];
//   var oEdit = poGrid.aObjSlim[2];
   if ((oTela.lSalvouTela==true) && (oTela.lUploading==false)) {
      oEdit.lSalvouTxt = false;
      oEdit.iChaveSalva = piChave;
      eExp = 'oFrameTxt=document.getElementById("frame_'+oEdit.sId+'");';
      eval(eExp);

      sIFrameNome = document.getElementById('frame_'+oEdit.sId).name;
      oFrame = eval("window." + sIFrameNome);
      oFrame.flAjaxSave();
   
      setTimeout('fl2EnviaTI(poPGrid,piPChave)',1000);
      
   } else setTimeout('fl1EnviaTI(poPGrid,piPChave)',1000);
}
function fl2EnviaTI(poGrid,piChave) {
/////////////////////////////////////
   eval('poPGrid = poGrid;');
   piPChave = piChave
   var oTela = poGrid.aObjSlim[0];
//   var oEdit = poGrid.aObjSlim[2];
   var oEdit = poGrid.aObjSlim.length>2 ? poGrid.aObjSlim[2] : poGrid.aObjSlim[1];
   if ((oTela.lSalvouTela==true) && (oEdit.lSalvouTxt==true)) {
      if (oTela.iSalvaEnvia==1) flCallSysPOP(6,poPGrid,null,piChave);  // essa eh a diferenca entre salvar e enviar
      else flCallSysPOP(8,poPGrid,null,piChave);
      flTrataPosSalvaTelaEdicao(oTela,piChave);
      poGrid.aObjSlim = new Array;
      if (oTela.oPai.sTipo=='editor') oTela.oPai.flEncerraEditor();
   } else setTimeout('fl2EnviaTI(poPGrid,piPChave)',1000);
}

function flRespondeTI(poObj) {
//////////////////////////////
   if      (poObj.sTipo=='grid'  ) {
      var oEdit1 = foCreateEditor     (poObj,'TI','fMsg',poObj.fiChaveAtual(),'Respondendo a Tarefa - '+poObj.aGrid[poObj.iArray][1]+' / '+poObj.aGrid[poObj.iArray][2],false,false,true,2);
      var oEdit2 = foCreateEditorSlim2(poObj,'TI','fMsg',poObj.fiChaveAtual(),'Respondendo a Tarefa - '+poObj.aGrid[poObj.iArray][1]+' / '+poObj.aGrid[poObj.iArray][2],true       ,null,3);
   } else if (poObj.sTipo=='editor') {
      var oEdit1 = foCreateEditor     (poObj,'TI','fMsg',poObj.oPai.fiChaveAtual(),'Respondendo a Tarefa - '+poObj.oPai.aGrid[poObj.oPai.iArray][1]+' / '+poObj.oPai.aGrid[poObj.oPai.iArray][2],false,false,false,2);
      var oEdit2 = foCreateEditorSlim2(poObj,'TI','fMsg',poObj.oPai.fiChaveAtual(),'Respondendo a Tarefa - '+poObj.oPai.aGrid[poObj.oPai.iArray][1]+' / '+poObj.oPai.aGrid[poObj.oPai.iArray][2],true       ,null,3);
   }
}

function flEncaminhaTI(poObj) {
//////////////////////////////

   var oObj = poObj.oPai;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=1&sFileDDS=dd_files/TI.dda&sTagDDS=TI_22"+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(oObj)+"&sLogin="+parent.aGlobalLogin[1]+"&sIrmasTias="+oObj.fsIrmasTias()+"&sId="+oObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno Encaminha TI='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno Encaminha TI</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
            oObj.aObjSlim.push(oTela);
            flGridSlim(poObj,'dd_files/OOp.dda','OOp_TI_1',0,oObj);
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flTrataRespostaTI(poObj,piTipo) {
//////////////////////////////////////////
// piTipo = 1 -> Salvar
// piTipo = 2 -> Enviar
   oEdit = poObj;
   sIFrameNome = document.getElementById('frame_'+oEdit.sId).name;

   var oRequest = foCreateRequest();
   oRequest.open("GET",'processos/bl_TI_Salvar_Resposta.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sId='+oEdit.oPai.oPai.fiChaveAtual()+"&sLogin="+parent.aGlobalLogin[1]+'&sPathFS='+parent.sGlobalPathFS,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         var sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno processos/bl_TI_Salvar_Resposta: '+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno processos/bl_TI_Salvar_Resposta</font>',sMsg);
         if (sMsg=='0') {
            alert('Erro executando processos/bl_TI_Salvar_Resposta');
            //flModal('<font color=red>Sistema</font>','Erro executando processos/bl_TI_Salvar_Resposta');
         } else {
            iLastId = sMsg; // nao local
            oEdit.lSalvouTxt = false;
            oEdit.iChaveSalva=iLastId;
           sIFrameNome = document.getElementById('frame_'+oEdit.sId).name;
           oFrame = eval("window." + sIFrameNome);
           oFrame.flAjaxSave();
           if (piTipo==2) {   // enviar
              setTimeout('flEnviaRespostaTI(oEdit,oEdit.oPai.oPai,iLastId)',1000);
           } else {
//              alert("Essa tarefa foi salva na pasta 'Escrever tarefas'");
              oEdit.flEncerraEditor();
              oEdit.oPai.flEncerraEditor();
           }           
         }
      }     
   }   
   oRequest.send(null);
}

function flEnviaRespostaTI(poEdit,poGrid,piChave) {
///////////////////////////////////////////////////
   eval('poPGrid = poGrid;');
   piPChave = piChave
   if (poEdit.lSalvouTxt==true) {
      flCallSysPOP(6,poPGrid,null,piChave);
      flEnableScreen(poPGrid.iSss,true);
      poEdit.flEncerraEditor();
      if (poEdit.oPai.oPai!=null) poEdit.oPai.flEncerraEditor();
   } else setTimeout('flEnviaRespostaTI(poPGrid,piPChave)',1000);
}


//
// Oficio
//

function flGridIncOficio(poGrid) { // DEDICADO
//////////////////////////////////
//alert(0);
   var poObj = poGrid;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=0&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridIncOficio='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridIncOficio</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            if (sMsg.substr(0,2)=='-1') {
               flIconeProcess(iSss,0);
               flEnableScreen(iSss,true);
               alert('Sem permisso para incluir');
               //flModal('<font color=red>Sistema</font>','Sem permisso para incluir');
            } else {
               var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               poObj.aObjSlim.push(oTela);
               flGridSlim(poObj,'dd_files/CUP.dda','CUP_Oficio_1',0);
            }
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flGridAltOficio(poGrid) { // DEDICADO
//////////////////////////////////
   var poObj = poGrid;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=1&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridAltOficio='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridAltOficio</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            if (sMsg.substr(0,2)=='-1') {
               flIconeProcess(iSss,0);
               flEnableScreen(iSss,true);
               aTmp = sMsg.split('~');
               sTmp = aTmp[0];
               sTmp = sTmp.substr(2,sTmp.length-2);
               //var iLensTmp = sTmp.length;
               if (sTmp.length>0) alert(sTmp);
               //if (sTmp.length>0) flModal('<font color=blue>Sistema</font>',sTmp);
               else               alert('Sem permisso para alterar');
               //else               flModal('<font color=red>Sistema</font>','Sem permisso para alterar');
            } else {
               var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               poObj.aObjSlim.push(oTela);
               flGridSlim(poObj,'dd_files/CUP.dda','CUP_Oficio_1',1);
            }
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flGridZooOficio(poGrid) { // DEDICADO
//////////////////////////////////
   var poObj = poGrid;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=2&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridZooOficio='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridZooOficio</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
            poObj.aObjSlim.push(oTela);
            flGridSlim(poObj,'dd_files/Oficio_CUP.dda','Oficio_CUP_1',2);
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flSalvaOficio(poTela) {  // dedicado
////////////////////////////////
   if (poTela.oPai.sTipo=='grid') poGrid = poTela.oPai;
   if ((poTela.oPai.oPai!=null)&&(poTela.oPai.oPai.sTipo=='grid')) poGrid = poTela.oPai.oPai;
   iChave = poGrid.fiChaveAtual();

   var oTela = poGrid.aObjSlim[0];
   var oGrid = poGrid.aObjSlim[1];
   var oEdit = poGrid.aObjSlim[2];

   oTela.iSalvaEnvia = 0;
   oTela.lSalvouTela = false;
   oTela.flOnSubmit();

}
function flEnviaOficio(poTela) {  // dedicado
////////////////////////////////
   if (poTela.oPai.sTipo=='grid') poGrid = poTela.oPai;
   if ((poTela.oPai.oPai!=null)&&(poTela.oPai.oPai.sTipo=='grid')) {   //   encaminhar
//      poTela.iIdRec = 0;       // o encaminhar  um falso alterar
      poGrid = poTela.oPai.oPai;
   }

   iChave = poGrid.fiChaveAtual();

   var oTela = poGrid.aObjSlim[0];
   var oGrid = poGrid.aObjSlim[1];
   var oEdit = poGrid.aObjSlim[2];
   
   oTela.iSalvaEnvia = 1;
   oTela.lSalvouTela = false;
   oTela.flOnSubmit();

}
function fl1EnviaOficio(poGrid,piChave) {
/////////////////////////////////////////
   eval('poPGrid = poGrid;');
   piPChave = piChave
   var oTela = poGrid.aObjSlim[0];
   var oGrid = poGrid.aObjSlim[1];
   var oEdit = poGrid.aObjSlim[2];
   if ((oTela.lSalvouTela==true) && (oTela.lUploading==false)) {
      oEdit.lSalvouTxt = false;
      oEdit.iChaveSalva = piChave;
      eExp = 'oFrameTxt=document.getElementById("frame_'+oEdit.sId+'");';
      eval(eExp);

   //alert('frame_'+oEdit.sId);
      sIFrameNome = document.getElementById('frame_'+oEdit.sId).name;
      oFrame = eval("window." + sIFrameNome);
      oFrame.flAjaxSave();
   
      oGrid.lSalvouMarcados = false;
      flMarcacaoCallAJAXPostSlim(oGrid,oGrid.sDDSFile,oGrid.sDDSTag,piChave);
      setTimeout('fl2EnviaOficio(poPGrid,piPChave)',1000);
      
   } else setTimeout('fl1EnviaOficio(poPGrid,piPChave)',1000);
}
function fl2EnviaOficio(poGrid,piChave) {
/////////////////////////////////////////
   eval('poPGrid = poGrid;');
   piPChave = piChave
   var oTela = poGrid.aObjSlim[0];
   var oGrid = poGrid.aObjSlim[1];
   var oEdit = poGrid.aObjSlim[2];
   if ((oTela.lSalvouTela==true) && (oEdit.lSalvouTxt==true) && (oGrid.lSalvouMarcados==true)) {
      if (oTela.iSalvaEnvia==1) flCallSysPOP(9,poPGrid,null,piChave);  // essa eh a diferenca entre salvar e enviar
      flTrataPosSalvaTelaEdicao(oTela,piChave);
      poGrid.aObjSlim = new Array;
      if (oTela.oPai.sTipo=='editor') oTela.oPai.flEncerraEditor();
   } else setTimeout('fl2EnviaOficio(poPGrid,piPChave)',1000);
}

//
//
//

//
// TopAta
//

function flGridIncTopAta(poGrid) { // DEDICADO
//////////////////////////////////
   var poObj = poGrid;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=0&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridIncTopAta='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridIncTopAta</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            if (sMsg.substr(0,2)=='-1') {
               flIconeProcess(iSss,0);
               flEnableScreen(iSss,true);
               alert('Sem permisso para incluir');
               //flModal('<font color=red>Sistema</font>','Sem permisso para incluir');
            } else {
               var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               poObj.aObjSlim.push(oTela);
               var oEdit = foCreateEditorSlim2(poObj,'TopAta','fTxt',0,'',false,false);
               poObj.aObjSlim.push(oEdit); 
            }
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flGridAltTopAta(poGrid) { // DEDICADO
//////////////////////////////////
   var poObj = poGrid;
   poObj_fiChaveAtual = poObj.fiChaveAtual();
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=1&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridAltTopAta='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridAltTopAta</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            if (sMsg.substr(0,2)=='-1') {
               flIconeProcess(iSss,0);
               flEnableScreen(iSss,true);
               alert('Sem permisso para alterar');
               //flModal('<font color=red>Sistema</font>','Sem permisso para alterar');
            } else {
               var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               poObj.aObjSlim.push(oTela);
               var oEdit1 = foCreateEditorSlim2(poObj,'TopAta','fTxt',poObj_fiChaveAtual,'',false,true,2);
               poObj.aObjSlim.push(oEdit1);
               var oEdit2 = foCreateEditorSlim2(poObj,'TopAta','fTxt',poObj_fiChaveAtual,'',true,null,3);
               poObj.aObjSlim.push(oEdit2);
            }
         }  
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flGridZooTopAta(poGrid) { // DEDICADO
//////////////////////////////////
   var poObj = poGrid;
   poObj_fiChaveAtual = poObj.fiChaveAtual();
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=2&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridZooTopAta='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridZooTopAta</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
            poObj.aObjSlim.push(oTela);
            var oEdit = foCreateEditorSlim2(poObj,'TopAta','fTxt',poObj_fiChaveAtual,'',true,null,3);
            poObj.aObjSlim.push(oEdit);
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flSalvaTopAta(poTela) {  // dedicado
////////////////////////////////
   poGrid = poTela.oPai
   iChave = poGrid.fiChaveAtual();

   var oTela = poGrid.aObjSlim[0];
   var oEdit = poGrid.aObjSlim[1];

   oTela.iSalvaEnvia = 0;
   oTela.lSalvouTela = false;
   oTela.flOnSubmit();
}
function fl1EnviaTopAta(poGrid,piChave) {   // O nome envia, nesse caso no  apropriado
/////////////////////////////////////////
   eval('poPGrid = poGrid;');
   piPChave = piChave
   var oTela = poGrid.aObjSlim[0];
   var oEdit = poGrid.aObjSlim[1];
   if ((oTela.lSalvouTela==true) && (oTela.lUploading==false)) {
      oEdit.lSalvouTxt = false;
      oEdit.iChaveSalva = piChave;
      eExp = 'oFrameTxt=document.getElementById("frame_'+oEdit.sId+'");';
      eval(eExp);

      sIFrameNome = document.getElementById('frame_'+oEdit.sId).name;
      oFrame = eval("window." + sIFrameNome);
      oFrame.flAjaxSave();
   
      setTimeout('fl2EnviaTopAta(poPGrid,piPChave)',1000);
      
   } else setTimeout('fl1EnviaTopAta(poPGrid,piPChave)',1000);
}
function fl2EnviaTopAta(poGrid,piChave) {
/////////////////////////////////////////
   eval('poPGrid = poGrid;');
   piPChave = piChave
   var oTela = poGrid.aObjSlim[0];
   var oEdit = poGrid.aObjSlim[1];
   if ((oTela.lSalvouTela==true) && (oEdit.lSalvouTxt==true)) {
      flTrataPosSalvaTelaEdicao(oTela,piChave);
      poGrid.aObjSlim = new Array;
   } else setTimeout('fl2EnviaTopAta(poPGrid,piPChave)',1000);
}


//
// NC
//

function flGridIncNC(poGrid) { // DEDICADO
//////////////////////////////////
   var poObj = poGrid;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=0&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridIncNC='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridIncNC</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            if (sMsg.substr(0,2)=='-1') {
               flIconeProcess(iSss,0);
               flEnableScreen(iSss,true);
               alert('Sem permisso para incluir');
               //flModal('<font color=red>Sistema</font>','Sem permisso para incluir');
            } else {
               var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               poObj.aObjSlim.push(oTela);
               var oEdit = foCreateEditorSlim2(poObj,'NC','fTxt',0,'',false,false,2);
               poObj.aObjSlim.push(oEdit);
            }
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flGridAltNC(poGrid) { // DEDICADO
//////////////////////////////////
   var poObj = poGrid;
   poObj_fiChaveAtual = poObj.fiChaveAtual();
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=1&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridAltNC='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridAltNC</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            if (sMsg.substr(0,2)=='-1') {
               flIconeProcess(iSss,0);
               flEnableScreen(iSss,true);
               alert('Sem permisso para alterar');
               //flModal('<font color=red>Sistema</font>','Sem permisso para alterar');
            } else {
               var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               oTela.lRefreshGrid=true;
               poObj.aObjSlim.push(oTela);
               var oEdit2 = foCreateEditorSlim2(poObj,'NC','fTxt',poObj_fiChaveAtual,'',true,null,5);
               poObj.aObjSlim.push(oEdit2);
               var oEdit1 = foCreateEditorSlim2(poObj,'NC','fTxt',poObj_fiChaveAtual,'',false,false,2);
               poObj.aObjSlim.push(oEdit1);
            }
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flGridZooNC(poGrid) { // DEDICADO
//////////////////////////////////
   var poObj = poGrid;
   poObj_fiChaveAtual = poObj.fiChaveAtual();
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=2&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridZooNC='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridZooNC</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               oTela.lRefreshGrid=true;
            poObj.aObjSlim.push(oTela);
            var oEdit = foCreateEditorSlim2(poObj,'NC','fTxt',poObj_fiChaveAtual,'',true,null,5);
            poObj.aObjSlim.push(oEdit);
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flSalvaNC(poTela) {  // dedicado
/////////////////////////////
   poGrid = poTela.oPai
   iChave = poGrid.fiChaveAtual();

   var oTela = poGrid.aObjSlim[0];
//   var oEdit = poGrid.aObjSlim[1];
   var oEdit = poGrid.aObjSlim.length>2 ? poGrid.aObjSlim[2] : poGrid.aObjSlim[1];

   oTela.iSalvaEnvia = 0;
   oTela.lSalvouTela = false;
   oTela.flOnSubmit();
}
function fl1EnviaNC(poGrid,piChave) {   // O nome envia, nesse caso no  apropriado
/////////////////////////////////////////
   eval('poPGrid = poGrid;');
   piPChave = piChave
   var oTela = poGrid.aObjSlim[0];
//   var oEdit = poGrid.aObjSlim[1];
   var oEdit = poGrid.aObjSlim.length>2 ? poGrid.aObjSlim[2] : poGrid.aObjSlim[1];
   if ((oTela.lSalvouTela==true)&&(oTela.lUploading==false)) {
      oEdit.lSalvouTxt = false;
      oEdit.iChaveSalva = piChave;
      eExp = 'oFrameTxt=document.getElementById("frame_'+oEdit.sId+'");';
      eval(eExp);

      sIFrameNome = document.getElementById('frame_'+oEdit.sId).name;
      oFrame = eval("window." + sIFrameNome);
      oFrame.flAjaxSave();
   
      setTimeout('fl2EnviaNC(poPGrid,piPChave)',1000);
      
   } else setTimeout('fl1EnviaNC(poPGrid,piPChave)',1000);
}
function fl2EnviaNC(poGrid,piChave) {
/////////////////////////////////////////
   eval('poPGrid = poGrid;');
   piPChave = piChave
   var oTela = poGrid.aObjSlim[0];
//   var oEdit = poGrid.aObjSlim[1];
   var oEdit = poGrid.aObjSlim.length>2 ? poGrid.aObjSlim[2] : poGrid.aObjSlim[1];
   if ((oTela.lSalvouTela==true) && (oEdit.lSalvouTxt==true)) {
      flTrataPosSalvaTelaEdicao(oTela,piChave);
      poGrid.aObjSlim = new Array;
   } else setTimeout('fl2EnviaNC(poPGrid,piPChave)',1000);
}
function flConcluirNC(poTela) {  // dedicado
/////////////////////////////
   poGrid = poTela.oPai
   iChave = poGrid.fiChaveAtual();

   var oTela = poGrid.aObjSlim[0];
   var oEdit = poGrid.aObjSlim.length>2 ? poGrid.aObjSlim[2] : poGrid.aObjSlim[1];

   oTela.iSalvaEnvia = 0;
   oTela.lSalvouTela = false;
   oTela.flOnSubmit();

   flCallSysPOP(19,poGrid,'Concluir essa NC?',iChave);

}

//
// Proj
//

function flGridIncProj(poGrid) { // DEDICADO
//////////////////////////////////
   var poObj = poGrid;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=0&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridIncProj='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridIncProj</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            if (sMsg.substr(0,2)=='-1') {
               flIconeProcess(iSss,0);
               flEnableScreen(iSss,true);
               alert('Sem permisso para incluir');
               //flModal('<font color=red>Sistema</font>','Sem permisso para incluir');
            } else {
               var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               poObj.aObjSlim.push(oTela);
               var oEdit = foCreateEditorSlim2(poObj,'Proj','fTxt',0,'',false,false,2);
               poObj.aObjSlim.push(oEdit);
            }
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flGridAltProj(poGrid) { // DEDICADO
//////////////////////////////////
   var poObj = poGrid;
   poObj_fiChaveAtual = poObj.fiChaveAtual();
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=1&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridAltProj='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridAltProj</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            if (sMsg.substr(0,2)=='-1') {
               flIconeProcess(iSss,0);
               flEnableScreen(iSss,true);
               alert('Sem permisso para alterar');
               //flModal('<font color=red>Sistema</font>','Sem permisso para alterar');
            } else {
               var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               oTela.lRefreshGrid=true;
               poObj.aObjSlim.push(oTela);
               var oEdit2 = foCreateEditorSlim2(poObj,'Proj','fTxt',poObj_fiChaveAtual,'',true,null,5);
               poObj.aObjSlim.push(oEdit2);
               var oEdit1 = foCreateEditorSlim2(poObj,'Proj','fTxt',poObj_fiChaveAtual,'',false,false,2);
               poObj.aObjSlim.push(oEdit1);
            }
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flGridZooProj(poGrid) { // DEDICADO
//////////////////////////////////
   var poObj = poGrid;
   poObj_fiChaveAtual = poObj.fiChaveAtual();
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=2&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridZooProj='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridZooProj</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               oTela.lRefreshGrid=true;
            poObj.aObjSlim.push(oTela);
            var oEdit = foCreateEditorSlim2(poObj,'Proj','fTxt',poObj_fiChaveAtual,'',true,null,5);
            poObj.aObjSlim.push(oEdit);
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flSalvaProj(poTela) {  // dedicado
/////////////////////////////
   poGrid = poTela.oPai
   iChave = poGrid.fiChaveAtual();

   var oTela = poGrid.aObjSlim[0];
//   var oEdit = poGrid.aObjSlim[1];
   var oEdit = poGrid.aObjSlim.length>2 ? poGrid.aObjSlim[2] : poGrid.aObjSlim[1];

   oTela.iSalvaEnvia = 0;
   oTela.lSalvouTela = false;
   oTela.flOnSubmit();
}

function fl1EnviaProj(poGrid,piChave) {   // O nome envia, nesse caso no  apropriado
/////////////////////////////////////////
   eval('poPGrid = poGrid;');
   piPChave = piChave
   var oTela = poGrid.aObjSlim[0];
//   var oEdit = poGrid.aObjSlim[1];
   var oEdit = poGrid.aObjSlim.length>2 ? poGrid.aObjSlim[2] : poGrid.aObjSlim[1];
   if ((oTela.lSalvouTela==true)&&(oTela.lUploading==false)) {
      oEdit.lSalvouTxt = false;
      oEdit.iChaveSalva = piChave;
      eExp = 'oFrameTxt=document.getElementById("frame_'+oEdit.sId+'");';
      eval(eExp);

      sIFrameNome = document.getElementById('frame_'+oEdit.sId).name;
      oFrame = eval("window." + sIFrameNome);
      oFrame.flAjaxSave();
   
      setTimeout('fl2EnviaProj(poPGrid,piPChave)',1000);
      
   } else setTimeout('fl1EnviaProj(poPGrid,piPChave)',1000);
}
function fl2EnviaProj(poGrid,piChave) {
/////////////////////////////////////////
   eval('poPGrid = poGrid;');
   piPChave = piChave
   var oTela = poGrid.aObjSlim[0];
//   var oEdit = poGrid.aObjSlim[1];
   var oEdit = poGrid.aObjSlim.length>2 ? poGrid.aObjSlim[2] : poGrid.aObjSlim[1];
   if ((oTela.lSalvouTela==true) && (oEdit.lSalvouTxt==true)) {
      flTrataPosSalvaTelaEdicao(oTela,piChave);
      poGrid.aObjSlim = new Array;
   } else setTimeout('fl2EnviaProj(poPGrid,piPChave)',1000);
}
/*
function flConcluirProj(poTela) {  // dedicado
/////////////////////////////
   poGrid = poTela.oPai
   iChave = poGrid.fiChaveAtual();

   var oTela = poGrid.aObjSlim[0];
   var oEdit = poGrid.aObjSlim.length>2 ? poGrid.aObjSlim[2] : poGrid.aObjSlim[1];

   oTela.iSalvaEnvia = 0;
   oTela.lSalvouTela = false;
   oTela.flOnSubmit();

   flCallSysPOP(19,poGrid,'Concluir esse Projeto ?',iChave);

}
*/
//
// Sugestoes
//

function flGridIncSug(poGrid) { // DEDICADO
//////////////////////////////////
   var poObj = poGrid;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=0&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridIncSug='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridIncSug</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            if (sMsg.substr(0,2)=='-1') {
               flIconeProcess(iSss,0);
               flEnableScreen(iSss,true);
               alert('Sem permisso para incluir');
               //flModal('<font color=red>Sistema</font>','Sem permisso para incluir');
            } else {
               var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               poObj.aObjSlim.push(oTela);
               var oEdit = foCreateEditorSlim2(poObj,'Sug','fTxt',0,'',false,false);
               poObj.aObjSlim.push(oEdit);  
            }
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flGridAltSug(poGrid) { // DEDICADO
//////////////////////////////////
   var poObj = poGrid;
   poObj_fiChaveAtual = poObj.fiChaveAtual();
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=1&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridAltSug='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridAltSug</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            if (sMsg.substr(0,2)=='-1') {
               flIconeProcess(iSss,0);
               flEnableScreen(iSss,true);
               alert('Sem permisso para alterar');
               //flModal('<font color=red>Sistema</font>','Sem permisso para alterar');
            } else {
               var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               poObj.aObjSlim.push(oTela);
               var oEdit1 = foCreateEditorSlim2(poObj,'Sug','fTxt',poObj_fiChaveAtual,'',false,true,2);
               poObj.aObjSlim.push(oEdit1);
               var oEdit2 = foCreateEditorSlim2(poObj,'Sug','fTxt',poObj_fiChaveAtual,'',true,null,3);
               poObj.aObjSlim.push(oEdit2);
            }
         }    
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flGridZooSug(poGrid) { // DEDICADO
//////////////////////////////////
   var poObj = poGrid;
   poObj_fiChaveAtual = poObj.fiChaveAtual();
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=2&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridZooSug='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridZooSug</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
            poObj.aObjSlim.push(oTela);
            var oEdit = foCreateEditorSlim2(poObj,'Sug','fTxt',poObj_fiChaveAtual,'',true,null,3);
            poObj.aObjSlim.push(oEdit);
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flSalvaSug(poTela) {  // dedicado
/////////////////////////////
   poGrid = poTela.oPai
   iChave = poGrid.fiChaveAtual();

   var oTela = poGrid.aObjSlim[0];
   var oEdit = poGrid.aObjSlim[1];

   oTela.iSalvaEnvia = 0;
   oTela.lSalvouTela = false;
   oTela.flOnSubmit();
}
function fl1EnviaSug(poGrid,piChave) {   // O nome envia, nesse caso no  apropriado
/////////////////////////////////////////
   eval('poPGrid = poGrid;');
   piPChave = piChave
   var oTela = poGrid.aObjSlim[0];
   var oEdit = poGrid.aObjSlim[1];
   if ((oTela.lSalvouTela==true) && (oTela.lUploading==false)) {
      oEdit.lSalvouTxt = false;
      oEdit.iChaveSalva = piChave;
      eExp = 'oFrameTxt=document.getElementById("frame_'+oEdit.sId+'");';
      eval(eExp);

      sIFrameNome = document.getElementById('frame_'+oEdit.sId).name;
      oFrame = eval("window." + sIFrameNome);
      oFrame.flAjaxSave();
   
      setTimeout('fl2EnviaSug(poPGrid,piPChave)',1000);
      
   } else setTimeout('fl1EnviaSug(poPGrid,piPChave)',1000);
}
function fl2EnviaSug(poGrid,piChave) {
/////////////////////////////////////////
   eval('poPGrid = poGrid;');
   piPChave = piChave
   var oTela = poGrid.aObjSlim[0];
   var oEdit = poGrid.aObjSlim[1];
   if ((oTela.lSalvouTela==true) && (oEdit.lSalvouTxt==true)) {
      flTrataPosSalvaTelaEdicao(oTela,piChave);
      poGrid.aObjSlim = new Array;
   } else setTimeout('fl2EnviaSug(poPGrid,piPChave)',1000);
}

//
// Denncias
//

function flGridIncDen(poGrid) { // DEDICADO
//////////////////////////////////
   var poObj = poGrid;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=0&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridIncDen='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridIncDen</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            if (sMsg.substr(0,2)=='-1') {
               flIconeProcess(iSss,0);
               flEnableScreen(iSss,true);
               alert('Sem permisso para incluir');
               //flModal('<font color=red>Sistema</font>','Sem permisso para incluir');
            } else {
               var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               poObj.aObjSlim.push(oTela);
               var oEdit = foCreateEditorSlim2(poObj,'Den','fTxt',0,'',false,false);
               poObj.aObjSlim.push(oEdit);
            }
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flGridAltDen(poGrid) { // DEDICADO
//////////////////////////////////
   var poObj = poGrid;
   poObj_fiChaveAtual = poObj.fiChaveAtual();
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=1&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridAltDen='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridAltDen</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            if (sMsg.substr(0,2)=='-1') {
               flIconeProcess(iSss,0);
               flEnableScreen(iSss,true);
               alert('Sem permisso para alterar');
               //flModal('<font color=red>Sistema</font>','Sem permisso para alterar');
            } else {
               var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               poObj.aObjSlim.push(oTela);
               var oEdit1 = foCreateEditorSlim2(poObj,'Den','fTxt',poObj_fiChaveAtual,'',false,true,2);
               poObj.aObjSlim.push(oEdit1);
               var oEdit2 = foCreateEditorSlim2(poObj,'Den','fTxt',poObj_fiChaveAtual,'',true,null,3);
               poObj.aObjSlim.push(oEdit2);
            }
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flGridZooDen(poGrid) { // DEDICADO
//////////////////////////////////
   var poObj = poGrid;
   poObj_fiChaveAtual = poObj.fiChaveAtual();
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=2&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridZooDen='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridZooDen</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
            poObj.aObjSlim.push(oTela);
            var oEdit = foCreateEditorSlim2(poObj,'Den','fTxt',poObj_fiChaveAtual,'',true,null,3);
            poObj.aObjSlim.push(oEdit);
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flSalvaDen(poTela) {  // dedicado
/////////////////////////////
   poGrid = poTela.oPai
   iChave = poGrid.fiChaveAtual();

   var oTela = poGrid.aObjSlim[0];
   var oEdit = poGrid.aObjSlim[1];

   oTela.iSalvaEnvia = 0;
   oTela.lSalvouTela = false;
   oTela.flOnSubmit();
}
function fl1EnviaDen(poGrid,piChave) {   // O nome envia, nesse caso no  apropriado
/////////////////////////////////////////
   eval('poPGrid = poGrid;');
   piPChave = piChave
   var oTela = poGrid.aObjSlim[0];
   var oEdit = poGrid.aObjSlim[1];
   if ((oTela.lSalvouTela==true) && (oTela.lUploading==false)) {
      oEdit.lSalvouTxt = false;
      oEdit.iChaveSalva = piChave;
      eExp = 'oFrameTxt=document.getElementById("frame_'+oEdit.sId+'");';
      eval(eExp);

      sIFrameNome = document.getElementById('frame_'+oEdit.sId).name;
      oFrame = eval("window." + sIFrameNome);
      oFrame.flAjaxSave();
   
      setTimeout('fl2EnviaDen(poPGrid,piPChave)',1000);
      
   } else setTimeout('fl1EnviaDen(poPGrid,piPChave)',1000);
}
function fl2EnviaDen(poGrid,piChave) {
/////////////////////////////////////////
   eval('poPGrid = poGrid;');
   piPChave = piChave
   var oTela = poGrid.aObjSlim[0];
   var oEdit = poGrid.aObjSlim[1];
   if ((oTela.lSalvouTela==true) && (oEdit.lSalvouTxt==true)) {
      flTrataPosSalvaTelaEdicao(oTela,piChave);
      poGrid.aObjSlim = new Array;
   } else setTimeout('fl2EnviaDen(poPGrid,piPChave)',1000);
}

//
// POPs
//

function flGridIncPOP(poGrid) { // DEDICADO
//////////////////////////////////
   var poObj = poGrid;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=0&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridIncPOP='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridIncPOP</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            if (sMsg.substr(0,2)=='-1') {
               flIconeProcess(iSss,0);
               flEnableScreen(iSss,true);
               alert('Sem permisso para incluir');
               //flModal('<font color=red>Sistema</font>','Sem permisso para incluir');
            } else {
               var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               poObj.aObjSlim.push(oTela);
               var oEdit = foCreateEditorSlim2(poObj,'Pop','fTxt',0,'',false,false,2);
               poObj.aObjSlim.push(oEdit);
            }
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flGridAltPOP(poGrid) { // DEDICADO
//////////////////////////////////
   var poObj = poGrid;
   poObj_fiChaveAtual = poObj.fiChaveAtual();
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=1&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridAltPOP='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridAltPOP</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            if (sMsg.substr(0,2)=='-1') {
               flIconeProcess(iSss,0);
               flEnableScreen(iSss,true);
               alert('Sem permisso para alterar');
               //flModal('<font color=red>Sistema</font>','Sem permisso para alterar');
            } else {
               var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               poObj.aObjSlim.push(oTela);
               var oEdit1 = foCreateEditorSlim2(poObj,'Pop','fTxt',poObj_fiChaveAtual,'',false,false,0);
               poObj.aObjSlim.push(oEdit1);
//               var oEdit2 = foCreateEditorSlim2(poObj,'Pop','fTxt',poObj_fiChaveAtual,'',true,null,3);
//               poObj.aObjSlim.push(oEdit2);
            }
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flGridZooPOP(poGrid) { // DEDICADO
//////////////////////////////////
   var poObj = poGrid;
   poObj_fiChaveAtual = poObj.fiChaveAtual();
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=2&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridZooPOP='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridZooPOP</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
            poObj.aObjSlim.push(oTela);
            var oEdit = foCreateEditorSlim2(poObj,'Pop','fTxt',poObj_fiChaveAtual,'',true,null,3);
            poObj.aObjSlim.push(oEdit);
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flSalvaPOP(poTela) {  // dedicado
/////////////////////////////
   poGrid = poTela.oPai
   iChave = poGrid.fiChaveAtual();

   var oTela = poGrid.aObjSlim[0];
   var oEdit = poGrid.aObjSlim[1];

   oTela.iSalvaEnvia = 0;
   oTela.lSalvouTela = false;
   oTela.flOnSubmit();
}
function fl1EnviaPOP(poGrid,piChave) {   // O nome envia, nesse caso no  apropriado
/////////////////////////////////////////
   eval('poPGrid = poGrid;');
   piPChave = piChave
   var oTela = poGrid.aObjSlim[0];
   var oEdit = poGrid.aObjSlim[1];
   if ((oTela.lSalvouTela==true) && (oTela.lUploading==false)) {
      oEdit.lSalvouTxt = false;
      oEdit.iChaveSalva = piChave;
      eExp = 'oFrameTxt=document.getElementById("frame_'+oEdit.sId+'");';
      eval(eExp);

      sIFrameNome = document.getElementById('frame_'+oEdit.sId).name;
      oFrame = eval("window." + sIFrameNome);
      oFrame.flAjaxSave();
   
      setTimeout('fl2EnviaPOP(poPGrid,piPChave)',1000);
      
   } else setTimeout('fl1EnviaPOP(poPGrid,piPChave)',1000);
}
function fl2EnviaPOP(poGrid,piChave) {
/////////////////////////////////////////
   eval('poPGrid = poGrid;');
   piPChave = piChave
   var oTela = poGrid.aObjSlim[0];
   var oEdit = poGrid.aObjSlim[1];
   if ((oTela.lSalvouTela==true) && (oEdit.lSalvouTxt==true)) {
      flTrataPosSalvaTelaEdicao(oTela,piChave);
      poGrid.aObjSlim = new Array;
   } else setTimeout('fl2EnviaPOP(poPGrid,piPChave)',1000);
}


//
// PizzaPed
//

function flGridIncPizzaPed(poGrid) { // DEDICADO
//////////////////////////////////
   var poObj = poGrid;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=0&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId=0&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridIncPizzaPed='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridIncPizzaPed</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            if (sMsg.substr(0,2)=='-1') {
               flIconeProcess(iSss,0);
               flEnableScreen(iSss,true);
               alert('Sem permisso para incluir');
               //flModal('<font color=red>Sistema</font>','Sem permisso para incluir');
            } else {
               var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               poObj.aObjSlim.push(oTela);
               flGridSlim(poObj,'dd_files/pizzaped_itens.dda','Padrao_1',0);   // AQUI
            }
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flGridAltPizzaPed(poGrid) { // DEDICADO
//////////////////////////////////
   var poObj = poGrid;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=1&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridAltPizzaPed='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridAltPizzaPed</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            if (sMsg.substr(0,2)=='-1') {
               flIconeProcess(iSss,0);
               flEnableScreen(iSss,true);
               aTmp = sMsg.split('~');
               sTmp = aTmp[0];
               sTmp = sTmp.substr(2,sTmp.length-2);
               //var iLensTmp = sTmp.length;
               if (sTmp.length>0) alert(sTmp);
               //if (sTmp.length>0) flModal('<font color=blue>Sistema</font>',sTmp);
               else               alert('Sem permisso para alterar');
               //else               flModal('<font color=red>Sistema</font>','Sem permisso para alterar');
            } else {
               var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               poObj.aObjSlim.push(oTela);
               flGridSlim(poObj,'dd_files/pizzaped_itens.dda','Padrao_1',1);
            }
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flGridZooPizzaPed(poGrid) { // DEDICADO
//////////////////////////////////
   var poObj = poGrid;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=2&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridZooPizzaPed='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridZooPizzaPed</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
            poObj.aObjSlim.push(oTela);
            flGridSlim(poObj,'dd_files/pizzaped_itens.dda','Padrao_1',2);
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flSalvaPizzaPed(poTela) {  // dedicado
////////////////////////////////
   if (poTela.oPai.sTipo=='grid') poGrid = poTela.oPai;
   if ((poTela.oPai.oPai!=null)&&(poTela.oPai.oPai.sTipo=='grid')) poGrid = poTela.oPai.oPai;
   iChave = poGrid.fiChaveAtual();

   var oTela = poGrid.aObjSlim[0];
   var oGrid = poGrid.aObjSlim[1];

   oTela.iSalvaEnvia = 0;
   oTela.lSalvouTela = false;
   oTela.flOnSubmit();

}
function flEnviaPizzaPed(poTela) {  // dedicado
////////////////////////////////
   if (poTela.oPai.sTipo=='grid') poGrid = poTela.oPai;
   if ((poTela.oPai.oPai!=null)&&(poTela.oPai.oPai.sTipo=='grid')) {   //   encaminhar
//      poTela.iIdRec = 0;       // o encaminhar  um falso alterar
      poGrid = poTela.oPai.oPai;
   }

   iChave = poGrid.fiChaveAtual();

   var oTela = poGrid.aObjSlim[0];
   var oGrid = poGrid.aObjSlim[1];
   
   oTela.iSalvaEnvia = 1;
   oTela.lSalvouTela = false;
   oTela.flOnSubmit();

}
/*
function fl1EnviaOficio(poGrid,piChave) {
/////////////////////////////////////////
   eval('poPGrid = poGrid;');
   piPChave = piChave
   var oTela = poGrid.aObjSlim[0];
   var oGrid = poGrid.aObjSlim[1];
   if ((oTela.lSalvouTela==true) && (oTela.lUploading==false)) {
   
      oGrid.lSalvouMarcados = false;
      flMarcacaoCallAJAXPostSlim(oGrid,oGrid.sDDSFile,oGrid.sDDSTag,piChave);
      setTimeout('fl2EnviaOficio(poPGrid,piPChave)',1000);
      
   } else setTimeout('fl1EnviaOficio(poPGrid,piPChave)',1000);
}
function fl2EnviaOficio(poGrid,piChave) {
/////////////////////////////////////////
   eval('poPGrid = poGrid;');
   piPChave = piChave
   var oTela = poGrid.aObjSlim[0];
   var oGrid = poGrid.aObjSlim[1];
   if ((oTela.lSalvouTela==true) && (oGrid.lSalvouMarcados==true)) {
      if (oTela.iSalvaEnvia==1) flCallSysPOP(9,poPGrid,null,piChave);  // essa eh a diferenca entre salvar e enviar
      flTrataPosSalvaTelaEdicao(oTela,piChave);
      poGrid.aObjSlim = new Array;
      if (oTela.oPai.sTipo=='editor') oTela.oPai.flEncerraEditor();
   } else setTimeout('fl2EnviaOficio(poPGrid,piPChave)',1000);
}
*/

//

function flGridAltTDoc_Doc(poGrid) { // DEDICADO
//////////////////////////////////
   var poObj = poGrid;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=1&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridAltTDoc_Doc='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridAltPOP</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            if (sMsg.substr(0,2)=='-1') {
               flIconeProcess(iSss,0);
               flEnableScreen(iSss,true);
               alert('Sem permisso para alterar');
               //flModal('<font color=red>Sistema</font>','Sem permisso para alterar');
            } else {
               var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
               poObj.aObjSlim.push(oTela);
               flGridSlim(poObj,'dd_files/Anexos.dda','Anexos_TDoc_Doc_1',2);
            }
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}

function flGridZooTDoc_Doc(poGrid) { // DEDICADO
//////////////////////////////////
   var poObj = poGrid;
   var oRequest = foCreateRequest();
   oRequest.open("GET","al_GetDDF.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sDDFChamada=2&sFileDDS="+poObj.sDDSFile+"&sTagDDS="+poObj.sDDSTag+"&sLogin="+parent.aGlobalLogin[1]+"&sTDoc="+fsTDocsAncestrais(poObj)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poObj)+"&sAncestrais="+fsChavesAncestrais(poObj)+"&sIrmasTias="+poObj.fsIrmasTias()+"&sId="+poObj.fiChaveAtual()+"&spOOp="+parent.sGlobal_pOOp+"&sRoot="+parent.sGlobalRoot+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno GridZooTDoc_Doc='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno GridZooTDoc_Doc</font>',sMsg);
         if ((poObj!=null)&&(poObj.lEnded==false)) {  
            var oTela = foCreateTela(poObj,sMsg,false,iSss,true);
            poObj.aObjSlim.push(oTela);
            flGridSlim(poObj,'dd_files/Anexos.dda','Anexos_TDoc_Doc_2',2);
         }
      }
   }
   var iSss = poObj.iSss;
   oRequest.send(null);
}



//
//
//

function flAutoGrid() {
///////////////////////
   var sUsuTipo = parent.aGlobalLogin[3];
   if (sUsuTipo=='Posto') {
//      flGrid(null,"dd_files/ipd_Pedidos.dda" , "Postos_1" );
   } else if (sUsuTipo=='Convenio') {
      flGrid(null,"dd_files/ipd_Pedidos.dda" , "Conv_1"   );
   } else if (sUsuTipo=='Medico') {
      flGrid(null,"dd_files/ipd_Pedidos.dda" , "Medicos_1");
   } else if (sUsuTipo=='Paciente') {
      flGrid(null,"dd_files/ipd_Pedidos.dda" , "Pacientes_1");
   } else {
//      flGrid(null,"dd_files/ipd_Pedidos.dda" , "Pedidos_1");
      flRange(null,"dd_files/ipd_Pedidos.dda" , "Pedidos_1");
   }
}


//
//
//

function flTots() {
///////////////////
   this.flTots1_LerUsuario();
//   this.flTots1();
   this.flTots2();
   this.flTots3();
}

function flTots1_LerUsuario() {
///////////////////////////////
   if ((this.sDDSFile=='dd_files/Agenda.dda') && (this.sDDSTag=='Padrao_0')) {
      var poObj = this;
      var oRequest = foCreateRequest();
      oRequest.open("GET","pTots1_LerUsuario.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest.onreadystatechange = function() {
         if ((oRequest.readyState==4) && (oRequest.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest.responseText;
               aMsgLin = sMsg.split('^');
               //var iLenaMsgLin = aMsgLin.length;
               for (var j=0; j<aMsgLin.length; j++) {
                 aMsg = aMsgLin[j].split('~');
                 //var iLenaMsg = aMsg.length;
                 if (aMsg.length>0) {
                    iQry = aMsg[aMsg.length-1];
                    if (iQry==19) {
                        iTot = aMsg[0];
                        i    = poObj.fiChaveTo_iArray(16);
                        if (i>=0) {
                           poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
                           poObj.flMontaLinha(i);
                        }
            
                        iTot = aMsg[1];
                        i    = poObj.fiChaveTo_iArray(17);
                        if (i>=0) {
                           poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
                           poObj.flMontaLinha(i);
                        }
   
                        iTot = aMsg[2];
                        i    = poObj.fiChaveTo_iArray(18);
                        if (i>=0) {
                           poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
                           poObj.flMontaLinha(i);
   
                        }
                        iTot = aMsg[3];
                        i    = poObj.fiChaveTo_iArray(19);
                        if (i>=0) {
                           poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
                           poObj.flMontaLinha(i);
                        }

                     } else if (iQry==65) {
                        iTot = aMsg[0];
                        i    = poObj.fiChaveTo_iArray(62);
                        if (i>=0) {
                           poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
                           poObj.flMontaLinha(i);
                        }
   
                        iTot = aMsg[1];
                        i    = poObj.fiChaveTo_iArray(63);
                        if (i>=0) {
                           poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
                           poObj.flMontaLinha(i);
                        }
      
                        iTot = aMsg[2];
                        i    = poObj.fiChaveTo_iArray(64);
                        if (i>=0) {
                           poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
                           poObj.flMontaLinha(i);
                        }
            
                        iTot = aMsg[3];
                        i    = poObj.fiChaveTo_iArray(65);
                        if (i>=0) {
                           poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
                           poObj.flMontaLinha(i);
                        }
                     } else {
                        iTot = aMsg[0];
//                        iQry = aMsg[1];
                        i    = poObj.fiChaveTo_iArray(iQry);
                        if (i>=0) {
                           poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
                           poObj.flMontaLinha(i);
                        }
                     }
                     poObj.flAjustaColunas();

                  }
               }
            }
         }
      }
      oRequest.send(null);
   }
}


function flTots1_LerPontual() {
//////////////////////////////////////

   if ((this.sDDSFile=='dd_files/Agenda.dda') && (this.sDDSTag=='Padrao_0')) {

         iQryId = this.fiChaveAtual();
      var poObj = this;
      var oRequest = foCreateRequest();
      oRequest.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest.onreadystatechange = function() {
         if ((oRequest.readyState==4) && (oRequest.status==200)) {
            if (poObj.sId!=null) {
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest.responseText;
            }
         }
      }
      oRequest.send(null);
   }
}
//
function flTots1() {
////////////////////
   if ((this.sDDSFile=='dd_files/Agenda.dda') && (this.sDDSTag=='Padrao_0')) {
      var poObj = this;

      var iQryId = 10;   // 0-> compromissos de hoje
      var oRequest1 = foCreateRequest();
      oRequest1.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest1.onreadystatechange = function() {
         if ((oRequest1.readyState==4) && (oRequest1.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest1.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest1.send(null);
   
      var iQryId = 11;   // 1-> compromissos atrasados - pPId=11
      var oRequest2 = foCreateRequest();
      oRequest2.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest2.onreadystatechange = function() {
         if ((oRequest2.readyState==4) && (oRequest2.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest2.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest2.send(null);

      var iQryId = 10001;   // 10001-> compromissos atrasados apenas corporatvios dos subordinados - pPId=10001
      var oRequest3 = foCreateRequest();
      oRequest3.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest3.onreadystatechange = function() {
         if ((oRequest3.readyState==4) && (oRequest3.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest3.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest3.send(null);

      var iQryId = 19;   // // 9-> compromissos p 1,3,7,30 dias - pPId=19,18,17,16
      var oRequest4 = foCreateRequest();
      oRequest4.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest4.onreadystatechange = function() {
         if ((oRequest4.readyState==4) && (oRequest4.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest4.responseText;
               aMsg = sMsg.split('~');
   
               iTot = aMsg[0];
               i    = poObj.fiChaveTo_iArray(16);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
   
               iTot = aMsg[1];
               i    = poObj.fiChaveTo_iArray(17);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);

               iTot = aMsg[2];
               i    = poObj.fiChaveTo_iArray(18);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);

               iTot = aMsg[3];
               i    = poObj.fiChaveTo_iArray(19);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest4.send(null);

      var iQryId = 21;   // mensagens enviadas nao lidas - pPId=21
      var oRequest5 = foCreateRequest();
      oRequest5.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest5.onreadystatechange = function() {
         if ((oRequest5.readyState==4) && (oRequest5.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest5.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest5.send(null);

      var iQryId = 22;   // mensagens recebidas nao lidas - pPId=22
      var oRequest6 = foCreateRequest();
      oRequest6.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest6.onreadystatechange = function() {
         if ((oRequest6.readyState==4) && (oRequest6.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest6.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest6.send(null);

      var iQryId = 31;   // comunicados enviados nao lidos - pPId=31
      var oRequest7 = foCreateRequest();
      oRequest7.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest7.onreadystatechange = function() {
         if ((oRequest7.readyState==4) && (oRequest7.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest7.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest7.send(null);

      var iQryId = 32;   // comunicados recebidos nao lidos - PId=32
      var oRequest8 = foCreateRequest();
      oRequest8.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest8.onreadystatechange = function() {
         if ((oRequest8.readyState==4) && (oRequest8.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest8.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest8.send(null);

      var iQryId = 41;   // tarefas enviadas nao lidas - pPId=41
      var oRequest9 = foCreateRequest();
      oRequest9.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest9.onreadystatechange = function() {
         if ((oRequest9.readyState==4) && (oRequest9.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest9.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest9.send(null);

      var iQryId = 42;   // tarefas enviadas em andamento - pPId=42
      var oRequest10 = foCreateRequest();
      oRequest10.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest10.onreadystatechange = function() {
         if ((oRequest10.readyState==4) && (oRequest10.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest10.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest10.send(null);

      var iQryId = 43;   //  tarefas enviadas vencidas - pPId=43
      var oRequest11 = foCreateRequest();
      oRequest11.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest11.onreadystatechange = function() {
         if ((oRequest11.readyState==4) && (oRequest11.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest11.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest11.send(null);

      var iQryId = 44;   // tarefas recebidas nao lidas - pPId=44
      var oRequest12 = foCreateRequest();
      oRequest12.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest12.onreadystatechange = function() {
         if ((oRequest12.readyState==4) && (oRequest12.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest12.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest12.send(null);

      var iQryId = 45;   // tarefas recebidas em andamento - pPId=45
      var oRequest13 = foCreateRequest();
      oRequest13.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest13.onreadystatechange = function() {
         if ((oRequest13.readyState==4) && (oRequest13.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest13.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest13.send(null);

      var iQryId = 46;   // tarefas recebidas vencidas - pPId=46      
      var oRequest14 = foCreateRequest();
      oRequest14.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest14.onreadystatechange = function() {
         if ((oRequest14.readyState==4) && (oRequest14.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest14.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest14.send(null);

//
      var iQryId = 51;   // of.cios enviados nao lidos - pPId=51      
      var oRequest15 = foCreateRequest();
      oRequest15.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest15.onreadystatechange = function() {
         if ((oRequest15.readyState==4) && (oRequest15.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest15.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest15.send(null);

      var iQryId = 52;   // of.cios recebidos nao lidos - pPId=52     
      var oRequest16 = foCreateRequest();
      oRequest16.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest16.onreadystatechange = function() {
         if ((oRequest16.readyState==4) && (oRequest16.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest16.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest16.send(null);

//
      var iQryId = 61;  // avisos de hoje - pPId=61
      var oRequest17 = foCreateRequest();
      oRequest17.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest17.onreadystatechange = function() {
         if ((oRequest17.readyState==4) && (oRequest17.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest17.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest17.send(null);

      var iQryId = 65;   // // avisos - ontem,3,7,30 - pPId=62,63,64,65
      var oRequest18 = foCreateRequest();
      oRequest18.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest18.onreadystatechange = function() {
         if ((oRequest18.readyState==4) && (oRequest18.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest18.responseText;
//alert(sMsg);
               aMsg = sMsg.split('~');
   
               iTot = aMsg[0];
               i    = poObj.fiChaveTo_iArray(62);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);

               iTot = aMsg[1];
               i    = poObj.fiChaveTo_iArray(63);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
   
               iTot = aMsg[2];
               i    = poObj.fiChaveTo_iArray(64);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
   
               iTot = aMsg[3];
               i    = poObj.fiChaveTo_iArray(65);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest18.send(null);
//
      var iQryId = 71;   // equipamentos 1o 2o resp - pPId=71
      var oRequest19 = foCreateRequest();
      oRequest19.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest19.onreadystatechange = function() {
         if ((oRequest19.readyState==4) && (oRequest19.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest19.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest19.send(null);

      var iQryId = 72;   // pops 1o 2o resp - pPId=72
      var oRequest20 = foCreateRequest();
      oRequest20.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest20.onreadystatechange = function() {
         if ((oRequest20.readyState==4) && (oRequest20.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest20.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest20.send(null);

      var iQryId = 73;   // pastas - pPId=73
      var oRequest21 = foCreateRequest();
      oRequest21.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest21.onreadystatechange = function() {
         if ((oRequest21.readyState==4) && (oRequest21.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest21.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest21.send(null);

      var iQryId = 74;   // comissoes - pPId=74
      var oRequest22 = foCreateRequest();
      oRequest22.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest22.onreadystatechange = function() {
         if ((oRequest22.readyState==4) && (oRequest22.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest22.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest22.send(null);

      var iQryId = 75;   // u.fisicas - pPId=75
      var oRequest23 = foCreateRequest();
      oRequest23.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest23.onreadystatechange = function() {
         if ((oRequest23.readyState==4) && (oRequest23.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest23.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest23.send(null);
//

      var iQryId = 8;   // cadeia de comandos - pPid=8
      var oRequest24 = foCreateRequest();
      oRequest24.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest24.onreadystatechange = function() {
         if ((oRequest24.readyState==4) && (oRequest24.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest24.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest24.send(null);

      var iQryId = 10008;   // ferias - pPid=10008
      var oRequest24a = foCreateRequest();
      oRequest24a.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest24a.onreadystatechange = function() {
         if ((oRequest24a.readyState==4) && (oRequest24a.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest24a.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest24a.send(null);

      var iQryId = 91;   // nc triagem - pPId=91
      var oRequest25 = foCreateRequest();
      oRequest25.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest25.onreadystatechange = function() {
         if ((oRequest25.readyState==4) && (oRequest25.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest25.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest25.send(null);

      var iQryId = 93;   // nao conformidade atualizacoes vc eh o autor - pPId=93
      var oRequest26 = foCreateRequest();
      oRequest26.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest26.onreadystatechange = function() {
         if ((oRequest26.readyState==4) && (oRequest26.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest26.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest26.send(null);

      var iQryId = 94;   // nao conformidade atualizacoes vc eh o relator - pPId=94
      var oRequest27 = foCreateRequest();
      oRequest27.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest27.onreadystatechange = function() {
         if ((oRequest27.readyState==4) && (oRequest27.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest27.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest27.send(null);

      var iQryId = 95;   // nao conformidade atualizacoes vc esta envolvido - pPId=95
      var oRequest28 = foCreateRequest();
      oRequest28.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest28.onreadystatechange = function() {
         if ((oRequest28.readyState==4) && (oRequest28.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest28.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest28.send(null);


      var iQryId = 97;   // nao conformidade atualizacoes vc eh o autor - pPId=97
      var oRequest29 = foCreateRequest();
      oRequest29.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest29.onreadystatechange = function() {
         if ((oRequest29.readyState==4) && (oRequest29.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest29.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest29.send(null);

      var iQryId = 98;   // nao conformidade atualizacoes vc eh o relator - pPId=98
      var oRequest30 = foCreateRequest();
      oRequest30.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest30.onreadystatechange = function() {
         if ((oRequest30.readyState==4) && (oRequest30.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest30.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest30.send(null);

      var iQryId = 99;   // nao conformidade atualizacoes vc esta envolvido - pPId=99
      var oRequest31 = foCreateRequest();
      oRequest31.open("GET","pTots1.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp,true);
      oRequest31.onreadystatechange = function() {
         if ((oRequest31.readyState==4) && (oRequest31.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest31.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest31.send(null);





   }
}

function flTots2() {
////////////////////  // subordinados
   
   if ((this.sDDSFile=='dd_files/Agenda.dda') && ((this.sDDSTag=='Padrao_3') || (this.sDDSTag=='Padrao_3B'))) {
      var poObj = this;

      var iQryId = 10;   // 0-> compromissos de hoje
      var oRequest1 = foCreateRequest();
      oRequest1.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest1.onreadystatechange = function() {
         if ((oRequest1.readyState==4) && (oRequest1.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest1.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest1.send(null);
      var iQryId = 11;   // 1-> compromissos atrasados - pPId=11
      var oRequest2 = foCreateRequest();
      oRequest2.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest2.onreadystatechange = function() {
         if ((oRequest2.readyState==4) && (oRequest2.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest2.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest2.send(null);

      var iQryId = 10001;   // 10001-> compromissos atrasados apenas corporatvios dos subordinados - pPId=10001
      var oRequest3 = foCreateRequest();
      oRequest3.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest3.onreadystatechange = function() {
         if ((oRequest3.readyState==4) && (oRequest3.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest3.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest3.send(null);

      var iQryId = 19;   // // 9-> compromissos p 1,3,7,30 dias - pPId=19,18,17,16
      var oRequest4 = foCreateRequest();
      oRequest4.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest4.onreadystatechange = function() {
         if ((oRequest4.readyState==4) && (oRequest4.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest4.responseText;
               aMsg = sMsg.split('~');
   
               iTot = aMsg[0];
               i    = poObj.fiChaveTo_iArray(16);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
   
               iTot = aMsg[1];
               i    = poObj.fiChaveTo_iArray(17);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);

               iTot = aMsg[2];
               i    = poObj.fiChaveTo_iArray(18);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);

               iTot = aMsg[3];
               i    = poObj.fiChaveTo_iArray(19);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest4.send(null);


      var iQryId = 31;   // comunicados enviados nao lidos - pPId=31
      var oRequest7 = foCreateRequest();
      oRequest7.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest7.onreadystatechange = function() {
         if ((oRequest7.readyState==4) && (oRequest7.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest7.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest7.send(null);

      var iQryId = 32;   // comunicados recebidos nao lidos - PId=32
      var oRequest8 = foCreateRequest();
      oRequest8.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest8.onreadystatechange = function() {
         if ((oRequest8.readyState==4) && (oRequest8.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest8.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest8.send(null);

      var iQryId = 41;   // tarefas enviadas nao lidas - pPId=41
      var oRequest9 = foCreateRequest();
      oRequest9.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest9.onreadystatechange = function() {
         if ((oRequest9.readyState==4) && (oRequest9.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest9.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest9.send(null);

      var iQryId = 42;   // tarefas enviadas em andamento - pPId=42
      var oRequest10 = foCreateRequest();
      oRequest10.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest10.onreadystatechange = function() {
         if ((oRequest10.readyState==4) && (oRequest10.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest10.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest10.send(null);

      var iQryId = 43;   //  tarefas enviadas vencidas - pPId=43
      var oRequest11 = foCreateRequest();
      oRequest11.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest11.onreadystatechange = function() {
         if ((oRequest11.readyState==4) && (oRequest11.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest11.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest11.send(null);

      var iQryId = 44;   // tarefas recebidas nao lidas - pPId=44
      var oRequest12 = foCreateRequest();
      oRequest12.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest12.onreadystatechange = function() {
         if ((oRequest12.readyState==4) && (oRequest12.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest12.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest12.send(null);

      var iQryId = 45;   // tarefas recebidas em andamento - pPId=45
      var oRequest13 = foCreateRequest();
      oRequest13.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest13.onreadystatechange = function() {
         if ((oRequest13.readyState==4) && (oRequest13.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest13.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest13.send(null);

      var iQryId = 46;   // tarefas recebidas vencidas - pPId=46      
      var oRequest14 = foCreateRequest();
      oRequest14.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest14.onreadystatechange = function() {
         if ((oRequest14.readyState==4) && (oRequest14.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest14.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest14.send(null);

//
      var iQryId = 51;   // of.cios enviados nao lidos - pPId=51      
      var oRequest15 = foCreateRequest();
      oRequest15.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest15.onreadystatechange = function() {
         if ((oRequest15.readyState==4) && (oRequest15.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest15.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest15.send(null);

      var iQryId = 52;   // of.cios recebidos nao lidos - pPId=52     
      var oRequest16 = foCreateRequest();
      oRequest16.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest16.onreadystatechange = function() {
         if ((oRequest16.readyState==4) && (oRequest16.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest16.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest16.send(null);

      var iQryId = 71;   // equipamentos 1o 2o resp - pPId=71
      var oRequest19 = foCreateRequest();
      oRequest19.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest19.onreadystatechange = function() {
         if ((oRequest19.readyState==4) && (oRequest19.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest19.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest19.send(null);

      var iQryId = 72;   // pops 1o 2o resp - pPId=72
      var oRequest20 = foCreateRequest();
      oRequest20.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest20.onreadystatechange = function() {
         if ((oRequest20.readyState==4) && (oRequest20.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest20.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest20.send(null);

      var iQryId = 73;   // pastas - pPId=73
      var oRequest21 = foCreateRequest();
      oRequest21.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest21.onreadystatechange = function() {
         if ((oRequest21.readyState==4) && (oRequest21.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest21.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest21.send(null);

      var iQryId = 74;   // comissoes - pPId=74
      var oRequest22 = foCreateRequest();
      oRequest22.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest22.onreadystatechange = function() {
         if ((oRequest22.readyState==4) && (oRequest22.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest22.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest22.send(null);

      var iQryId = 75;   // u.fisicas - pPId=75
      var oRequest23 = foCreateRequest();
      oRequest23.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest23.onreadystatechange = function() {
         if ((oRequest23.readyState==4) && (oRequest23.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest23.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest23.send(null);
//

      var iQryId = 8;   // cadeia de comandos - pPid=8
      var oRequest24 = foCreateRequest();
      oRequest24.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest24.onreadystatechange = function() {
         if ((oRequest24.readyState==4) && (oRequest24.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest24.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest24.send(null);

      var iQryId = 93;   // nao conformidade atualizacoes vc eh o autor - pPId=93
      var oRequest26 = foCreateRequest();
      oRequest26.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest26.onreadystatechange = function() {
         if ((oRequest26.readyState==4) && (oRequest26.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest26.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest26.send(null);

      var iQryId = 94;   // nao conformidade atualizacoes vc eh o relator - pPId=94
      var oRequest27 = foCreateRequest();
      oRequest27.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest27.onreadystatechange = function() {
         if ((oRequest27.readyState==4) && (oRequest27.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest27.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest27.send(null);

      var iQryId = 95;   // nao conformidade atualizacoes vc esta envolvido - pPId=95
      var oRequest28 = foCreateRequest();
      oRequest28.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest28.onreadystatechange = function() {
         if ((oRequest28.readyState==4) && (oRequest28.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest28.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest28.send(null);


      var iQryId = 97;   // nao conformidade atualizacoes vc eh o autor - pPId=97
      var oRequest29 = foCreateRequest();
      oRequest29.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest29.onreadystatechange = function() {
         if ((oRequest29.readyState==4) && (oRequest29.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest29.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest29.send(null);

      var iQryId = 98;   // nao conformidade atualizacoes vc eh o relator - pPId=98
      var oRequest30 = foCreateRequest();
      oRequest30.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest30.onreadystatechange = function() {
         if ((oRequest30.readyState==4) && (oRequest30.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest30.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest30.send(null);

      var iQryId = 99;   // nao conformidade atualizacoes vc esta envolvido - pPId=99
      var oRequest31 = foCreateRequest();
      oRequest31.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest31.onreadystatechange = function() {
         if ((oRequest31.readyState==4) && (oRequest31.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest31.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest31.send(null);

      var iQryId = 451;   // - 451-Projetos que sou responsvel
      var oRequest32 = foCreateRequest();
      oRequest32.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest32.onreadystatechange = function() {
         if ((oRequest32.readyState==4) && (oRequest32.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest32.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest32.send(null);

      var iQryId = 452;   // - 452-Projetos que inclui
      var oRequest33 = foCreateRequest();
      oRequest33.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest33.onreadystatechange = function() {
         if ((oRequest33.readyState==4) && (oRequest33.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest33.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest33.send(null);

      var iQryId = 453;   // - 453-Projetos que participo
      var oRequest34 = foCreateRequest();
      oRequest34.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest34.onreadystatechange = function() {
         if ((oRequest34.readyState==4) && (oRequest34.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest34.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest34.send(null);

      var iQryId = 301;   // - 301-Treinamentos que participo
      var oRequest35 = foCreateRequest();
      oRequest35.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest35.onreadystatechange = function() {
         if ((oRequest35.readyState==4) && (oRequest35.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest35.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest35.send(null);

      var iQryId = 303;   // - 303-Treinamentos que ministro
      var oRequest36 = foCreateRequest();
      oRequest36.open("GET","pTots2.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual(),true);
      oRequest36.onreadystatechange = function() {
         if ((oRequest36.readyState==4) && (oRequest36.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest36.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest36.send(null);


   }
}

function flTots3() {
////////////////////  // vaga carga
   
   if (
        ((this.sDDSFile=='dd_files/OOp.dda') && (this.sDDSTag=='OOp_6'))
      ||((this.sDDSFile=='dd_files/Ferias.dda') && (this.sDDSTag=='Padrao_2'))
      ) {
      var poObj = this;

      if ((this.sDDSFile=='dd_files/Ferias.dda') && (this.sDDSTag=='Padrao_2')) {
         var jTipo = 1;
      } else {
         var jTipo = 0;
      }

      var iQryId = 10;   // agendamentos_resp
      var oRequest1 = foCreateRequest();
      oRequest1.open("GET","pTots3.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual()+'&jTipo='+jTipo,true);
      oRequest1.onreadystatechange = function() {
         if ((oRequest1.readyState==4) && (oRequest1.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest1.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest1.send(null);

      var iQryId = 42;   // tarefas enviadas em andamento - pPId=42
      var oRequest10 = foCreateRequest();
      oRequest10.open("GET","pTots3.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual()+'&jTipo='+jTipo,true);
      oRequest10.onreadystatechange = function() {
         if ((oRequest10.readyState==4) && (oRequest10.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest10.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest10.send(null);

      var iQryId = 45;   // tarefas recebidas em andamento - pPId=45
      var oRequest13 = foCreateRequest();
      oRequest13.open("GET","pTots3.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual()+'&jTipo='+jTipo,true);
      oRequest13.onreadystatechange = function() {
         if ((oRequest13.readyState==4) && (oRequest13.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest13.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest13.send(null);

      var iQryId = 71;   // equipamentos 1o 2o resp - pPId=71
      var oRequest19 = foCreateRequest();
      oRequest19.open("GET","pTots3.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual()+'&jTipo='+jTipo,true);
      oRequest19.onreadystatechange = function() {
         if ((oRequest19.readyState==4) && (oRequest19.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest19.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest19.send(null);

      var iQryId = 72;   // pops 1o 2o resp - pPId=72
      var oRequest20 = foCreateRequest();
      oRequest20.open("GET","pTots3.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual()+'&jTipo='+jTipo,true);
      oRequest20.onreadystatechange = function() {
         if ((oRequest20.readyState==4) && (oRequest20.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest20.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest20.send(null);

      var iQryId = 73;   // pastas - pPId=73
      var oRequest21 = foCreateRequest();
      oRequest21.open("GET","pTots3.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual()+'&jTipo='+jTipo,true);
      oRequest21.onreadystatechange = function() {
         if ((oRequest21.readyState==4) && (oRequest21.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest21.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest21.send(null);

      var iQryId = 74;   // comissoes - pPId=74
      var oRequest22 = foCreateRequest();
      oRequest22.open("GET","pTots3.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual()+'&jTipo='+jTipo,true);
      oRequest22.onreadystatechange = function() {
         if ((oRequest22.readyState==4) && (oRequest22.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest22.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest22.send(null);

      var iQryId = 75;   // u.fisicas - pPId=75
      var oRequest23 = foCreateRequest();
      oRequest23.open("GET","pTots3.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual()+'&jTipo='+jTipo,true);
      oRequest23.onreadystatechange = function() {
         if ((oRequest23.readyState==4) && (oRequest23.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest23.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest23.send(null);
//

      var iQryId = 8;   // cadeia de comandos - pPid=8
      var oRequest24 = foCreateRequest();
      oRequest24.open("GET","pTots3.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual()+'&jTipo='+jTipo,true);
      oRequest24.onreadystatechange = function() {
         if ((oRequest24.readyState==4) && (oRequest24.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest24.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest24.send(null);

      var iQryId = 94;   // nao conformidade atualizacoes vc eh o relator - pPId=94
      var oRequest27 = foCreateRequest();
      oRequest27.open("GET","pTots3.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual()+'&jTipo='+jTipo,true);
      oRequest27.onreadystatechange = function() {
         if ((oRequest27.readyState==4) && (oRequest27.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest27.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest27.send(null);

      var iQryId = 100;   // 
      var oRequest31 = foCreateRequest();
      oRequest31.open("GET","pTots3.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual()+'&jTipo='+jTipo,true);
      oRequest31.onreadystatechange = function() {
         if ((oRequest31.readyState==4) && (oRequest31.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest31.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest31.send(null);


      var iQryId = 101;   // 
      var oRequest32 = foCreateRequest();
      oRequest32.open("GET","pTots3.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual()+'&jTipo='+jTipo,true);
      oRequest32.onreadystatechange = function() {
         if ((oRequest32.readyState==4) && (oRequest32.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest32.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest32.send(null);

      var iQryId = 451;   // - 451-Projetos que sou responsvel
      var oRequest33 = foCreateRequest();
      oRequest33.open("GET","pTots3.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual()+'&jTipo='+jTipo,true);
      oRequest33.onreadystatechange = function() {
         if ((oRequest33.readyState==4) && (oRequest33.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest33.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest33.send(null);

      var iQryId = 452;   // - 451-Projetos que inclui
      var oRequest34 = foCreateRequest();
      oRequest34.open("GET","pTots3.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual()+'&jTipo='+jTipo,true);
      oRequest34.onreadystatechange = function() {
         if ((oRequest34.readyState==4) && (oRequest34.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest34.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest34.send(null);

      var iQryId = 453;   // - 451-Projetos que participo
      var oRequest35 = foCreateRequest();
      oRequest35.open("GET","pTots3.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual()+'&jTipo='+jTipo,true);
      oRequest35.onreadystatechange = function() {
         if ((oRequest35.readyState==4) && (oRequest35.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest35.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest35.send(null);

      var iQryId = 301;   // - 301-Treinamentos que participo
      var oRequest36 = foCreateRequest();
      oRequest36.open("GET","pTots3.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual()+'&jTipo='+jTipo,true);
      oRequest36.onreadystatechange = function() {
         if ((oRequest36.readyState==4) && (oRequest36.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest36.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest36.send(null);

      var iQryId = 303;   // - 303-Treinamentos que ministro
      var oRequest37 = foCreateRequest();
      oRequest37.open("GET","pTots3.php?sCliPasta="+parent.sCliPasta+"&pCiaLogin="+parent.pCiaLogin+"&iCompany="+parent.iGlobalCompany+"&iQryId="+iQryId+"&sLogin="+parent.aGlobalLogin[1]+"&sOOp="+parent.sGlobal_pOOp+'&pOOp='+poObj.oPai.fiChaveAtual()+'&jTipo='+jTipo,true);
      oRequest37.onreadystatechange = function() {
         if ((oRequest37.readyState==4) && (oRequest37.status==200)) {
            if (poObj.sId!=null) { 
               var sMsg,aMsg,i,iTot,iQry;
               sMsg = oRequest37.responseText;
               aMsg = sMsg.split('~');
               iTot = aMsg[0];
               iQry = aMsg[1];
               i    = poObj.fiChaveTo_iArray(iQry);
               poObj.aGrid[i][1] = '<b><i>'+iTot+'</i></b>';
               poObj.flMontaLinha(i);
               poObj.flAjustaColunas();
            }
         }
      }
      oRequest37.send(null);


   }
}

//
//
// Novas funes - fdy 11/2018
//
//

function flPHP(poCaller,psPHPInclude,paParams,psFunctionCallBack,plJSON,psConfirm) {   // essa funo chama o al_GetPHP.php e capta seu echo
////////////////////////////////////////////////////////////////////////////////////

   if ((psConfirm==null) || (psConfirm.length==0)) var lGo = true;
   else                                            var lGo = confirm(psConfirm);

   if (lGo) {

      var sPHP = 'al_GetPHP.php';
      //var sAncestrais = fsChavesAncestrais(poCaller);
      //alert('sAncestrais='+sAncestrais);
      if ((poCaller!=null) && (poCaller.sTipo=='grid')) {
         var sAncestrais = fsChavesAncestrais(poCaller);
         var aAncestrais = fsChavesAncestrais(poCaller).split('/');
         var aIrmasTias = poCaller.faIrmasTias();
      } else {
         var sAncestrais = 0;
         var aAncestrais = new Array();
         var aIrmasTias  = new Array();
      }


      var oJSON_Par = {};
      oJSON_Par['sCliPasta'  ] = parent.sCliPasta;
      oJSON_Par['sPHPInclude'] = psPHPInclude;
      oJSON_Par['sLogin'     ] = parent.aGlobalLogin[1];
      oJSON_Par['sAncestrais'] = sAncestrais;
      oJSON_Par['aIrmasTias' ] = aIrmasTias;
      if (paParams.length>0) oJSON_Par['aParams'] = paParams;
      //console.log('parent.sCliPasta='+parent.sCliPasta+', psPHPInclude='+psPHPInclude+', parent.aGlobalLogin[1]='+parent.aGlobalLogin[1]+', aAncestrais='+aAncestrais+', aIrmasTias='+aIrmasTias+', paParams='+paParams);
      //console.log('oJSON_Par='+oJSON_Par);

      //$.post("ecoRedeLerAmigosParaMencionar.php",{pLogin : pLogin, pPub : ppPub, pComent : ppComent},function(sEcho, lStatus) {
      $.post(sPHP,oJSON_Par,function(sEcho, lStatus) {
         //alert('sEcho='+sEcho+'\nlStatus='+lStatus);
         //console.log('sEcho='+sEcho+'\nlStatus='+lStatus);

         if (typeof psFunctionCallBack=='string') sFunctionCallBack=window[psFunctionCallBack];
         else                                     sFunctionCallBack=       psFunctionCallBack ;
         if (plJSON) {   // o retorno  jSON
            aEcho = JSON.parse(sEcho);

      //console.log('00-'+typeof psFunctionCallBack);
            if (sFunctionCallBack!=null) {
      //console.log('11');
               if (typeof sFunctionCallBack=='function') {
      //console.log('22');
                  sFunctionCallBack(poCaller,aEcho,paParams);
               } else {
      //console.log('33');
                  flPHP_Retorno(poCaller,aEcho,paParams);
               }
            } else {
               //console.log('44');
               flPHP_Retorno(poCaller,aEcho,paParams);
            }

         } else {        // o retorno no  JSON  por separador prprio
      //console.log('0-'+typeof psFunctionCallBack);
            if (sFunctionCallBack!=null) {
      //console.log('1');
               if (typeof sFunctionCallBack=='function') {
      //console.log('2');
                  sFunctionCallBack(poCaller,sEcho,paParams);
               } else {
      //console.log('3');
                  flPHP_Retorno(poCaller,sEcho,paParams);
               }
            } else {
               //console.log('4');
               flPHP_Retorno(poCaller,sEcho,paParams);
            }
         }
      });
   }
}

function flPHP_Ret_RefreshLin(poCaller,psEcho,paParams) {
/////////////////////////////////////////////////////////
   //alert(psEcho);
   if (psEcho==1) {
      poCaller.flRefreshLinCall()
   } else alert(psEcho);
}

function flPHP_Ret_Refresh(poCaller,psEcho,paParams) {
//////////////////////////////////////////////////////
   //alert(psEcho);
   if (psEcho==1) {
      poCaller.flRefreshCall()
   } else alert(psEcho);
}

function flSIM_Proc1_Retorno(poCaller,psEcho,paParams) {
   alert(1);
}
function flPHP_Retorno(poCaller,sEcho,paParams) {
   alert('sEcho='+sEcho);
}

function flRefreshArray(poObj,psDados) {
////////////////////////////////////////
   //console.log('poObj.sId='+poObj.sId+', psDados='+psDados);
   var aTmp      = psDados.split(',');
   var sNomeArr  = '';
   var sNomeJrr  = '';
   var oJSON_Par = {};
   oJSON_Par['sCliPasta']   = parent.sCliPasta;
   oJSON_Par['sPHPInclude'] = 'al_GetTelaArray_flRefreshArray.php';
   oJSON_Par['sLogin'     ] = parent.aGlobalLogin[1];
   oJSON_Par['psDados'    ] = psDados;   // aEvento-jEvento,pEvento,jCCusto - s vai ter uma var tipo 'a' (a 1a), s vai ter uma var tipo 'p' (a 2a), pode ter mais de uma var tipo 'j' (da 3a em diante)
   for (var i in aTmp) {
      var sVar = aTmp[i].trim();
      var sTyp = fsGetVarType(sVar)
//console.log('sTyp='+sTyp+', sVar='+sVar);
      if (sTyp=='a') {   // a 1a (aEvento-jEvento)
         var aTm2 = sVar.split('-');   // aEvento-jEvento
         sNomeArr = aTm2[0].trim();    // aEvento
         sNomeJrr = aTm2[1].trim();    // jEvento
         oJSON_Par['sNomeArray'] = sNomeArr;
         var sVarQryOrig = 's'+sNomeArr.substr(1,sNomeArr.length-1)+'_sQryOrig';
         var sQryOrig    =  poObj.fsGetVar(sVarQryOrig);
         //console.log('sVarQryOrig='+sVarQryOrig);
         //console.log('sQryOrig='+sQryOrig);
         oJSON_Par['sQryOrig'] = sQryOrig;
      } else if (sTyp=='p') {   // a 2a (pEvento)
         var pCnt = poObj.fsGetVar(sVar);
         oJSON_Par[sVar] = pCnt;
         //console.log('sVar='+sVar+', sTyp='+sTyp+', pCnt='+pCnt);
      } else {   // as demais sero 'j' (jCCusto)
         var sNomeArr_pPId = 'a'+sVar.substr(1,sVar.length-1)+'_pPId';   // aCCusto_pPId
         var sContArr_pPId = poObj.fsGetVar(sNomeArr_pPId);              // 11,12,13,14...
         var aArr_pPId     = sContArr_pPId.split(',')                    // [0]=>11,[1]=>12,[2]=>13,[3]=>14...
         var jCnt = poObj.fsGetVar(sVar);                                // sVar=jCCusto, jCnt=3 por exemplo
         var pCnt = aArr_pPId[jCnt]                                      // [3]=>14
         var sVar_p = 'p'+sVar.substr(1,sVar.length-1);                  // pCCusto
         oJSON_Par[sVar_p] = pCnt;
         console.log('sVar='+sVar+'\nsTyp='+sTyp+'\nsNomeArr_pPId='+sNomeArr_pPId+'\nsContArr_pPId='+sContArr_pPId+'\njCnt='+jCnt+'\npCnt='+pCnt+'\nsVar_p='+sVar_p);
      }
   }
   //console.log('oJSON_Par='+oJSON_Par);
   $.post('al_GetTelaArray.php',oJSON_Par,function(sEcho, lStatus) {
      //console.log('sEcho='+sEcho+'\nlStatus='+lStatus);
      //aEcho = JSON.parse(sEcho);
      flRefreshArray_Ret(poObj,sNomeArr,sNomeJrr,sEcho);
   });
}

function flRefreshArray_Ret(poCaller,psNomeArr,psNomeJrr,psEcho) {
//////////////////////////////////////////////////////////////////
   //alert('flRefreshArray_Ret');
   //console.log('psNomeArr='+psNomeArr+', psNomeJrr='+psNomeJrr);
   var aTmp  = psEcho.split('^');   // separador usado em al_GetTelaArray.php
   var iCnt  = aTmp[0];   // Se iCnt=2 no tem o array _iVAt (pPId,sOption), se iCnt=3 tem (pPId,iVAt,sOption).
   var sSql  = aTmp[1];
   var sTmp1 = aTmp[2];   // pPId
   var sTmp2 = aTmp[3];   // iVAt ou sConteudo
   var sTmp3 = aTmp[4];   // sContedo ou vazio
   var aTmp1 = sTmp1.split(',');
   var aTmp2 = sTmp2.split(',');
   var aTmp3 = sTmp3.split(',');
   //console.log('iCnt='+iCnt);
   //console.log('sSql='+sSql);
   //console.log('sTmp1='+sTmp1);
   //console.log('sTmp2='+sTmp2);
   //console.log('sTmp3='+sTmp3);

   var sNomePrr          = 'p'+psNomeJrr.substr(1,psNomeJrr.length-1);
   var sNomeArr_pPId     = psNomeArr+'_pPId';
   var sNomeArr_iVAt     = psNomeArr+'_iVAt';
   var sNomeSrr          = 's'+psNomeJrr.substr(1,psNomeJrr.length-1);
   var sNomeArr_sQry     = sNomeSrr+'_sQry';
   var sNomeArr_sQryOrig = sNomeSrr+'_sQryOrig';
   //console.log('sNomePrr='+sNomePrr+', sNomeArr_pPId='+sNomeArr_pPId+', sNomeArr_iVAt='+sNomeArr_iVAt+', sNomeSrr='+sNomeSrr+', sNomeArr_sQry='+sNomeArr_sQry+', sNomeArr_sQryOrig='+sNomeArr_sQryOrig);

   var sContPrr          = poCaller.fsGetVar(sNomePrr);
   var sContArr_pPId     = poCaller.fsGetVar(sNomeArr_pPId);
   var sContArr_iVAt     = poCaller.fsGetVar(sNomeArr_iVAt);
   var sContArr_sQry     = poCaller.fsGetVar(sNomeArr_sQry);
   var sContArr_sQryOrig = poCaller.fsGetVar(sNomeArr_sQryOrig);
   //console.log('sContPrr='+sContPrr+'\n sContArr_pPId='+sContArr_pPId+'\n sContArr_iVAt='+sContArr_iVAt+'\n sContArr_sQry='+sContArr_sQry+'\n sContArr_sQryOrig='+sContArr_sQryOrig);

   var sContArr = poCaller.fsGetVar(psNomeArr);
   var sContJrr = poCaller.fsGetVar(psNomeJrr);
   //console.log('sContArr='+sContArr+'\n sContJrr='+sContJrr);

   poCaller.flResetVar(psNomeJrr,0);
   poCaller.flResetVar(sNomePrr,0);
   poCaller.flResetVar(sNomeArr_sQry,sSql);
   poCaller.flResetVar(sNomeArr_pPId,sTmp1);
   if (iCnt==2) {
      poCaller.flResetVar(psNomeArr,sTmp2);
   } else {
      poCaller.flResetVar(sNomeArr_iVAt,sTmp2);
      poCaller.flResetVar(psNomeArr,sTmp3);
   }

   var sContPrr          = poCaller.fsGetVar(sNomePrr);
   var sContArr_pPId     = poCaller.fsGetVar(sNomeArr_pPId);
   var sContArr_iVAt     = poCaller.fsGetVar(sNomeArr_iVAt);
   var sContArr_sQry     = poCaller.fsGetVar(sNomeArr_sQry);
   var sContArr_sQryOrig = poCaller.fsGetVar(sNomeArr_sQryOrig);
   //console.log('sContPrr='+sContPrr+'\n sContArr_pPId='+sContArr_pPId+'\n sContArr_iVAt='+sContArr_iVAt+'\n sContArr_sQry='+sContArr_sQry+'\n sContArr_sQryOrig='+sContArr_sQryOrig);

   var sContArr = poCaller.fsGetVar(psNomeArr);
   var sContJrr = poCaller.fsGetVar(psNomeJrr);
   //console.log('sContArr='+sContArr+'\n sContJrr='+sContJrr);

   var sIdEle = psNomeArr+'-'+psNomeJrr+'_'+poCaller.sId;
   //console.log('sIdEle='+sIdEle);
   //console.log('document.getElementById(sIdEle).id='+document.getElementById(sIdEle).id);

   var aContArr = sContArr.split(',');
   $('#'+sIdEle).empty();
   for (var i in aContArr) {
      if (i==0) var sStr="<option value='"+i+"' selected>"+fsTrim(aContArr[i])+"</option>";
      else      var sStr="<option value='"+i+"'         >"+fsTrim(aContArr[i])+"</option>";
      $('#'+sIdEle).append(sStr);      
   }
}

function flSIM_CargaPOLCtr2_CallBack(poCaller,psEcho,paParams) {
////////////////////////////////////////////////////////////////
   //alert('psEcho='+psEcho);
   var aTmp = new Array();
       aTmp = psEcho.split('^');

   var iVigMesRes    = aTmp[ 0];
   var iVigMesCom    = aTmp[ 1];
   var iVigMesRur    = aTmp[ 2];
   var iPerReaj      = aTmp[ 3];
   var pIndReaj      = aTmp[ 4];
   var fIndReaj      = aTmp[ 5];
   var sCodIndReaj   = aTmp[ 6];
   var sIndReaj      = aTmp[ 7];
   var jCobr         = aTmp[ 8];
   var nTarBanco     = aTmp[ 9];
   var iDiasPgtBanco = aTmp[10];
   var jBol          = aTmp[11];
   var iDiaBol       = aTmp[12];
   var jBon          = aTmp[13];
   var iDiaBon       = aTmp[14];
   var jMul          = aTmp[15];
   var iDiaMul       = aTmp[16];
   var nTxMulta      = aTmp[17];
   var nTxJuros      = aTmp[18];
   var pIndMonet     = aTmp[19];
   var fIndMonet     = aTmp[20];
   var sCodIndMonet  = aTmp[21];
   var sIndMonet     = aTmp[22];
   var jRecisTpCalc  = aTmp[23];
   var iRecisNrMeses = aTmp[24];
   var nRecisPCtr    = aTmp[25];
   var iRecisIsento  = aTmp[26];
   var lExpirar      = aTmp[27];  

   //poCaller.flResetVar('iVigMesRes'   ,iVigMesRes   );
   //poCaller.flResetVar('iVigMesCom'   ,iVigMesCom   );
   //poCaller.flResetVar('iVigMesRur'   ,iVigMesRur   );
   var lRes = fsGetVar('lRes');
   var lCom = fsGetVar('lCom');
   var lRur = fsGetVar('lRur');
   //console.log('lRes='+lRes+', lCom='+lCom+', lRur='+lRur);

   if      (lRes) poCaller.flResetVar('iVig',iVigMesRes);
   else if (lCom) poCaller.flResetVar('iVig',iVigMesCom);
   else if (lRur) poCaller.flResetVar('iVig',iVigMesRur);


   poCaller.flResetVar('iPerReaj'     ,iPerReaj     );
   poCaller.flResetVar('pIndReaj'     ,pIndReaj     );
   poCaller.flResetVar('fIndReaj'     ,fIndReaj     );
   poCaller.flResetVar('sCodIndReaj'  ,sCodIndReaj  );
   poCaller.flResetVar('sIndReaj'     ,sIndReaj     );
   poCaller.flResetVar('jCobr'        ,jCobr        );
   poCaller.flResetVar('nTarBanco'    ,nTarBanco    );
   poCaller.flResetVar('iDiasPgtBanco',iDiasPgtBanco);
   poCaller.flResetVar('jBol'         ,jBol         );
   poCaller.flResetVar('iDiaBol'      ,iDiaBol      );
   poCaller.flResetVar('jBon'         ,jBon         );
   poCaller.flResetVar('iDiaBon'      ,iDiaBon      );
   poCaller.flResetVar('jMul'         ,jMul         );
   poCaller.flResetVar('iDiaMul'      ,iDiaMul      );
   poCaller.flResetVar('nTxMulta'     ,nTxMulta     );
   poCaller.flResetVar('nTxJuros'     ,nTxJuros     );
   poCaller.flResetVar('pIndMonet'    ,pIndMonet    );
   poCaller.flResetVar('fIndMonet'    ,fIndMonet    );
   poCaller.flResetVar('sCodIndMonet' ,sCodIndMonet );
   poCaller.flResetVar('sIndMonet'    ,sIndMonet    );
   poCaller.flResetVar('jRecisTpCalc' ,jRecisTpCalc );
   poCaller.flResetVar('iRecisNrMeses',iRecisNrMeses);
   poCaller.flResetVar('nRecisPCtr'   ,nRecisPCtr   );
   poCaller.flResetVar('iRecisIsento' ,iRecisIsento );
   poCaller.flResetVar('lExpirar'     ,lExpirar     );

}

//sim_IMV.dda -> flInc("dd&#95_files/silim&#95_TipoImoveis.dda","Padrao&#95_1",oTelaDefault.iSss,oTelaDefault,"flRecarregarCampoArraySelect(oTelaDefault,'aImvTipo')")
function flRecarregarCampoArraySelect(poCaller,psCampo,psIndice) {   // isso pode ir pro pTela2.js
//////////////////////////////////////////////////////////////////
   //alert('flRecarregarCampoArraySelect-poCaller.sId='+poCaller.sId+', psCampo='+psCampo);
   var sCampo        = psCampo;
   var sNomeCampo    = sCampo+'-'+psIndice+'_'+poCaller.sId;
   var sCampoQry     = 's'+sCampo.substr(1,sCampo.length-1)+'_sQry';
   var sNomeCampoQry = poCaller.sId+'_'+sCampoQry;
   var sQry          = poCaller.fsGetVar(sCampoQry);
   //alert('sCampo='+sCampo+'\nsNomeCampo='+sNomeCampo+'\nsCampoQry='+sCampoQry+'\nsNomeCampoQry='+sNomeCampoQry+'\nsQry='+sQry);
   
   var aParams = new Array();
   aParams.push(sCampo,sNomeCampo,sCampoQry,sNomeCampoQry,sQry,psIndice);
   flPHP(poCaller,'RecarregarCampoArraySelect_IncludeCallBack',aParams,flRecarregarCampoArraySelect_CallBack,true);
}
//
function flRecarregarCampoArraySelect_CallBack(poCaller,paEcho,paParams) {
//////////////////////////////////////////////////////////////////////////
   s_pPId          = paEcho[0]+'';   // para forar a virar uma string, no entendi bem porq nao seria mas o spli abaixo deu datatype erro function split (*)
   s_sDes          = paEcho[1]+'';   // idem
   sCampo          = paParams[0];   // aImvTipo
   sNomeCampo      = paParams[1];   // oTela2_aImvTipo
   sNomeIndice     = paParams[5];
   sCampo_pPId     = paParams[0]+'_pPId'; 
   sNomeCampo_pPId = sNomeCampo+'_pPId';

   poCaller.flSetVar(sCampo,s_sDes);
   poCaller.flSetVar(sCampo_pPId,s_pPId);
  

   //console.log(sCampo+'-'+s_sDes);
   //console.log(sCampo_pPId+'-'+s_pPId);

   //console.log('sCampo='+sCampo);
   //console.log('sNomeCampo='+sNomeCampo);

   //console.log('sNomeIndice='+sNomeIndice);
   //console.log('sCampo_pPId='+sCampo_pPId);
   //console.log('sNomeCampo_pPId='+sNomeCampo_pPId);

   var a_pPId = s_pPId.split(',');   // (*)
   var a_sDes = s_sDes.split(',');   // (*)
   var i_sDes = a_sDes.length;
   var iMax=0*1;   // para forar a ser um numrico
   for (var i=0; i<i_sDes; i++) if (iMax*1<a_pPId[i]*1) iMax=a_pPId[i]*1;   // *1 para forar ser um numero
   //console.log('iMax='+iMax);
   
   $('#'+sNomeCampo).empty();
   var jIndice=0;
   for (var i=0; i<i_sDes; i++) {
      if (a_pPId[i]==iMax) jIndice=i;
      $('#'+sNomeCampo).append('<option value="'+a_pPId[i]+'"         >'+a_sDes[i]+'</option>');
   }
   poCaller.flResetVar(sNomeIndice,jIndice);

   //this.flResetVar(sInd,''+poObj.selectedIndex);
   //alert('flRecarregarCampoArraySelect_CallBack - s_pPId='+s_pPId+', s_sDes='+s_sDes);
}
//
//
// callback fesc incluir 
//
//
function flRecarregarCampoFEsc(psDDSFile,psDDSTag,psVarIda,psVarVolta,poCaller,poEdicao) {
////////////////////////////////////////////////////////////////////////////////////////////////////
// Esse trecho " igual" a um trecho da funo flEncerraGrid X flRecarregarCampoFuncaoEsc (chamada do dda) que trata o retorno da fesc. 
// Os 2 devem andar sincronizados
   //alert('flRecarregarCampoFEsc');
   var sDDSFile = fsReplace(psDDSFile,';','_');
   var sDDSTag  = fsReplace(psDDSTag,';','_');
   var sVarFoco = psVarIda.split(',')[0];
   //alert('psDDSFile='+psDDSFile+'\npsDDSTag='+psDDSTag+'\nsDDSFile='+sDDSFile+'\nsDDSTag='+sDDSTag+'\npsVarIda='+psVarIda+'\npsVarVolta='+psVarVolta+'\npoCaller='+poCaller.sId+'\npoEdicao='+poEdicao.sId+'\nsVarFoco='+sVarFoco);
   poCaller.iEscId      = poEdicao.pLastPId;
   poCaller.iEscIdIrma1 = 0;
   var oRequest = foCreateRequest();
   //if ((poCaller.oPai!=null)&&(poCaller.oPai.sTipo=='grid')) sIrmasTias = '';
   //else sIrmasTias = '';
   sIrmasTias = '';
   // carregando sVarsRetornoFuncaoEsc - inicio
   var aVars = psVarIda.split(',');
   var sVars = '';
   for (var i in aVars) {
      sVar = fsTrim(aVars[i]);
      sContent = fsTrim(poCaller.fsGetVar(sVar));
      sVars += sVar + '=' + sContent + '~';
      sVars += 'p'+i+ '=' + sContent + '~';
   }
   poCaller.sVarEsc = sVarFoco;
   poCaller.sVarsRetornoFuncaoEsc = psVarVolta;
   sVars = sVars.substr(0,sVars.length-1);
   poCaller.sVarsContextEsc = sVars;
   // carregando sVarsRetornoFuncaoEsc - final
   sVars = fsReplace(poCaller.sVarsContextEsc,'&','[E_COMERCIAL]');
   oRequest.open("GET","al_GetDDG_RetFEsc.php?sCliPasta="+parent.sCliPasta+"&sFileDDS="+sDDSFile+"&sTagDDS="+sDDSTag+"&sTDoc="+fsTDocsAncestrais(poCaller.oPai)+"&sMnemTDoc="+fsMnemTDocsAncestrais(poCaller.oPai)+"&sAncestrais="+fsChavesAncestrais(poCaller.oPai)+"&sIrmasTias="+sIrmasTias+"&sEscId="+poCaller.iEscId+"&sEscIdIrma1="+poCaller.iEscIdIrma1+"&sLogin="+parent.aGlobalLogin[1]+"&sRoot="+parent.sGlobalRoot+"&spOOp="+parent.sGlobal_pOOp+"&sVars="+sVars+"&iDesenvolvedor="+parent.iGlobalDesenvolvedor+"&iGlobalKeyUser="+parent.iGlobalKeyUser+'&iTimeLogin='+iGlobalTimeLogin,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         if (parent.lEmailUsuLiberarMsgPlat==1) alert('Retorno das Vars da FuncaoEsc (flRecarregarCampoFEsc)='+sMsg);
         //if (parent.lEmailUsuLiberarMsgPlat==1) flModal('<font color=blue>Retorno das Vars da FuncaoEsc (flRecarregarCampoFEsc)</font>',sMsg);
         if ((poCaller!=null)&&(poCaller.lEnded==false)) poCaller.flVarsRetornoFuncaoEsc(sMsg);
      }
   }
   flIconeProcess(poCaller.iSss,1);
   flEnableScreen(poCaller.iSss,false);
   oRequest.send(null);
}
//
function flInserirCEP(poCaller) {
/////////////////////////////////

   var sCEP = poCaller.fsGetVar('sCEP');
   poCaller.lTirarGiffEsc_NoRetornoDaFesc=false;

   var oRequest = foCreateRequest();
   oRequest.open("GET","processos/Sys_CEP.php?sCliPasta="+parent.sCliPasta+"&sLogin="+parent.aGlobalLogin[1]+"&sCEP="+sCEP,true);
   oRequest.onreadystatechange = function() {
      if ((oRequest.readyState==4) && (oRequest.status==200)) {
         sMsg = oRequest.responseText;
         var aRet = sMsg.split('~');
         if (aRet[0]==0) alert(aRet[1]);
         //if (aRet[0]==0) flModal('<font color=red>Sistema</font>',aRet[1]);

         if (aRet[0]==1) {
            poCaller.flResetVar('pCep'   ,aRet[1]);
            poCaller.flResetVar('sCEP'   ,aRet[2]);
            poCaller.flResetVar('sLog'   ,aRet[3]);
            poCaller.flResetVar('sBai'   ,aRet[4]);
            poCaller.flResetVar('sCidade',aRet[5]);
            poCaller.flResetVar('sSigla' ,aRet[6]);
            poCaller.flResetVar('pCid'   ,aRet[7]);
            poCaller.flResetVar('pUF'    ,aRet[8]);
            poCaller.flResetVar('pPais'  ,aRet[9]);
            poCaller.flResetVar('sPais'  ,aRet[10]);
         }
         document.getElementById('fEsc_'+poCaller.sVarEsc+'_'+poCaller.sId).style.display="none"; // some
         poCaller.lTirarGiffEsc_NoRetornoDaFesc=true;
         flEnableScreen(poCaller.iSss,true);
      }
   }

   flEnableScreen(poCaller.iSss,false);
   oRequest.send(null);
}
//