bfjulia

"CNPJ do emitente não cadastrado", estranho é que o cliente esta cadastrado afirma o contador, ele diz talves desta menssagem por testar no link sefaz de RS !?? Obrigado !

Pode me passar o link ? Obrigado !

Olá amigos, Tenho utilizado o seguinte site para analisar os erros de meus arquivos XML https://www.sefaz.rs.gov.br/nfe/nfe-val.aspx ou http://validadornfe.tecnospeed.com.br/ ambos tem me ajudado bastante, mas a questão é; A nota não é valida e eu não acho o erro ! Recorro a ajuda dos amigos, Obrigado ! 35130417402099000150550010000000011000000016-nfe.xml

Obrigado a todos o Igor tinha razão !

Kiko, tirei a barra sumiu mas o CST aparece 0300 !?

Olá amigos, com a juda dos companheiros estou adquirindo muitos conhecimentos bastante uteis, sou grato a todos por isso. Bom atualmente estou gerando o XML e analiso os erros através do site https://www.sefaz.rs.gov.br/nfe/NFE-VAL.aspx só que este site é do Rio Grande do Sul, alguém sabe qual o endereço e se existe um de analise do XML de SP ? Como os companheiros tratam as mensagens de erros via programação ? (Trabalho com Delphi7) OBRIGADO ! Júnior

Diga-me uma coisa no ABRr onde o parãmetro CSON é passado ? Meu código: while not IBQ_Itens.Eof do begin with Det.Add do begin Prod.nItem := vContador_Itens; // Número sequencial, para cada item deve ser incrementado Prod.cProd := IBQ_Itens.FieldByName('CODIGO').AsString; Prod.cEAN := ''; Prod.xProd := IBQ_Itens.FieldByName('DESCRICAO').AsString; Prod.NCM := IBQ_Itens.FieldByName('ncm').AsString; Prod.EXTIPI := IBQ_Itens.FieldByName('cst').AsString; Prod.CFOP := IBQ_Itens.FieldByName('cfop').AsString; Prod.uCom := IBQ_Itens.FieldByName('UNIDADE').AsString; Prod.qCom := IBQ_Itens.FieldByName('qtde').AsInteger; Prod.vUnCom := IBQ_Itens.FieldByName('PRECO_VENDA').AsCurrency; Prod.vProd := (IBQ_Itens.FieldByName('qtde').AsInteger * IBQ_Itens.FieldByName('PRECO_VENDA').AsCurrency); // VALOR Prod.cEANTrib := ''; Prod.uTrib := IBQ_Itens.FieldByName('UNIDADE').AsString; Prod.qTrib := IBQ_Itens.FieldByName('qtde').AsInteger; Prod.vUnTrib := IBQ_Itens.FieldByName('PRECO_VENDA').AsCurrency; Prod.vFrete := 0; Prod.vSeg := 0; Prod.vDesc := 0; infAdProd := ''; //'Este produto é um teste !'; with Imposto do begin ICMS.CST := cst41; ICMS.orig := oeNacional; ICMS.modBC := dbiMargemValorAgregado; // N13 - Modalidade de determinação da BC do ICMS ICMS.vBC := Prod.vProd; // N15 - Valor da BC do ICMS ICMS.pICMS := IBQ_Itens.FieldByName('ALIQ_ICMS').AsInteger; // N16 - Alíquota do imposto ICMS.vICMS := ((Prod.vProd * IBQ_Itens.FieldByName('ALIQ_ICMS').AsInteger) / 100); // N17 - Valor do ICMS end; IBQ_Itens.Next; vContador_Itens := (vContador_Itens + 1); end; end; Kiko, me perdo-e de lhe encomodar tanto des de já agradeço sua grande ajuda ! Júnior

Peterson deu certinho !!! Valeu amigão era o que eu precisava ! MUITO OBRIGADO MESMO ! Precisando de algo de nós pode contar conosco Ok ! Júnior

Obrigado Peterson XML Anexado ! 35130317402099000150550010000000011000000012-NFe.xml

