Geração De Arquivo Magnético Convênio 115/03

[armando.boza]

27 minutos atrás, kleberson disse:

Segue erro em anexo

erro.bmp

Observei que no grupo AcbrConvenio115Mestre não possui mais as tags abaixo:

      OMestre.Modelo := 21;
      OMestre.Serie := '001';

 

Bom dia, atualize seu acbr e dá uma olhada no programa exemplo, isso foi corrigido lá.

[Dercide Alvarez]

Kleberson,

Esses campos foram retirados do lay-out, dever ser informado :

    with ACBrConvenio115 do
    begin
      Modelo       := 21;
      Serie        :=  ==> Não pode ser 000
      CnpjEmitente := ==> Esta sendo passado zerado

Essas informações erradas que estão causando os erros.

Ajuste e teste novamente, e vá postando os erros.

 

Dercide.

 

 

[kleberson]

Agora apresentou o erro abaixo

erro.bmp

[Dercide Alvarez]

Kleberson,

Verifique se você informou o Código do IBGE.

Como explicado acima, esse campo obrigatoriamente deve ter 7 dígitos.

Dercide.

[kleberson]

Consegui corrigir o problema apresentado na mensagem. Validando o arquivo verifiquei que ele não está gerando o valor de Isentas no registro mestre, mas o valor de outras gera normalmente, ocasionando erro de diferença entre o registro mestre e o itens. No item o valor de isentas aparece na posição corretamente.

[kleberson]

Consegui resolver o problema o isentos.

[kmkeila]

Boa tarde !

Estou tentando gerar o arquivo do mês de janeiro e está apresentando o erro abaixo, estou utilizando o GeraTEDeNF_v300 de 23/02/2017.

Poderiam me ajudar !

[Jéter Rabelo Ferreira]

Boa tarde.

Unit do ACBrConvenio115 validada e OK.

Efetuei algumas correções pois alguns usuários (inclusive nós), estavam com problemas com a quantidade caracteres no arquivo do cadastro. Resolvido.

Outros problemas e validações OK.

Agradeço a todos que contribuíram com essas alterações.

Atenciosamente..

ACBrConvenio115.zip

[Daniel Simoes]

Já enviei para o SVN... Obrigado Jéter e demais...

[Cleber Ferreira]

Boa tarde,

 

Pessoal, ontem a noite, depois de atualizar meus fontes (horas depois da postagem acima do Daniel) e fazendo alguns testes, na hora de validar, algo em específico tive que alterar nos fontes do componente. No arquivo de destinatários, o alinhamento do campo de telefone estava a direita.Isso ocasionou rejeição na hora de validar. Fiz a alteração para alinhar a esquerda e deu certo.

[Dercide Alvarez]

56 minutos atrás, Cleber disse:

Boa tarde,

 

Pessoal, ontem a noite, depois de atualizar meus fontes (horas depois da postagem acima do Daniel) e fazendo alguns testes, na hora de validar, algo em específico tive que alterar nos fontes do componente. No arquivo de destinatários, o alinhamento do campo de telefone estava a direita.Isso ocasionou rejeição na hora de validar. Fiz a alteração para alinhar a esquerda e deu certo.

Acho que estão fazendo confusões com esses fontes, pois esse problema eu já tinha relatado e corrigido dia 15/02, e o arquivo foi validado sem problemas.

11) Telefone => esta preenchendo com zeros, deve ser brancos quando vazio, tive que trocar PadLeft por PadRight para evitar erro.

E agora testamos aqui com esses fontes e deu esse erro do telefone, erro 317 do campo 11.

Dercide.

 

 

[Arnaldo Cruz]

Baixei o ACBr Hoje 03/03/2017 as 12:20

desinstalei o ACBr Anterior, instalei o novo ACBr.

 

Quando vou compilar ou dá um builder no meu projeto da os seguintes erros

[dcc32 Error] uFrmMain.pas(105): E2010 Incompatible types: 'TTipoAssinanteConv115_Tab11_8_2' and 'TTipoAssinanteConv115_Tab11_1'
[dcc32 Error] uFrmMain.pas(108): E2003 Undeclared identifier: 'Modelo'
[dcc32 Error] uFrmMain.pas(109): E2003 Undeclared identifier: 'Serie'
[dcc32 Error] uFrmMain.pas(185): E2010 Incompatible types: 'TTipoAssinanteConv115_Tab11_8_2' and 'TTipoAssinanteConv115_Tab11_1'
[dcc32 Error] uFrmMain.pas(189): E2003 Undeclared identifier: 'Serie'

