Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
(vfp) VFP 101
Message
 
À
12/09/2007 18:55:52
Jay Johengen
Altamahaw-Ossipee, Caroline du Nord, États-Unis
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Versions des environnements
Visual FoxPro:
VFP 8 SP1
Divers
Thread ID:
01254016
Message ID:
01254028
Vues:
12
I'm guessing that your call to ProcessData is running asynchronously...meaning it just initiates a routine and then returns processing back to your program before it is finished.

Usually if a library provides this type of functionality, it provides a way of checking the status and supports some type of callback when it is done so your main program can respond to it.

If you issue the CLEAR EVENTS before the process is complete, it is the same as QUITting.

Do you know if this library has:

1) A way of checking the status
2) Callback support when it is complete
3) A way of running "Synchronously" instead of "Asynchronously"

This would be helpful to know the best way to address the problem.


>Just started getting really into PRG-based classes and OOP. If I put the CLEAR EVENTS right after the calls to the ProcessData, why does that not work? Is it because everything is Event-driven so the CLEAR EVENTS should only be issued when an event is triggered? I'm getting confused on the top-down vs the events and how it fits in with this.
>
>>Is the ProcessData running asychronously? Does the EMPS_ClientClass provide a status method that fires when the process is complete?
>>
>>If so, do a BINDEVENTS to your stauts method and issue a CLEAR EVENTS when the process is complete.
>>
>>
>>>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
>>>
>>>
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform