Jump to content
Fivewin Brasil

Ladinilson

Membros
  • Posts

    523
  • Joined

  • Last visited

  • Days Won

    9

Everything posted by Ladinilson

  1. Opa Luis! Este mesmo acrescentando a sintaxe na linha... cReturn += AllTrim( cPath ) + "\*.* "não funcionou, mas acho que a resposta esta nas opções, no caso deste exemplo é o "-D", se tivesse a lista destas opções, certamente poderia ser mais fácil
  2. Amigos alguém tem em sua empresa este serviço fornecido pela Embratel e usa o MySql, estamos estudando esta proposta aqui para a empresa, e no caso de sim, qual as principais adaptações e características para funcionar com o xHarbour Obrigado FWH 8.1 / xHB 1.1.0 / Pelles / xDev
  3. Amigos alguém tem em sua empresa este serviço fornecido pela Embratel e usa o MySql, estamos estudando esta proposta aqui para a empresa, e no caso de sim, qual as principais adaptações e características para funcionar com o xHarbour Obrigado FWH 8.1 / xHB 1.1.0 / Pelles / xDev
  4. Amigos a pergunta é das antigas, mas como compactar usando o ZIPFILE() do FW2.3 criando o zip com os diretórios, pois o comum é: id=code>id=code>e assim apenas compacta somente os arquivos do diretório raiz Obrigado
  5. Amigos a pergunta é das antigas, mas como compactar usando o ZIPFILE() do FW2.3 criando o zip com os diretórios, pois o comum é: id=code>id=code>e assim apenas compacta somente os arquivos do diretório raiz Obrigado
  6. Amigos tem como saber se houve mudança de data usando o calendário do Pelles? uso a linha: oCtal:bSelect := { |lChange| IF( !lChange, ( TOPOAGE(),SETAGENDA(,,,,.t.),oBrw3:SetArray(aCamposA),oBrw3:REFRESH(),oBrw3:SETFOCUS()),NIL)} id=code>id=code>mas a mudança só é detectado com dois clicks do mouse, queria usar as setas ou apenas um click para a mudança de datas e executar a funçao como na linha acima. Obrigado FW 8.1 / xHB 1.1.0 / Pelles / xDev
  7. Amigos tem como saber se houve mudança de data usando o calendário do Pelles? uso a linha: oCtal:bSelect := { |lChange| IF( !lChange, ( TOPOAGE(),SETAGENDA(,,,,.t.),oBrw3:SetArray(aCamposA),oBrw3:REFRESH(),oBrw3:SETFOCUS()),NIL)} id=code>id=code>mas a mudança só é detectado com dois clicks do mouse, queria usar as setas ou apenas um click para a mudança de datas e executar a funçao como na linha acima. Obrigado FW 8.1 / xHB 1.1.0 / Pelles / xDev
  8. Isso mesmo, no Menu Plugins/Insert Color Value a opção "Dropper"
  9. Amigos tem como este calendário atualizar a data em: id=code>id=code>com apenas um click do mouse e não em dois?
  10. Na minha empresa utilizamos o boleto em carne e 3 por folha já que usávamos o SISCOB da Caixa coisa que o Cobrebem não faz, ai tive que criar arquivos BMP e carimbo as informações nestes bitmaps. o segundo passo foi a homologação onde o tive uma dificuldade de acertar pois o lay-out mostrado pela caixa faltou uma regra quanto ao dígito verificador geral e ai tive que fazer junto ao técnico que faz essa homologação e só então tive êxito depois criei uma rotina para ler os dados do arquivo de retorno para baixa automática mas tudo isso porque o Cobrebem não faz 3 por folha FWH 8.10 / xHB 1.1.0 / Pelles / XDev
  11. Amigos meu filhote as vezes deixa o volume do som do pc bem auto, ai quando entro em algum tópico da do fórum, levo um baita susto kkkkkkkkkkkkkkkkkkkkkkk algúem já teve este experiência? hehehehehehe
  12. Amigos meu filhote as vezes deixa o volume do som do pc bem auto, ai quando entro em algum tópico da do fórum, levo um baita susto kkkkkkkkkkkkkkkkkkkkkkk algúem já teve este experiência? hehehehehehe
  13. Luiz funcionou! revi a função e estranhamente funcionou. Muito Obrigado
  14. Luiz o Link é... http://www.fivewin.com.br/exibedicas.asp?id=931 e ainda não chama a função, que neste caso seria o "Executou" no exemplo do link, é exatamente como quero usar, mandei um e-mail para o Vitor que colocou este exemplo e até agora ele não me respondeu
  15. Favor, alguém pode me dizer porque ele não executa a função?
  16. Luiz não esta sendo usado o GET mas o calendário montando já na tela e este exemplo http://www.fivewin.com.br/exibedicas.asp?id=931? que foi mostrado acima, é o que eu pretendo fazer, mas a linha que é para chamar a função caso haja mudança de data, não funciona, vi em outros tópicos que precisamos mudar alguma coisa como em http://www.fivewin.com.br/forum/topic.asp?TOPIC_ID=7902
  17. O problema acima consegui resolver, agora ele não chama a função se modificado oCal:bSelect := { |lChange| IF( !lChange, ( vData:= oCal:dVar,TOPOAGE(vData)),NIL)}
  18. Estou tentando colocar ele em um folder e esta dando erro de ID NÃO DEFINIDO oCal:= TMonthCal():New( oFolderCli:aDialogs[2],49) oCal:bSelect := { |lChange| IF( !lChange, ( vData:= oCal:dVar,TOPOAGE(vData)),NIL)} id=code>id=code> o ID 49 existe no dialog.
  19. Olá amigo vascaíno, acho que o padrão é o 240 e anda não consegu entender muito o layout fornecido pela caixa.
  20. Amigo, fiz o programa de geração de boletos e agora estou para fazer um programa que faz a baixa automática desses lançamentos gerados pela emissão dos boletos, ou seja, a baixa será feita pelo campos "nosso número" identificado no lançamento e no arquivo de retorno. Alguém já tem alguma coisa pronta para eu começar a montar, pois não achei nada em dicas. Qualquer coisa pode me mandar para ladinilson@hotmail.com Obrigado FWH 8.1 / xHB 1.1.0 / Pelles / xDev
  21. Amigo, fiz o programa de geração de boletos e agora estou para fazer um programa que faz a baixa automática desses lançamentos gerados pela emissão dos boletos, ou seja, a baixa será feita pelo campos "nosso número" identificado no lançamento e no arquivo de retorno. Alguém já tem alguma coisa pronta para eu começar a montar, pois não achei nada em dicas. Qualquer coisa pode me mandar para ladinilson@hotmail.com Obrigado FWH 8.1 / xHB 1.1.0 / Pelles / xDev
  22. Amigo tive uma experiência que achei bastante estranha mas acho que pode servir como um teste para você, quando meu aplicativo estava em 16 bits (FW 2.3/Blinker) usava o CDXLOCK.OBJ e não tinha nenhum problema, quando passei para 32 bits (FWH 8.1/xHB 1.1.0) não coloquei mas este OBJ na lista para compilar e tive problemas com registros que sumiam ou erros de atualização, ai coloquei ele de volta e o problema foi sanado, experimente colocar este OBJ e teste várias vezes sua rotina. FWH 8.1 / xHB 1.1.0 / Pelles /xDev
  23. Amigos estou querendo usar os comandos SQL no máximo, evitando assim os comandos RDD, então como estou iniciando, como ficaria as seguintes instruções: 1 - Uso de índices,ORDSETFOCUS(), SET RELATION, atribuiçoes as variáveis e pesquisa incremental nas linhas: ----------------------------------------------- INDEX ON nomecli TAG "cliente1" TO paxclig <---- INDEX ON codcli TAG "cliente2" TO paxclig Sei que poderia usar o CREATE INDEX , mas a questão é o TAG que é usado nas linha logo abaixo ----------------------------------------------- SELECT Clientes Clientes->(DBGOTOP()) ORDSETFOCUS('cliente1') <------- utilizo para pesquizas incremental e outros campos --------------------------------------------- SELECT clientes SET RELATION TO codcli INTO Dependente,codven INTO Vendedores,forma_pag INTO CondPaga,; codpla INTO Planos,codcob INTO Cobradores Utilizo para a exibição da descrição dos arquivos relacionados conforme os códigos no aqruivo de clientes --------------------------------------------- vcodigo := Clientes->codcli Utilizo para criar varáveis para exibição, inclusão e alteração nos arquivos --------------------------------------------- SET SOFTSEEK OFF DBGOTOP() SEEK vdesc Utilizo para uma pesquiza incremental conforme a dúvida nas códigos 1 e 2 onde seek vai colocando o ponteiro de um listbox conforme vou digitando as letras ------------------------------------------------------ Só estes esclarecimentos já seriam de grande importância para a migração mais efetiva para o SQL pelo fato de que o uso da minha aplicação vai ser REMOTA e precisarei de todos os recursos do SQL para sua agilidade e com isso, a minha intenção e trocar todos os listbox com campos para array usando o SQL_ARRAY() e para os arquivos auxiliares, usaria o USE SQL pois O SET RELATION tem que fazer esta procura Obrigado Editado por - Ladinilson on 10/05/2009 07:31:11 Editado por - Ladinilson on 10/05/2009 08:14:30
  24. Amigos estou querendo usar os comandos SQL no máximo, evitando assim os comandos RDD, então como estou iniciando, como ficaria as seguintes instruções: 1 - Uso de índices,ORDSETFOCUS(), SET RELATION, atribuiçoes as variáveis e pesquisa incremental nas linhas: ----------------------------------------------- INDEX ON nomecli TAG "cliente1" TO paxclig <---- INDEX ON codcli TAG "cliente2" TO paxclig Sei que poderia usar o CREATE INDEX , mas a questão é o TAG que é usado nas linha logo abaixo ----------------------------------------------- SELECT Clientes Clientes->(DBGOTOP()) ORDSETFOCUS('cliente1') <------- utilizo para pesquizas incremental e outros campos --------------------------------------------- SELECT clientes SET RELATION TO codcli INTO Dependente,codven INTO Vendedores,forma_pag INTO CondPaga,; codpla INTO Planos,codcob INTO Cobradores Utilizo para a exibição da descrição dos arquivos relacionados conforme os códigos no aqruivo de clientes --------------------------------------------- vcodigo := Clientes->codcli Utilizo para criar varáveis para exibição, inclusão e alteração nos arquivos --------------------------------------------- SET SOFTSEEK OFF DBGOTOP() SEEK vdesc Utilizo para uma pesquiza incremental conforme a dúvida nas códigos 1 e 2 onde seek vai colocando o ponteiro de um listbox conforme vou digitando as letras ------------------------------------------------------ Só estes esclarecimentos já seriam de grande importância para a migração mais efetiva para o SQL pelo fato de que o uso da minha aplicação vai ser REMOTA e precisarei de todos os recursos do SQL para sua agilidade e com isso, a minha intenção e trocar todos os listbox com campos para array usando o SQL_ARRAY() e para os arquivos auxiliares, usaria o USE SQL pois O SET RELATION tem que fazer esta procura Obrigado Editado por - Ladinilson on 10/05/2009 07:31:11 Editado por - Ladinilson on 10/05/2009 08:14:30
×
×
  • Create New...