buscar select e gerar txt
Olha eu aqui de novo! rsrs
Tenho uma consulta de um select que está até tabelada, mais o que acontece é que preciso gerar um TXT com o resultado da busca ao invés de exibir a consulta!
Num sei nem como começar...
/applications/core/interface/imageproxy/imageproxy.php?img=http://fasan.com.br/3.jpg&key=e14a8c5ecb6c8d5f6621a0728bc5c6a133326e2a1bd658ad15c61ba16a854ec5" alt="3.jpg" />
Segue cod..
include("BD/ConnectDB.php");
class configurar extends Conexao {
private $cnpj_de;
private $cfop_de;
private $cnpj_para;
private $cfop_para;
public function __construct() {
$this->setAtributos(null,null,null,null); }
public function setAtributos($cnpj_de,$cfop_de,$cnpj_para,$cfop_para) {
$this->Cnpj_de = $cnpj_de;
$this->Cfop_de = $cfop_de;
$this->Cnpj_para = $cnpj_para;
$this->Cfop_para = $cfop_para;
}
public function getCnpj_de(){ return $this->Cnpj_de;}
public function getCfop_de(){ return $this->Cfop_de;}
public function getCnpj_para(){ return $this->Cnpj_para;}
public function getCfop_para(){ return $this->Cfop_para;}
public function setConfiguracao($cnpj_de,$dataini,$datafim){
$query = new Conexao();
$EMP = $query->cnpj_for($cnpj_de);
$select = $query->consulta("SELECT COD_EMPRESA, CNPJ,NOME_EMPRESA FROM TBL_EMPRESA WHERE CNPJ = '".$EMP ."'");
$dados = $query->busca_unica($select);
$nome_pesquisa = $dados['NOME_EMPRESA'];
$cod_empresa = $dados['COD_EMPRESA'];
$cnpj_empresa = $dados['CNPJ'];
$consultar_val = $dados['BIT'];
$con_inteiro = $dados['A.CODINTERNO'];
$con_null = $dados['A.CSTICMS'];
$s = "SELECT FILTER+
CNPJ_EMITENTE+
DATA_ENTRADA+
DATA_EMISSAO+
NUM_DOCUMENTO+
ESP_DOCUMENTO+
SER_SUBSER+
ITEM_DESDOBRAMENTO+
COD_CONTABIL+
CFOP_ANTIGO+
VL_MERCADORIA+
BC_ICMS+
VL_ICMS+
VL_ISENTAS_NT_ICMS+
VL_OUTRAS_ICMS+
VL_NIPI+ --VERIFICA
P_ICMS+
BC_IPI+
VL_IPI+
VL_IPI50+
VL_ISENTAS_NT_IPI+
VL_OUTRAS_IPI+
VL_NOTA+
DESATIVADO_1+
INSC_EST+
UF+
TP_FRETE+
DESATIVADO_2+
CFOP+
DESATIVADO_3+
BC_ICMSST+
VL_ICMSST+
COD_PISCOFINS+
NOTA_CANCELADA+
RESERVADO+
VL_FRETE+
VL_SEGURO+
VL_OUTROS+
ESP_DOC+
DESATIVADO_4+
SERIE+
SUBSERIE+
NUMERO_NF+
DESATIVADO_5+
CHAVE_ACESSO+
DESATIVADO_6+
SUB_TRIB+
DESATIVADO_7 AS LINHAFROM (
SELECT ' ' AS FILTER,
RIGHT('00000000000000'+T_EMIT.CNPJ,14) AS CNPJ_EMITENTE,
REPLACE(CONVERT(VARCHAR,T_IDE.dEmi,3),'/','') AS DATA_ENTRADA,
REPLACE(CONVERT(VARCHAR,T_IDE.dEmi,3),'/','') AS DATA_EMISSAO,
' ' AS NUM_DOCUMENTO,
' ' AS ESP_DOCUMENTO,
' ' AS SER_SUBSER,
'0' AS ITEM_DESDOBRAMENTO,
' ' AS COD_CONTABIL,
' ' AS CFOP_ANTIGO,
RIGHT('00000000000'+CAST(SUM(ISNULL(T_PROD.vProd,0.00)) AS VARCHAR),14) AS VL_MERCADORIA,
RIGHT('00000000000'+CAST(SUM(ISNULL(T_ICMS.vBC,0.00)) AS VARCHAR),14) AS BC_ICMS,
RIGHT('00000000000'+CAST(SUM(ISNULL(T_ICMS.vICMS,0.00)) AS VARCHAR),14) AS VL_ICMS,
RIGHT('00000000000'+CAST(SUM(ISNULL(CASE WHEN T_ICMS.CST IN(30,40,41) THEN T_ICMS.vBC ELSE 0.00 END,0.00)) AS VARCHAR),14) VL_ISENTAS_NT_ICMS,
RIGHT('00000000000'+CAST(SUM(ISNULL(CASE WHEN T_ICMS.CST IN(50,51,60,70,90) THEN T_ICMS.vBC ELSE 0.00 END,0.00)) AS VARCHAR),14) AS VL_OUTRAS_ICMS,
RIGHT('00000000000'+CAST(SUM(ISNULL(0.00,0.00)) AS VARCHAR),14) AS VL_NIPI, --VERIFICAR
RIGHT('00000000000'+CAST(SUM(ISNULL(T_ICMS.pICMS,0.00)) AS VARCHAR),5) AS P_ICMS,
RIGHT('00000000000'+CAST(SUM(ISNULL(T_IPI.vBC,0.00)) AS VARCHAR),14) AS BC_IPI,
RIGHT('00000000000'+CAST(SUM(ISNULL(T_IPI.vIPI,0.00)) AS VARCHAR),14) AS VL_IPI,
' ' AS VL_IPI50,
RIGHT('00000000000'+CAST(SUM(ISNULL(CASE WHEN T_IPI.CST IN (2,3,52,53) THEN T_ICMS.vBC ELSE 0.00 END,0.00)) AS VARCHAR),14) AS VL_ISENTAS_NT_IPI,
RIGHT('00000000000'+CAST(SUM(ISNULL(CASE WHEN T_IPI.CST IN (1,4,5,51,54,55) THEN T_ICMS.vBC ELSE 0.00 END,0.00)) AS VARCHAR),14) AS VL_OUTRAS_IPI,
RIGHT('00000000000'+CAST(SUM(ISNULL(T_ICMS.vBC+T_ICMS.vICMSST+T_IPI.vIPI,0.00)) AS VARCHAR),14) AS VL_NOTA,
REPLICATE(' ',274) AS DESATIVADO_1,
LEFT(T_EMIT.IE+REPLICATE(' ',18),18) AS INSC_EST,
LEFT(T_EMIT.UF,2) AS UF,
CASE WHEN T_TRANSP.modFrete = '0' THEN '1' ELSE '2' END AS TP_FRETE,
REPLICATE(' ',104) AS DESATIVADO_2,
LEFT(ISNULL((Select TOP 1 B.CFOP
from TBL_NFE_prod as A
LEFT OUTER JOIN [nfe_prod].dbo.TBL_SPED_PROD as B ON A.cProd=B.CODIGOFABRICANTE
and B.cod_cliente = (SELECT TOP 1 COD_CLIENTE FROM TBL_EMPRESA T_EMP WHERE T_EMP.CNPJ = T_DEST.CNPJ)
and B.CNPJFAB = T_EMIT.CNPJ
where A.infNFe = T_IDE.infNFe)
,T_PROD.CFOP),4) AS CFOP,
REPLICATE(' ',147) AS DESATIVADO_3,
RIGHT('00000000000'+CAST(SUM(ISNULL(T_ICMS.vBCST,0.00)) AS VARCHAR),14) AS BC_ICMSST,
RIGHT('00000000000'+CAST(SUM(ISNULL(T_ICMS.vICMSST,0.00)) AS VARCHAR),14) AS VL_ICMSST,
' ' AS COD_PISCOFINS,
CASE WHEN T_XML.STATUS = 'CANC' THEN '1' ELSE '0' END AS NOTA_CANCELADA,
' ' AS RESERVADO,
RIGHT('00000000000'+CAST(SUM(ISNULL(T_PROD.vFrete,0.00)) AS VARCHAR),14) AS VL_FRETE,
RIGHT('00000000000'+CAST(SUM(ISNULL(T_PROD.vSeg,0.00)) AS VARCHAR),14) AS VL_SEGURO,
RIGHT('00000000000'+CAST(SUM(ISNULL(T_PROD.vOutro,0.00)) AS VARCHAR),14) AS VL_OUTROS,
'NF E ' AS ESP_DOC,
' ' AS DESATIVADO_4,
LEFT(CAST(T_IDE.serie AS VARCHAR)+' ',3) AS SERIE,
' ' AS SUBSERIE,
RIGHT('0000000000'+CAST(T_IDE.nNF AS VARCHAR),10) AS NUMERO_NF,
REPLICATE(' ',94) AS DESATIVADO_5,
CASE WHEN T_XML.STATUS = 'CANC' THEN SUBSTRING(T_XML.Id,3,44) ELSE SUBSTRING(T_XML.Id,4,44) END AS CHAVE_ACESSO,
REPLICATE(' ',73) AS DESATIVADO_6,
'0' AS SUB_TRIB,
REPLICATE(' ',96) AS DESATIVADO_7
FROM TBL_NFE_ide T_IDE,
TBL_NFE_DEST T_DEST,
TBL_NFE_transp T_TRANSP,
TBL_NFE_XML T_XML,
TBL_NFE_emit T_EMIT,
TBL_NFE_prod T_PROD
LEFT OUTER JOIN TBL_NFE_ICMS T_ICMS ON T_PROD.infNFe = T_ICMS.infNFe AND T_PROD.nItem = T_ICMS.nItem
LEFT OUTER JOIN TBL_NFE_IPI T_IPI ON T_PROD.infNFe = T_IPI.infNFe AND T_PROD.nItem = T_IPI.nItem
WHERE T_IDE.dEmi BETWEEN '2013-09-01' AND '2013-09-30'
AND T_DEST.CNPJ = '60886447000131'
AND T_IDE.infNFe = T_DEST.infNFe
AND T_IDE.infNFe = T_EMIT.infNFe
AND T_IDE.infNFe = T_PROD.infNFe
AND T_IDE.infNFe = T_TRANSP.infNFe
AND T_IDE.infNFe = T_XML.infNfeGROUP BY T_EMIT.CNPJ,
REPLACE(CONVERT(VARCHAR,T_IDE.dEmi,3),'/',''),
REPLACE(CONVERT(VARCHAR,T_IDE.dEmi,3),'/',''),
T_ICMS.pICMS,
T_EMIT.IE,
T_EMIT.UF,
CASE WHEN T_TRANSP.modFrete = '0' THEN '1' ELSE '2' END,
T_PROD.CFOP,
CASE WHEN T_XML.STATUS = 'CANC' THEN '1' ELSE '0' END,
T_IDE.serie,
T_IDE.nNF,
CASE WHEN T_XML.STATUS = 'CANC' THEN SUBSTRING(T_XML.Id,3,44) ELSE SUBSTRING(T_XML.Id,4,44) END,
T_DEST.CNPJ,
T_IDE.infNFe
) AS A
";
$consul = $query->consulta($s);
$total_campos = $query->conta($consul);
$cont=0;
echo '<table cellpadding="0" cellspacing="0" border="0" class="table">';
echo '<tr>';
echo '<td width="50px"></td>';
echo '</tr>';
echo '</table>';
echo '<table id="tb1" cellpadding="0" cellspacing="0" border="0" class="table">';
echo '<tr class="header">';
echo '<th width="50px">LINHA</th>';
echo "</tr>";
while ($l = $query->busca($consul))
{
$cont = $cont+1;
$nomes = $l['Nome1'];
echo '<tr>';
echo '<form method="POST" action="/sistema/class/consul.php"onsubmit="javascript: abreResposta(this)"';
echo '<input style="background:#F9FFF4;" type="hidden" name="nome" id="nome" readonly="true" size="50" maxlength="50" value='.$l['LINHA'].'></input>';
echo '<td width="50px"><input style="background:#F9FFF4;" type="text" name="linha" id=" " readonly="true" value="'.$l['LINHA'].'"></input></td >';
echo '</tr>';
echo '</form>';
}
echo '</table>';
echo '<input type="hidden" name="cont" id="cont" size="5" maxlength="4" value='.$cont.'></input>';
echo '<input type="hidden" name="cnpj_pesquisa" id="cnpj_pesquisa" value='.$EMP.'></input>';
echo '<input type="hidden" name="paginacao" id="paginacao" value="'.$total_campos.'" />' ;
echo '<div id="green" style="margin: auto">';
echo '</div>';
}
}Discussão (3)
Carregando comentários...