Kiko, muito bom dia, e obrigado por sua ajuda, mas se não for muito será que vc poderia me explicar/exemplificar a solução para que eu emita esta NF ? Muito obrigado ! Júnior

XML esta anexo ! 35130317402099000150550010000000031000000033-nfe.xml

Consegui acertar através deste site https://www.sefaz.rs.gov.br/nfe/nfe-val.aspx desta forma encontrando os erros, mas a ultima coisa que me apareceu agora é essa : O CNPJ eu já estou resolvendo com o contador, mas o 630: Valor do produto diferente do unitário de tributação ??? O que é isso ? Obrigado a todos !

Olá amigos, creio estar em uma reta final da emissão de NFe, mas tem sempre um ultimo "parafuso para dificultar" recorro a ajudo dos amigos experientes no assunto : Menssagens de erro : Valor do Produto diferente do produto valor unitário de tributação e quantidade tributável. Quem poder me dar uma ajuda, sou muito grato ! Júnior OBS: XML esta em anexo ! 35130317402099000150550010000000031000000033-nfe.xml 35130317402099000150550010000000031000000033-nfe.xml

Olá amigos, recorro aos colegas para mais uma dica, seguinte.... Meu NCM na impressão do DANFE sai com uma barra no final, tipo "39159000/" sendo que eu preciso que saia "39159000" pq esta barra ???? Mais uma vez obrigado a todos ! Júnior

Bom dia Perterson, muito obrigado por sua ajuda, mas vc pode me dar um exemplo, uma das descrições que preciso por exemplo é esta :

Pessoal, 1000 perdões estava cadastrando minhas duvidas no forum errado ! segue o link :

Olá amigos ! Estou finalizando a minha NFe, mas me surgiu uma duvida : Na impressão do danfe eu tenho um campo memo que eu passo como parãmetro para informações complementares, no memos esta assim : Por que ? O que eu preciso fazer para sair como esta no memo ! Obrigado a todos mais uma vez ! Júnior Meu Código : EdtObs.Text := IBQ_SaidasOBS.AsString; with InfAdic.obsFisco.add do begin if EdtObs.Lines[0] <> '' then begin with InfAdic.obsFisco.add do begin xCAmpo := '1-'; xTexto := EdtObs.Lines[0]; //Showmessage(EdtObs.Lines[0]); end; end; if EdtObs.Lines[1] <> '' then begin with InfAdic.obsFisco.add do begin xCAmpo := '2-'; xTexto := EdtObs.Lines[1]; Showmessage(EdtObs.Lines[1]); end; end; if EdtObs.Lines[2] <> '' then begin with InfAdic.obsFisco.add do begin xCAmpo := '3-'; xTexto := EdtObs.Lines[2]; Showmessage(EdtObs.Lines[2]); end; end; if EdtObs.Lines[3] <> '' then begin with InfAdic.obsFisco.add do begin xCampo := '4-'; xTexto := EdtObs.Lines[3]; Showmessage(EdtObs.Lines[3]); end; end; end;

Pessoal até agora estou na mesma, porém acho que encontrei uma luz, neste site mencionado abaixo ele lê o xml e retorna o erro veja : Resultado : Data de entrada / Emissão é fácil de ageitar, mas "CNPJ Emitente não cadastrado" ? Não entendi ???

Prezados amigos estou tendo a seguinte menssagem de erro a enviar a nf "Falha no Schema" estou me sentindo como se tive-se que achar uma agulha em um palheiro, alguem pode me dar uma dica ? Mais uma vez obrigado a todos ! Júnior 31121225374984000363550010000003981796691929-NFe.xml

Help ???

