Ir para conteúdo
  • Cadastre-se

Fernando Rodrigo

Membros
  • Total de ítens

    482
  • Registro em

  • Última visita

  • Days Won

    3

Tudo que Fernando Rodrigo postou

  1. pessoal, alguem ja precisou fazer a pesquisa em uma pasta para saber se o arquivo existe, usando o fileexists. Quando o arquivo esta na mesma unidade que não é mapeada a pesquisa vai normal, mas se o arquivo estiver em uma unidade mapeada tipo \\192.168.0.100\arquivo\foto.jpg, dai ele demora um tempo para pesquisar, por causa da unidade mapeada. tem como resolver isso ou é do sistema operacional
  2. fiz um gnre no site deles e gerou um xml diferente do gerado pelo componente, o que observei que no xml que o site gera ele tem umas tag de endereço que o componente não tem e quando envio da o erro abaixo segue tambem o xml que gerei pelo site Lote_2023_04_28_21_45.xml
  3. boa noite pessoal, estou tentando enviar uma gnre no estado de mato grosso, so que não estou conseguindo. peguei o xml e tentei validar ele no site da gnre e diz que o xml esta invalido alguém poderia dar uma checada para ver o que poderia estar ocorrendo de errado, 2319243457-pro-rec.xml
  4. bom dia pessoal, quando imprime uma guia de GNRE, ele não abre a opção de escolher a impressora, procurei no componente não encontrei nada que abrisse a tela de impressora, quando clico ele vai direto para a impressora padrão.
  5. antes de abrir o tópico ja havia procurado no forume ja sabia que o acbr não tinha nada de integração, so queria saber sobre os processos , se tem que fazer algum cadastro para pegar algum token de teste
  6. pessoal alguem do grupo ja fez integração com serasa?
  7. pessoal, preciso fazer a importação de um campo memo, onde o banco feito feito em foxpro. Arquivo com extensão fpt, olhei na internet são arquivos tipo Memo que é gerado pelo FoxPro, so que preciso acessar essas informações para fazer a importação para meu sistema. Se alguem puder me dar um help para acessar as informações, vou ficar muito grato PRODUTOS.zip
  8. @Renato Rubinho eu que coloquei como exemplo, mas é gerado em uma pasta separada com todos os direitos do usuário, eu uso o TInject para enviar as mensagens no whatzap, se eu fizer fora do componente funciona normal, ja criei um form so para isso,, mas mesmo assim continua dando a mensagem de erro, mesmo colocando um exeption, ele continua com o mesmo erro
  9. pessoal, preciso gerar um pdf de um pedido sem ter que abrir a tela do relatorio, so que estou enviando o codigo normal so que el da erro de access violation, mas gera o pdf normal ele da o erro quando executo frxRelatorio.PrepareReport veja o codigo como estou utilizando frxExporta.FileName := 'c;\pedido.pdf'; frxExporta.ShowDialog := False; frxExporta.ShowProgress := False; frxExporta.OverwritePrompt := False; frxRelatorio.PrepareReport(); frxRelatorio.Export(frxExporta); ]
  10. agora que ta o problema pq cobol tem várias versões dele, vou ver se acho alguma coisa para exportar esses dados, muito obrigado @BigWings
  11. mas o Adobe não é somente para edição de fotos, pq esse arquivo que anexei e um arquivo do banco de dados do cliente
  12. boa noite pessoal, estou migrando um sistema de um cliente para o nosso sistema e preciso acessar a base de dados dele, so que não encontrei qual o tipo de banco de dados, pq geralmente é um dbf, ou firebird ou sql server, que são as bases mais comuns hoje, so que essa base de dados não tenho nem noção do que é, o cliente não quer entrar em contato com a empresa e pedir informações pq ele ele achando que o pessoal não vai querer passar essas informações, então tenho que encontrar uma maneira de acessar a base de dados ele gera vários arquivos tipo A210-(produtos)Historico-Plus.amp, todos com essa extensão amp, so que nunca vi esse tipo de extensão A070-(amplus)Cadastros-Diversos.amp
  13. vou fazer, pq tenho clientes que ja estão pedindo essa integração
  14. bom dia pessoal, um cliente me solicitou a integração com a rede ancora para envio dos xml, que é uma integração que eles passaram para os clientes dessa rede para armazenamento de xml alguem do grupo ja fez essa integração para dar um help eles me passaram o link do manual mas não entendi bem como faz https://staging.redeancora.com.br/integrador-ancora/api/v1/swagger-ui/index.html
  15. estou usando a configuração abaixo para mudança de layout do boleto, so que não esta funcionando, so aparece um layout a forma de mudar o layout é da forma abaixo ? ACBrBoletoFCFortes1.LayOut := lPadrao; ACBrBoletoFCFortes1.LayOut := lFatura; ACBrBoletoFCFortes1.LayOut := lCarne; ACBrBoletoFCFortes1.LayOut := lFatura; ACBrBoletoFCFortes1.LayOut := lFaturaDetal; ACBrBoletoFCFortes1.LayOut := lFatura;
  16. boa noite pessoal, alguém ja desenvolveu algo para coletor de dados para estoque ? qual aparelho usar ? se alguém ja desenvolveu poderia dar uma ideia de desenvolvimento
  17. segue arquivo alterado a linha para codigo 3 conforme layout acima C026 Código para Protesto Código adotado pela FEBRABAN para identificar o tipo de prazo a ser considerado para o protesto. Domínio: '1' = Protestar Dias Corridos '2' = Protestar Dias Úteis '3' = Não Protestar ‘4’ = Protestar Fim Falimentar - Dias Úteis ‘5’ = Protestar Fim Falimentar - Dias Corridos ‘8’ = Negativação sem Protesto '9' = Cancelamento Protesto Automático (somente válido p/ CódigoMovimento Remessa = '31' - Descrição C004) ACBrBancoSafra.pas
  18. estou validando o banco safra e encontrei um problema na instrução bancaria na linha 716 da unit do safra esta calculando o campo Instrucao1 como 0 não protestar, so que no layout é codigo 3 para não protestar, veja o layout C026 Código para Protesto Código adotado pela FEBRABAN para identificar o tipo de prazo a ser considerado para o protesto. Domínio: '1' = Protestar Dias Corridos '2' = Protestar Dias Úteis '3' = Não Protestar ‘4’ = Protestar Fim Falimentar - Dias Úteis ‘5’ = Protestar Fim Falimentar - Dias Corridos ‘8’ = Negativação sem Protesto '9' = Cancelamento Protesto Automático (somente válido p/ CódigoMovimento Remessa = '31' - Descrição C004) Sabe se ja tem correção desse problema ? Linha 716 da unit ACBrBancoSafra.pas {Código para Protesto} case TipoDiasProtesto of diCorridos : ACodProtesto := '1'; diUteis : ACodProtesto := '2'; else ACodProtesto := '0'; end; if ((DataProtesto <> 0) and (DiasDeProtesto > 0)) then begin if not MatchText(Instrucao1, ['0', '1', '2', '3', '9']) then Instrucao1 := ACodProtesto; // Dias para protesto sDiasProtesto := PadLeft(IntToStr(DiasDeProtesto), 2, '0'); end else begin Instrucao1 := '0'; // Não protestar SDiasProtesto := '00'; end;
  19. preciso fazer a leitura do json abaixo, so que quando faço um parse esta dando erro de access violation, estou usando o delphi 2010 e usando esse unit uLkJSON, se alguem puder me ajudar estou enviando um demo com o json no campo memo. { "billing_info": { "doc_type": "CPF", "doc_number": "05218554111", "additional_info": [ { "type": "DOC_NUMBER", "value": "05218554111" }, { "type": "ZIP_CODE", "value": "73752020" }, { "type": "STREET_NUMBER", "value": "SN" }, { "type": "CITY_NAME", "value": "Planaltina" }, { "type": "DOC_TYPE", "value": "CPF" }, { "type": "STATE_NAME", "value": "Goiás" }, { "type": "NEIGHBORHOOD", "value": "Setor Leste" }, { "type": "FIRST_NAME", "value": "Tainá Figueiredo" }, { "type": "STREET_NAME", "value": "Quadra 2 Mr 2 Casa 32 Setor Leste" }, { "type": "SITE_ID", "value": "MLB" }, { "type": "LAST_NAME", "value": "almeida" } ] } } Project1.dpr uLkJSON.pas Unit1.dfm Unit1.pas
  20. vou enviar dessa forma para ver se tem rejeição, qualquer coisa abro novamente um tópico
  21. bom dia, no manual realmente não tem nada falando, somente quando vc faz a validação no site deles que da esse erro.
  22. estou homologando a remessa do Sicred e no site deles de homologação esta retornando um campo que deveria enviar em branco e o acbr esta enviando 000000 campo de data e valor de desconto, como poderia resolver esse problema ? olhei os fontes na função e esta mesmo informando zero caso não tenha nada function TACBrBancoSicredi.DefineDataDesconto(const ACBrTitulo: TACBrTitulo; AFormat: String): String; begin with ACBrTitulo do begin if (ValorDesconto > 0) then begin if (DataDesconto > 0) and (TipoDesconto in [ tdValorFixoAteDataInformada, tdPercentualAteDataInformada]) then Result := FormatDateTime(AFormat, DataDesconto) else Result := PadRight('', Length(AFormat), '0'); end else Result := PadRight('', Length(AFormat), '0'); end; end; 69144206.crm
  23. fazer publicação de produtos nos sites
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.