Ale Hexata

Comentei o codigo abaixo que havia nao percebido do exemplo e agora sim passou, muito grato meu amigo, Feliz ano novo! { NotaF.NFe.Ide.gCompraGov.tpEnteGov := tcgEstados; NotaF.NFe.Ide.gCompraGov.pRedutor := 5; NotaF.NFe.Ide.gCompraGov.tpOperGov := togFornecimento; }

Esse é o codigo que tento gerar para atender a legislação no entanto algumas tags estão me atrapalhando e gerando erros: <IBSCBS> <CST>000</CST> <cClassTrib>000001</cClassTrib> <gIBSCBS> <vBC>1000.00</vBC> <gIBSUF> <pIBSUF>0.1000</pIBSUF> <vIBSUF>1.00</vIBSUF> </gIBSUF> <gIBSMun> <pIBSMun>0.0000</pIBSMun> <vIBSMun>0.00</vIBSMun> </gIBSMun> <vIBS>1.00</vIBS> <gCBS> <pCBS>0.9000</pCBS> <vCBS>9.00</vCBS> </gCBS> </gIBSCBS> </IBSCBS> meu código: IBSCBS.CST := cst000; IBSCBS.cClassTrib := '000001'; IBSCBS.indDoacao := tieNao; IBSCBS.gIBSCBS.vBC := auxvalorproduto; //DESTACANDO A IBS auxaliquotaibsuf:=0.1000; auxaliquotacbs:=0.9000; auxvalorproduto:=10.000; IBSCBS.gIBSCBS.gIBSUF.pIBSUF := auxaliquotaibsuf; IBSCBS.gIBSCBS.gIBSUF.vIBSUF := auxaliquotaibsuf * auxvalorproduto / 100; IBSCBS.gIBSCBS.gIBSUF.gDif.pDif := 0; IBSCBS.gIBSCBS.gIBSUF.gDif.vDif := 0; IBSCBS.gIBSCBS.gIBSUF.gDevTrib.vDevTrib := 0; IBSCBS.gIBSCBS.gIBSUF.gRed.pRedAliq := 0; IBSCBS.gIBSCBS.gIBSUF.gRed.pAliqEfet := 0; IBSCBS.gIBSCBS.gIBSMun.pIBSMun := 0; IBSCBS.gIBSCBS.gIBSMun.vIBSMun := 0; IBSCBS.gIBSCBS.gIBSMun.gDif.pDif := 0; IBSCBS.gIBSCBS.gIBSMun.gDif.vDif := 0; IBSCBS.gIBSCBS.gIBSMun.gDevTrib.vDevTrib := 0; IBSCBS.gIBSCBS.gIBSMun.gRed.pRedAliq := 0; IBSCBS.gIBSCBS.gIBSMun.gRed.pAliqEfet := 0; //DESTACANDO A CBS IBSCBS.gIBSCBS.gCBS.pCBS := auxaliquotacbs; IBSCBS.gIBSCBS.gCBS.vCBS := auxaliquotacbs * auxvalorproduto / 100; IBSCBS.gIBSCBS.gCBS.gDif.pDif := 0; IBSCBS.gIBSCBS.gCBS.gDif.vDif := 0; IBSCBS.gIBSCBS.gCBS.gDevTrib.vDevTrib := 0; IBSCBS.gIBSCBS.gCBS.gRed.pRedAliq := 0; IBSCBS.gIBSCBS.gCBS.gRed.pAliqEfet := 0; Erro apresentado: Valor da Aliquota Efetiva do IBS da UF calculado incorretamente estou errando em algo básico? Tentei sumprir essa parte do gRed no ACBRXMLWRITER no entanto comentando o código nessa parte ainda assim não desaparece as tags zeradas: // Grava a tag no arquivo - Quando não existir algum conteúdo if ((ocorrencias = 1) and (EstaVazio)) then begin // Result := CreateElement(Tag); linha comentada exit; end; Algum amigo que tenha um exemplo prático do preechimento validado que possa me ajudar?

Alguem por Gentileza tem uma preechimento IBS e CBS validado para servir de exemplo para todos

Boa tarde senhores, estou com erro de inutilização em meu código, o retorno é o seguinte: raised exception class eacbrdfeexception with message 'Falha ao assinar Inutilização Nota Fiscal Eletrônica External exception C0FBB007E utilizando o exemplo do projeto também provoca o mesmo erro, alguem pode me ajudar

Observei felipe que não está montando com as informações adicionadas na montagem da nota, a mesma nota como 65 sai o grupo e quando 55 não sai, segue o xml do modelo 55 erro: Não informado o grupo de informações do responsavel tecnico 41190629813793000140550010002000121002000122-nfe.xml abaixo segue o arquivo 65 autorizado 41190629813793000140650010002000131002000130-nfe.xml

