cefantacini
Membros-
Total de ítens
369 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Tudo que cefantacini postou
-
Lazarus - Web Service Toolkit
um tópico no fórum postou cefantacini Object Pascal - Delphi & Lazarus
Eu importei o WebService da ANVISA com o Web Service Toolkit do Lazarus: http://sngpc.anvisa.gov.br/webservice/sngpc.asmx Para o métoido EnviaArquivoSNGPC ele criou o tipo: EnviaArquivoSNGPC_Type = class(TBaseComplexRemotable) private FEmail : String; FSenha : String; FArq : TBase64StringRemotable; FHashIdentificacao : String; private function wstHas_Email() : Boolean; function wstHas_Senha() : Boolean; function wstHas_Arq() : Boolean; function wstHas_HashIdentificacao() : Boolean; public constructor Create();override; procedure FreeObjectProperties();override; published property Email : String read FEmail write FEmail stored wstHas_Email; property Senha : String read FSenha write FSenha stored wstHas_Senha; property Arq : TBase64StringRemotable read FArq write FArq stored wstHas_Arq; property HashIdentificacao : String read FHashIdentificacao write FHashIdentificacao stored wstHas_HashIdentificacao; end; Eu não estou conseguindo usar o parametro Arq: TBase64StringRemotable Pelo que eu pesquisei eu deveria registrar alguma coisa com a propriedade: RegisterAttributeProperty() Porém não estou tendo êxito Código da chamada .... var ClasseSNGPC : sngpcSoap; Arquivo : EnviaArquivoSNGPC_Type; . . . begin SYNAPSE_RegisterHTTP_Transport( ); ClasseSNGPC := wst_CreateInstance_sngpcSoap( ); Arquivo := EnviaArquivoSNGPC_Type.Create(); Arquivo.Email := eMail; Arquivo.Senha := Senha; Arquivo.Arq.EncodedString := StringBase64; Arquivo.HashIdentificacao := Hash; try ClasseSNGPC.EnviaArquivoSNGPC( Arquivo ); except on e: Exception do ShowMessage( E.Message ); end; Mensagem de erro: Service exception : Code = "soap:Server" Message = "System.Web.Services.Protocols.SoapException: Server was unable to process request. ---> System.ArgumentNullException: Value cannot be null. Parameter name: buffer at System.Security.Cryptography.HashAlgorithm.ComputeHash(Byte[] buffer) at sngpc.sngpc.GetMD5HashFromByte(Byte[] file) in C:\inetpub\wwwroot\sngpc\webservice\sngpc.asmx.cs:line 479 at sngpc.sngpc.EnviaArquivoSNGPC(String Email, String Senha, Byte[] Arq, String HashIdentificacao) in C:\inetpub\wwwroot\sngpc\webservice\sngpc.asmx.cs:line 902 --- End of inner exception stack trace ---" Se alguém tiver alguma sugestão... -
Eu consegui gerar usando o exemplo do Elviro. Alguém teria exemplo de transmissão do arquivo?
-
Deu certo Daniel, resetei a impressora e usei as informações desse tópico: Para conseguir retroceder a etiqueta ... Funcionou tudo certinho, se quiser, pode fechar o tópico.
-
Daniel, era isso mesmo, resolveu a comunicação. Agora estou com um problema que é quando a imprime, depois que termina a impressão ela "joga" um punhado de etiqueta pra frente, vc poderia me ajudar com isso? Em relação aos comandos ImprimirTexto, ImprimirBarra e ImprimirCaixa, teria alguma forma de eu consultar a definição dos parametros que são passados, para ficar mais fácil para eu posicionar a informação?
-
Estou começando a configurar a impressão usando o exemplo do ACBr. Eu seleciono a porta da impressora que já aparece montada no box e peço para enviar uma etiqueta simples e não imprime. O led da impressora READY apaga por aproximadamente 1 segundo e depois acende de novo e a impressão não sai. Vou postar o print da tela do programa de exemplo. Imagino que esteja faltando configurar alguma coisa, porém não estou acostumado com o ACBrETQ.
-
Impressora Brother Ql800
cefantacini replied to cefantacini's tópico in Dúvidas não relacionadas ao ACBr
Consegui fazer usando o fortes mesmo, impressão direta como se fosse uma bobina. Se quiser pode fechar o tópico. -
Alguém que já tenha feito impressão para essa impressora poderia me dar alguma dica ou passar alguma rotina de como ela trabalha? Obrigado!
-
Sei que o assunto não tem nada a ver com o0 ACBr e nem Delphi/Lazarus, porém como o pessoal do grupo se ajuda muito, vou postar para o caso de alguém conseguir me ajudar. Instalei uma loja prestashop e instalei um módulo dos correios, porém o primeiro cálculo está bem lento. O pessoal do suporte do módulo que eu comprei me orientou a fazer uma configuração no arquivo php.ini, semelhante a essa: soap.wsdl_cache_dir = /home/usuario/wsdl soap.wsdl_cache = 3 Simples, cria uma pasta no servidor e direcionar o cache para ela. Porém o meu servidor é compartilhado e eu não tenho acesso ao php.ini, então o pessoal do suporte do servidor me orientou a inserir a configuração no arquivo .htaccess. Porém eu não sei a sintaxe correta e nem onde inserir essa informação no arquivo. Parece bem simples, porém já pesquise muito na internet e não encontrei solução. Se alguém puder me ajudar o arquivo .htaccess está em anexo..... .htaccess
-
Blz, como eu não tenho os dados de acesso aqui vou pedir para o cliente fazer amanhã. Em relação ao erro aí em um dos contatos que me responderam disseram que já está liberado....imagino que esse eu não deva ter, mais de toda forma obrigado pela dica, vai que foi informação errada ...
-
Boa tarde, acredito que possa ser esse o problema sim, pois em homologação ele me "liberaram" uma quantidade de RPS para teste. Me passe o procedimento por favor... Boa tarde, acredito que possa ser esse o problema sim, pois em homologação ele me "liberaram" uma quantidade de RPS para teste. Me passe o procedimento por favor...
-
Eu tbem tenho cliente de nfse em Ribeirão Preto e Estou passando pelo mesmo problema, eu ate consegui emitir nota em homologação com o issnet depois da troca do ginfes, porem, ainda nenhuma em produção. Sempre recebo a msg de nota não processada e erro desconhecido. Já enviei inúmeros e-mails para o suporte e nada. São varios dias para dar uma resposta e quando vem a resposta não esclarece nada. O cliente comprou o plano com suporte, ou seja, está pagando pra isso. É uma escola que emite mais de 500 notas por mês e já está indo para o segundo mês sem conseguir emitir nota pelo sistema. Está emitindo pelo site, porém é muito mais demorado....
-
Preciso gerar para uma farmácia, os arquivos SNGPC que posteriormente serão transmitidos através do site http://sngpc.anvisa.gov.br/. Pelo que andei olhando no fórum acredito que o ACBr não tem componente para isso. Gostaria da opinião do pessoal que está mais acostumado com o assunto para me indicar se tem algum componente ou rotina que eu possa usar para gerar o arquivo.
-
Conexão com banco mysql
cefantacini replied to cefantacini's tópico in Object Pascal - Delphi & Lazarus
No o acesso direto ao banco seria uma forma de eu alimentar e ler as tabelas do prestashop "por fora" sem precisar usar toda essa estrutura de comunicação complicada que a loja fornece. Poderia me da mais alguma dica sobre o Synapse do acbr. -
Conexão com banco mysql
cefantacini replied to cefantacini's tópico in Object Pascal - Delphi & Lazarus
Tem uma documentação do presta shop aqui http://doc.prestashop.com/display/PS16/Using+the+PrestaShop+Web+Service E nesse link tem um exemplo de uma pessoa que conseguiu fazer a interligação, eu até peguei o programa de exemplo que ele colocou na internet, porém não consegui fazer funcionar: https://www.fredericomarinho.com/restjson-com-lazarus-delphi-passo-a-passo-da-instalacao-em-windows/ Eu até consegui ler os dados, mais não consegui alterar ... -
Conexão com banco mysql
cefantacini replied to cefantacini's tópico in Object Pascal - Delphi & Lazarus
O prestashop tem as API, só que tá muito dificil consguir fazer funcionar, seu eu conectar direto ao banco para manusear as informações acho que fica mais fácil... -
Estou configurando um e-commerce no prestashop bem como a "interligação" das informações com meu sistema em lazarus. Tenho lido muita coisa sobre o assunto, no prestahop eu já fiz as liberações e já tenho a chave para consumir o webservice. Pelo que vi o melhor caminho é usar o REST Data Ware, já até vi um exemplo em lazarus na internet, porém não consegui compreender. Gostaria de pedir ao pessoal do grupo que tenha mais experiência, pra me indicar um caminho das pedras, tipo qual componente usar, pelo menos para uma compreensão inicial do funcionamento. Acho que se eu conseguisse fazer uma consulta GET já seria uma forma de começar a compreender, porém não consegui ainda....
-
Conexão com banco mysql
cefantacini replied to cefantacini's tópico in Object Pascal - Delphi & Lazarus
Boa noite, Juliomar. Então, essa dll aí eu pego onde? A coisa esta sim um pouco confusa pra mim ainda, é que eu estou configurando um e-commerce no prestashop e preciso fazer a interligação das informações do site como meu sistema Lazarus. Tem bastante coisa sobre e estou bem no início ainda. Eu peguei um exemplo na internet feito em Lazarus, mais não estou conseguindo aplicar ele nas minhas configurações..... -
Gostaria da ajuda do pessoal do grupo para conseguir configurar uma conexão com banco mysql pelo lazarus. Eu não tenho experiência com mysql e estou apanhando um pouco. Pra eu conectar em um banco mysql na núvem eu preciso ter o mysql instalado no meu computador? Se for possivel indicar quais os melhores componentes de conexão e quais propriedades tenho que preencher. É uma coisa aparentemente simples mais estou tendo bastante dificuldade...
-
Erro estranho de arredondamento na quantidade do produto
cefantacini replied to cefantacini's tópico in ACBrNFe
Depois de muito bater cabeça, eu consegui uma solução, meio estranha, mais vou deixar anotado aqui, talvez possa servir ... Eu limpo o componente, NotasFiscais.Clear e alimento ele, gero o XML, leio o XML gerado e testo se os valores estão da forma que teriam que estar, se não estiver, eu repito o processo, limpo o componente e alimento ele de novo. Dessa forma ai, em 100% dos casos problemáticos que eu tinha aqui resolveu. São muito poucos os casos problemáticos, bem menos de 1% do total de notas emitidas, porém, dessa forma, consegui resolver todos, pelo menos os que eu tomei conhecimento até agora. Se quiser, pode fechar o tópico. -
Erro estranho de arredondamento na quantidade do produto
cefantacini replied to cefantacini's tópico in ACBrNFe
Eu fiz um teste aqui, na hora da totalização passando os valores que estão no componente Produto.Prod.vProd := RoundABNT( Produto.Prod.qCom * Produto.Prod.vUnCom, -2 ) Porém ai ele altera o valor da nota. Eu simulei no demo do acbr e o problema não acontece, portanto, deve ser alguma coisa no meu sistema. Se alguém tiber alguma dica, uso o Firebird 2.5..... -
Programação Web no Lazarus
cefantacini replied to cefantacini's tópico in Dúvidas não relacionadas ao ACBr
Obrigado pelas dicas, vou pesquisar ... -
Ajuda com configuração do Lazarus
cefantacini replied to cefantacini's tópico in Object Pascal - Delphi & Lazarus
Valeu Daniel, segui essas configurações aí, vamos ver se o problema para ... -
Eu criei até um outro tópico sobre uma combinação de valores em especifico...
-
De alguns dias para cá tenho enfrentado vários problemas com arredondamento do valor do produto na emissão da NFe, principalmente quando se usa mais do que 2 casas decimais. Gostaria da ajuda do pessoal do grupo, para saber em quais momentos é o mais correto de arredondar. Basicamente existem 3 momentos de passar o valor do(s) produtos para o componente: na hora de atribuir o valor e a quantidade Produto.Prod.qCom Produto.Prod.vUnCom na hora de calcular o total do ítem Produto.Prod.vProd no total geral NotaF.NFe.Total.ICMSTot.vProd
-
Ajuda com configuração do Lazarus
um tópico no fórum postou cefantacini Object Pascal - Delphi & Lazarus
As vezes, em um unico projeto meu no lázarus, recebo a msg: Aí fecho o Lazarus, apago a pasta lib e o errro desaparece. Aí trabalho vários dias e do nada a msg vola, repito o processo e tudo fica resolvido. Esse caminho onde ele vusca a Unit ACBrDFe.pas, ão é o caminho onde o ACBr está instalado, esse é o caminho do projeto que apresenta o problema. Alguém teria alguma sugestão?