gerasoft

Ao desenvolver um projeto NOGUI com o ACBrCTe no LINUX, estava recebendo a seguinte mensagem na compilação da unit pcteCTe.pas pcteCTe.pas(50,49) Error: Cannot find pcteProcCte used by pcteCTe, incompatible ppu=acbr/Lib/Lazarus/ACBrDFe/ACBrCTe/x86_64-linux/pcteProcCTe.ppu, package ACBr_CTe Após algum tempo de busca pela solução descobrimos que o problema estava relacionado a case sensitive na unit ACBrCTeWebServices.pas, onde estava escrito pcteProcCte (na linha 48) deveria estar pcteProcCTe, simplesmente a letra T. Imagem abaixo já com código corrigido.

Seguindo as instruções do link funcionou. Obrigado Juliomar.

Desenvolvi um app em Lazarus com threads que fica na bandeja do Windows. Porém, está abortando com facilidade, por isso quero testar como serviço no Linux e no Windows. Tentei nogui das duas formas, separadas e juntas.

program Project1; uses interfaces, //Se tirar, não compila. ACBrNFe; begin end. coloquei nogui porém só compila com a unit interfaces.

É possível rodar um serviço no linux com o ACBrNFe e ACBrCTe ? Não estou conseguindo compilar o meu projeto com NOGUI para evitar a unit interfaces.

No meu projeto exemplo, na linha 44, recebo uma violação de acesso. Quando clico no ok sou levado para a Unit ACBrCTe.XmlHandler na linha 3668. evo_cte.xml

Outros campos ? Não entendi. Observe a linha 460. Código da unit ACBrXmlDocument; xmlNodeAddContent

Estou tentando alterar uma tag num xml com o AcbrXmlDocument mas ao invés de alterar o valor ele acrescenta. Qual método devo usar para alterar o valor ? esta ficando assim:

Não estamos gerando o XML, o mesmo foi gerado por outro sistema. O que quero fazer é importar esse xml para o meu sistema de Escrita Fiscal.

Observe o campo <codigo_item_lista_servico>21009</codigo_item_lista_servico> no xml anexo. Este é o xml que o contador me passou, retornado do provedor ipm. NFSe Guarapuava.xml

O código de serviço correto é 1009 (Segundo o contador que consultei), porém no sistema da IPM é permitido digitar 5 digitos, devendo ser ignorado o primeiro. Porém o IPM.LerXml está ignorando o último. Código no XML <21009> Está Retornando <2100> Deveria Retornar <1009>

Temos um XML de Guarapuava, que está em anexo, com um código de serviço de 5 digitos <21009>, porém o IPM retorna apenas 4 digitos <2100> conforme o código abaixo retirado do IPM.LerXml: aValor := ObterConteudo(ANodes[i].Childrens.FindAnyNs('codigo_item_lista_servico'), tcStr); ItemListaServico := PadLeft(aValor, 4, '0'); NFSe Guarapuava.xml

Estou importando o NFSe do anexo utilizando NFSeX com o código abaixo e não estou conseguindo capturar o código do serviço. var ACBrNFSeX: TACBrNFSeX; begin ACBrNFSeX := TACBrNFSeX.Create(nil); try ACBrNFSeX.SetProvedor(proIPM, ve100); ACBrNFSeX.NotasFiscais.LoadFromFile(Edit1.Text, False); ACBrNFSeX.NotasFiscais.Items[0].NFSe.Servico.ItemListaServico; //Retorna em branco. ACBrNFSeX.NotasFiscais.Items[0].NFSe.Servico.ItemServico[0].CodServ; //Retorna em branco. ACBrNFSeX.NotasFiscais.Items[0].NFSe.Servico.ItemServico[0].ItemListaServico; //Retorna 0702. --> O que mais se aproxima é esse aqui, porém retorna um 0 a mais. ACBrNFSeX.NotasFiscais.Items[0].NFSe.Servico.ItemServico[0].CodLCServ; //Retorna em branco. finally ACBrNFSeX.Free; end; end; Arapongas.xml

ACBrNFSeX.NotasFiscais.LoadFromFile(Edit1.Text, False); -> importou o arquivo ACBrNFSeX.NotasFiscais.GravarXML('c:\temp\' + ExtractFileName(Edit1.Text) + 'gerado') -> gravei o arquivo para confirmar se importou corretamente (anexo) ACBrNFSeX.NotasFiscais.Items[0].NFSe.DataEmissao -> Retorna 30/12/1899 abrasf.xmlgerado

Achei que fosse possível fazer LoadFromFile do XML para eu importar os dados para meu sistema de escrita fiscal. Só salvei o arquivo para testar se estava carregando corretamente. Tentei de duas maneiras, 'ACBrNFSeX.NotasFiscais.LoadFromFile(Edit1.Text);' e 'ACBrNFSeX.NotasFiscais.LoadFromFile(Edit1.Text, False);'