Bom dia caros amigos, estou no paraná minha nfce após atualização acbr e atualização da pasta schemas está autorizando nfce e não autorizando nfe, sabem se é necessário obter o "CSRT para o Responsável Técnico" no paraná? Procurei na minha conta no site da sefaz do estado e não encontrei nada para gerar na pagina de fornecedor, alguem tem uma luz? meu código esta sendo preenchido da seguinte forma até entao: ACBrNFe1.configuracoes.RespTec.IdCSRT:=0; ACBrNFe1.configuracoes.RespTec.CSRT:=''; infRespTec.CNPJ := '05778898XXXXXX; // cnpj correto infRespTec.xContato := 'Alessandro XXXXXX XXXXX'; // Nome do responsável técnico infRespTec.email := '[email protected]'; //email correto infRespTec.fone := '45999900000'; dessa forma está autorizando somente NFCE no paraná

Boa tarde, mesmo erro no paraná

Alterou o erro agora para Serviço Paralizado Momentaneamente (curto prazo), no entanto no painel de autorizadores esta verde, alguém esta emitindo normalmente no paraná?

ACBrNFe1.Configuracoes.Geral.SSLLib := libOpenSSL; ACBrNFe1.Configuracoes.Geral.SSLCryptLib:=cryOpenSSL; ACBrNFe1.Configuracoes.Geral.SSLHttpLib:=HttpOpenSSL; ACBrNFe1.Configuracoes.Geral.SSLXmlSignLib:=xsLibXml2;

Boa noite pessoal estou com um erro no retorno do recibo ao enviar nfce para 4.0 no paraná, já atualizei, já configurei os caminhos dos servidores, já atualizei dlls, agora estou usando open ssl, mas continua dando o seguinte erro da imagem abaixo, estava tudo ok, simplesmente hj meus clientes começaram a me ligar em virtude de erros não autorizarem suas notas, alguem já passou pelo problema e pode me ajudar? simplesmente dá timeout e não obtem resposta, a nota é gerada e assinada normalmente, ao enviar acontece isso

Boa tarde Juliomar, consegue me dar uma luz? estou tentando remontar o arquivo mas gero certinho mas nao estou conseguindo gravar a consulta, para ficar como autorizado no xml ACBrNFe1.NotasFiscais.Clear; acbrnfe1.Configuracoes.Arquivos.PathSchemas:='C:\HEXATA\SCHEMAS'; ACBrNFe1.Configuracoes.Geral.IncluirQRCodeXMLNFCe :=true; ACBrNFeDANFCeFortes1.Impressora:=edtimpressora.text; ACBrNFeDANFCeFortes1.MostrarPreview:=false; ACBrNFe1.DANFE:= ACBrNFeDANFCeFortes1; GeracaoNFCeSimplesTarifado(idprocesso); MemoHist.lines.add('XML Gerado: '+idprocesso); ACBrNFe1.NotasFiscais.Assinar; MemoHist.lines.add('XML Assinado: '+idprocesso); ACBrNFe1.NotasFiscais.Validar; MemoHist.lines.add('XML Validado: '+idprocesso); ACBrNFe1.WebServices.Consulta.NFeChave := auxchave; ACBrNFe1.Consultar; MemoHist.lines.add('Consultando a nota: '+idprocesso); ACBrNFe1.NotasFiscais.Items[0].GravarXML(); MemoHist.lines.add('Nota regravada: '+idprocesso); Obs: Verifiquei que altera a chave da nota ao tentar remontar 41151118170238000120650010000018552000018554 41151218170238000120650010000018551000018550

Boa tarde, Cleiton atualize a pasta schemas hexata.com/atualizasc/sc.zip

Boa tarde Juliomar, consegue me dar uma luz? estou tentando remontar o arquivo mas gero certinho mas nao estou conseguindo gravar a consulta, para ficar como autorizado no xml ACBrNFe1.NotasFiscais.Clear; acbrnfe1.Configuracoes.Arquivos.PathSchemas:='C:\HEXATA\SCHEMAS'; ACBrNFe1.Configuracoes.Geral.IncluirQRCodeXMLNFCe :=true; ACBrNFeDANFCeFortes1.Impressora:=edtimpressora.text; ACBrNFeDANFCeFortes1.MostrarPreview:=false; ACBrNFe1.DANFE:= ACBrNFeDANFCeFortes1; GeracaoNFCeSimplesTarifado(idprocesso); MemoHist.lines.add('XML Gerado: '+idprocesso); ACBrNFe1.NotasFiscais.Assinar; MemoHist.lines.add('XML Assinado: '+idprocesso); ACBrNFe1.NotasFiscais.Validar; MemoHist.lines.add('XML Validado: '+idprocesso); ACBrNFe1.WebServices.Consulta.NFeChave := auxchave; ACBrNFe1.Consultar; MemoHist.lines.add('Consultando a nota: '+idprocesso); ACBrNFe1.NotasFiscais.Items[0].GravarXML(); MemoHist.lines.add('Nota regravada: '+idprocesso);

