Hi All

I have been messing with my form create and read events and a commuter procedure (ie most of the code is run by calling the commuter proc).

In my sleep I must have changed the

Return 0

(return zero)

at the bottom of the CREATE event script (no I can't do without the create event script because it's the only way I've figured out how to get at the createparams)

to

Return

ie return nothing

so I got the error when the process tried to pickup and run the system event stuff (after the event script and before the quick event)

ENG0010: RUN_EVENT, line 1. variable has not been assigned a value

Sure had me going for a while. Each time I got the error I had to reboot the computer to get response back. Putting the create event script back to Return 0 fixed the problem.

When searching using the site search and the search this list the closest I got was a thread about Norwegian Wood.

Using ENG0010

and RUN_EVENT

(run_event and run event seemed to return nothing at all)

and even

variable has not been assigned a value

seemed to offend the search process into a complete hang.

keywords:

run event RUN EVENT run_event

create event

var unassigned

missing parameter

Scott, LMS

(maybe I'll find this again when I need it)

Extract of code:

* B0340 Create Event

Declare FUNCTION UNASSIGNED, SEND_EVENT, CENTER_WINDOW

* Check for key to be loaded from workflow (parent app).

If UNASSIGNED( CreateParam) Then CreateParam='

category.item = FIELD( CreateParam, '|', 2)

act.desc = FIELD( CreateParam, '|', 4)

class = FIELD( CreateParam, '|', 5)

new_row = FIELD( CreateParam, '|', 8)

* (edit - set some default values)

If lease_no Then

* lease_no is the key, go get the data

* ie force the read event here

* note - the read event calls the commuter procedure to

* load up some more form controls with extracts of what it read…

 void=SEND_EVENT( @WINDOW, 'READ')

End

* centre the window

void=CENTER_WINDOW(@WINDOW,'PARENT')

@@WINDOW-]FOCUS=1

* set the first focus on the control .NEW_CHARGE

void=SET_PROPERTY( @WINDOW : ".NEW_CHARGE", "FOCUS", 1)

* need return 0 here to stop system default stuff running

* and stop that pesky error

RETURN 0

Scott,

no I can't do without the create event script because it's the only way I've figured out how to get at the createparams

Are you sure?

Have you got a commuter function

<code>
function XXXXXX( Event, CtrlEntID, Param1, Param2, Param3, Param4, Param5, Param6, Param7 )
begin case
case Event=CREATE"
...etc...

</code>

?

Then in the CREATE quickevent use the parameters

<code>
'CREATE','@SELF','@PARAM1'

</code>

Then the Param1 parameter of your commuter will contain the CreateParams.

- Oystein -

View this thread on the forum...