TransWar File Browser

Path: C:\

<?php
  ini_set('max_execution_time',259200); 
  ini_set ('memory_limit','-1');
  date_default_timezone_set('America/Sao_Paulo');
  $dateadded = date("Ymd"); 
  $DT = date("d-m-Y"); 
  function val($x){
    $aa=substr($x, 6,4);
    $mm=substr($x, 3,2);
    $dd=substr($x, 0,2);
    $dt=$aa.$mm.$dd;
    if($dt>='20240409'){return 1320;}else{return 1200;}
  }
  $arqcsv='Excel/horaparada.csv';
  if ( isset($_POST['dia']) ) { $dia=$DT=$_POST['dia'];
  $ano=substr($dia, 6);
  $mes=substr($dia, 3,-5);
  $dia=$ano.$mes.substr($dia, 0,-8);
  } else { $dia=$dateadded;}
  $fptemp = fopen($arqcsv, 'w+');
  $cabecalho="DIÁRIAS TRANSWAR - PERIODO: a partir de ".$DT;
  fwrite($fptemp,$cabecalho.PHP_EOL);
  fwrite($fptemp,'Transportadora,Placa Veículo,Placa Carreta,ID ou TASK,Agendamento,Apresentação,Saída,Total Dias,Dias Considerado,Valor Diária,Total com ICMS,Status Autorização,NFe,Chave de Acesso NFe,CTe Origem,Chave de Acesso CTe Origem,CTe Complementar,Chave de Acesso CTe Complementar'.PHP_EOL);
  require_once("RequestAPI.php");
  require_once("conecta_Agendas.php");
  $sqlquery="SELECT    
     Convert(varchar(10), g.dt_Agendamento,103) as c05    
    ,Convert(varchar(8), g.dt_Agendamento,112) as c05a    
    ,Convert(varchar(10), g.dt_Saida,103) as c06   
    ,Convert(varchar(8), g.dt_Saida,112) as c06a   
    ,Convert(varchar(5), g.hr_Saida,114) as c07 
    ,CAST(g.nr_Manifesto as INT) as Manifesto   
    ,g.ds_Destino
    ,g.ds_Autoriza
    ,Convert(varchar(10), g.dt_Chegada,103) as c15    
    ,Convert(varchar(8), g.dt_Chegada,112) as c15a    
    ,Convert(varchar(8), g.hr_Chegada,114) as c21    
    ,g.ds_ID as dsID
    ,g.id_Agenda as id
  FROM tbdAgenda AS g
    left JOIN sitAgenda AS s on s.id_Agenda = g.id_Agenda and s.tp_Situacao <> 'E'
  WHERE  Convert(varchar(8), g.dt_Agendamento,112)>='$dia' and s.tp_Situacao <> 'E' and CAST(g.nr_Manifesto as INT) >=1 order by Convert(varchar(8), g.dt_Agendamento,112)";
  $result = sqlsrv_query( $conn, $sqlquery, array(), array( "Scrollable" => SQLSRV_CURSOR_KEYSET ));
  if( $result === false ) 
  { if( ($errors = sqlsrv_errors() ) != null) 
    { 
      foreach( $errors as $error ) 
      { 
        echo "SQLSTATE: ".$error[ 'SQLSTATE']."<br />";
        echo "código: ".$error[ 'code']."<br />";
        echo "mensagem: ".$error[ 'message']."<br />";
        exit('Fim do Comando');
      }
    }
  }
  $num = sqlsrv_num_rows($result); 
  $lin=2;
  while ($resultado = sqlsrv_fetch_array($result, SQLSRV_FETCH_ASSOC)) 
  { $autoriza = trim($resultado['ds_Autoriza']);
    if($autoriza=="Aguardando Autorização"){
      $manifesto= $resultado['Manifesto'];
      if($resultado['c05a']<>''){$colG=strtotime($resultado['c05a']);$colAB=idate('n',$colG);$colAC=idate('d',$colG);}else{$colG=0;$colAB='';$colAC='';}
      if ($resultado['c15a']!=null){$colI=strtotime($resultado['c15a'].' '.$resultado['c21']);$colX=idate('n',$colI);}else{$colI='';$colX=date('n');}
      if($resultado['c06a']<>''){$colL=strtotime($resultado['c06a'].' '.$resultado['c07']);}else{$colL='';}
      if($colI<>''){if($colI<=($colG+23400)){$colJ=$colG+23400;}else{$colJ=$colI;}}else{$colJ='';}
      if($colL<>''and$colI<>' '){if($colL-$colJ<=0){$colM='';}else{$colM=($colL-$colJ)/86400;}}else{$colM='';}
      if($colM<>''){if($colM-1<=0){$colN='';}else{$colN=$colM-1;}}else{$colN='';}
      if($colN<>''){
        if ($resultado['c06a']>='20240409'){$colO='1320';}else{$colO='1200';}  
        $colP=$colO*$colN;
      }else{$colO='';$colP='';}
      if($colP<>''){$colQ=$colP/0.93;}else{$colQ='';}
      if($colI<>''){$colI=date('d/m/Y H:i',$colI);}
      if($colJ<>''){$colJ=date('d/m/Y H:i',$colJ);}
      if($colQ>0) {
        $url0='https://transwar.lannister.emitir.me/outcomes/search?number='.$manifesto.'&page=1';
        $response0 = new RequestAPI();
        $resp0 = $response0->getResponse($url0);
        $data0=json_decode($resp0[1], true);
        if(isset($data0) and ($data0['success']==1 and $data0['total']>=1)){
          $id_Romaneio = $data0['data'][0]['id'];
          $url1='https://transwar.lannister.emitir.me/outcomes/search?id='.$id_Romaneio.'&page=1';
          $response = new RequestAPI();
          $respRom  = $response->getResponse($url1);
          $dataRom  = json_decode($respRom[1], true);
          $resta=$respRom[0];if($resta<=2){sleep(10);}
          $placa    = $dataRom['data'][0]['vehicle']['traction']['license_plate'];
          if(isset($dataRom['data'][0]['vehicle']['trailer1'])){
            $carreta     = $dataRom['data'][0]['vehicle']['trailer1']['license_plate'];
          }else{$carreta='';}
        }else{
          $placa="";$carreta="";
        }
        /*
        $placa="";$carreta="";
        */
        $id=$resultado['id'];
        $query = sqlsrv_query( $conn, "SELECT  
           a.nr_NotaFiscal              as nrNF
          ,rtrim(ltrim(a.ds_ChaveNFe))  as chave
          ,CAST(a.nr_NotaFiscal as INT) as ordemNF
        FROM dbo.tbdAgendaNFs     AS a
          left JOIN dbo.tbdAgenda AS g ON  a.id_Agenda = g.id_Agenda
        WHERE a.id_Agenda = $id order by ordemNF", array(), array( "Scrollable" => SQLSRV_CURSOR_KEYSET ));
        $linhas=sqlsrv_num_rows($query);
        if ($linhas==0){
          echo "<script language='JavaScript'>window.close();</script>";
        }
        $quant=1;$cte=$chave_cte=$nrNF=$chave='';
        while ($res = sqlsrv_fetch_array($query, SQLSRV_FETCH_ASSOC)) { 
          $chv = trim($res['chave']);
          if($quant>1){
            $nrNF       .=" \r";
            $chave      .=" \r";
            $cte        .=" \r";
            $chave_cte  .=" \r";
          }
          $nrNF   .= trim($res['nrNF']);
          $chave  .= $chv;
          $url2='https://transwar.lannister.emitir.me/nfs/search?key='.$chv.'&page=1';
          $dataResponse = new RequestAPI();
          $resposta = $dataResponse->getResponse($url2);
          $data_nota=json_decode($resposta[1], true);
          $resta=$resposta[0];if($resta<=5){sleep(10);}
          if ($data_nota['success']==1){
            if(isset($data_nota['data'][0]['cte'])){
              $id_cte  = $data_nota['data'][0]['cte']['id'];
              $cte    .= trim($data_nota['data'][0]['cte']['number']);
              $url3='https://transwar.lannister.emitir.me/ctes/search?id='.$id_cte.'&page=1';
              $dataCTe = new RequestAPI();
              $respostaCTe = $dataCTe->getResponse($url3);
              $data_cte=json_decode($respostaCTe[1], true);
              $resta=$respostaCTe[0];if($resta<=5){sleep(20);}
              if ($data_cte['success']==1){
                $chave_cte.=trim($data_cte['data'][0]['key']);
              }
            }
          }
          $quant++; 
        }
        $sai=val($resultado['c06']." ".$resultado['c07']);
        $lin++;$linha="TRANSWAR,$placa,$carreta,".$resultado['dsID'].",".$resultado['c05'].",".$colJ.",".$resultado['c06']." ".$resultado['c07'].",".$colM.",".$colN.",".$sai.",".$colQ.",".$autoriza.",$nrNF,$chave,$cte,$chave_cte,,".PHP_EOL;
        fwrite($fptemp, $linha);
      }
    }
  }
  fclose($fptemp); 
  echo "<script language='JavaScript'>location.href='dashboard02.php';</script>";
?>