Hi,

Its me again. I've tried to put the end dialog box in the OK button of the collector window, under click event, but to no avail. My calling subroutine just can't get the value. 

My calling subroutine:

Frame=Get_Property(@window, "MDIFRAME")

if len(Frame) then

Parent=Frame

end

Param1="

call Dialog_Box("FRM_STOCK_DESC", @window, Param1)

My click event of OK button under collector window:

Param1=.TB_DESC-]TEXT

call end_dialog("FRM_STOCK_DESC",Param1)

What could have gone wrong? There's nothing appearing under Param1 (variable). I need assistance.

Thanks

Dialog_Box is a function and returns a value so

MyValue=Dialog_Box(Child, Parent, CreateParam)

Call End_Dialog(Child, MyValue)

[email protected]

The Sprezzatura Group Web Site

World Leaders in all things RevSoft

Elaine-

Dialog_Box is a function, not a subroutine. It returns the data to a calling routine in the following manner:

Return_Value=Dialog_Box('FORM_STOCK_DESC', @Window, '')

Data should be in the variable named REturn_Value.

I too have this problem, spent over four hours with various

approaches but gave up. Param will not return. So I created a labeled

common, i.e. common /temp/ param1, and put my info from the dialog box

in param1. The labeled commno needs to be in both the calling and called windows. I set my dialog box up so that the user presses F9 when done. I put the labeled common in the script for the F9 along with something like - param1=abcd:@fm:efgh:@fm:klmn.

It WORKS!

Sure would be interested in somebody explaining, in simple terms, how to make the dialog box process work as documented in "help". As it is,Dialog "help" is not much help.

Larry,

The End_Dialog function must be used to close the window called in the Dialog_Box function.

The following line of code will execute the dialog_box:

retval=Dialog_Box('MY_DIALOG',ownerwindow,createparam)

In the MY_DIALOG window on the close you need:

call End_Dialog('MY_DIALOG',return_values)

This will close the dialog box and place return_values into the retval variable in your calling source.

Sean

View this thread on the forum...