>This is a test program. I want it to create/instantiate the objects, run the appropriate processes that send data to a port and then (this is the big one), quit. I need the READ EVENTS to make the program work, but then it never gets to the QUIT and I have to kill it with the Windows Task Manager. Do I have to loop using a DATETIME() kind of thing? Can't quite figure out how to do that as everything stops at READ EVENTS.
>
>

>SET PROCEDURE TO EMPS_PROCS ADDITIVE
>
>* Instantiating the client object
>oxClient = CREATEOBJECT( "EMPS_Client_Class",m.HostName, m.Port, m.BackupDirectory )
>oxClient.Setup()
>
>* Calls used to process data exchange
>oxClient.ProcessData("Medinotes","HL7","Demographics")
>oxClient.ProcessData("Medinotes","HL7","Scheduler")
>
>READ EVENTS
>
>QUIT
>

>
>ps: If you want to know why the title is like it is, that's because I can't use V F P 101 (remove
>extra spaces) as it barks at me that it can't be in uppercase. Stupid.

SET PROCEDURE TO EMPS_PROCS ADDITIVE

* Instantiating the client object
oxClient = CREATEOBJECT( "EMPS_Client_Class",m.HostName, m.Port, m.BackupDirectory )
oxClient.Setup()

* Calls used to process data exchange
oxClient.ProcessData("Medinotes","HL7","Demographics")
oxClient.ProcessData("Medinotes","HL7","Scheduler")

QUIT

READ EVENTS