Jump to content

bfbraz

Membros
  • Content Count

    87
  • Joined

  • Last visited

Community Reputation

3 Neutral

About bfbraz

  • Rank
    Membro

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. Prezados, boa noite estou fazendo uma integração SOAP usando THTTPReqResp (conforme a as rotinas do ACBr), mas preciso que não peça o certificado pois o WS não usa. tem como fazer? Obrigado galera minha rotina var SoapClient: THTTPReqResp; URL, xmlDados: string; Acao : TStringList; Stream : TMemoryStream; StrStream : TStringStream; RetornoWS, RetWS: string; begin xmlDados := '<?xml version="1.0" encoding="utf-8"?>'+ '<soap12:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" '+ 'xmlns:soap12="http://www.w3.org/2003/05/soap-envelope">'+ '<soap12:Body>'+ '<Login>'+ '<LoginRequest>'+ '<Versao>1</Versao>'+ '<Usuario>usuario@sistemaweb</Usuario>'+ '<Senha>usuario#sistemaweb</Senha>'+ '</LoginRequest>'+ '</Login>'+ '</soap12:Body>'+ '</soap12:Envelope>'; Acao := TStringList.Create; Stream := TMemoryStream.Create; Acao.Text := xmlDados; SoapClient:= THTTPReqResp.Create(nil); //ConfiguraReqResp( SoapClient ); try SoapClient.URL := 'https://sistemaweb.com/Services/LogonService.asmx'; SoapClient.UseUTF8InHeader := True; SoapClient.SoapAction := 'http://schemas.ipc.adm.br/sistemaweb/logon/Login'; SoapClient.Execute(Acao.Text, Stream); StrStream := TStringStream.Create(''); StrStream.CopyFrom(Stream, 0); RetornoWS := TiraAcentos(ParseText(StrStream.DataString, True)); RetWS := GetRetornoWS(acLogin, RetornoWS); StrStream.Free; finally end;
  2. Prezado, saberiam explicar o que se trata? A SEFAZ publicou nos últimos dias, a decisão de limitar o acesso à informações de consulta pública nos portais do FISCO, retirando a visão de alguns dos campos hoje disponíveis. Isso faz parte da ação da Secretaria da Fazenda em reduzir os custos com estruturas que hoje são gerados por métodos de consulta e busca alternativa para estes documentos. A justificativa é o alto consumo usado nessas consultas, que faz os serviços padrões se tornem mais lentos e demandem mais custos operacionais para as Secretarias da Fazenda. Lembrando que as consultas e obtenção dos documentos para os participantes do mesmo permanece intacta, dentro da estrutura de serviço do Web Service DF-e. Se faz imprescindível para tal funcionalidade o uso do Certificado Digital e a participação do requisitante do mesmo no documento. Segue abaixo os links para acesso às publicações na íntegra: Ajuste SINIEF 17/18 https://www.confaz.fazenda.gov.br/legislacao/ajustes/2018/AJ0017_18 Ajuste SINIEF 16/18 https://www.confaz.fazenda.gov.br/legislacao/ajustes/2018/AJ0016_18 Obrigado galera
  3. Vi nos fontes do ACBr que não gera os dados ... if (CTe.Ide.tpServ <> tsIntermediario) and (CTe.Ide.tpServ <> tsMultimodal) then GerarInfDoc;
  4. tenho 1 CTe com o Tipo de Serviço = Serviço Vinculado a Multimodal Informo as NFes mas não são geradas no XML, mas o CTe autoriza normalmente por, neste caso, ser uma informação facultativa de preenchimento. Tem uma forma de gerar essas informações no XML mesmo assim? Obrigado
  5. Bom dia galera. Como faço pra gerar somente a Chave de acesso do MDFe? abraços a todos
  6. Me corrigindo SEFAZ REJEITOU PELO EMISSOR TAMBEM.
  7. Boa noite. Estou tentando enviar uma NFe com origem RJ e destino MG que envolva a partilha de ICMS, o Destinatário é Contribuinte de ICMS A duvida é: A Partilha seria apenas para Operação com Consumidor Final e NÃO Contribuinte certo? Meu cliente precisa emitir a NFe com a Partilha mesmo sendo operação com Contribuinte de ICMS. Tenho o XML abaixo emitido pelo Emissor Gratuito que autorizou a NFe (em homologação) com Operação com Contribuinte de ICMS mas faço a mesma operação (gerando o XML identico com o ACBr) mas sempre me retorna a Rejeição 695 (Rejeição 695: Informado indevidamente o grupo de ICMS para a UF de destino) preciso da ajuda de vcs. <?xml version="1.0" encoding="UTF-8"?> -<NFe xmlns="http://www.portalfiscal.inf.br/nfe"> -<infNFe versao="4.00" Id="NFe33199999999999999999999999900000011999999999"> -<ide> <cUF>33</cUF> <cNF>99999999</cNF> <natOp>6108</natOp> <mod>55</mod> <serie>1</serie> <nNF>1</nNF> <dhEmi>2018-08-29T17:16:00-03:00</dhEmi> <dhSaiEnt>2018-08-29T18:00:00-03:00</dhSaiEnt> <tpNF>1</tpNF> <idDest>2</idDest> <cMunFG>3301702</cMunFG> <tpImp>1</tpImp> <tpEmis>1</tpEmis> <cDV>9</cDV> <tpAmb>2</tpAmb> <finNFe>1</finNFe> <indFinal>1</indFinal> <indPres>9</indPres> <procEmi>0</procEmi> <verProc>4.00</verProc> </ide> -<emit> <CNPJ>99999999999999</CNPJ> <xNome>XXXXXXXXXXXXXXXXXXXXXXXXX</xNome> <xFant>XXXXXXXXXXXXXXXXXXXXXXXXX</xFant> -<enderEmit> <xLgr>RUA SENHOR DOS PASSOSiz</xLgr> <nro>1540</nro> <xBairro>CENTRO</xBairro> <cMun>3301702</cMun> <xMun>Duque de Caxias</xMun> <UF>RJ</UF> <CEP>25065000</CEP> <cPais>1058</cPais> <xPais>BRASIL</xPais> </enderEmit> <IE>99999999</IE> <CRT>3</CRT> </emit> -<dest> <CNPJ>99999999999999</CNPJ> <xNome>EMISSAO NFE LTDA</xNome> -<enderDest> <xLgr>RUA X</xLgr> <nro>11</nro> <xBairro>PADRE EUSTAQUIO</xBairro> <cMun>3106200</cMun> <xMun>Belo Horizonte</xMun> <UF>MG</UF> <CEP>30720320</CEP> <cPais>1058</cPais> <xPais>BRASIL</xPais> </enderDest> <indIEDest>1</indIEDest> <IE>999999999094</IE> </dest> -<det nItem="1"> -<prod> <cProd>1</cProd> <cEAN/> <xProd>sensor de temperatura de água</xProd> <NCM>90328982</NCM> <CFOP>6108</CFOP> <uCom>un</uCom> <qCom>1.0000</qCom> <vUnCom>12.0000000000</vUnCom> <vProd>100.00</vProd> <cEANTrib/> <uTrib>un</uTrib> <qTrib>12.0000</qTrib> <vUnTrib>12.0000000000</vUnTrib> <indTot>1</indTot> </prod> -<imposto> -<ICMS> -<ICMS00> <orig>1</orig> <CST>00</CST> <modBC>3</modBC> <vBC>100.00</vBC> <pICMS>4.0000</pICMS> <vICMS>4.00</vICMS> </ICMS00> </ICMS> -<IPI> <cEnq>301</cEnq> -<IPINT> <CST>52</CST> </IPINT> </IPI> -<PIS> -<PISNT> <CST>07</CST> </PISNT> </PIS> -<COFINS> -<COFINSNT> <CST>07</CST> </COFINSNT> </COFINS> -<ICMSUFDest> <vBCUFDest>100.00</vBCUFDest> <pICMSUFDest>18.00</pICMSUFDest> <pICMSInter>4.00</pICMSInter> <pICMSInterPart>80</pICMSInterPart> <vICMSUFDest>11.20</vICMSUFDest> <vICMSUFRemet>2.80</vICMSUFRemet> </ICMSUFDest> </imposto> </det> -<total> -<ICMSTot> <vBC>100.00</vBC> <vICMS>4.00</vICMS> <vICMSDeson>0.00</vICMSDeson> <vFCPUFDest>0.00</vFCPUFDest> <vICMSUFDest>11.20</vICMSUFDest> <vICMSUFRemet>2.80</vICMSUFRemet> <vFCP>0.00</vFCP> <vBCST>0.00</vBCST> <vST>0.00</vST> <vFCPST>0.00</vFCPST> <vFCPSTRet>0.00</vFCPSTRet> <vProd>100.00</vProd> <vFrete>0.00</vFrete> <vSeg>0.00</vSeg> <vDesc>0.00</vDesc> <vII>0.00</vII> <vIPI>0.00</vIPI> <vIPIDevol>0.00</vIPIDevol> <vPIS>0.00</vPIS> <vCOFINS>0.00</vCOFINS> <vOutro>0.00</vOutro> <vNF>100.00</vNF> <vTotTrib>0.00</vTotTrib> </ICMSTot> </total> -<transp> <modFrete>3</modFrete> </transp> -<pag> -<detPag> <indPag>0</indPag> <tPag>01</tPag> <vPag>100.00</vPag> </detPag> </pag> </infNFe>
  8. Só gero Fatura quando gero as duplicatas. mas não esta gerando no XML a tag de desconto quando o mesmo esta zerado. Atualizei hoje o ACBr e os Schemas e não resolveu
  9. O XML nao gera com vDesc zerado. precisa fazer alguma alteração? Estou com o mesmo problema
  10. Boa tarde a todos Existe CT-e Suplementar? Se Sim, como fazer? []'s
  11. Já não informo o IPI, fiz o mentário visando manter a coerencia. Se fez em 1 função pq não fazer na outra.... Obrigado
  12. NFCe apresentando Rejeicao: Total do IPI difere do somatorio dos itens Em procedure TNFeW.GerarTotalICMSTotal; Falta o mesmo teste if NFe.Ide.modelo <> 55 then //não deve gerar grupo IPI para NFCe feito em procedure TNFeW.GerarDetImpostoIPI(const i: Integer); para que não gere Gerador.wCampo(tcDe2, 'W12', 'vIPI ', 01, 15, 1, nfe.Total.ICMSTot.vIPI, DSC_VIPI); mesmo que esteja preenchido o IPI Sem mais
  13. Fala galera, estou com o problema na geração do XML... autXML - Autorizados para download do XML do DF-e Só está gerando 1 CNPJ e no layout é de 0 a 10 faço dessa forma autXML.Clear; With autXML.Add Do Begin CNPJCPF := '04898488000177'; // 04.898.488/0001-77 ANTT End; // Remetente With autXML.Add Do Begin CNPJCPF := Rem.CNPJCPF; End; // Destinatário With autXML.Add Do Begin CNPJCPF := Dest.CNPJCPF; End; - Bruno
×
×
  • Create New...