Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Dados na tela
Message
De
22/10/2004 06:28:28
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Versions des environnements
Visual FoxPro:
VFP 6
OS:
Windows '98
Database:
Visual FoxPro
Divers
Thread ID:
00953598
Message ID:
00953663
Vues:
19
This message has been marked as the solution to the initial question of the thread.
>Como faço para que o resultado de um filtro nao apareça na tela do Fox?
>
>No meu formulario tenho um botao que é para acrescentar registros na tabela "ABONOS".
>
>O código do botao é:
>select 3
>append blank
>replace num_pedido with thisform.general.abonos.text.val
>replace fecha with date()
>set filter to abonos_num_ped = thisform.general.pedido.text1.val
>
>o problema é que o resultado do filtro aparece na tela e eu nao quero isso.
>
>Gustavo


Não fico claro com o "aparece na tela". Será que vc precissa um SET TALK OFF?

Respeito aó programa, eu mudaria:

>select 3
Issto não é uma forma correta de escrever ja que não e auto-documentada.
Que tabela está na area 3? É sempre a mesma? Como sabe um novo desenvolvedor que 'herede' o programa no futuro?
A forma correta e: SELECT Abonos (sempre usar o ALIAS)

>append blank
>replace num_pedido with thisform.general.abonos.text.val
>replace fecha with date()


É mais rápido fazer so um Replace.
replace num_pedido with thisform.general.abonos.text.val, ;
replace fecha with date()
ou melhor usar INSERT INTO

Porque usar SET FILTER?
É sempre melhor usar uma pesquisa (SQL).

Não é também correto usar o THISFORM no Filter. Quando o form não exista em memoria, o filter dará um erro por não ter uma referencia ao form.

HTH


Alex Feldstein, MCP, Microsoft MVP
VFP Tips: English - Spanish
Website - Blog - Photo Gallery


"Once again, we come to the Holiday Season, a deeply religious time that each of us observes, in his own way, by going to the mall of his choice." -- Dave Barry
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform