Eroni

Me manda este TstShowMenu.prg pro meu e-mail. Eu uso o xMate e compilo ele pra vc, e se eu descobrir os erros eu te mando de volta o script do xMate pra vc compilar. Eroni (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf

Para melhorar o desempenho deves mudar o código e usar comandos puros de sql em uma única instrução, tipo, ao invés de dar vários replace with... usar somente uma instrução update tabela set ......... Se usar somente comandos puros sql, não precisará mais do use....... Espero ter ajudado alguma coisa. Eroni (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf

Amigo, cada vez que entra no sistema precisa sim usar o set index, porém isto NÃO cria indice, somente abre. O que cria o indice é o index on, que no caso do Mysql, pouco ou nenhuma vez será mais necessário. Eroni (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf

Marcelo eu já tive muito problema no passado por causa disto, hoje eu uso assim para pegar a tecla do get: IF // se o get ta dentro de um folder eu tenho uma instância dentro do get que me diz se ele ta em um folder ou nao nKey := oGet:nLastKey ELSE // senao, pega a tecla da janela nKey := oWnd:nLastKey ENDIF Assim está funcionando bem a anos, de qualquer forma a tecla da janela é que funcionou pra mim. Eroni (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf

Eu tinha este problema quando fechava muitas janelas ao mesmo tempo, alguma delas já não existia mais. Eroni (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf

Ok, então este integrador faria somente a transmissão, autenticação/recebimento dos dados, é isso? Eroni (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf

Bom dia a todos, eu também estou nesta, me ofereço para integrar este projeto, tenho clientes que será obrigado a partir de janeiro/2009, por isso abri este tópico, que cedo ou tarde vai interessar a todos. Estou a disposição, mas precisamos organizar realmente o projeto, sugiro ao Marcelo dizer o que ele já tem, e a partir daí relacionarmos a lista de tarefas e organizar-mos um cronograma para dar-mos inicio aos trabalhos. Eroni (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf

Olá, o problema é que na hora de compilar, o fivewin.ch faz a chamada a função tGet mudando a forma do bloco de código. Dê uma olhada no fivewin.ch que você descobre como alterar o arquivo cabeçalho para fazer como você quer. Mas lembre-se de que se mudar ali, vai mudar todo o sistema. Eroni (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf

Se o seu valor for numérico, use transform( nValor,"@E 999,999.99" ) Caso seja string, faça a devida conversão antes. Eroni (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf

Olá, você precisa informar como faz para acessar o mysql, se com sqllib, sqlrdd ou outro. Para cada tipo de acesso já tem o seu devido utilitário que faz isso na boa, com contador de registro e tudo. Eu já transferi tabelas com esta quantidade de registros e funcionou. Eroni (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf

Marcelo, quanto tempo. Eu uso nos meus sistemas algo parecido para configuração de teclas de atalho, eu faço assim: Alterei a classe window do fivewin, lá nos métodos keychar e keydown, e chamo uma função que detecta a tecla e faz o tratamento. No seu caso, acho que você deve alterar o método correspondente ao que faz o clique com botão direito do mouse. Dai em qualquer parte do sistema quando se clica com o botão direito, passará pela sua função. Eroni (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf

Bem estas perguntas eu até sei responder. O prazo depende: Alguns segmentos já está funcionando desde abril deste ano. Outros irão funcionar em outubro deste ano. Já para todos os estabelecimentos industriais que tem apuração pelo lucro real obrigatoriamente a partir de jan/2009. Tenho clientes que se enquadram neste último caso, portanto já estou me mexendo. Para os que já estão utilizando este ano são segmentos de grandes mercados, como cigarros, bebidas, combustíveis, automóveis, etc. Eu tenho uma apostila de um curso aqui de SC, porém é um curso direcionado a contadores, se alguem se interessar posso disponibilizar. Eroni (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf Editado por - eroni on 18/06/2008 14:06:46

Amigo, a melhor ferramenta para Mysql na minha opinião é o MySqlAdministrator, baixado junto com o MySql. Nele o backup é rápido e quando precisar restaurar funciona legal. Eroni (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf

Bom dia, alguém já tem encaminhado alguma coisa para a nota fiscal eletrônica nacional? Quais os passos, etc? Obrigado a todos. Eroni (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf

Bom dia, alguém já tem encaminhado alguma coisa para a nota fiscal eletrônica nacional? Quais os passos, etc? Obrigado a todos. Eroni (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf

Pessoal, se me permitem meter o bedelho, eu decidi resolver esta questão de uma outra maneira. Resolvi fazer como o Windows faz, colocar os programas mais utilizados no menu iniciar. O que eu fiz foi fazer uma barra de botões na janela principal e cada vez que se usa uma função, esta função está associada a um botão com sua imagem já pré-definida juntamente com o perfil do usuário e vai se atualizando automaticamente. Cada vez que o usuário entra no sistema, o sistema verifica quais as opções mais utilizadas por ele e coloca na barra de botões ordenado decrescente da esquerda pra direita. Desta forma, o usuário terá sempre a mão a sua opção mais utilizada. Eroni (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf

Simplesmente mudei a validação das janelas. Abraços. Eroni (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf

Amigos, ob rigado por todas as manifestações neste tópico. Encontrei o probblema, mas a solução não é tão simples assim. No código abaixo, onde tem ? "validar" não passa por ali quando se fecha a aplicação sem ter fechado as outras janelas antes, testem: #include "fivewin.ch" STATIC oWin FUNCTION main() DEFINE WINDOW owin from 0,0 TO 25,60 title "Aplicacao" // aplicação principal @ 01,01 BUTTON "Criar" action _mais() size 50,20 @ 03,01 BUTTON "Sair" action Saida( oWin ) size 50,20 Activate window oWin vALID( Saida( oWin ) ) RETURN( NIL ) STATIC FUNCTION Saida( oWin ) oWin:End() RETURN NIL STATIC FUNCTION _mais() LOCAL oWnd DEFINE WINDOW oWnd FROM 2, 2 TO 23,45 TITLE "Relatorio " MDI // relatorio Activate window oWnd ON init _Texto( oWnd ) valid _Ok( oWnd ) RETURN( NIL ) STATIC FUNCTION _Ok( oWnd ) ? "VALIDOU" // quando fecha a aplicação sem fechar as janelas, nao passa por aqui RETURN( .t. ) STATIC FUNCTION _texto( oWnd ) LOCAL oWndChild DEFINE WINDOW oWndChild MDICHILD FROM 0,0 ; TO oWnd:nBottom,oWnd:nRight ; OF oWnd VSCROLL HSCROLL PIXEL ; BORDER NONE ; NO SYSMENU TITLE "" Activate window oWndChild MAXIMIZED RETURN( NIL ) (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf

Júlio, tentei adicionar as funções que você citou, mas o problema persiste. Quanto a sugestão do Ricardo, não tenho como fazer, pois na verdade a minha aplicação é muito mais complexa, a janela do relatório é aberta muitas vezes e em pontos diferentes do sistema pelo usuário, e ao fechar a aplicação principal sem antes ter fechado o relatório é que dá o erro. Se fechar a janela do relatório antes dai tudo ok. O que eu vou tentar agora é construir um array público para armazenar todas as janelas do sistema, e ao fechar a aplicação, fechar todas as janelas abertas antes da principal. Vou fazer os testes e depois posto o resultado. Abraços (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf

Valeu kapiaba, mas na minha aplicação eu já fazia assim, conforme você estruturou. Acontece que no exemplo alterado por você funciona legal, mas na minha aplicação não. O erro é: Mas basicamente a lógica é a que eu descreví, vou tentar descobrir. O erro começou a aparecer depois que eu mudei a tela do relatorio para MDI e uma filha dentro dela. Mas valeu a ajuda. Abraço Eroni (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf

Olá, em relação ao código abaixo: #include "fivewin.ch" FUNCTION main() DEFINE WINDOW owin from 0,0 TO 25,60 title "Aplicacao" // aplicação principal Activate window oWin ON init _mais() RETURN( NIL ) STATIC FUNCTION _mais() LOCAL oWnd DEFINE WINDOW oWnd FROM 2, 2 TO 23,45 TITLE "Relatorio " MDI // relatorio Activate window oWnd ON init _Texto( oWnd ) RETURN( NIL ) STATIC FUNCTION _texto( oWnd ) LOCAL oWndChild DEFINE WINDOW oWndChild MDICHILD FROM 0,0 ; TO oWnd:nBottom,oWnd:nRight ; OF oWnd VSCROLL HSCROLL PIXEL ; BORDER NONE ; NO SYSMENU TITLE "" Activate window oWndChild MAXIMIZED RETURN( NIL ) Quando fecha a janela principal (aplicação) como fechar tudo sem dar pau nem ficar na memória? Obrigado. Eroni (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf Editado por - eroni on 03/04/2008 16:58:57 Editado por - eroni on 04/04/2008 16:19:33

Olá, em relação ao código abaixo: #include "fivewin.ch" FUNCTION main() DEFINE WINDOW owin from 0,0 TO 25,60 title "Aplicacao" // aplicação principal Activate window oWin ON init _mais() RETURN( NIL ) STATIC FUNCTION _mais() LOCAL oWnd DEFINE WINDOW oWnd FROM 2, 2 TO 23,45 TITLE "Relatorio " MDI // relatorio Activate window oWnd ON init _Texto( oWnd ) RETURN( NIL ) STATIC FUNCTION _texto( oWnd ) LOCAL oWndChild DEFINE WINDOW oWndChild MDICHILD FROM 0,0 ; TO oWnd:nBottom,oWnd:nRight ; OF oWnd VSCROLL HSCROLL PIXEL ; BORDER NONE ; NO SYSMENU TITLE "" Activate window oWndChild MAXIMIZED RETURN( NIL ) Quando fecha a janela principal (aplicação) como fechar tudo sem dar pau nem ficar na memória? Obrigado. Eroni (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf Editado por - eroni on 03/04/2008 16:58:57 Editado por - eroni on 04/04/2008 16:19:33

citação:Não tenho certeza mas acho q. a Sqllib Free não da suporte aos as funções DbSeek()/OrdSetFocus() nada disso. id=quote>id=quote>Eu tenho certeza. A versão free não suporta mesmo. só a comercial. Eroni (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf

Acredito que o problema é aqui: VALID(oDlg:=NIL,.T.) , eu tentaria colocar assim VALID(oTimer:end(),oDlg:=NIL,.T.) Eroni (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf

Olá, so para lembrar, alguem conseguiu a versão 5.6 do bcc? Eroni (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf