Hi alpha-drunks,
I am having a problem that I can't wrap my head around a solution for and would appreciate the help of greater minds than me. The code below is an example of my problem. We perform QC reviews on store data which I would like to be performed in dialogs as a loop through a stores id list with the data presented in the dialog for user-selected stores. I have the user select the store id from a store id list and the dialog event displays the store data for the selected store id and subtracts the just selected store id from the store selection list in preparation for the next selection. The odd thing happening is that if the current store selected is 249 and there is a store 2499 in the list, at the completion of the store subtraction of 249 from the list the cursor highlights store 2499, way down the list causing the user to have to scroll to the top to select the next store in sequence. How do I get the cursor to present back at the top of the store id list and not at a similar number store way down the list? Thanks
I am having a problem that I can't wrap my head around a solution for and would appreciate the help of greater minds than me. The code below is an example of my problem. We perform QC reviews on store data which I would like to be performed in dialogs as a loop through a stores id list with the data presented in the dialog for user-selected stores. I have the user select the store id from a store id list and the dialog event displays the store data for the selected store id and subtracts the just selected store id from the store selection list in preparation for the next selection. The odd thing happening is that if the current store selected is 249 and there is a store 2499 in the list, at the completion of the store subtraction of 249 from the list the cursor highlights store 2499, way down the list causing the user to have to scroll to the top to select the next store in sequence. How do I get the cursor to present back at the top of the store id list and not at a similar number store way down the list? Thanks
Code:
dim vLsto_id as C=""
dim vL as C
vL=<<%c%
123$$|Store 123 no problem
124$$|Store 124 is old
127$$|Store 127 sticks
179$$|Store 179 has bad produce
248$$|Store 248 has cute checkout ladies
367$$|Store 367 has new shopping carts
456$$|Store 456 is ne and fresh
478$$|tore 478 has fresh fennel
589$$|Store 589 has a video rental department
778$$|store 778 has a pharmacy
824$$|Store 824 has great meat counter
852$$|Store 852 has bad meat counter
956$$|Store 956 is ne and fresh
1248$$|Store 1248 is very clean
1275$$|Store 1275 has bad parking
2367$$|Store 2367 won't honor greenstamps
2456$$|Store 3456 has no parking available
%c%
for each foo in vL
vLsto_id=vLsto_id+stritran(word(foo,1,"|"),"$$","")+crlf()
next
dim vLsto_id as C
dim vsto_descr as C
dim vstok as C
dim vR as C
vR=ui_modeless_dlg_box("Stores",<<%dlg%
{font=arial,10,b}{lf};
CURRENT PICK: {text=10,vstok};
[.30,11vstok^#vLsto_id!evsk_*]{sp=2}[.50vx^#vsto_descr];
{lf};
<Close>
%dlg%,<<%code%
if left(a_dlg_button,5)="evsk_"
if a_dlg_button="evsk_change"
vsto_descr=word(filter_string_smatch(vL,vstok+"$$*",crlf()),2,"|")
vLsto_id=word_subtract(vLsto_id,vstok,crlf())
end if
end if
if a_dlg_button="close"
ui_modeless_dlg_close("stores")
end if
%code%)
Comment