case Query.FieldByName('TIPOASSINANTE').AsInteger  of
0 : OMestre.TipoAssinante :=  tac1182None;
1 : OMestre.TipoAssinante :=  tac111ComercialIndustrial;
2 : OMestre.TipoAssinante :=  tac111PoderPublico ;
3 : OMestre.TipoAssinante :=  tac111ResidencialPessoaFisica;
4 : OMestre.TipoAssinante :=  tac111Publico;
5 : OMestre.TipoAssinante :=  tac111SemiPublico;
6 : OMestre.TipoAssinante :=  tac111Outros;
end;

OMestre.Modelo               := StrToInt(Query.FieldByName('MODELO').AsString) ;
OMestre.Serie                := Serie;//Query.FieldByName('SERIE').AsString ;

 

No Projeto exemplo do ACBr também dá os mesmo erros.

 

 

 

[Juliomar Marchetti]

Boa tarde

seus fontes devem possuir algum arquivo alterado localmente!

acabei de testar e não deu o erro mencionado!

Falta só conferir o problema informado pelo @Dercide Alvarez

[Arnaldo Cruz]

Juliomar não existe nenhuma alteração feita do jeito que baixei  está.

verifiquei pasta por pasta do Acbr todas estão marcadas com o icone verdinho, qdo tem alteração aparece o icone vermelho.

continua dando o mesmo erro

 

[dcc32 Error] UArquivos.pas(156): E2010 Incompatible types: 'TTipoAssinanteConv115_Tab11_8_2' and 'TTipoAssinanteConv115_Tab11_1'

[dcc32 Error] UArquivos.pas(173): E2003 Undeclared identifier: 'Modelo'

[dcc32 Error] UArquivos.pas(174): E2003 Undeclared identifier: 'Serie'

 

se eu comento as linhas abaixo o projeto compila

 

//                      case Query.FieldByName('TIPOASSINANTE').AsInteger  of
//                        0 : OMestre.TipoAssinante :=  tac1182None;
//                        1 : OMestre.TipoAssinante :=  tac111ComercialIndustrial;
//                        2 : OMestre.TipoAssinante :=  tac111PoderPublico ;
//                        3 : OMestre.TipoAssinante :=  tac111ResidencialPessoaFisica;
//                        4 : OMestre.TipoAssinante :=  tac111Publico;
//                        5 : OMestre.TipoAssinante :=  tac111SemiPublico;
//                        6 : OMestre.TipoAssinante :=  tac111Outros;
//                      end;

//OMestre.Modelo               := StrToInt(Query.FieldByName('MODELO').AsString) ;
//OMestre.Serie                := Serie;//Query.FieldByName('SERIE').AsString ;

[Dercide Alvarez]

1 hora atrás, Arnaldo Cruz disse:

Juliomar não existe nenhuma alteração feita do jeito que baixei  está.

verifiquei pasta por pasta do Acbr todas estão marcadas com o icone verdinho, qdo tem alteração aparece o icone vermelho.

continua dando o mesmo erro

 

[dcc32 Error] UArquivos.pas(156): E2010 Incompatible types: 'TTipoAssinanteConv115_Tab11_8_2' and 'TTipoAssinanteConv115_Tab11_1'

[dcc32 Error] UArquivos.pas(173): E2003 Undeclared identifier: 'Modelo'

[dcc32 Error] UArquivos.pas(174): E2003 Undeclared identifier: 'Serie'

 

se eu comento as linhas abaixo o projeto compila

 

//                      case Query.FieldByName('TIPOASSINANTE').AsInteger  of
//                        0 : OMestre.TipoAssinante :=  tac1182None;
//                        1 : OMestre.TipoAssinante :=  tac111ComercialIndustrial;
//                        2 : OMestre.TipoAssinante :=  tac111PoderPublico ;
//                        3 : OMestre.TipoAssinante :=  tac111ResidencialPessoaFisica;
//                        4 : OMestre.TipoAssinante :=  tac111Publico;
//                        5 : OMestre.TipoAssinante :=  tac111SemiPublico;
//                        6 : OMestre.TipoAssinante :=  tac111Outros;
//                      end;

//OMestre.Modelo               := StrToInt(Query.FieldByName('MODELO').AsString) ;
//OMestre.Serie                := Serie;//Query.FieldByName('SERIE').AsString ;

Arnaldo,

Esse erros são porque houve alteração no lay-out, e algumas propriedade foram tiradas e outras acrescentadas.

Esse assunto já foi discutido aqui, no dia 23/02. Da uma lida nos posts.

 

Esses campos foram retirados do lay-out, dever ser informado :

    with ACBrConvenio115 do
    begin
      Modelo       := 21;
      Serie        :=  ==> Não pode ser 000
      CnpjEmitente := ==> Esta sendo passado zerado

Dercide.

 

[Arnaldo Cruz]

1 hora atrás, Dercide Alvarez disse:

Arnaldo,

Esse erros são porque houve alteração no lay-out, e algumas propriedade foram tiradas e outras acrescentadas.