Olá amigos ! Estou finalizando a minha NFe, mas me surgiu uma duvida : Na impressão do danfe eu tenho um campo memo que eu passo como parãmetro para informações complementares, no memos esta assim : Por que ? O que eu preciso fazer para sair como esta no memo ! Obrigado a todos mais uma vez ! Júnior Meu Código : EdtObs.Text := IBQ_SaidasOBS.AsString; with InfAdic.obsFisco.add do begin if EdtObs.Lines[0] <> '' then begin with InfAdic.obsFisco.add do begin xCAmpo := '1-'; xTexto := EdtObs.Lines[0]; //Showmessage(EdtObs.Lines[0]); end; end; if EdtObs.Lines[1] <> '' then begin with InfAdic.obsFisco.add do begin xCAmpo := '2-'; xTexto := EdtObs.Lines[1]; Showmessage(EdtObs.Lines[1]); end; end; if EdtObs.Lines[2] <> '' then begin with InfAdic.obsFisco.add do begin xCAmpo := '3-'; xTexto := EdtObs.Lines[2]; Showmessage(EdtObs.Lines[2]); end; end; if EdtObs.Lines[3] <> '' then begin with InfAdic.obsFisco.add do begin xCampo := '4-'; xTexto := EdtObs.Lines[3]; Showmessage(EdtObs.Lines[3]); end; end; end;

RESOLVIDO ! Amigos o peterson161 tinha razão, foi só mudar o parãmetro "ACBrNFe1.NotasFiscais.Add.NFe.Emit.CRT" para "Emit.CRT := crtRegimeNormal; // (1-crtSimplesNacional, 2-crtSimplesExcessoReceita, 3-crtRegimeNormal)" pronto ! O valores foram impressos ! Muito Obrigado amigos ! Tenham um ótimo dia. Júnior

Meu problema é este : TRAVEI AQUI !!! Código que estou usando : with Det.Add do begin Abre_Itens; while not IBQ_Itens.Eof do begin Prod.nItem := vContador_Itens; // Número sequencial, para cada item deve ser incrementado Prod.cProd := IBQ_Itens.FieldByName('CODIGO').AsString; Prod.cEAN := ''; Prod.xProd := IBQ_Itens.FieldByName('DESCRICAO').AsString; Prod.NCM := IBQ_Itens.FieldByName('ncm').AsString; Prod.EXTIPI := IBQ_Itens.FieldByName('cst').AsString; Prod.CFOP := IBQ_Itens.FieldByName('cfop').AsString; Prod.uCom := IBQ_Itens.FieldByName('UNIDADE').AsString; Prod.qCom := IBQ_Itens.FieldByName('qtde').AsInteger; Prod.vUnCom := IBQ_Itens.FieldByName('PRECO_VENDA').AsCurrency; Prod.vProd := (IBQ_Itens.FieldByName('qtde').AsInteger * IBQ_Itens.FieldByName('PRECO_VENDA').AsCurrency); // VALOR Prod.cEANTrib := ''; Prod.uTrib := IBQ_Itens.FieldByName('UNIDADE').AsString; Prod.qTrib := IBQ_Itens.FieldByName('qtde').AsInteger; Prod.vUnTrib := Prod.vProd; Prod.vFrete := 0; Prod.vSeg := 0; Prod.vDesc := 0; infAdProd := ''; //'Este produto é um teste !'; with Imposto do begin with ICMS do begin ICMS.modBC := dbiMargemValorAgregado; // N13 - Modalidade de determinação da BC do ICMS ICMS.vBC := Prod.vProd; // N15 - Valor da BC do ICMS ICMS.pICMS := 18; // N16 - Alíquota do imposto ICMS.vICMS := 6.42; // N17 - Valor do ICMS end; end; //Grupo para serviços {with Imposto.ISSQN do begin cSitTrib := ISSQNcSitTribNORMAL; vBC := 120; //Prod.vProd; //100; vAliq := IBQ_Itens.FieldByName('aliq_icms').AsInteger; vISSQN := 2; cMunFG := 3554003; cListServ := 1402; // Preencha este campo usando a tabela disponível // em http://www.planalto.gov.br/Ccivil_03/LEIS/LCP/Lcp116.htm end;} IBQ_Itens.Next; vContador_Itens := (vContador_Itens + 1); end; IBQ_Itens.Close; end; Total.ICMSTot.vBC := IBQ_SaidasVLR_BASE_ICMS.Value; Total.ICMSTot.vICMS := IBQ_SaidasVLR_ICMS.Value; Total.ICMSTot.vBCST := 0; Total.ICMSTot.vST := 0; Total.ICMSTot.vProd := IBQ_SaidasVLR_NOTA_FISCAL.Value; Total.ICMSTot.vFrete := IBQ_SaidasVLR_FRETE.Value; Total.ICMSTot.vSeg := IBQ_SaidasVLR_FRETE_SEGURO.Value; Total.ICMSTot.vDesc := 0; Total.ICMSTot.vII := 0; Total.ICMSTot.vIPI := IBQ_SaidasVLR_IPI.Value; Total.ICMSTot.vPIS := 0; Total.ICMSTot.vCOFINS := 0; Total.ICMSTot.vOutro := 0; Total.ICMSTot.vNF := IBQ_SaidasVLR_NOTA_FISCAL.Value; Total.ISSQNtot.vServ := 0; Total.ISSQNTot.vBC := 0; Total.ISSQNTot.vISS := 0; Total.ISSQNTot.vPIS := 0; Total.ISSQNTot.vCOFINS := 0; OBRIGADO AMIGOS PELA ATENÇÃO !!! MUITO OBRIGADO MESMO !!! Junior.

Vou fazer testes hoje com base na ajuda dos amigos e se OK ou não eu posto aqui ! Um Ótimo dia a todos e muito obrigado ! Vamos testar....

Prezados amigos do fórum, boa noite ! Estou precisando muito de uma ajuda, a questão é : Na área do DANFE DADOS DOS PRODUTOS / SERVIÇOS não sai os valores das coluna B.CALC.DO ICMS, VALOR DO ICMS VALOR DO IPI, ALIQ.ICMS e ALIQ IPI, sai tudo com o valor 0 ( zero ). Não estou sabendo passar estes valores para o ACBr, veja; with Det.Add do begin Abre_Itens; while not IBQ_Itens.Eof do begin Prod.nItem := vContador_Itens; // Número sequencial, para cada item deve ser incrementado Prod.cProd := IBQ_Itens.FieldByName('CODIGO').AsString; Prod.cEAN := ''; Prod.xProd := IBQ_Itens.FieldByName('DESCRICAO').AsString; Prod.NCM := IBQ_Itens.FieldByName('ncm').AsString; Prod.EXTIPI := IBQ_Itens.FieldByName('cst').AsString; Prod.CFOP := IBQ_Itens.FieldByName('cfop').AsString; Prod.uCom := IBQ_Itens.FieldByName('UNIDADE').AsString; Prod.qCom := IBQ_Itens.FieldByName('qtde').AsInteger; Prod.vUnCom := IBQ_Itens.FieldByName('PRECO_VENDA').AsCurrency; Prod.vProd := (IBQ_Itens.FieldByName('qtde').AsInteger * IBQ_Itens.FieldByName('PRECO_VENDA').AsCurrency); // VALOR Prod.cEANTrib := ''; Prod.uTrib := IBQ_Itens.FieldByName('UNIDADE').AsString; Prod.qTrib := IBQ_Itens.FieldByName('qtde').AsInteger; Prod.vUnTrib := Prod.vProd; Prod.vFrete := 0; Prod.vSeg := 0; Prod.vDesc := 0; infAdProd := ''; //'Este produto é um teste !'; //Grupo para serviços with Imposto.ISSQN do begin cSitTrib := ISSQNcSitTribNORMAL; vBC := Prod.vProd; //100; vAliq := IBQ_Itens.FieldByName('aliq_icms').AsInteger; vISSQN := 2; cMunFG := 3554003; cListServ := 1402; // Preencha este campo usando a tabela disponível // em http://www.planalto.gov.br/Ccivil_03/LEIS/LCP/Lcp116.htm end; IBQ_Itens.Next; vContador_Itens := (vContador_Itens + 1); end; IBQ_Itens.Close; end; Recorro ao auxilio dos colégas mais experientes ! MUITO OBRIGADO A TODOS ! Júnior