Luiz Arruda (ICO) Posted July 24, 2007 Report Share Posted July 24, 2007 Pessoal é o seguinte, em uma dialog tenho que abrir dois ou mas arquivos.dbf, p problema está quando tento retornar ao primeiro mas ou menos assim;; Select 1 Use Pessoal new shared Set index to.... Redefine ListBox olbx ..... on change vercad("mostra os dados cadastrais em gets na dialog como NOME etc...") Redefine sButton obtn ... action ficha() FUNCTION FICHA(ODLG) Select 2 use lancamentos exclusive new zap, append etc... close lancamentos SELECT 1 ou simplesmente não coloco nada.. dá erro dizendo que não encontrou a variavel nome na funcao vercad() Quando fecho o LANCAMENTOS.DBF é para voltar para o PESSOAL.DBF e isto não está acontecendo dá erro dizendo que não encontrou a variavel nome na funcao Error description: Error BASE/1003 Variable does not exist: NOME terei que abrir novamente o pessoal.dbf ??? Luiz Arruda - Corumbá/MS FiveWin 2.4 - WS - [x]Harbour 0.99.50 (Simplex) - xDev 0.65 ico.corumba@gmail.com Vamos Aderir:"Retorne avisando se a dica funcionou"id=blue> Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted July 24, 2007 Author Report Share Posted July 24, 2007 Pessoal é o seguinte, em uma dialog tenho que abrir dois ou mas arquivos.dbf, p problema está quando tento retornar ao primeiro mas ou menos assim;; Select 1 Use Pessoal new shared Set index to.... Redefine ListBox olbx ..... on change vercad("mostra os dados cadastrais em gets na dialog como NOME etc...") Redefine sButton obtn ... action ficha() FUNCTION FICHA(ODLG) Select 2 use lancamentos exclusive new zap, append etc... close lancamentos SELECT 1 ou simplesmente não coloco nada.. dá erro dizendo que não encontrou a variavel nome na funcao vercad() Quando fecho o LANCAMENTOS.DBF é para voltar para o PESSOAL.DBF e isto não está acontecendo dá erro dizendo que não encontrou a variavel nome na funcao Error description: Error BASE/1003 Variable does not exist: NOME terei que abrir novamente o pessoal.dbf ??? Luiz Arruda - Corumbá/MS FiveWin 2.4 - WS - [x]Harbour 0.99.50 (Simplex) - xDev 0.65 ico.corumba@gmail.com Vamos Aderir:"Retorne avisando se a dica funcionou"id=blue> Quote Link to comment Share on other sites More sharing options...
pauloaraujo Posted July 24, 2007 Report Share Posted July 24, 2007 Ico do Céu (hehe) Select 1id=red> Use Pessoal newid=red> shared Set index to.... OU VOCÊ USA O NEW OU VOCÊ DETERMINA O SELECT No caso do NEW, é o windows que determina qual o SELECT que será dado para cada DBF, e você tem que fazer a chamada com SELECT PESSOAL e não SELECT 1 Ficaria assim: // Select 1 Use Pessoal new shared Set index to.... Redefine ListBox olbx ..... on change vercad("mostra os dados cadastrais em gets na dialog como NOME etc...") Redefine sButton obtn ... action ficha() FUNCTION FICHA(ODLG) // Select 2 use lancamentos exclusive new zap, append etc... close lancamentos SELECT PESSOAL // SELECT 1 RETURN( ..... ) Um abraço Editado por - pauloaraujo on 24/07/2007 15:32:43 Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted July 24, 2007 Author Report Share Posted July 24, 2007 Paulo... Para vc. Select 1, Select 2, Select 3 Hábitos que herdei do clipper... Agora novos rumos serão tomados he! he! he!... Obrigadão Luiz Arruda - Corumbá/MS FiveWin 2.4 - WS - [x]Harbour 0.99.50 (Simplex) - xDev 0.65 ico.corumba@gmail.com Vamos Aderir:"Retorne avisando se a dica funcionou"id=blue> Quote Link to comment Share on other sites More sharing options...
kapiaba Posted July 24, 2007 Report Share Posted July 24, 2007 citação:Paulo... Para vc. Select 1, Select 2, Select 3 Hábitos que herdei do clipper... Agora novos rumos serão tomados he! he! he!... Obrigadão Luiz Arruda - Corumbá/MS FiveWin 2.4 - WS - [x]Harbour 0.99.50 (Simplex) - xDev 0.65 ico.corumba@gmail.com Vamos Aderir:"Retorne avisando se a dica funcionou"id=blue> id=quote>id=quote> uuuuuuiiiiiiiiiiiiiiiiiiiiiiii... João Santos - São Paulo. kmt_karinha@pop.com.br kapiaba@brfree.com.br Skype: fw_kapiaba FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
Anderson.OL Posted July 24, 2007 Report Share Posted July 24, 2007 Nao conheco o Ico pessoalmente para comentar tal emotion.. Mas kapiaba eu conheco (somente do ultimo encontro, mas conheço).... kapiaba meu querido... este teu "uuuuuuiiiiiiiiiiiiiiiiiiiiiiii..."id=pink> pega mal cara!! esta na hora de rever seus conceitos AUhUahUahuhUAhUAhuHa Anderson.OL Skype: andersonolid=green> FW(2.6) | Clpp (5.3) | Quebrando tudo!id=red> Editado por - anderson.ol on 24/07/2007 16:38:03 Quote Link to comment Share on other sites More sharing options...
kapiaba Posted July 24, 2007 Report Share Posted July 24, 2007 citação:Nao conheco o Ico pessoalmente para comentar tal emotion.. Mas kapiaba eu conheco (somente do ultimo encontro, mas conheço).... kapiaba meu querido... este teu "uuuuuuiiiiiiiiiiiiiiiiiiiiiiii..."id=pink> pega mal cara!! esta na hora de rever seus conceitos AUhUahUahuhUAhUAhuHa Anderson.OL Skype: andersonolid=green> FW(2.6) | Clpp (5.3) | Quebrando tudo!id=red> Editado por - anderson.ol on 24/07/2007 16:38:03 id=quote>id=quote> PENA QUE EU NAO TENHA NENHUM EMOTION ´QUEBRANDO´ PARA ESQUERDA... João Santos - São Paulo. kmt_karinha@pop.com.br kapiaba@brfree.com.br Skype: fw_kapiaba FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted July 24, 2007 Author Report Share Posted July 24, 2007 citação: citação:Paulo... Para vc. Select 1, Select 2, Select 3 Hábitos que herdei do clipper... Agora novos rumos serão tomados he! he! he!... Obrigadão Luiz Arruda - Corumbá/MS FiveWin 2.4 - WS - [x]Harbour 0.99.50 (Simplex) - xDev 0.65 ico.corumba@gmail.com Vamos Aderir:"Retorne avisando se a dica funcionou"id=blue> id=quote>id=quote> uuuuuuiiiiiiiiiiiiiiiiiiiiiiii... João Santos - São Paulo. kmt_karinha@pop.com.br kapiaba@brfree.com.br Skype: fw_kapiaba FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe id=quote>id=quote>Liga não pessoal... é ciúme Luiz Arruda - Corumbá/MS FiveWin 2.4 - WS - [x]Harbour 0.99.50 (Simplex) - xDev 0.65 ico.corumba@gmail.com Vamos Aderir:"Retorne avisando se a dica funcionou"id=blue> Editado por - ico on 24/07/2007 17:45:35 Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.