Jump to content
Fivewin Brasil

Jmsilva

Membros
  • Posts

    718
  • Joined

  • Last visited

  • Days Won

    14

Everything posted by Jmsilva

  1. Jmsilva

    SQLRDD

    Por gentileza, pode esclarecer esta path, o que precisa estar instalado ?
  2. Aparentemente a cada dialog que cria, ele gera código em html no método oDlg: HTML () que pode ser visualizado na twebview(). Longe de aplicabilidade em app comercial.
  3. samples\FiveDbu.prg usando o novo samples\buildhmt.bat, clique com o botão direito na janela principal e ative a opção "WebApp", vá para "localhost" no seu navegador e você verá o FWH aplicativo rodando na web. Este é um trabalho em andamento, mas queríamos mostrar esse recurso que está sendo desenvolvido dentro do FWH para todos os aplicativos FWH. Você precisa ter paciência, pois precisamos do seu feedback para concluí-lo, mas isso abre possibilidades incríveis que você verá em breve. samples\webapp.prg mostra o novo conceito de aplicativo de escritório para aplicativo web que estamos implementando em FWH. Este é um trabalho em andamento, não está listado para produção, mas por favor construya webapp.prg e clique diretamente no diálogo que você obtém e verá como FWH constrói um diálogo de aplicativo da web usando um diálogo de escritório. O próximo passo será usar a nova classe TWebSocketServer para funcionar na web. Por favor, mantenha todo o progresso desta revolução. Parece interessante....
  4. Pelo que pesquisei, aparentemente a SQLRDD tem erro na função Dbusearea, mais especificamente SR_WORKAREA:SQLOPENAREA quando usado com banco PostgreSQL. Com os demais bancos funcionam bem.
  5. Olá, tenho um APP que roda sem problemas MySQL e SqlServer, estou fazendo teste no POSTGRESQL. Porém ao usar a função Dbusearea, não abre a tabela e não gera erro neterr(). Porém conectou e criou todas as tabelas. Alguém que usa ou já usou PGS com SQLRDD passou por problemas parecido? Estou usando:https://uolhost.uol.com.br/banco-de-dados JMSILVA
  6. Olá, obrigado vou testar. Mas com relação aos resultados são: Dia 03 = 1 ref. Id 1 Dia 04 = 3 ref. Id 1,2 e 3 Dia 05 = 1 ref Id 3 Dia 06 = 2 ref id 4 e 5 Dia 07 = 0 Espero ter respondido.
  7. Considerando a tabela 'process' com campos id,dtcalc1 e dtcalc2. Pesquisa feita ente 01/06/2023 e 07/06/2023 id - dtcalc1 - dtcalc2 resultado em dias 1 03/06/2023 05/06/2023 2 dias 2 04/06/2023 05/06/2023 1 dia 3 04/06/2023 06/06/2023 2 dia 4 06/06/2023 07/06/2023 1 dia 5 06/06/2023 06/06/2023 0 dia excessão * Excessão : como as datas são iguais seria 0 dia, mas deve contar como um quando for iguais * para os demais caso, o dia deve estar entre ( dtcalc1 >= e dtcalc2 < ) Resultado esperado 01/06 = 0 02/06 = 0 03/06 = 1 04/06 = 3 05/06 = 1 06/06 = 2 07/06 = 0 Atualmente faço For..Next com Select count(*) , porem se for 30 dias, são 30 requisições...queria mudar para uma única. att. JMSILVA
  8. Fast report é vendido pela Xailer. É uma lib para harbour/xharbour. Demo pode wer baixando para testes. Frx.exe no link abaixo. https://www.ozs.es/wp/fastreport/
  9. Sim. Assim como qq outro editor de recursos, porém, entendi que a dúvida paira sobre codificação sem o uso de recursos.
  10. Faço assim: DEFINE DIALOG oDlg SIZE 360,180 PIXEL TITLE "Radio Vertical/Horizontal" @ 04,10 RADIO nNivel PIXEL PROMPT "&Teste 1", "&Teste 2" OF oDlg @ 04,50 RADIO oRad Var nNivel PIXEL PROMPT "&Teste 3", "teste 4" OF oDlg @ 6, 19 BUTTON "&Cancel" OF oDlg SIZE 50, 12 ACTION oDlg:End() ACTIVATE DIALOG oDlg CENTERED; ON INIT oRad:aItems[2]:Move(8,200,,,.T.) // @ 04 (2*4=8) dobro da linha
  11. Olá jovem, caso vc use dll, e se a dll foi gerada pelo Pelles C, você precisa verificar se tem algum objeto do "user control" no resource dialog. Este objeto geralmente é o causador. Se não usa dll e nem oPelles desconsidere esta ajuda. Se for objeto poste para sugerir uma opção que resolva.
  12. Jmsilva

    Ftp

    STRUCTURE oVar . MEMBER oFtp MEMBER lOpen INIT .F. MEMBER cDir INIT "Repos" MEMBER cPassword INIT "123456" MEMBER cUSBStick INIT "ftp://nome_do_usuario_ftp:senha@localhost" ENDSTRUCTURE Faltou criar a variavel oFtp
  13. Tenta assim: Sr_cDbValue(ctod(''))
  14. Olá pessoal! Contratei serviço da uol host banco de dados R$ 4,99. O preço é atrativo: https://uolhost.uol.com.br/banco-de-dados Fiz a conexão via SQLRDD funcionou perfeitamente a conexão, porém a cada 2 minutos fica inativo e a conexão é finalizada ! Isto é ruim em um cadastro qualquer que por demorar um tempo superior, então fui verificar no servidor da uol e constatei que a variável global "wait_timeout" está configurada para 120 segundos, exatamente o tempo que a conexão é finalizada. Destarte, abri um chamado na UOL, e me responderam que o valor não pode ser alterado. E minha credenciais tbm não permite que eu faça. Para resolver o problema, usei classe TIMER em um intervalo inferior aos 2 minutos para executar um "commit" no banco e interromper a ociosidade de minutos. Aparentemente está funcionando, vou aguardar os testes! Gostaria de saber dos senhores se teria alguma outra forma para resolver isso ? Se alguém já passou por esta situação ? Servidor é o Mysql 5.6 grato ! JMSilva
  15. Parabéns, entendi sua solução, mas não conheço. Por isso se não for pedir muito um simples exemplo com poucas linhas será de grande valia. Grato e parabéns pela solução. As demais conheço e minha opinião para cada uma delas.
  16. Na Sqlrdd a forma correta é a seguinte: Vendas->(Sr_SetFilter("a.dtvenda= "+SqlString(dDtvenda)), Sr_DbRefresh(),DbGotop()) If venda->(OrdKeyCount()) = 0 ? "Nenhum registro foi encontrado" Endif Alias->(xbrowse()) Internamente SqlRdd monta seguinte comando sql que vc pode conferir se ativar recurso com Sr_StartTrace() select a.* From vendas a where a.dtvenda = '9999-99-99' order by (chave indice selecionado) Vc ainda pode usar o dbsetfilter() para manipular os dados da requisição acima.
  17. Se vc estiver fechado com algum botão, coloca obtn:lcancel := .t.
  18. https://uolhost.uol.com.br/banco-de-dados Alguém já usou?
  19. Amigos, caso alguém que usa serviço de banco de dados on line com sucesso sem perrengue, peço que me indique por gentileza Grato !
  20. Já testou hb_FileExists(cFile)
  21. Sim amigo, isso na classe TGet, tenta fazer na TMultiGet.
×
×
  • Create New...