laurovinicius

valeu EmBarbosa,Realmente faltava o numero do ECF...!! Eu corrigi porem ainda da o mesmo erro! fiz um teste e veja como ficou esse arquivo: 1004564686000102103433449 TESTE SISTEMAS CALDAS NOVAS GO61304252772012070120120731331 11RUA B28 QD 38 LT 17 00004 ITANHANGA I 75690000RESPONSAVEL 006130425277 60M20120701BE0510756100000618460012D02203902212700070200300000000001163560000000036507013 60M20120702BE0510756100000618460012D02208402215800070300300000000000582600000000036565273 60M20120703BE0510756100000618460012D02213002220600070400300000000001445130000000036709786 60A20120701BE05107561000006184617 000000072495 60A20120701BE051075610000061846F 000000019075 60A20120701BE051075610000061846I 000000000000 60A20120702BE05107561000006184617 000000041160 60A20120702BE051075610000061846F 000000017100 60A20120702BE051075610000061846I 000000000000 60A20120703BE05107561000006184617 000000082430 60A20120703BE051075610000061846F 000000019276 60A20120703BE051075610000061846I 000000000000 9004564686000102103433449 6000000012 2 9004564686000102103433449 9900000016 2 ele ainda da o mesmo erro( Registro 60 analitico sem o registro mestre correspondente) e agora também diz tem Registro 60m sem o 60a correspondente

Olá Amigos, estou tendo um probleminha com o registro 60m e 60a e gostaria da ajuda de voces! 1004564686000102103433449 Super Pao CALDAS NOVAS GO61304252772012070120120731331 11RUA B28 QD 38 LT 17 00004 ITANHANGA I 75690000RESPONSAVEL 006130425277 60M20120701BE0510756100000618460012D02203902212700070200300000000001163560000000036507013 60A201207011 17 000000072495 60A201207011 F 000000019075 60A201207011 I 000000000000 60A201207011 N 000000000000 60A201207011 DESC000000000000 60A201207011 CANC000000024786 9004564686000102103433449 6000000007 2 9004564686000102103433449 9900000011 2 nesse exemplo que voces podem ver, o validador gera os seguintes erros: Registro 60 analitico sem o registro mestre correspondente(6 erros) Registro 60M sem 60 a Correspondente(1 Erro) Onde Estou Errando??

Desculpe regys, me expressei mal...o que eu quero saber(e acho que é uma pergunta meio imbecil), é se eu tenho que tirar essas informações do meu banco de dados, fazendo selects com as devidas junções das tabelas pra poder gerar esses dados!!

Pessoal alguem pode me dar uma mao pra mim poder gerar os registros 60m e 60a ?? tenho algumas duvidas no preenchimento de alguns campos como segue abaixo: //Registro 60M wregistro60M.CooInicial:=1000;(Como Preencher esse Campo??) wregistro60M.CooFinal:=1050;(Como Preencher esse Campo??) wregistro60M.CRZ:=1;(Como Preencher esse Campo??) wregistro60M.CRO:=1;(Como Preencher esse Campo??) wregistro60M.VendaBruta:=2050.35;(Como Preencher esse Campo??) wregistro60M.ValorGT:=10000;(Como Preencher esse Campo??) ACBrSintegra.Registros60M.Add(wregistro60M); //Registro 60A wregistro60A:=TRegistro60A.Create; wregistro60A.Emissao:=ACBrSintegra.Registro10.DataInicial; wregistro60A.NumSerie:='000000987456'; wregistro60A.StAliquota:='F';(Como Preencher esse Campo??) wregistro60A.Valor:=500;//(Como Preencher esse Campo??) ACBrSintegra.Registros60A.Add(wregistro60A); se alguem poder me dar uma luz eu agradeço!

