Forum AtoutFox : Vues non trouvées   

ven. 22 mai 2020, 18h02
BONEMME
atoutfox.public.association

Vues non trouvées

Bonjour,

J'ai créé und DBC contenant une table(hf) dans un nv projet.
Sur cette table deux vues de recherches pour alimenter un grid
Ces dernières, testées dans le PJT efonctionelle
Un programme de démarrage pour le set d'environnement
Dans la forme un champs texte, et le grid
Dans le lostfocus du texte:
lors de l'appel SELECT vrech_epx
Le programme indique que la vue n'existe pas?
(j'ai effacé toute ldes config et fichier USER au préalable)

Si vous avez une explication je suis preneur.

txtNom = THIS.Value
txtNom = ALLTRIM(txtNom)+REPLICATE(" ",76-LEN(ALLTRIM(txtNom)))
txtNomx = ALLTRIM(txtNom)+REPLICATE("z",76-LEN(ALLTRIM(txtNom)))
txtNom = UPPER(txtNom)
txtNomx = UPPER(txtNomx)

*SELECT tmpd
SELECT hf

DO CASE
CASE Thisform.coptiongroup1.cOptionbutton1.value = 1
SET STEP ON
SELECT vrech_epx
REQUERY("vrech_epx")
COPY TO d_A
SELECT tmpd
APPEND FROM d_A.dbf
DELETE FILE d_A.dbf
DELETE FILE d_A.fpt
CASE Thisform.coptiongroup1.cOptionbutton2.value = 1
SELECT vRech_eps
REQUERY("vRech_eps")
......
ENDCASE

THIS.Value = ""
GO TOP
THISFORM.cgrid1.column1.text1.SetFocus

Merci
Guy Bonemme

--
Guy Bonemme

--
Cet email a fait l'objet d'une analyse antivirus par AVG.
http://www.avg.com
Permalink : http://www.atoutfox.org/nntp.asp?ID=0000019628