<?php
//header( "Content-type: text/html; charset=utf-8" );   
//  ** MODULO DE PESQUISA CONFIGURAÇÃO **
//
$sCorBarraInf = '#E8E3CE';

$sNomeIdJanG = 'iJan_EdtCfgTelId';

//
// Criar objeto Janela
$oJanelaApp = New R_Janela();
$oJanelaApp->sIdObj  = $sNomeIdJanG; 
$oJanelaApp->nTop    = 10;
$oJanelaApp->nLeft   = 0;
$oJanelaApp->nWidth  = 995;   // Largura
$oJanelaApp->nHeight = 0;     // Altura
$oJanelaApp->nLeft  += ($nTela_W/2)-($oJanelaApp->nWidth/2);
$oJanelaApp->sTitulo = 'Tela Terminais Autorizados App';
$oJanelaApp->sJavKeyDown = "return Car_".$sNomeAcesso."5.Teclas_F(this,event);";
//    
//$oJanelaApp->sJavKeyDown = "return frames['".$sNomeQdrH."_2'].Teclas_F(this,event);";
$sJavaTravarJ = "parent.document.getElementById('".$oJanelaApp->sIdObj."_Travar').style.visibility='visible'; parent.Disabled_In_Elems('".$oJanelaApp->sIdObj."',true);";
//

//$aSessao[$sNomeAcesso.'_Vars']['Ant_Jan_Id'] = $sNomeIdJan1;

$oJanelaApp->sJavOnClickF =
   $sJavaTravarJ.
   "parent.document.forms.fmPCfgTelId.acao.value='FECHAR'; ".
   "parent.document.forms.fmPCfgTelId.submod.value='".$sSubModulo."';".
   "parent.document.forms.fmPCfgTelId.submit();".
   "";


$oListaApp = New Pad_GridPesq();
$oListaApp->bUsarSoMatriz = True;
$oListaApp->sNomeTabela   = 'cad_terminal_app';
$oListaApp->sIdObjTabela  = 'iQdr_TabelaApp';
$oListaApp->GLstCampos( 'APP_DESCRITIVO,Descritivo,60px;'.
                        'APP_ID_TERMINAL,ID Terminal,350px;'.
                        'APP_N_TERMINAL,Número Terminal,70px;'.
	   				    'APP_CAD_DTA_HOR,Data do Cadastro,150px;'.
					    'APP_LOG_DTA_HOR,Data do ùltimo Login,150px;'. 
					    'APP_ULT_OPE_LOG,Último que logou,150px;'
					  );
$oListaApp->sCampoIndice = 'APP_CODIGOI';
$oListaApp->nWidth  = $oJanelaApp->nWidth;
$oListaApp->nHeight = 150;   // Altura
$oListaApp->sCampoOnClick  = "Car_".$sNomeAcesso."5.P_Sel(<NUMCAM>); ";
                          

$oListaApp->sLinhaOnClick  = "Car_".$sNomeAcesso."5.PRow_Sel(<QTDCOL>,<SELLIN>);";
$oListaApp->sJavSelectReg = "sSelIndice = S_Indice;".
                            "if (parseInt(sSelIndice)>0) {".
	                           "parent.document.getElementById('CfgSis_BT_Rmv').style.display='inline-block';".
							   "parent.document.getElementById('CfgSis_BT_Edt').style.display='inline-block';".
	      				    "} ".
                           'parent.document.getElementById("iECadETrm_iLstTrm").focus();';
   

$sTRM_Descritivo =utf8_decode(@$_POST['TRM_Descritivo']);
$sTRM_IDTrm      =@$_POST['TRM_IDTrm'];
$nTRM_NumTrm     =@$_POST['TRM_NumTrm'];



$a_ListaApp = ARRAY();

$sSQLQuery =
   "SELECT ".
      "APP_CODIGOI, ".
    "APP_DESCRITIVO, ".
    "APP_ID_TERMINAL, ".
    "APP_N_TERMINAL,  ".
    "APP_CAD_DTA_HOR, ".
    "APP_LOG_DTA_HOR, ".
    "APP_ULT_OPE_LOG  ".
   "FROM cad_terminal_app ".
   ";";
   
   $RowsT = MYSQL_QUERY( $sSQLQuery ) Or Die( $sSQLQuery.'<br>'.MYSQL_ERROR() );
   While ($RowT = MYSQL_FETCH_ARRAY($RowsT)) {
      $a_ListaApp[] = $RowT;
   }