Esse assunto já foi discutido aqui, no dia 23/02. Da uma lida nos posts.

 

Esses campos foram retirados do lay-out, dever ser informado :

    with ACBrConvenio115 do
    begin
      Modelo       := 21;
      Serie        :=  ==> Não pode ser 000
      CnpjEmitente := ==> Esta sendo passado zerado

Dercide.

Dercide é que estou seguindo o exemplo do ACBR para geração do arquivo, que também está com o mesmo problema,

eu não tenho o novo layout já procurei na NET e não encontrei.

mas aparentemente já identifiquei onde está o problema como segue abaixo

TTipoAssinanteConv115_Tab11_1 = (
    tac111None,
    tac111ComercialIndustrial,
    tac111PoderPublico,
    tac111ResidencialPessoaFisica,
    tac111Publico,
    tac111SemiPublico,
    tac111Outros);
    tac11182Igrejas,
    tac11182Outros);

  TProdutoConv115_Tab11_2 = (
    pc112None,
    pc112Telefonia,
    pc112ComunicacaoDados,
    pc112TVAssinatura,
    pc112ProvimentoAcessoInternet,
    pc112Multimidia,
    pc112Outros);

eu poderia trocar para o TProdutoConv115_Tab11_2  porem estou com duvidas se não teria que ter um IF indicando qual propriedade usar.

se vc puder mim dá uma dica eu agradeço.

 

Obrigado

[Cleber Ferreira]

9 horas atrás, Dercide Alvarez disse:

Arnaldo,

Esse erros são porque houve alteração no lay-out, e algumas propriedade foram tiradas e outras acrescentadas.

Esse assunto já foi discutido aqui, no dia 23/02. Da uma lida nos posts.

 

Esses campos foram retirados do lay-out, dever ser informado :

    with ACBrConvenio115 do
    begin
      Modelo       := 21;
      Serie        :=  ==> Não pode ser 000
      CnpjEmitente := ==> Esta sendo passado zerado

Dercide.

 

 

Posso não estar pensando de forma lógica e estrutural o componente, mas será q esses atributos não poderiam ter ficado do jeito q estava antes? Modelo e série sendo informados no mestre do documento? Assim ficaria mais padronizado com os demais componentes envolvendo DFes(NFe, CTe...Etc).

É só uma sugestão mesmo...

Att.

[Arnaldo Cruz]

16 horas atrás, Cleber disse:

 

Posso não estar pensando de forma lógica e estrutural o componente, mas será q esses atributos não poderiam ter ficado do jeito q estava antes? Modelo e série sendo informados no mestre do documento? Assim ficaria mais padronizado com os demais componentes envolvendo DFes(NFe, CTe...Etc).

É só uma sugestão mesmo...

Att.

Dercide ou algum dos colegas  vc teria o novo manual e poderia disponibilizar para que eu possa atualizar minha geração de arquivo.

 

Obrigado

[Arnaldo Cruz]

Consegui valir o arquivo com a advertencia abaixo, mostrado tambem na imagem

Arq. Descrição da Advertência                                                             Qtde    
--------------------------------------------------------------------------------------------------
MEST 154-CNPJ numericamente inválido                                                             1
--------------------------------------------------------------------------------------------------
                                                            Total de Advertências:               1
                                                            
Fiz a verificação no arquivo e está preenchido com NNNNNNNNNNNNNN(14 digitos)

Não sei como resolver esta pendência

Aproveitando Gostaria de tirar uma duvida que mim foi imposta pelo contador.

Na minha tela de emissão eu tenho os campos abaixo que servemo para geração do arquivo

1 - Valor do Serviço
2 - Base de Cáculo
3 - Desconto
4 - Acrescimo
5 - Isentas
6 - Outros
7 - Total da NF

O contador mim ligou dizendo que os campos de 2 a 6 são desnecessários, pois devem sempre ser preenchidos
com zeros seja qual for o regime tributario da empresa.

porém se no arquivo for preenchido conforme indicação deste contador o arquivo não é validado

exemplo como indicado pelo contador(Não Valida)

1 - Valor do Serviço      350,00
2 - Base de Cáculo          0,00
3 - Desconto                0,00
4 - Acrescimo               0,00
5 - Isentas                 0,00
6 - Outros                  0,00
7 - Total da NF           350,00

Na Validação o erro diz que o Valot total deve ser BC + Isentas + Outros

exemplo sem seguir indicação do contador(Validação OK)

1 - Valor do Serviço      350,00
2 - Base de Cáculo          0,00
3 - Desconto                0,00
4 - Acrescimo               0,00
5 - Isentas                 0,00
6 - Outros                350,00
7 - Total da NF           350,00

Pergunto este contador está certo ?
  A - se sim porque o arquivo não valida.
  B - Se não o meu preenchimento está correto
 
  Obrigado

[Dercide Alvarez]

Arnaldo,

Segue o manual atualizado e a tabela de erros.

1) A advertência é porque o preenchimento do CNPJ esta errado, verifique o valor, veja através do arquivo de LOG de erros, ele mostra o valor que esta sendo preenchido.

2) Quanto ao teu questionamento sobre o campo outras, pelo o que estou vendo ele deve ser zerado.

O valor de outras deve existir na nota fiscal, senão existir deve ir zerado.

Dercide.

 

 

 

 

cv115_2017.pdf

TabErros__v_3_00a.pdf

Editado 6 Março, 2017 por Dercide Alvarez

[Jéter Rabelo Ferreira]

On 04/03/2017 at 1:17 AM, Cleber said:

 

Posso não estar pensando de forma lógica e estrutural o componente, mas será q esses atributos não poderiam ter ficado do jeito q estava antes? Modelo e série sendo informados no mestre do documento? Assim ficaria mais padronizado com os demais componentes envolvendo DFes(NFe, CTe...Etc).

É só uma sugestão mesmo...

Att.

Boa tarde.

Não Cleber, pois veja, a formação do Nome do Arquivo agora tem que constar Série do Documento fiscal, portanto,  mesma deve ir no mestre. E, por conseguinte, arquivos por série de Notas.

Atenciosamente.

Boa tarde.

Uma outra coisa, eu mão atualizei o programa de exemplo. 

Alguns dos erros acima é por causa disso, mas se Não em engano, teve um outro usuário que fez essa atualização.

Atenciosamente.

[Arnaldo Cruz]

Colegas já estou ficando desesperado

 se eu informar somente valor total no mestre e no detalhe, da erro dizendo que o valor total dever ser BC+Insento + outros e não valida o arquivo.

Se eu informo valor total e o mesmo valor em Outros valores o arquivo é validado porem aparece advertencia(1;A;M;154;[00045266522453];000001251) em todos os itens

Segue os arquivos gerados se alguem puder mim dá uma força eu pago pela ajuda, o contador disse que só aceita se não tiver advertencia, já segui o manual

e o arquivo está conforme o layout do manual. Não sei como tirar esta advertencia.

 

Estou postando os arquivos e imagem da validação quando não informo  OutrosValores, e estou postando os arquivos e imagem da validação quando informo o valorTotal=Outros Valores(nesse caso o problema são as advertencias.

se alguem puder mim ajuda, ou cobrar pela ajuda eu agradeço.

 

O cnpj ou CPF do destinatario estou passando assim >>> OMestre.Destinatario.CnpjCpf := cnp;  cnp vem sem numeros e pontos e sem barras

 

os valores

OMestre.OutrosValores        := Query.FieldByName('VALORTOTALNF').AsFloat ;

ODetalhe.OutrosValores        := Query1.FieldByName('TOTALITEM').AsFloat ;

OMestre.ValorTotal           := Query.FieldByName('VALORTOTALNF').AsFloat ;

ODetalhe.ValorTotal               := Query1.FieldByName('TOTALITEM').AsFloat ;

Ambos os valores são iguais

 

 

Log de erros do PB05672250000191210011701N01 volume 001.txt

PB05672250000191210011701N01D.001

PB05672250000191210011701N01I.001

PB05672250000191210011701N01M.001

Log de erros do PB05672250000191210011701N01 volume 001.txt

PB05672250000191210011701N01D.001

PB05672250000191210011701N01I.001

PB05672250000191210011701N01M.001

[Dercide Alvarez]

Arnaldo,

A questão da advertencia do CNPJ, já vou ver

 

Quanto ao erro, faça assim :

Preencha assim o Mestre :

OMestre.ValorTotal                     := Query.FieldByName('VALORTOTALNF').AsFloat ;

OMestre.OutrosValores             := 0;

OMestre.IsentosNaoTributadas  := Query.FieldByName('VALORTOTALNF').AsFloat ;

 

Preencha assim os Itens:

ODetalhe.ValorTotal               := Query.FieldByName('VALORTOTALNF').AsFloat ;

ODetalhe.IsentoNaoTributados:= Query.FieldByName('VALORTOTALNF').AsFloat ;

 

Os outros valores todos zerados.

Faça a validação e poste o resultado.

 

Dercide.

 

[Dercide Alvarez]

@Arnaldo Cruz

Para tentar corrigir o erro do CNPJ, tenta informar assim :

OMestre.TipoAssinante          := tac11182Outros;

 

Testa e da um retorno.

 

Dercide.

[Arnaldo Cruz]

Eu mudei conforme indicado por ti OMestre.TipoAssinante          := tac11182Outros;

mas continua com as advertências.

já o valor tanto colocando em OutrosValores como em IsentoNaoTributadostributadas valida o arquivo, a duvida qual usar.