Elias Conti

Será que pode ser a versão do lazarus? vou instalar uma versao mais antiga ...

Ola Juliomar, Lazaru versão 4.0 Linux distribuição Ubuntu 20.01

Ola Pessoal, Estou tentando compilar um projeto feito em em lazarus no ambiente linux usando o componente ACBrNFe. Ao compilar ele me apresenta o seguinte erro: ACBrUtil.Strings.pas(55,39) Error: Cannot find LCLType used by ACBrUtil.Strings, incompatible ppu=/usr/share/lazarus/4.0.0/lcl/units/x86_64-linux/lcltype.ppu, package LCLBase. Alguem tem uma ideia o que pode ser? Ja desistalei o lazarus .e utilizei a dica do Daniel Moraes para instalar o Lazarus + ACBr . e mesmo assim continua o mesmo erro. Obrigado

Valeu BigWings, era isso mesmo. Obrigado.

Ok, BigWings. Deve ser isso entao... Porque tinha feito a atualização antes. Vou atualizar novamente. Muito Obrigado.

Bom dia, senhores, Depois que foi feito a atualização dos componentes, o evento de cancelamento e carta de correção estao retornando com erro: O tpEvento informado invalido, status=491 As NF-e e NFC-e estao emitindo normalmente. Para atualizar os componentes foram feitos os procedimentos: - atualizar com "SNV Update"; - executar o ACBrInstall_Trunk2.exe marcando a opção de limpar Em anexo estou enviando o xml de envio e resposta 93134607-eve.xml 93134607-ped-eve.xml

Entendi. Valeu Antonio, Obrigado pela dica.

Antonio, No HEADER é para colocar "0" no digito da agencia porem no registro "P" que é onde estou com o problema o banco nos passou que tem que ser " " 1 caracter vazio

Ola Juliana, Isso mesmo . o problema comecou dai. Na classe "TACBrBancoob" no metodo "GerarRegistroTransacao240" onde gera o digito da agencia estava: PadLeft(ACBrBoleto.Cedente.AgenciaDigito, 1, '0'), (no registro "P" ) precisei alterar para: PadLeft(ACBrBoleto.Cedente.AgenciaDigito, 1, ' ') para que no arquivo de remessa o campo saia vazio "". Porem la na classe TACBrBoleto metodo "ChecarDadosObrigatorios" no ultimo if ele nao deixava passar vazio o campo AgencaDigito . ai acrescentei "cobBancoob" Este é o problema . Obrigado.

Desculpe Juliana, Realmente se eu colocar um "if" para armazenar " " (vazio) no componente no momento da geracao da remessa , resolve ai eu posso deixar 0 no digito da agencia para os outros efeitos (Ex: imprimir o boleto) e para a remessa deixo vazio. Obrigado Juliana e Antonio.

Juliana, obrigado pela atenção. Mas se eu informo 0 , o campo sai com valor 0 na remessa, e o banco SICOOB nao aceita 0 o campo tem que ser vazio " ". por isso deixei na minha base de dados este campo vazio , porem quando tento armazenar neste campo (Ex: para aemitir o boleto) o componente reclama que vazio é invalido, para resolver precisei adicionar "cobBancoob" no metodo "procedure TACBrBoleto.ChecarDadosObrigatorios;'" procedure TACBrBoleto.ChecarDadosObrigatorios; begin if Cedente.Nome = '' then Raise Exception.Create(ACBrStr('Nome do cedente não informado')); if Cedente.Conta = '' then Raise Exception.Create(ACBrStr('Conta não informada')); if (Cedente.ContaDigito = '') and (not (Banco.TipoCobranca in [cobBanestes,cobBanese, cobCitiBank])) then Raise Exception.Create(ACBrStr('Dígito da conta não informado')); if Cedente.Agencia = '' then Raise Exception.Create(ACBrStr('Agência não informada')); if (Cedente.AgenciaDigito = '') and (not (Banco.TipoCobranca in [cobBanestes, cobBanese, cobBanrisul, cobItau, cobCaixaEconomica, cobCaixaSicob, cobCitiBank,cobBancoob])) then //[ELIAS acrescentei o cobBancoob 10/10/2019] Raise Exception.Create(ACBrStr('Dígito da agência não informado')); end; Obrigado

Boa tarde pessoal, Ao tentar homologar o boleto pelo banco Sicoob, no momento da geracao do boleto obtive o erro "Dígito da agência não informado" , como o layout do banco me pede que o digito da agencia seja " " (1 caracter vazio) , precisei alterar o método "procedure TACBrBoleto.ChecarDadosObrigatorios;'" adicionando o cobBancoob para resolver o problema. Vcs acham que a solução é esta ou existe outra maneira de resolver ?. Obrigado

Desculpe, A versão 2.1.4 corrigiu este erro no validador, somente a versão 2.1.2 do validador estava apresentando o erro. Desconsiderar esta solicitação

Ola pessoal, o método "procedure TBloco_A.WriteRegistroA100(RegA010: TRegistroA010) ;" terá que ser alterado. na linha 308 onde esta : /// Tratamento NFs canceladas 02 - 19-ago-2011 if Pos(strCOD_SIT,'02') > 0 then begin //COD_PART := ''; Correção Mário Mesquita - programador Criare Informática CHV_NFSE := ''; DT_DOC := 0; DT_EXE_SERV := 0; IND_PGTO := tpNenhum; booNFCancelada := true end else booNFCancelada := false; teremos que passar para; /// Tratamento NFs canceladas 02 - 19-ago-2011 if Pos(strCOD_SIT,'02') > 0 then begin //COD_PART := ''; Correção Mário Mesquita - programador Criare Informática CHV_NFSE := ''; IND_PGTO := tpNenhum; booNFCancelada := true end else booNFCancelada := false; é que as datas da nf de serviço cancelada, é obrigatória a partir da ultima versao do validador. Tentei alterar por aqui , até que as modificações fossem feitas, porem a DCU nao gera. mantem a anterior. Valeu