If ( $sAcao=="LISTAR_APP" ) {
  
   $oListaApp->aLstItensTab = $a_ListaApp;
   //
   // Tabela dos telefones
   $sRet_TelaJ_HTML = $oListaApp->MontaTabelaHTML();
   // Java
   $sRet_Javs .=
      "parent.document.getElementById('CfgSis_BT_Rmv').style.display='none';".
	  "parent.document.getElementById('CfgSis_BT_Edt').style.display='none';".
      "var oQdr_TabelaApp = parent.document.getElementById('".$oListaApp->sIdObjTabela."');".
      'oQdr_TabelaApp.innerHTML = '.JAVA_CharCode_Mini($sRet_TelaJ_HTML).';'.
      'parent.Car_'.$sNomeAcesso.'5.'.$oListaApp->sNomeTabela.'_Rowsel = 1;'.
      '';
   // Java posterior
   $sRet_JavsPos .=
      'parent.Car_'.$sNomeAcesso.'5.P_Sel(0);'.
      '';
   $sRet_TelaJ_HTML = '';


 // GRID COM IPS E PATHS
//
} ElseIf ( $sAcao=="ADICIONA_APP" ) {
   $bTrava = False;
   $sMensagem_Trava = '';
   $bIncluir = True;
   $sTRM_Descritivo = utf8_decode(@$_POST['TRM_Descritivo']);
   $sTRM_IDTrm      = @$_POST['TRM_IDTrm'];
   $nTRM_NumTrm     = @$_POST['TRM_NumTrm'];
   
   If ( STRLEN($sTRM_Descritivo)>0 ){
      $sTRM_Descritivo = SUBSTR($sTRM_Descritivo,STRPOS($sTRM_Descritivo,";"));
	 
	  If(SUBSTR($sTRM_Descritivo,0,1)==';'){
		 $bTrava = True;
         $sMensagem_Trava = 'Erro de configuração App: <br> Descritivo Com ; ponto e virgula no final do campo <br> ou Descritivo informado maior que permitido';
	  } 
   	   
      If ( STRLEN($sTRM_IDTrm)>0 ){
	     $sTRM_IDTrm = SUBSTR($sTRM_IDTrm,STRPOS($sTRM_IDTrm,";"));
		 If(SUBSTR($sTRM_IDTrm,0,1)==';'){
		    $bTrava = True;
            $sMensagem_Trava = 'Erro de configuração App: <br> ID Com ; ponto e virgula no final do campo <br> ou ID informado maior que permitido';
	     } 
	  }   
	  
	  If( STRLEN($sTRM_IDTrm)==0 ) {
	     $bTrava = True;
         $sMensagem_Trava .= '<br> Para adicionar Terminal <br>necessário preencher também ID ';
		  
	  }
	  If(  $nTRM_NumTrm ==0 ) {
	     $bTrava = True;
         $sMensagem_Trava .= '<br> Para adicionar <br>necessário preencher também Terminal';
		 
	  }
	
   }
   //verifica se já não existe id ou terminal igual na lista
   If (! $bTrava) {
      ForEach ( $a_ListaApp as $nPos =>$sListaApp ) {
           
		   If(TRIM($sTRM_IDTrm)==TRIM($sListaApp[2])){
		     $bTrava = True;
             $sMensagem_Trava = '<br> Já existe uma(ID) com essa numeração';     
		   } ElseIf(TRIM($nTRM_NumTrm)==TRIM(($sListaApp[3]+0))){
		     $bTrava = True;
             $sMensagem_Trava = '<br> Já existe um (Terminal) com essa numeração';     
		   }
   
     }
   }
   
   
   //
   If ($bTrava) {
      $sRet_Javs .= "parent.JanEspera(false); ".				    
	                Info_Evento($sMensagem_Trava,1);
   }

   If (!( $bTrava ) ) { 
	  
	  If ( $bIncluir ) {
         If ( STRLEN($sTRM_Descritivo)>0 ){
		    $aApp = ARRAY(
               "APP_DESCRITIVO"  => $sTRM_Descritivo ,
               "APP_ID_TERMINAL" => $sTRM_IDTrm,
			   "APP_N_TERMINAL"  => $nTRM_NumTrm
		    );
		  
		    $sSQLQuery =
		       "INSERT INTO cad_terminal_app ".
			      "(APP_DESCRITIVO, APP_ID_TERMINAL, APP_N_TERMINAL, APP_CAD_DTA_HOR ) ".
		       "VALUES ".
			      "('".$sTRM_Descritivo."',".SQL_Bin($sTRM_IDTrm).",".$nTRM_NumTrm.",'".DATE("Y-m-d H:i:s")."');";
	        MYSQL_QUERY( $sSQLQuery ) Or Die(MYSQL_ERROR().'<br>'.$sSQLQuery);
		  
            $a_ListaApp[] = $aApp;
		 } 

		 //
         $sRet_Javs .=
		   "parent.document.getElementById('iECadETrm_Descritivo').value='';".
           "parent.document.getElementById('iECadETrm_iLstTrm').value='';".
		   "parent.document.getElementById('iECadETrm_NumTrm').value='';".
           "parent.document.getElementById('iECadETrm_Descritivo').focus();".
           'parent.Car_'.$sNomeAcesso.'5.P_Atu_App();'.
           "";
      }
	  
   }
//
//
} ElseIf ( $sAcao=="APP_RMV" ) {
   $bRemove = True;
   
   $a_ListaAppN = ARRAY();
   If ( $bRemove ) {
      $bRemove = False;
      $a_ListaTmp = ARRAY();
	  
	  $sSQLQuery =
      "SELECT ".
	     "APP_CODIGOI, ".
		 "APP_DESCRITIVO, ".
		 "APP_ID_TERMINAL, ".
		 "APP_N_TERMINAL   ".
	  "FROM cad_terminal_app ".
	  ";";
   
     
	 $RowsT = MYSQL_QUERY( $sSQLQuery ) Or Die( $sSQLQuery.'<br>'.MYSQL_ERROR() );
     While ($RowT = MYSQL_FETCH_ARRAY($RowsT)) {
     	 $a_ListaTmp[] = $RowT;
      }
	  
	  ForEach ( $a_ListaTmp As $nPosicao => $aApp ) {
    	 
		 If ( ( $aApp['APP_CODIGOI'] == ($sTRM_Descritivo+0) ) || ( $aApp['APP_CODIGOI'] == ($sTRM_IDTrm+0) ) || ( $aApp['APP_CODIGOI'] == $nTRM_NumTrm ) ) {
	        $bRemove = True;
     
		    $sSQLQuery =
		       "DELETE FROM cad_terminal_app ".
			       "WHERE APP_CODIGOI='".$aApp['APP_CODIGOI']."';";
	        MYSQL_QUERY( $sSQLQuery ) Or Die(MYSQL_ERROR().'<br>'.$sSQLQuery);
		    

		 
		 } Else {
	        $a_ListaAppN[] = $aApp;
	     }
      }
   }
   If ( $bRemove ) {
      $a_ListaApp = $a_ListaAppN;
      $sRet_Javs .=
         "parent.document.getElementById('iECadETrm_Descritivo').focus();".
         'parent.Car_'.$sNomeAcesso.'5.P_Atu_App();'.
      "";
	
   }
//
   
// FECHAR
} ElseIf ( $sAcao=="FECHAR" ) {
  UNSET( $aSessao[$sNomeAcesso.'_Vars']['ExeJava_Fim_Edt_App'] );
  //
  $sRet_Javs .=
     "parent.document.getElementById('".$sNomeIdJan1."_Travar').style.visibility='hidden';".
	 $sJavaExePos.
 	 "parent.Disabled_In_Elems('".$sNomeIdJan1."',false);";
     "parent.RmElem('".$oJanelaApp->sIdObj."');".
     
	 "";
  //

  
  //
// JANELA TELA PRINCIPAL

} Else {
	
   $aSessao[$sNomeAcesso.'_Vars']['ExeJava_Fim_Edt_App'] =
      "parent.document.getElementById('".$oJanelaApp->sIdObj."_Travar').style.visibility='hidden';".
	  "parent.Disabled_In_Elems('".$oJanelaApp->sIdObj."',false);".
      "parent.document.getElementById('iECadETrm_Descritivo').focus();".
	  'parent.Car_'.$sNomeAcesso.'5.P_Atu_App();'.
	  "";

	
   $sStyle_Font = 'font-size:14px;';	
   // Tela HTML
   
   
   $sRet_TelaJ_HTML =
	    $oJanelaApp->MontaJanHTML(True).
	       '<form name="fmPCfgTelId" accept-charset="utf-8" method="post" action="./car_js.php" target="car_'.$sNomeAcesso.'6">'.
		      '<input name="mod" type="hidden" value="'.$sModulo.'">'.
              '<input name="submod" type="hidden" value="'.$sSubModulo.'">'.
              '<input name="acao" type="hidden" value="">'.
			  '<input name="nomeacs" type="hidden" value="'.$sNomeAcesso.'">'.
	          '<input name="APP_NumCam" type="hidden" value="">'.
		      '<input name="TRM_Descritivo" type="hidden" value="">'.
	          '<input name="TRM_IDTrm" type="hidden" value="">'.
		      '<input name="TRM_NumTrm" type="hidden" value="">'.
			  '<input name="APP_Codigo" type="hidden" value="">'.
		   '</form>'.
	        '<table width="95%" border="0" cellspacing="0" cellpadding="0">'.   
		      '<tr>'.
		         '<td>'.
			        '&nbsp;&nbsp;&nbsp;&nbsp;'.
			     '</td>'.
			     '<td height="20px" align="center" style="font-size:16px;">'.
			     '</td>'.
	          '</tr>'. 
		      '<tr>'.
		         '<td>'.
			     '</td>'.
			     '<td align="left" style="'.$sStyle_Font.'" valign="top">'.
                    'Descritivo: &nbsp; '.
					'<span style="color:#FF0000;font-size:16px;">'.
				       '&nbsp;&nbsp;'.
	       			   '*' .
				    '</span>'.
					'<br>'.
			        '<input id="iECadETrm_Descritivo" name="APP_DESCRITIVO"  maxlength="30" size="32" type="text" style="'.$sStyle_Font.'width:90%;">'.
                    '<br>'.
			     '</td>'.
                 '<td align="left" style="'.$sStyle_Font.'">'.
                    'ID autorizado APP: &nbsp;'.
					'<span style="color:#FF0000;font-size:16px;">'.
				       '&nbsp;&nbsp;'.
	       			   '*' .
				    '</span>'.
                    '<br>'.
			        '<input id="iECadETrm_iLstTrm" name="GARCOMAPP_TRM_AUTORIZADOS" maxlength="60" size="62" type="text" style="'.$sStyle_Font.'width:90%;">'.
			        '<br>'.
			        '<span style="color:#FF0000;">'.
			           'Ex: 3494342B-6E05-4617-B2BD-B2245D002D4A (Sem ; ponto e virgula no final)&nbsp;&nbsp;'.
			        '</span>'.
			     '</td>'.
			     '<td  align="left" style="'.$sStyle_Font.'">'.
                    'Terminal'.
					'<span style="color:#FF0000;font-size:16px;">'.
				       '&nbsp;&nbsp;'.
	       			   '*' .
				    '</span>'.
			        '<br>'.
			        '<input id="iECadETrm_NumTrm" name="APP_NUMERO_TRM" maxlength="4" size="6" type="text" style="'.$sStyle_Font.'width:90%;">'.
			        '<span style="color:#FF0000;">'.
			           '<br>'.
	    		       'Ex: 101&nbsp;&nbsp;'.
			        '</span>'.
			     '</td>'.
			  '</tr>'.
			  '<tr>'.
			     '<td>'.
       	            '&nbsp;&nbsp;'.
                 '</td>'.
			     
			  '</tr>'.
	       '</table>'.
		   
		   $sLinha_Risco.
	       
	       $oListaApp->MontaDivHtml().
	       '<table width="95%" border="0" cellspacing="0" cellpadding="0">'.
	          '<tr>'.
	             '<td height="40px" align="center" style="font-size:16px;">'.
	             '</td>'.
	          '</tr>'.            
           '</table>'.
		   //
           '<table width="100%" style="background-color:'.$sCorBarraInf.';">'.
		      '<tr>'.
                 '<td width="4px" height="40px" align="left">&nbsp;</td>'.
                 '<td align="left">'.
                   
                    HTML_Botao( 3, 'CfgSis_BT_Ad_TelIdApp', 'Car_'.$sNomeAcesso.'5.AdicionaIdApp();'
				                 , 'Adicionar' ,'images/btimg_ativar.png').
				 
				 '</td>'.
                 '<td width="180px" align="center" valign="middle">'.
                    HTML_Botao( 3, 'CfgSis_BT_Edt', "Car_".$sNomeAcesso."5.EdtApp();"
               				     , 'Editar'   ,'images/btimg_editar.png',120).
			        
				 '</td>'.
				 '<td width="180px" align="center" valign="middle">'.
                    HTML_Botao( 3, 'CfgSis_BT_Rmv',"Car_".$sNomeAcesso."5.CRemoverApp();"
                                 , 'Remover','images/btimg_remover.png',120).
                 '</td>'.
				 
				 
				 '<td align="right">'.
                    HTML_Botao( 3, 'objChaNor_BT_Fch', $oJanelaApp->sJavOnClickF
                                 , 'Voltar (ESC)' ,'images/btimg_fechar.png').
                 '</td>'.
                 '<td width="4px" height="40px" align="right">&nbsp;</td>'.				 
              '</tr>'.
		   '</table>'.
		   
  	       //
  	    $oJanelaApp->MontaJanHTML(False);
   //
   // Java anterior
   $sRet_Javs .=
      "function P_Atu_App() {".
         "sSelIndiceC='';".
	     $oListaApp->MontaJavaAgu().
     	 "parent.document.forms.fmPCfgTelId.acao.value='LISTAR_APP'; ".
     	 "parent.document.forms.fmPCfgTelId.APP_NumCam.value=nPesq_CampoSel+''; ".
     	 "parent.document.forms.fmPCfgTelId.submit();".
      '}'.
	  $oListaApp->MontaJavaPri().
	  'function AdicionaIdApp() {'.
	    "var fm = parent.document.forms.fmPCfgTelId;".
		"fm.TRM_Descritivo.value=parent.document.getElementById('iECadETrm_Descritivo').value; ".   //FISCAL_LISTA_IPS
        "fm.TRM_IDTrm.value=parent.document.getElementById('iECadETrm_iLstTrm').value; ". //FISCAL_ECF_LOCARQCFE
        "fm.TRM_NumTrm.value=parent.document.getElementById('iECadETrm_NumTrm').value; ".   //FISCAL_LISTA_IPS SAT
        "fm.acao.value='ADICIONA_APP';".
		 "fm.submit();".
	  '}'.
	  "function RemoverApp() {".
	     "var _fm = parent.document.forms.fmPCfgTelId;".
         "_fm.TRM_Descritivo.value=sSelIndice;".
		 "_fm.TRM_IDTrm.value=sSelIndice;".
		 "_fm.TRM_NumTrm.value=sSelIndice;".
         "_fm.acao.value='APP_RMV'; ".
         "_fm.submit();".
      "}".
      "function CRemoverApp() {".
         "sIdHasFocus='iECadETrm_iLstTrm';".
         "parent.Qdr_Prompt_H(true,'Tem certeza que deseja REMOVER este ID e Terminal ?',".JAVA_CharCode('if (_NUM_BOT_==1) { Car_'.$sNomeAcesso.'5.RemoverApp(); }').",['Sim','Não']); ".
      "}".
	  "function EdtApp() {".
	    "parent.".$sJavaTravarJ.
         "sAntTarget = parent.document.forms.fmPCfgTelId.target;".
         "sAntModulo = parent.document.forms.fmPCfgTelId.mod.value;".
         "sAntSubModulo = parent.document.forms.fmPCfgTelId.submod.value;".
         "sAntNomeAcs = parent.document.forms.fmPCfgTelId.nomeacs.value;".
		 "parent.document.forms.fmPCfgTelId.target = 'car_CFGSIS8';".
		 "parent.document.forms.fmPCfgTelId.mod.value = 'edt_app_telaid';".
         "parent.document.forms.fmPCfgTelId.acao.value='';".
		 "parent.document.forms.fmPCfgTelId.submod.value='APP_EDT';".
         "parent.document.forms.fmPCfgTelId.nomeacs.value='CFGSIS';".
         "parent.document.forms.fmPCfgTelId.APP_Codigo.value=sSelIndice;".
         "parent.document.forms.fmPCfgTelId.submit();".
         "parent.document.forms.fmPCfgTelId.target = sAntTarget;".
         "parent.document.forms.fmPCfgTelId.mod.value = sAntModulo;".
         "parent.document.forms.fmPCfgTelId.submod.value = sAntSubModulo;".
         "parent.document.forms.fmPCfgTelId.nomeacs.value = sAntNomeAcs;".
	  "}".
	  "function Teclas_F( Objeto, Evento ) {".
         "vNumTecla = parent.Tecla_Apertada(Evento); ".
   	     "if ( vNumTecla==116) { ".         // ** [F5] **     Não atualizar
              //
   	     "} else if ( vNumTecla==13) { ".   // ** [ENTER] **
            //"setTimeout( parent.document.getElementById('CfgSis_BT_Ad_TelIdApp').onclick , 10);".
         "} else if ( vNumTecla==27 ) { ".  // [ESC]
            $oJanelaApp->sJavOnClickF.
   		 "} else {".
   		    "return true;".
   		 "} ".
            "return false;".
         '}';
       //
       // Java posterior
   $sRet_JavsPos .=
      "parent.document.getElementById('iECadETrm_Descritivo').focus();".
      "P_Atu_App();".
	  '';
       
}




?> 