Isaque Pinheiro

qrcupom_item.close; qrcupom_item.sql.clear; qrcupom_item.sql.add('select'); qrcupom_item.sql.add('sum(base_calculo) as base_icms,'); qrcupom_item.sql.add('sum(valor_icms) as valor_icms,'); qrcupom_item.sql.add('sum(base_sub) as base_sub,'); qrcupom_item.sql.add('sum(icms_sub) as icms_sub,'); qrcupom_item.sql.add('sum(valor_ipi) as valor_ipi,'); qrcupom_item.sql.add('sum(total) as valor_total,'); qrcupom_item.sql.add('cst, cfop, icms'); qrcupom_item.sql.add('from c000062'); qrcupom_item.SQL.add('where codnota = '''+qrItens.fieldbyname('codigo').asstring+''''); qrcupom_item.sql.add('group by cfop'); qrcupom_item.SQL.add('order by cfop'); qrcupom_item.open; qrcupom_item.first; while not qrcupom_item.eof do begin with RegistroC190New do //Inicio Adicionar os Impostos: begin CST_ICMS := qrcupom_item.fieldbyname('cst').asstring; CFOP := qrcupom_item.fieldbyname('cfop').asstring; ALIQ_ICMS := StrToFloat(qrcupom_item.fieldbyname('icms').asstring); VL_OPR := 0; VL_BC_ICMS := StrToFloat(qrcupom_item.fieldbyname('base_icms').asstring); VL_ICMS := StrToFloat(qrcupom_item.fieldbyname('valor_icms').asstring); VL_BC_ICMS_ST := StrToFloat(qrcupom_item.fieldbyname('base_sub').asstring); VL_ICMS_ST := StrToFloat(qrcupom_item.fieldbyname('icms_sub').asstring); VL_RED_BC := 0; VL_IPI := StrToFloat(qrcupom_item.fieldbyname('valor_ipi').asstring); COD_OBS := '000'; qrcupom_item.next; end; qrcupom_item.next; end; Rodrigo faça o teste do SQL, em uma ferramenta antes de jogar para seu código, assim poderá vê se a filtragem, e agrupamentos estão corretos. Abraço

Opa, já tinha excluído.

Olhe nesse link e verá exemplos do arquivo preenchidos. http://www1.receita.fazenda.gov.br/sped-fiscal-pis-cofins/exemplos-de-arquivos.htm

Baixei e subi para o SVN. Abração

Para CST (CSOSN) no simples nacional, eu estou mandando os três caracteres, não mando a origem. 101,102,103,201,202,203,300,400,500,900

Lançado a versão 1.0 Beta do componente ACBrSpedPisCofins, gostaria de agradecer a todos, que colaboraram com este componente. vcs estão de parabéns pela iniciativa de ajudar, muitos se dispuseram a ajudar tb por email, pelo forum por skype. Quero continuar com a colaboração de todos, para criarmos um Demo, e nesse fazermos os testes de todos os registros. Podem baixar do SVN, uma versão Beta instalavél. Após os testes e a funcionalidade deste componente, poderemos criar uma pasta no diretorio Branches, para darmos inicio a fusão dos registros para os três componentes ACBrSPED - Contabil, Fiscal e PisCofins.

Lançado a versão 1.0 Beta do componente ACBrSpedPisCofins, gostaria de agradecer a todos, que colaboraram com este componente. vcs estão de parabéns pela iniciativa de ajudar, muitos se dispuseram a ajudar tb por email, pelo forum por skype. Quero continuar com a colaboração de todos, para criarmos um Demo, e nesse fazermos os testes de todos os registros. Podem baixar do SVN, uma versão Beta instalavél. Após os testes e a funcionalidade deste componente, poderemos criar uma pasta no diretorio Branches, para darmos inicio a fusão dos registros para os três componentes ACBrSPED - Contabil, Fiscal e PisCofins.

Otima idéia, sou totalmente a favor. Vamos fazer da seguinte forma, vou pegar esse ultimo pacote que foi disponibilizado aqui e concluir o SPED Pis/Cofins, pois tem algumas empresas como o prazo definido para começar a entregar. Após ele estar funcional, ai damos inicio a fusão dos três componentes mantendo uma class central da qual terá as registros que servirá para mais de um componente, ficará excelente, assim que eu gosto tb. Mãos a obra então, vou tentar terminar esse componente, esse final de semana.

Olá, realmente, teremos esse mesmo problema com o SPEDContabil, então pensei em resolver da seguinte forma: Fiscal = TEFDOpenBlocos Contabil = TECDOpenBlocos Pis/Cofins = TEPCOpenBlocos O que acham ?

Pessoal, estou baixando todas as colaborações disponobilizadas nos tópicos para fazer um merge e concluir o componentes. Abs a todos

Primeiro quero me desculpar com todos, por minha ausencia, não esta facil para mim fazer várias coisas ao mesmo tempo, dai tenho que abrir mão de alguma coisa, e infelizmente o acompanhamento deste componente teve que ser uma delas. Fernando (aquiniti), baixei tudo que vc fez e já enviei suas implementações para o SVN, quem quiser baixar para dar uma olhada, fique a vontade. ACBrEFCBlocos.rar ACBrEFDBloco_0_Class.rar ACBrEPCBloco_1_Class.rar ACBrEPCBloco_D_Class.rar ACBrEPCBloco_F_Class.rar ACBrEPCBloco_M_Class.rar Fernando (lampada), baixei seus ajustes e já subi para o SVN, não sei se vc tem permissão, mas se tiver, puder e quiser, ajudar a subir os ajustes para o SVN, fique a vontade, só peço, que sempre reporte o que vc subiu. Abs

Valeu, peguei...

Valeu, peguei...

Boa, podemos fazer o seguinte, cada um pega uma Unit ACBrEPCBloco_?.pas e verifica se esta deacordo os compos com o manual, e observar tb se a hierarquia, esta implemantada. A Hierarquia, vc irão verificar pelo NIVEL começando pelo NIVEL "1", então tem que ficar assim: Registros NIVEL 1 é o Pai Registros NIVEL 2 são filhos do NIVEL 1 Registros NIVEL 3 são filhos do NIVEL 2 Registros NIVEL 4 são filhos do NIVEL 3 e assim sucessivamente. Cada um pega um Bloco e confere, conforme o manual tendo alguam alteração, postamos aqui e subimos para o SVN. Após toda conferencia, vamos desenvolver as class de escrita dos registros ACBrEPCBloco_?_Class.pas, já temos como exemplo o ACBrEPCBloco_A_Class.pas, vou conferi-lo todo, para vê se ta certinho. Abs

Este campo só é add ao registro se a versão for 102, caso a versão seja 103, este campo não é add. Já esta no SVN, a um tempinho, se não me engano logo en seguida vc ter me passado as correções.

Isso já foi corrigido, favor conferir e relatar se houver algum problema.

Ola, isso já foi corrigido.

Olá, agradeço os esforços de vcs, estou sufocado de serviços, claro que isso não pe novidade para ninguem que trabalha com desenvolvimento, mas baixei as units, e semana que vem darei uma olhada dando assim alguns passos a mais para termos a 1a versão.

Graça, no fonte tem pontos que é checado a versão para gerar o registro correto, mas não tenho certeza que foram feitos para todos os registros dessa versão. Procure no fonte pelo tipo de versão que irá encontrar como foi implementado, e caso haja necessidade de implementar outros registro, é só me mandar depois, anexando eles aqui.

Obrigado Juliomar, já subi para o SVN.

Resolvido, e já no SVN.

with RegistroC405New do begin DT_DOC := Date; with RegistroC460New do begin DT_DOC := Date; end; end; [/code]

Tem que, selecionar a Versão 103 do layout.

Obrigado, e desejo o mesmo para vc e seus familiares.

Corrigido, já esta disponivel no SVN.