Juliomar boa tarde, poderia fazer a gentileza de postar a idéia básica de como remontar o xml, se possível e tiver fácil compartilhar a rotina, de forma que não gere divergência?

Albrecht verifique por favor se seu cliente está on line, aqui no interior todos os meus estao off line em contingência chequei o status dos servidores no PR estava tudo off , vermelho desde as 17 horas Voltou as 17:56 Alguém sabe informar se as novas regras foram implantadas QR Code?

Web Services Consulta Status Serviço: - inativo ou inoperante tente novamente erro interno 10061 erro HTTP 500 Alguém sabe como posso ao mínimo tratar esse erro para que nao mostre e caia em contingência? Bom do erro realizado no entanto alguem entrou em contato com a receita do paraná para saber o porque desse erro? alguem tem alguma informação melhor

Boa noite pessoal, estou soando a camisa aqui no parana, ate que percebi que somente em ambiente de homologacao as novas regras foram aplicadas, mas nao em ambiente de producao, no entanto vi que os schemas paracem que ja estao sendo requisitados os atualizados, confere Regys? PR: em homologacao funciona o qrcode no codigo somente em homologacao e na producao estou deixando como estava mas tudo com schema atualizado na boa ta funcionando entre trancos e barrancos muita instabilidade de sinal da receita

Boa noite, estou com uma situação com duas notas fiscais nfce, geradas pelo emissor desenvolvido com a ajuda da comunidade. Essas Notas constam como autorizadas no entanto o xml gravado das notas não foi finalizado como autorizado, desta forma ao importar no sistema do contador esses arquivos não são levados em consideração. Precisava de uma rotina funcional para recuperar notas emitidas através da chave e gravar a mesma na pasta de emitidas sobrepondo o arquivo com erro tentei o seguinte codigo sem sucesso: ACBrNFe1.WebServices.Consulta.NFeChave := auxchave; ACBrNFe1.WebServices.Consulta.Executar; ACBrNFe1.DownloadNFe.Download.CNPJ := edtEmitCNPJ.Text; with ACBrNFe1.DownloadNFe.Download.Chaves.Add do begin chNFe := auxchave; end; ACBrNFe1.Download; aparece erro URL não definida para download Alguem tem uma solução? procurei em outros tópicos e não encontrei desde já, obrigado

Alguma ideia para Taxa de Entrega, algumas vezes ela pode exceder os 10% que é o limite em muitos estados

Pessoal comentei a tag quando é simples nacional e dai funciona tudo perfeito // Total.ICMSTot.vBC posso fazer isso é correto?

Boa tarde amigos, estou com muita dificuldade e peço ajuda de vocês? Fica correto colocar uma case e afirmar que sempre que for simples nacional os valores é igual a zero? ICMS.vBC := 0; ICMS.pICMS := 0; ICMS.vICMS := 0; independente csosn? tenho um contador pedido para colocar csosn 101 e informar a tributação logo apresenta o erro Total da BC ICMS difere do somatorio dos itens (vBC informado: 10.00, vBC calculado: 0.0) nào estou zerando estou preenchendo o produto da seguinte forma Regime SimplesNacional CSOSN := csosn101; ICMS.orig := oeNacional; ICMS.modBC := dbiValorOperacao; ICMS.vBC := qryitensVALOR_TOTAL.AsFloat; ICMS.pICMS := qryitensALIQUOTAICMS.AsFloat; ICMS.vICMS := qryitensVALOR_TOTAL.AsFloat * qryitensALIQUOTAICMS.AsFloat/100; ICMS.modBCST := dbisMargemValorAgregado; ICMS.pMVAST := 0; ICMS.pRedBCST:= 0; ICMS.vBCST := 0; ICMS.pICMSST := 0; ICMS.vICMSST := 0; ICMS.pRedBC := 0; ICMS.vCredICMSSN:=qryitensVALOR_TOTAL.AsFloat * qryitensALIQUOTAICMS.AsFloat/100; subtotal:= subtotal00+qryitensVALOR_TOTAL.AsFloat;; subtotalicms:=subtotal00icms + qryitensVALOR_TOTAL.AsFloat * qryitensALIQUOTAICMS.AsFloat/100; e o fechamento assim: Total.ICMSTot.vBC := subtotal; Total.ICMSTot.vICMS := subtotal00icms; Total.ICMSTot.vBCST := 0; Total.ICMSTot.vST := 0; Total.ICMSTot.vProd := subtotal; Total.ICMSTot.vSeg := 0; Total.ICMSTot.vDesc := 0; Total.ICMSTot.vII := 0; Total.ICMSTot.vIPI := 0; Total.ICMSTot.vPIS := 0; Total.ICMSTot.vCOFINS := 0; Total.ICMSTot.vOutro := 0; Total.ICMSTot.vNF := subtotal; Total.ICMSTot.vFrete:=0; Total.ICMSTot.vTotTrib:= totalgeraltributos; e o erro me persegue insistentemente 1) É correto afirmar que quando é Simples Nacional deixar tudo zerado? Ou falta alimentar algum campo e por isso apresenta o erro? 2) Deve se usar CSOSN101? Ele da permissão de crédito, vi que NFCe não da permissão? É correto usar 101 para modelo 65 persiste hein Total da BC ICMS difere do somatorio dos itens (vBC informado: 100.00, vBC calculado: 0.0) mesmo quando informei os valores de forma fixa ICMS.vBC := 100; ---------------------> SERIA ESSE O INFORMADO? Total.ICMSTot.vBC := 100; -----------> SERIA ESSE O CALCULADO posso estar enganado com os campos?

