|
Hola Vicente.
Podrías controlarlo mediante colas de
datos.
Más información y ejemplos en el Client Access Express
Toolkit:
Un saludo,
Marcel.
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de Vicente Florencio Enviado el: jueves, 01 de diciembre de 2005 13:55 Para: FORUM help400 Asunto: Como saber si un proceso ha finalizado Hola a todos.
Tengo un programa en Visual Basic que lanza un
proceso en el AS400.
Este proceso genera como resultado un fichero
físico que el mismo programa Visual Basic traspasa directamente mediante ADO los
datos a Excel.
El proceso en el AS400 es muy rápido y con una
pantalla de confirmación en el programa del PC a la que el usuario tiene que
responder afirmativamente para continuar la visualización de los datos en
Excel, da tiempo a que el proceso del 400 haya terminado.
Mi deseo sería poder controlar la finalización del
proceso en el 400 antes de plantar los datos en Excel.
La conexión y arranque del proceso se hace mediante
OLE con la siguiente estructura
Dim AS400Cn As New
cwbautsv.cwbRemoteCallConversation
Dim AS400Cmd As New cwbautsv.cwbCommand Dim AS400Err As New cwbautsv.cwbErrorMessage Dim retval As Variant Dim parm As String . .
.
.
'Iniciar
conversación
Txtdescrip.Text = " Arrancando conexión con AS/400 ... " retval = AS400Cn.cwbrcStartConversation("MiSistema", " ") 'Programa a ejecutar parm = "Call MiBiblioteca/MiProceso" 'Arranque del proceso remoto Txtdescrip.Text = " Lanza proceso en AS/400 ... " retval = AS400Cmd.cwbrcRunCmd(AS400Cn, parm, AS400Err) En resumen necesitaría controlar desde el programa
del PC la finalización del proceso en el AS400 antes de ponerme a leer los datos
generados
Muchas gracias
Vicente Florencio Pérez
Portinsa ( Dpto. Informática ) Luis Caballero S.A. El Pto. Santa María Cádiz |