bom fiz assim agora: procedure TACBrSintegra.GerarRegistros74; var i: Integer; wregistro74: TRegistro74; begin for i:=0 to Registros74.Count - 1 do begin DM.ZroProdutos.open; DM.ZroProdutos.First; while not DM.ZroProdutos.eof do begin wregistro74:=TRegistro74.Create; wregistro74.FData:=2011-12-31; wregistro74.Fcodigo:=Dm.ZroProdutosId.AsString; wregistro74.Quantidade:=(Dm.ZroProdutosSaldoReal.Ascurrency); wregistro74.ValorProduto:=(Dm.ZroProdutosPrVenda.Ascurrency); wregistro74.CodigoPosse:='1'; wregistro74.CnpjPossuidor:='07306894000191'; wregistro74.InscricaoPossuidor:='000000000'; wregistro74.UfPossuidor:='GO'; form1.ACBrSintegra.Registros74.Add(wregistro74); DM.ZroProdutos.next; end; end; mas so apareceu o cabecalho: 1011111111111111ISENTO EMPRESA DE TESTE CIDADE DE TESTE MG35111111112008070120080731331 11ENDERECO DA EMPRESA 00001 BAIRRO DA EMPRE11111111RESPONSAVEL 001111111111 9011111111111111ISENTO 9900000003 1

ESTOU APANHANDO NO CODIGO VEJA O QUE EU FIZ: procedure TACBrSintegra.GerarRegistros74; var i: Integer; wregistro74: TRegistro74; begin DM.ZroProdutos.open; DM.ZroProdutos.First; while not DM.ZroProdutos.eof do begin begin wregistro74:=TRegistro74.Create; wregistro74.FData:=2011-12-31; wregistro74.Fcodigo:=Dm.ZroProdutosId.AsString; wregistro74.Quantidade:=(Dm.ZroProdutosSaldoReal.Ascurrency); wregistro74.ValorProduto:=(Dm.ZroProdutosPrVenda.Ascurrency); wregistro74.CodigoPosse:='1'; wregistro74.CnpjPossuidor:='07306894000191'; wregistro74.InscricaoPossuidor:='000000000'; wregistro74.UfPossuidor:='GO'; //WriteRecord(wregistro74); //ACBrSintegra.Registros60R.Add(wregistro60R); // ASSIM POR DIANTE DM.ZroProdutos.next; end; end; Nao esta dando certo!

Olá Pessoal, estou apanhando na Geração do sintegra nos registros 74 e 75, alguém tem um exemplo que possa postar aqui pra mim ajudar?????? Sei que tem o Demo do Acbr, mas mesmo assim estou com dificuldades!!!!!!!!

Amigos, desculpem minha Ignorancia, queria uma ajuda nas linhas de programacao, pra mim poder gerar o registro do sintegra 74 e 75.Sei que pra muitos isso é facil de mais mas pra mim... No exemplo DEMO do ACBR sintegra esta assim: procedure TACBrSintegra.GerarRegistros74; var i: Integer; wregistro: string; begin //Registros74.Sort(Sort74); for i:=0 to Registros74.Count - 1 do begin with Registros74 do begin wregistro:='74'; wregistro:=wregistro+FormatDateTime('yyyymmdd',Data); wregistro:=wregistro+Padl(Codigo,14); wregistro:=wregistro+TBStrZero(TiraPontos( FormatFloat('#,###0.000',Quantidade)),13); wregistro:=wregistro+TBStrZero(TiraPontos( FormatFloat('#,##0.00',ValorProduto)),13); wregistro:=wregistro+CodigoPosse; wregistro:=wregistro+TBStrZero(CNPJPossuidor,14); wregistro:=wregistro+Padl(InscricaoPossuidor,14); wregistro:=wregistro+Padl(UFPossuidor,2); wregistro:=wregistro+Space(45); //brancos WriteRecord(wregistro); end; end; end; Como eu faço pra mim pegar as informaçoes da minha tabela e gerar esses registros? Alguem pode me ajudar?

peterson Valeu pela dica Cara!!! realmente Funcionou..estava errado meu codigo! Valeu mesmo! flavioti...valeu também pela força!

Caros Colegas, estou começando em Nfe,e no XML...então gostaria da ajuda de vocês se possível... no exemplo demo, que vem no componente acbr, Nfe esta somente com 1 produto...estou com dificuldades de lançar vários produtos na mesma nota..no meu aplicativo(feito em Delphi) eu lançei a nota(de saida) assinei a mesma e mandei gerar o xml...ate ai sem problemas, porem, eles repete o mesmo produto..gostaria q olhassem meu código e verificassem onde estou errando trecho do codigo.txt