marcelo_sp

Veja oque o Jorge Campos do SpedBrasil comenta sobre esta questão : http://www.spedbrasil.net/forum/topics/onde-eu-defino-se-a-empresa-usa-apropria-o-direta-ou-rateio ...leia o tópico do link todo , mas especificamente dentro do link acima , veja oque diz : " Não é nenhum dos dois, é na cabeça do gestor da área de negócios. Por exemplo, imagine que eu entrei numa empresa hoje, e preciso desta informação, a primeira pergunta que eu faço é a seguinte: - os créditos de pis/cofins são apropriados no lançamento do documento fiscal? ou somente quando a empresa realiza a receita? Pergunta básica feita...resposta básica fornecida: se a resposta for: No lançamento da nota, então o método é o de rateio, por outro lado, se a resposta for: Apenas na realização da receita é que a empresa apropria o valor do crédito correspondente à receita auferida, então, o método é o de apropriação direta (Método de Contabilidade de Custo Integrada) Resumindo, não existe nenhum documento oficial, a opção se materializa pelo forma de escrituração, pela forma de lançamento dos documentos fiscais e a apropriação do crédito. abs " Estamos no Brasil meu amigo !!!!!

Validei um arquivo agora e foi normal : Verifique se no Registro : 1 : Registro0000New COD_VER := vlVersao106 ; // PVA Versão 2.0.30 . 2 : Somente o PVA Versão 2.0.30 do SpedFiscal Valida corretamente o registro 1010 .

Rodrigo , ta muito zuada sua rotina campeão : 1 - vc esta informando com hierarquia errada , veja : ...errado : with ACBrSPEDPisCofins1.Bloco_F do begin with RegistroF001New do begin if Copy(ComboBox4.Text, 0,1 ) = '2' then IND_MOV := imComDados else IND_MOV := imSemDados; end; // -- Vc fecha o registro pai (Hierarquia = 1) with RegistroF010New do // Errado Registro Filho do F001 (Hierarquia = 2) begin CNPJ := _DMPRINCIPAL.sdsusuarioCNPJ.Value;; end; ... correto : with ACBrSPEDPisCofins1.Bloco_F do begin with RegistroF001New do begin if Copy(ComboBox4.Text, 0,1 ) = '2' then IND_MOV := imComDados else IND_MOV := imSemDados; with RegistroF010New do // Coloque o Registro Filho F010 (Hierarquia = 2) dentro do F001 (Hierarquia = 1) begin CNPJ := _DMPRINCIPAL.sdsusuarioCNPJ.Value;; end; end ; end; 2 - Isso aqui não existe --->>>> RegistroF550New.CST_COFINS := stcofinsValorAliquotaPorST ; ...todas as vezes que for informar um registro NEW com ACBrSped... é assim : with RegistroF550New do // Nesse formato para todos os Registros do Sped de todos os blocos ! begin VL_REC_COMP := CST_PIS := ... etc... end ;

Fala ai Michael . Isso mesmo ! Sempre é o Registro de Detalhamento do movimento de uma determinada CST que são discriminados os códigos , note que estes códigos são vinculados a uma NCM , a NCM é a chave de cada grupo de produtos que totaliza a CST pelo código da receita ou crédito que o seu Sistema aponta ! Vou dar um Exemplo do Registro M400/M410=Pis/Pasep , Isentos e Não Tributados , CST's 04,05,06,07,08,09 : Vamos utilizar o movimento de CST 07 total dos Registro A , C , D ...etc : utiliza-se a tabéla = 4.3.14 - Tabela Operações com Isenção da Contribuição Social (CST 07): O Bloco M400 A CST 07 Totalizou um movimento geral do arquivo = 10.000,00 dos blocos A , C , D ...etc O M410 (Detalhamento do M400 que vão receber o Código NAT_REC) NAT_REC = 999 VL_REC = 5.000,00 NAT_REC = 101 VL_REC = 5.000,00 Totalizou = 10.000,00 Para os demais registros do bloco M tanto de receitas como de créditos segue o mesmo procedimento .

Certo Michael , i ai cara blz , vou tentar explicar : 1 - Vc utiliza um cadastro para cada uma dessas tabélas , ou seja , as tabelas tem um código para um formato de CST para um seguimento de negócio , Farmaceuticos , Combustiveis ....etc etc , certo ? 2 - Quando for gerar o Sped Pis Cofins o seu Sistema soma agrupando os movimentos de CST's 'Group by' com seus devidos Totais de valores movimentados de cada CST numa tabela temporaria , certo ? exemplo quando terminar de gerar o bloco C deu um total de : CST 01 = Total agrupado 10.500,00 , vc pesquisa naquela tabela do seu banco qual o código para a CST 01 deste cliente a informar no registro do bloco m para esta CST 01 . CST 07 = Total agrupado 20.000,00 , vc pesquisa naquela tabela do seu banco qual o código para a CST 07 deste cliente a informar no registro do bloco m para esta CST 07 . ...etc etc... ... enfim , cada CST tem um código "Do seguimento da Empresa Declarante do arquivo , movimentado de um produto" para ser declarado no Bloco M . I ai , clariou um pouco ?

Marcião , estou em casa agora , esta em maquina na automação , mas amanha de manha por volta das 8 hrs disponibilizo pra vc ! Pronto , espero que ajude !

Alexandre , sei que este tópico é antigo , mas gostaria de parabeniza-lo pela sua paciencia com os amigos do forum , precisamos frequentemente da qualidade de pessoas como vc e dos seus conhecimentos em excelência tbm partilhados aqui no forum , não só por este simples tópico em epigrafe , mas pelos demais tópicos que tenho acompanhado onde vc se manifesta com clareza , exatidão e principalmente educação para os demais colegas ! Um forte abraço meu amigo , Sucesso e continue assim , sempre !

Não Existe nenhum Bloco para declarar somente uma Aliquota especifica ! Oque existe é o Bloco M que é a apuração final de todo o movimento de todas as Aliquotas , Créditos e Débitos do Pis Cofins ! Dentro do Bloco M existem Registros que são ai sim informados grupos de informações dessas aliquotas ! Em relação a está questão , estude no manual de integração o Bloco M !

Gostaria de poder ajudar o "raosistemas" nessa empreitada , o layout disponibilizado é para um sistema que desenvolvi ! O sistema é parecido com o PVA importa um arquivo TXT e gera Sped's e tbm Sintegra , muito mais simples né , onde vc só informa o movimento sem nenhum calculo ou cruzamento de informação .

Posso te ajudar ? para isso preciso de algumas infomarções sua : 1 - Para que seguimento (Ramo de Atividade) vc vai gerar os Sped's ? 2 - Vc tem no seu sistema tudo referente Entradas e Saidas , inclusive dados do ECF ? 3 - O seu sistema pode gerar as informações deste Layout : Baixe o layout neste link : http://depositfiles.com/files/cv5m6cz4a

Veja só , todas as portarias inclusive a Portaria Cat 90/2000 em questão , encontra-se no portal da Sefaz-SP . Portarias : https://www.fazenda.sp.gov.br/nfe/legislacao/legislacao_em_vigor.asp Veja oque diz : http://info.fazenda.sp.gov.br/NXT/gateway.dll/legislacao_tributaria/portaria_cat/pcat902000.htm Pesquise mais pela Portaria Cat 90/2000 .

Cara , fica tranquilo que de acordo com o manual de integração da NFe : infCpl = de 1 a 5000 caracteres , acho que da pra tudo com certeza !

Le Lambertini , não sei se entendi direito a sua pergunta , vou responder oque entendi , de tudo um pouco , certo ? : 1-Vi que vc informa corretamente os COO's na NFe enviada , ok ! 2-Vc não informa em Informações Complementares da NFe os COO's referentes a este(s) Cupom(s) , Errado ! Para SP , vc tem que informar na Informação Complementar isso = "Emitida nos termos da Portaria CAT n-90/00 COO's XXXXXX...." . 3-Para gerar o SpedFiscal declarando os Registros C110 (Hierarquia=3 Filho do C100) e C114 (Hierarquia=4 Filho do C110) , vc tem que informar primeiro o Registro 0450 que vai ter que constar o COD_INF do C110 no COD_INF do 0450 , e é justamente a Informação Complementar que vai na NFe que tera que constar no Registro 0450 no campo TXT . veja oque diz o manual de integração sobre o campo TXT do Registro 0450 que no bloco-C cruza com o Registro C110 : " Texto livre da informação complementar existente no documento fiscal, inclusive espécie de normas legais, poder normativo, número, capitulação, data e demais referências pertinentes com indicação referentes ao tributo. " Cuidado com alguns "Contadores" !