Usando a Locaweb funcionou com a seguinte configuração se servir para mais alguem: ACBrMail1.From := '[email protected]'; ACBrMail1.FromName := 'Hexata Sistemas'; ACBrMail1.Host := 'smtp.hexata.com'; // troque pelo seu servidor smtp ACBrMail1.Username := '[email protected]'; ACBrMail1.Password := '*********'; ACBrMail1.Port := '25'; ACBrMail1.SetSSL := false; ACBrMail1.SetTLS := true; ACBrMail1.AddAddress('[email protected]','teste'); ACBrMail1.AltBody.Text := 'TESTE DE EMAIL'; ACBrMail1.Send;

Barbosa Boa Tarde, usando dessa forma teria que funcionar, mas não vai, seguindo o topico adicionado: ACBrMail1.Port := '587'; ACBrMail1.SetSSL := false; ACBrMail1.SetTLS := true; seria: ACBrMail1.From := '[email protected]'; ACBrMail1.FromName := 'Hexata Sistemas'; ACBrMail1.Host := 'smtp.gmail.com'; // troque pelo seu servidor smtp ACBrMail1.Username := '[email protected]'; ACBrMail1.Password := '******'; ACBrMail1.Port := '587'; ACBrMail1.SetSSL := false; ACBrMail1.SetTLS := true; ACBrMail1.AddAddress('[email protected]','teste'); ACBrMail1.AltBody.Text := 'TESTE DE EMAIL'; ACBrMail1.Send; Unable to send mailfrom e invertendo: ACBrMail1.Port := '587'; ACBrMail1.SetSSL := true; ACBrMail1.SetTLS := false; SMTP Error: Unable to Login. Infelizmente não é somente isso Tentei também usar a locaweb e os erros são os mesmos conforme arquivo texto disponibilizado em outro topico nós temos hospedagem e email com a locaweb mas apresenta o mesmo erro entao erro de login não seria e tambem não seria por bloqueio do gmail uma vez que fiz as configurações para liberar, muito estranho. Sera que mais alguem já passou por isso? estou usando o exemplo do trunk2 por enquanto para na sequencia incorporar ao meu sistema

Boa tarde, Daniel, desculpe a ignorância mas não estou conseguindo enviar: ACBrMail1.From := '[email protected]'; ACBrMail1.FromName := 'Hexata Sistemas'; ACBrMail1.Host := 'smtp.gmail.com'; // troque pelo seu servidor smtp ACBrMail1.Username := '[email protected]'; ACBrMail1.Password := '********'; ACBrMail1.Port := '465'; // troque pela porta do seu servidor smtp ACBrMail1.SetSSL := True; // Verifique se o seu servidor necessita SSL ACBrMail1.AddAddress('[email protected]', 'Joao Teste'); ACBrMail1.AltBody.Text := Memo2.Lines.Text; ACBrMail1.Send; erro: Unable to send mailfrom Trunk2 atualizado com as dlls copiadas na pasta da aplicação - ssleay32.dll - libeay32.dll copiei da pasta C:\ACBr2\DLLs\OpenSSL\0.9.8.1 como nao deu copiei tambem da pasta C:\ACBr2\DLLs\OpenSSL\0.9.8.14 ao trocar a porta para 25 SMTP Error: Unable to Login. Será que tem algo muito bobo que não estou vendo? Ou falta mais alguma coisa?