Carlos Jorge Junior

Ok Italo era isso mesmo muito obrigado!

Boa Tarde colegas, Estou com um problema que não consegui resolver por nao saber porque quando envio apenas uma NFCe não ocorre nenhum problema mas ao tentar enviar um lote com mais de 2 NFCe aparece esse erro no retorno: Erro Falha no Schema XML do Lote de NFe (Atributo: id) Já atualizei o ACBr e ja atualizei a pasta Schemas mas sem solução. Seguem arquivos do processamento do lote e alguns NFCe (nao todos) em anexo para analise. Trecho do código: while not QVendasOFFLINE.Eof do begin GeraNFCeLote( QVendasOFFLINECOD_VEN.AsInteger ); StatusBar.SimpleText:= 'Gerando Lote de Vendas do dia. Cupom NFC-e Nº: '+QVendasOFFLINENFCE_NUM.AsString; Application.ProcessMessages; dm.NFce.NotasFiscais.LoadFromFile(dm.NFCe.Configuracoes.Geral.PathSalvar+'\'+vArqXML); QVendasOFFLINE.Next; end; StatusBar.SimpleText:= 'Enviando Lote de Vendas. Total: '+IntToStr(QVendasOFFLINE.RecordCount); Application.ProcessMessages; if QVendasOFFLINE.RecordCount < 2 then dm.NFCe.Enviar( '1', False, true ) else dm.NFCe.Enviar( '1', False, false ); 1-env-lot.xml 1-rec.xml 253065001191553-ped-rec.xml 253065001191553-pro-rec.xml 25150317220038000172650010000006971000006974-nfe.xml 25150317220038000172650010000007021000007026-nfe.xml 25150317220038000172650010000007031000007031-nfe.xml

Olá Colegas, Já foi tratado aqui sobre o assunto, o Julimar já nos repassou sobre a nota técnica NT2012.004 v 1.02 que na página 9 fala o seguinte: "03.7 Grupo de Tributação: PIS e COFINS No caso da NFC-e, o grupo de Tributação do PIS e COFINS é opcional. No caso da NF-e, se mantém obrigatória a informação deste grupo, controlada agora não mais por regras do Schema XML, mas sim por regras de validação efetuadas pela SEFAZ." Como mecionado acima é OPTATIVO mas eu estou querendo informar mesmo assim devido a contabilidade estar me crucificando dizendo que o XML está incompleto e isso está atrapalhando na escrita da empresa para cálculos de impostos para gerar para o cliente. Diante disso acrescente para gerar conforme o demo mas nao esta sendo preenchida a tag no XML final. EXEMPLO DO DEMO: with PIS do begin CST := pis99; PIS.vBC := 0; PIS.pPIS := 0; PIS.vPIS := 0; PIS.qBCProd := 0; PIS.vAliqProd := 0; PIS.vPIS := 0; end; with PISST do begin vBc := 0; pPis := 0; qBCProd := 0; vAliqProd := 0; vPIS := 0; end; with COFINS do begin CST := cof99; COFINS.vBC := 0; COFINS.pCOFINS := 0; COFINS.vCOFINS := 0; COFINS.qBCProd := 0; COFINS.vAliqProd := 0; end; with COFINSST do begin vBC := 0; pCOFINS := 0; qBCProd := 0; vAliqProd := 0; vCOFINS := 0; end; Mas não esta preenchendo a TAG e o xml esta saindo sem o PIS e COFINS. Alguma sugestão da resolução do problema?

Estou precisando do fonte do RecuperaXML para pegar as tags de medicamentos pois o que uso so funciona no demo ACBRNFe2 fora dele não pega. Quanto tá e como pagar???

Colegas, Tive a ideia de pegar os códigos do DEMO e usá-los do jeito que está no demo sem mudar se quer uma unica linha mas curiosamente na minha aplicação nao funcionou nem mesmo com o código igual ao do DEMO botão "Importar XML". Depois novamente tentei e agora IMPORTEI o unit.pas do DEMO na minha aplicação e compilei e para a minha surpresa também não funcionou. Moral da História: Se executa lá pelo DEMO funciona tudo certo se executa pela minha aplicação não funciona e o interessante é que somente as tags secundárias como MEDICAMENTOS - ARMAS - COMBUSTÍVEIS e informações adicionais do produto não funciona as demais TAGs estão funcionando. Diante deste relato gostaria de saber onde posso verificar e em que arquivos posso "mexer" para isso funcionar na minha aplicação??

Verifiquei q a variável "Leitor" não tem a TAG med e por isso nao esta lendo...

Apos o Italo me ajudar verifiquei que a linha: while Leitor.rExtrai(3, 'med', '', j + 1) <> '' do Nao esta chegando com os valores Leitor.rExtrai(3, 'med', '', j + 1) = 0 e zerados entao ele pula pq não é truee as tags no arquivo pcnNFeR.pas e por isso nao ta preenchendo!!

Olá Italo bom dia! Sim todos os arquivos estao atualizados com a data de ontem do SVN. No arquivo pcnNFeR.pas tem as tags de medicamentos como abaixo: (* Grupo da TAG <det><prod><med> *) j := 0; while Leitor.rExtrai(3, 'med', '', j + 1) <> '' do begin NFe.Det.Prod.med.Add; (*K02*)NFe.Det.Prod.med[j].nLote := Leitor.rCampo(tcStr, 'nLote'); (*K03*)NFe.Det.Prod.med[j].qLote := Leitor.rCampo(tcDe3, 'qLote'); (*K04*)NFe.Det.Prod.med[j].dFab := Leitor.rCampo(tcDat, 'dFab '); (*K05*)NFe.Det.Prod.med[j].dVal := Leitor.rCampo(tcDat, 'dVal '); (*K06*)NFe.Det.Prod.med[j].vPMC := Leitor.rCampo(tcDe2, 'vPMC '); inc(j); end; Mas não estão sendo retornados os campos e o XML em anexo a este post tem conforme vc pode verificar. Já fiz de tudo vc tem alguma luz??? rsrsrs Aguardo!

Boa Tarde Colegas, Estou enfrentando um problema que há dias não consegui ainda solucionar o problema. Já procurei no forum e tambem ja utilizei exemplos mas ainda não consegui. Possuo um XML de NF-e de medicamentos com as Tags nLote, qLote, vLote, nPMC preenchidas corretamente porém não estão sendo lidas ou mesmo encontradas pelo ACBRNFe2. Já fiz todas as atualizações do ACBR na data de hoje pelo SVN. Preciso da ajuda dos colegas para me dizer onde estou errando. Segue trecho do código que utilizo para importar o produto pelo XML da NFe de medicamentos: for i:=0 to (NFe.NotasFiscais.Items[0].NFe.Det.Count - 1) do begin Items.Insert; ItemsCOD_PRO.AsString := Nfe.NotasFiscais.Items[0].Nfe.Det.Items.Prod.cProd; OK ItemsEAN.AsString := Nfe.NotasFiscais.Items[0].Nfe.Det.Items.Prod.cEAN; OK ItemsPRODUTO.AsString := Nfe.NotasFiscais.Items[0].Nfe.Det.Items.Prod.xProd; OK ItemsFARM_INFO_ADIC.AsString := Nfe.NotasFiscais.Items[0].Nfe.Det.Items.infAdProd; (Isso aqui tambem vem limpo sem dados mesmo se no XML possui informação adicional do produto) ...alguns outros campos e no final: //PRODUTOS FARMACIA for J:=0 to (NFe.NotasFiscais.Items[0].NFe.Det.Items.Prod.med.count - 1) do Med := (NFe.NotasFiscais.Items[0].NFe.Det.Items.Prod.med.count - 1); if Med > 0 then begin ItemsFARM_LOTE.AsString := Nfe.NotasFiscais.Items[0].NFe.Det.Items.Prod.med.Items[J].nLote; (Não retorna nada) ItemsFARM_QTD_LOTE.AsFloat := Nfe.NotasFiscais.Items[0].NFe.Det.Items.Prod.med.Items[J].qLote; (Não retorna nada) ItemsFARM_FAB.AsDateTime := Nfe.NotasFiscais.Items[0].NFe.Det.Items.Prod.med.Items[J].dFab; (Não retorna nada) ItemsFARM_VAL.AsDateTime := Nfe.NotasFiscais.Items[0].NFe.Det.Items.Prod.med.Items[J].dVal; (Não retorna nada) ItemsFARM_VALOR_PMC.AsFloat := Nfe.NotasFiscais.Items[0].NFe.Det.Items.Prod.med.Items[J].vPMC; (Não retorna nada) end; Segue o XML em anexo para análise dos colegas (Dados empresas alterei mas o XML é original validado) Aguardo o contato dos colegas... 25141110851391000101550010000492041248372578-acbr.xml

Alguém já homologou o TEF com impressoras não fiscais?

Boa Tarde colegas, Desculpem se estou postando em lugar errado mas como se trata de NFC-e achei melhor postar aqui. Se estiver errado por favor perdoem-me. Sou programador Delphi Sênior (Iniciante) e domino boa parte da programação em Delphi mas não tenho conhecimentos necessários para mudar ou mesmo implementar o código do ACBR. Gostaria bastante de estar contribuindo com a comunidade mas no momento como não tenho conhecimento para isso preciso do serviço de alguém que se habilite em desenvolver os procedimentos necessários para estar Homologando o TEF com o ACBR no NFC-e com impressão não fiscal. Meu sistema já esta em perfeito funcionamento com todas as regras de negócios funcionando mas para o TEF para impressoras não fiscais ainda não fiz por não saber em qual arquivo devo "mexer" para as adequações. Recebi os procedimentos e são bastante simples e pretendo PAGAR o serviço de quem se habilitar a fazê-lo. Segue abaixo: Passo 1. Caso a solução utilize impressora NÃO fiscal, o Concentrador TEF deverá incluir informações como : • Nome do Estabelecimento: constante da tabela de Estabelecimentos (tipo 9X). Se o nome possuir mais caracteres que o número de colunas disponíveis para impressão, o terminal deve continuar a impressão na próxima linha. • Endereço do Estabelecimento: constante da tabela de Configuração (tipo 1B). Se no endereço existir o caractere de quebra de linha (#), o terminal deve continuar a impressão na próxima linha. Cidade e Estado do Estabelecimento:, constante da tabela de Configuração (tipo 1B). Se na cidade existir o caractere de quebra de linha (#), o terminal deve continuar a impressão na próxima linha. Passo 2. Como as impressoras não fiscais não possuem controle efetivo da impressão, é necessária a colocação de uma pergunta no final da impressão, conforme mensagem descrita neste passo. Mensagem: “COMPROVANTE DE VENDA IMPRESSO CORRETAMENTE ? <SIM> <NÃO> <REIMPRIME>” 2.1 Se o operador de caixa responder SIM. A automação retornará uma solicitação de confirmação para o Client. Retornar ao fluxo original. 2.2 Se o operador de caixa responder NÃO. A automação apresenta a mendagem: “TRANSAÇÃO CANCELADA, ERRO NA IMPRESSÃO OK “ e retornará uma solicitação de desfazimento para o Client, o mesmo apresenta a mensagem e solicita a confirmação do operador de caixa. Retorna ao fluxo original. 2.3 Se o operador de caixa responder REIMPRIME, a automação tenta imprimir os comprovantes novamente e segue para o inicio do passo 2. 2.4 Caso o operador cancele a operação fechando a janela da mensagem, A automação apresenta a mendagem: “TRANSAÇÃO CANCELADA, ERRO NA IMPRESSÃO <OK> “ e retornará uma solicitação de desfazimento para o Client, o mesmo apresenta a mensagem e solicita a confirmação do operador de caixa. Retorna ao fluxo original. Aguardo retorno...