REMOTE, MAINTAIN y comunicación cliente / servidor

[Mikel Gómez]

-* pfmikrmm.fex - 2006.05.25 - Mikel Gómez - REMOTE, MAINTAIN y comunicaciones.
-* Ejemplo de tratamiento de mensajes de MAINTAINs remotos.

-* Si el proceso remoto contuviera Dialogue Manager tendría que
-* estar alojado en el propio servidor y ejecutarse con
-* REMOTE EX o con EX dentro del REMOTE BEGIN/END
-* En este caso el TYPE ON podría convertirse en -WRITE

-* Para este ejemplo es necesario el siguiente master en el servidor.
-* FILENAME=EDAMSG, SUFFIX=FIX, $
-* SEGNAME=SEG01, SEGTYPE=S0 ,$
-* FIELDNAME=MSG, MENSAJE, A80, A80, $

-* _____________________________________________________________________
-* Proceso Remoto. Ejecución integra del código en el servidor.

REMOTE DEST = servidor
-REMOTE BEGIN
-* Asignación lógica de fichero de salida.
FILEDEF EDAMSG DISK edamsg.ftm

-* Mantenimiento.
MAINTAIN FILE CAR
TYPE ON EDAMSG "MENSAJE 1" ;
TYPE ON EDAMSG "MENSAJE 2" ;
TYPE ON EDAMSG "MENSAJE 3" ;
END

-* Descarga/Transmisión de mensajes al cliente.
TABLE FILE EDAMSG
PRINT MSG
ON TABLE PCHOLD AS MENSAJES
END
-REMOTE END

-* _____________________________________________________________________

-* Lectura/tratamiento de mensajes del servidor.
TABLE FILE MENSAJES
PRINT MSG
END