xdialog with a set?

[glenschild]

Hi

Am trying to create an xdialog box via action scripting (record list - list box) to show entries in a set. Each line of the created list shows an entry from the primary table in the set and also shows detail "dragged in" from child tables.

My problem is that when running this the list box is not populated (see attached image)

Detailed below is the xbasic generated by the action script and any clues will be gratefully received.

Regards

Glen Schild
from a wet and windy England!

--------------------------------------------------------
'Create an XDialog dialog box to prompt for parameters.
DIM SHARED gameselect as C
DIM SHARED varC_result as C
heading_string = "Locate Game"
footer_string = "Once you have selected a game, you can proceed to enter data"
ok_button_label = "&OK"
cancel_button_label = "&Cancel"
varC_result = ui_dlg_box("Select a game to work on",Fullteamname,40),left(''+Hometeam->Fullteamname,40),left(''+Gamekey,5))}{}%.120,5gameselect];
{endregion};
{region}
{text=30,3:footer_string}
{endregion};
{line=1,0};
{region}

{endregion};
%dlg%)

[Peter.Wayne]

RE: xdialog with a set?

i think the problem is with your specification of the table name.

[%kl=C:\Documents and Settings\Glen\My Documents\Databases\NFL Europe Data System\Game_Information.Set,etc.

can you change this to
[%kl=Game_Information.Set, etc.

[glenschild]

RE: xdialog with a set?

Peter

Thank you for the response.

I have done as you suggested, but to no avail, still receiving a blank box, not sure where to look next?

Regards

Glen

[Selwyn Rabins]

RE: xdialog with a set?

you can't build a record list control from a set.

however, you can buiild a regular listbox and auto-populate it with data from a set. the genie will show you how to do it. it is also discussed in one of the release notes for a5v5.

[glenschild]

RE: xdialog with a set?

Thanks Selwyn

Will go back through the release notes and check it out

Regards

Glen

[glenschild]

RE: xdialog with a set?

Selwyn

Works perfectly, I guess the moral of this is

"READ THE NOTES"

Regards

Glen

[Willard]

RE: xdialog with a set?

Glen can you post the new code that you were successful with. Thanks Jack

[glenschild]

RE: xdialog with a set?

Jack

I used the genie and it did it all for me!!

Nevertheless the code created by the genie is detailed below

Regards

Glen

------------------------------------------------------
'Create an XDialog dialog box to prompt for parameters.
'In order to evaluate expressions using the eval() function, in the context of
'the current form, the "form_name" variable is defined.
DIM form_name as C
if is_object(topparent.this) then
form_name = topparent.name()+".this"
else
form_name = ""
end if
DIM SHARED gameselect as C
DIM SHARED varC_result as C
auto_list_gameselect = set.external_record_content_get("game_information.set","Gamekey+\"|\"+Gamedate+\"|\"+Seasonweek+\"|\"+Visitorteam->Fullteamname+\"|\"+Hometeam->Fullteamname","cdate(Gamedate)+Visitorteamkey","",1)
Dim format as p
Format.tab_stops="0.5,1.2,1.5,3.4,6"
Format.odd_row_color="White"
Format.even_row_color="Blue White"
Format.odd_selected_color="Dark Blue"
Format.even_selected_color="Dark Blue"
Format.font="Arial,8"
Format.font_color_unselected="Black"
Format.font_color_selected="White"
Format.lastbutton="OK"
Format.group_size=1
Format.number_rows=.f.
Format.alternating_bands=.t.

'Apply 'owner draw' formatting information to the list
auto_list_gameselect = a5_owner_draw_list_fmt(auto_list_gameselect,Format)

temp_count = w_count(auto_list_gameselect,crlf())
DELETE a_gameselect
DIM a_gameselect[temp_count] as c
a_gameselect.initialize(auto_list_gameselect)
heading_string = "Pick a game from this list to work on"
footer_string = "When selected you can proceed to enter/edit stats data for that game"
ok_button_label = "&OK"
cancel_button_label = "&Cancel"
DELETE expression_result
expression_result = eval("var->gameselect",form_name)
gameselect = convert_type(expression_result,"C")
varC_result = ui_dlg_box("Choose a Game",
{endregion};
%dlg%)