Caso não for informar o bloco , informar assim : para o bloco A : with ACBrSPEDPisCofins1.Bloco_A do begin with RegistroA001New do begin IND_MOV := imSemDados ; // Informando sem movimento end ; end ; para o bloco D : with ACBrSPEDPisCofins1.Bloco_D do begin with RegistroD001New do begin IND_MOV := imSemDados ; // Informando sem movimento end ; end ; e assim po diante ... E quando houver dados = IND_MOV := imComDados ;

Vc disse: Precisamos ter um controle (totalizador)do IPI diariamente nas vendas através do cupom fiscal. Toda e qualquer tipo de informação/totalização que não conste na memória do ECF (MFD) , tem que ser utilizado gravação da sua AC em Banco de Dados , veja a cartilha do PAF-ECF que existem inumeras informações que não estão no ECF e tem que serem informadas na AC !

Isaque , devido alguns colegas ainda terem duvidas de utilização do ACBrSpedFiscal com adaptação do Software G5 entre outros , estou disponibilizando o Demo do ACBrSpedFiscal implementado com a geração para o G5 , acho que é legal ter um paralelo deste Demo para não confundir com o Demo Original na distribuição do componente , quando tiver tempo faz um merge e veja oque pode ser feito de melhor , blz ! abraço

Certo , olhe só , vou dar um exemplo do 0200 , para os demais registros é igual : 1º - Vc vai precisar de um TStringList privado para armazenar isso abaixo , para os demais registros segue a mesma regra . with Registro0200New do begin COD_ITEM := QryProdutosComercializados.fieldbyname('CODIGO').AsString ; //codigo do item DESCR_ITEM := QryProdutosComercializados.fieldbyname('DESCRICAO').asstring ; //descrição do item COD_BARRA := QryProdutosComercializados.fieldbyname('CODIGO_BARRAS').asstring ; //codigo de barras, se houver COD_ANT_ITEM := '' ; //código anterior do item UNID_INV := QryProdutosComercializados.fieldbyname('UNIDADE_CODIGO').asstring ; //unidade de medida utilizada na quantificação de estoques TIPO_ITEM := tiMercadoriaRevenda ; COD_NCM := QryProdutosComercializados.fieldbyname('NCM').asstring ; EX_IPI := '' ; // codigo EX, conforme a TIPI COD_GEN := '' ; // codigo do genero do item COD_LST := '' ; // codigo do serviço ALIQ_ICMS := 0 ; // aliquota de ICMS aplicavel ao item nas operações internas // TAG's Adicionais para registro 0200 Formato = ( Contimatic Phoenix G5 ) if Radio_Contimatic_G5.Checked = True Then begin // Coloquei essas variaveis somente para melhor entendimento Estética dos Campos (A gosto !!) REG_0200_COD_GRUPO := '' ; REG_0200_DESC_GRUPO := '' ; REG_0200_COD_SEFAZ := '' ; REG_0200_CSOSN := '' ; REG_0200_CST_ICMS := '' ; REG_0200_PER_RED_BC_ICMS := '' ; REG_0200_BC_ICMS_ST := '' ; REG_0200_CST_IPI_ENTRADA := '' ; REG_0200_CST_IPI_SAIDA := '' ; REG_0200_ALIQ_IPI := '' ; REG_0200_CST_PIS_ENTRADA := '' ; REG_0200_CST_PIS_SAIDA := '' ; REG_0200_NAT_REC_PIS := '' ; REG_0200_ALIQ_PIS := '' ; REG_0200_CST_COFINS_ENTRADA := '' ; REG_0200_CST_COFINS_SAIDA := '' ; REG_0200_NAT_REC_COFINS := '' ; REG_0200_ALIQ_COFINS := '' ; REG_0200_ALIQ_ISS := '' ; REG_0200_CC := '' ; REG_0200_OBSERVACAO := '' ; Arquivo_Temp_0200.Add( '|' + REG_0200_COD_GRUPO + '|' + REG_0200_DESC_GRUPO + '|' + REG_0200_COD_SEFAZ + '|' + REG_0200_CSOSN + '|' + REG_0200_CST_ICMS + '|' + REG_0200_PER_RED_BC_ICMS + '|' + REG_0200_BC_ICMS_ST + '|' + REG_0200_CST_IPI_ENTRADA + '|' + REG_0200_CST_IPI_SAIDA + '|' + REG_0200_ALIQ_IPI + '|' + REG_0200_CST_PIS_ENTRADA + '|' + REG_0200_CST_PIS_SAIDA + '|' + REG_0200_NAT_REC_PIS + '|' + REG_0200_ALIQ_PIS + '|' + REG_0200_CST_COFINS_ENTRADA + '|' + REG_0200_CST_COFINS_SAIDA + '|' + REG_0200_NAT_REC_COFINS + '|' + REG_0200_ALIQ_COFINS + '|' + REG_0200_ALIQ_ISS + '|' + REG_0200_CC + '|' + REG_0200_OBSERVACAO ) ; end ; // TAG's Adicionais para registro 0200 Formato = ( Contimatic Phoenix G5 ) end; // registro 0200 do Sped Fiscal ....e no evento abaixo fica assim : procedure TFrmSpedFiscal.ACBrSPEDFiscal1EventsBloco_0WriteRegistro0200( var ALinha: String); begin if Radio_Contimatic_G5.Checked = True Then begin ALinha := ALinha + Arquivo_Temp_0200.Strings[0] ; Arquivo_Temp_0200.Delete(0); end ; end;

O G5 importa o arquivo baseado do Sped Fiscal ! (Arquivo gerado pelo ACBrSpedFiscal com adaptações nos Eventos do componente) para ser importado pelo G5 , com essas adaptações do arquivo do Sped Fiscal o Sped Contribuições Pis Cofins e Sped Fiscal são contemplados em um unico arquivo de Escrituração completa , Sped Fiscal + Contribuições .

try ..escolha do certificado... "Não resolve ??" except end ;

Se não testou , tente tbm isso : No Internet Explorer vai em Ferramentas/Opções da Internet/Avançada e desmarque as opções abaixo : Verificar se ha revogacao de certificado do editor Verificar se ha revogacao de certificado do servidor Verificar se ha assinatura em programas baixados

Antes de dar open na IBQuery , altere as Propriedades : IBQuery1.BufferChunks := 100 ; // Defaut = 1000 , coloque 100 IBQuery1.Unidirectional := True ; // Defaut = False , coloque True Com isso vai resolver o seu problema ! Obs : Coloque Tópico como Resolvido neste e os demais que resolveu !

Tive um problema similar e pensei que fosse no componente ACBrSpedFiscal , mas depois de inumeros Debug's e testar debug com arquivos com 300 mil linhas , imagina ! pois com poucas linhas não dava erro algum . Acabei encontrando o bug em outro módulo do aplicativo como espliquei no topico em questão desta semana . Uma pergunta , qual Banco de dados e quais componentes de acesso a base vc esta usando ? Se for firebird com componentes Interbase , tem um bug no componente IBQuery para retorno de muitos registros !

Apos o Ctrl + M Apuração , valide novamente o arquivo , pronto ! Obs : Apos a apuracao , o PVA não permite mais alteraçoes na escrituração !

Bloco 1 sempre foi obrigatório , mas nas versões anteriores ele só advertia, agora o bloco 1 é de preenchimento obrigatório , como vc não exportou o registro 1010 , neste caso clique em Não se Aplica e coloque N ou S nas opções e salve , caso seja S , vc tera que preencher o Devido Registro correspondente , apos peça pra validar novamente que o erro desaparece . REGISTRO 1010: OBRIGATORIEDADE DE REGISTROS DO BLOCO 1 Este registro deverá ser apresentado por todos os contribuintes. Caso a resposta seja “S”, o contribuinte está obrigado à apresentação do registro respectivo. Se houver dispensa de apresentação do registro pela unidade federada, a resposta para o campo específico do registro deverá ser “N”. veja : http://www1.receita.fazenda.gov.br/sistemas/sped-fiscal/download/GUIA_PRATICO_DA_EFD_Versao_2.0.11.pdf

ricksarre , vc pode utilizar a função Trunc do Object Pascal ! Derrepente vc pode ter que truncar em outras ocasiões , não só no ECF . vc vai precisar ter um parametro no ini do seu sistema exemplo : Trunca_Arredonda=0 ( 0=Trunca , 1=Arredonda ) , tem que flexibilizar pra vc ter as duas opções no seu sistema pra quando precisar em Devices diferentes . Exemplo 1 = http://www.planetadelphi.com.br/dica/624/truncando-valores-reais-para-apenas-n-casas-decimais Exemplo 2 = http://www.resumoti.com.br/?p=136 ...entre outros do Google .