Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Need listbox help!
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Need listbox help!
Divers
Thread ID:
00048942
Message ID:
00048942
Vues:
99
I have a data entry form in which the user keys in a serial number and the branch name and location that the serial number was issued to is displayed on the screen and the relavent data is entered. In some instances the user will have to change the branch location. What I want to do is have a button called "Change Location" which changes the contents of a dropdown listbox to contain only the locations of the selected branch.

The code is located in a method called changecu. Here is the code:

* thisform.changecu
* code to create a new listbox with cu locations listed


temptran = morders.Transit_no
use creditun in 0 again alias changecu
select changecu
locate for alltrim(changecu.transit_no) = temptran
store alltrim(cdn_ca) to tempca
count to mcount99 for alltrim(changecu.cdn_ca) = alltrim(tempca)
dimension cuselect(mcount99)

select tot_name from changecu into array cuselect where alltrim(cdn_ca) = alltrim(tempca)
select morders
thisform.cbototname.rowsourcetype = 5
thisform.cbototname.rowsource = cuselect
thisform.cbototname.requery()
use in changecu
select morders
thisform.pick() && this method simply displays the combo box as is is usually hidden.

********
When I attempt to change the location using this method, the dropdown listbox appears, but is empty. Any ideas as to what I am doing wrong here?
Al Williams

Anola MB, CANADA
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform