Utilice las siguientes instrucciones para crear el flujo de mensajes XML_CancelReservation. Para obtener instrucciones más detalladas, pulse en los enlaces que se proporcionan al final de cada paso.
Para crear y configurar el flujo de mensajes XML_CancelReservation:
Tipo de nodo | Nombre de nodo |
---|---|
MQInput | XML_CANCELRESERVATION_IN |
MQOutput | XML_CANCELRESERVATION_OUT |
MQOutput | XML_CANCELRESERVATION_FAIL1_1 |
MQOutput | XML_CANCELRESERVATION_FAIL1_2 |
MQOutput | XML_CANCELRESERVATION_FAIL2 |
Compute | DeleteReservation |
Compute | IncrementSeat |
Trace | Trace |
Trace | Trace1 |
Trace | Trace2 |
Nombre de nodo | Terminal | Conectar a |
---|---|---|
XML_CANCELRESERVATION_IN | Out (de salida) | DeleteReservation |
Catch (de captación) | XML_CANCELRESERVATION_FAIL1_1 | |
DeleteReservation | Failure (de anomalías) | Trace |
Out (de salida) | Trace1 | |
Trace | Out (de salida) | XML_CANCELRESERVATION_FAIL1_2 |
Trace1 | Out (de salida) | IncrementSeat |
IncrementSeat | Failure (de anomalías) | Trace2 |
Out (de salida) | XML_CANCELRESERVATION_OUT | |
Trace2 | Out (de salida) | XML_CANCELRESERVATION_FAIL2 |
Nombre de nodo | Página | Propiedad | Valor |
---|---|---|---|
XML_CANCELRESERVATION_IN | Básico | Nombre de cola | XML_CANCELRESERVATION_IN (Esta es la cola local desde la que el flujo de mensajes toma el mensaje.) |
Valor por omisión | Dominio del mensaje | XML (Indica al intermediario que utilice el analizador XML genérico.) |
|
DeleteReservation | Básico | Origen de datos | RESERVDB (Esta es la base de datos que utiliza este nodo.) |
Básico | Módulo ESQL | DeleteReservation (Este es el nombre del módulo ESQL que utiliza este nodo durante el proceso. El nombre ha de coincidir con el nombre que aparece en la sentencia CREATE COMPUTE en el archivo ESQL.) |
|
Básico | Generar excepción cuando se produce un error en la base de datos | Quite la marca del recuadro de selección para poder especificar en el ESQL cómo debe gestionar el flujo de mensajes los errores de base de datos. Si el recuadro está seleccionado, cuando hay un error de base de datos, por omisión, se genera una excepción y se pasa el mensaje a la cola FAIL. | |
Trace | Básico | Destino | Anotaciones de error locales (Indica al nodo que anote la información de rastreo en las anotaciones de error locales. En Windows, las anotaciones de error locales son el Visor de sucesos; en Linux, las anotaciones de error locales son el syslog.) |
Básico | Patrón | ==== Error del nodo Delete Reservation ================== ${ExceptionList} (Anota la parte del árbol correspondiente a la lista de excepciones del mensaje.) |
|
Básico | Número del mensaje | 3051 | |
XML_CANCELRESERVATION_FAIL1_1 | Básico | Nombre de cola (No es necesario especificar el nombre del gestor de colas porque la cola está definida en el mismo gestor de colas que el intermediario.) |
XML_CANCELRESERVATION_FAIL1 (Es la cola local en la que el flujo de mensajes coloca el mensaje si el proceso falla.) |
XML_CANCELRESERVATION_FAIL1_2 | Básico | Nombre de cola (No es necesario especificar el nombre del gestor de colas porque la cola está definida en el mismo gestor de colas que el intermediario.) |
XML_CANCELRESERVATION_FAIL1 (Es la cola local en la que el flujo de mensajes coloca el mensaje si el proceso falla.) |
Trace1 | Básico | Destino | Anotaciones de error locales (Indica al nodo que anote la información de rastreo en las anotaciones de error locales. En Windows, las anotaciones de error locales son el Visor de sucesos; en Linux, las anotaciones de error locales son el syslog.) |
Básico | Patrón | ========== Mensaje tras el nodo Delete Reservation =================== ${Root} ${Environment} (Anota la parte de los árboles Mensaje y Entorno del mensaje.´) |
|
Básico | Número del mensaje | 3051 | |
IncrementSeat | Básico | Origen de datos | RESERVDB (Esta es la base de datos que utiliza este nodo.) |
Básico | Módulo ESQL | IncrementSeat (Este es el nombre del módulo ESQL que utiliza este nodo durante el proceso. Debe coincidir con el nombre en la sentencia CREATE COMPUTE MODULE del archivo XML_CancelReservation.esql.) |
|
Trace2 | Básico | Destino | Anotaciones de error locales (Indica al nodo que anote la información de rastreo en las anotaciones de error locales. En Windows, las anotaciones de error locales son el Visor de sucesos; en Linux, las anotaciones de error locales son el syslog.) |
Básico | Patrón | ======== Error del nodo Increment Seat =================== ${ExceptionList} (Anota la parte del árbol Lista de excepciones del mensaje.) |
|
Básico | Número del mensaje | 3051 | |
XML_CANCELRESERVATION_FAIL2 | Básico | Nombre de cola (No es necesario especificar el nombre del gestor de colas porque la cola está definida en el mismo gestor de colas que el intermediario.) |
XML_CANCELRESERVATION_FAIL2 (Es la cola local en la que el flujo de mensajes coloca el mensaje si el proceso falla.) |
XML_CANCELRESERVATION_OUT | Básico | Nombre de cola (No es necesario especificar el nombre del gestor de colas porque la cola está definida en el mismo gestor de colas que el intermediario.) |
XML_CANCELRESERVATION_OUT (Esta es la cola local en la que el flujo de mensajes coloca el mensaje.) |
-- ************************************************ -- * ESQL para el flujo de mensajes XML_CancelReservation -- ******************************************************* CREATE COMPUTE MODULE DeleteReservation CREATE FUNCTION Main() RETURNS BOOLEAN BEGIN DECLARE SQLState1 CHARACTER; DECLARE SQLErrorText1 CHARACTER; DECLARE SQLCode1 INTEGER; DECLARE SQLNativeError1 INTEGER; SET OutputRoot = InputRoot; DECLARE cancel REFERENCE TO InputRoot.XML.CancelReservation.ListOfReservations; DECLARE I INTEGER 1; DECLARE J INTEGER CARDINALITY(cancel.ReservationNumber[]); WHILE I <= J DO -- loop through the reservations to be cancelled -- compruebe que la reserva solicitada existe SET Environment.ListOfReservations.Info[I] = THE(SELECT T.CLASSTYPE, T.FLIGHTNO, T.FLIGHTDATE FROM Database.XMLPASSENGERTB AS T WHERE T.RESERVATIONNO = cancel.ReservationNumber[I]); IF (SELECT COUNT(*) FROM Environment.ListOfReservations.Info[I].*[] AS I1) IS NULL THEN THROW USER EXCEPTION CATALOG 'MyCatalog' MESSAGE 1234 VALUES('No record to delete'); END IF; -- suprima el registro de la base de datos DELETE FROM Database.XMLPASSENGERTB AS T WHERE T.RESERVATIONNO = cancel.ReservationNumber[I]; SET I = I + 1; SET SQLCode1 = SQLCODE; IF SQLCode1 <> 0 THEN SET SQLState1 = SQLSTATE; SET SQLErrorText1 = SQLERRORTEXT; SET SQLNativeError1 = SQLNATIVEERROR; THROW USER EXCEPTION MESSAGE 2950 VALUES('The SQL State' , SQLState1 , SQLCode1 , SQLNativeError1 , SQLErrorText1); END IF; END WHILE; RETURN TRUE; END; END MODULE; CREATE COMPUTE MODULE IncrementSeat CREATE FUNCTION Main() RETURNS BOOLEAN BEGIN DECLARE SQLState1 CHARACTER; DECLARE SQLErrorText1 CHARACTER; DECLARE SQLCode1 INTEGER; DECLARE SQLNativeError1 INTEGER; SET OutputRoot = InputRoot; DECLARE I INTEGER 1; DECLARE J INTEGER CARDINALITY(Environment.ListOfReservations.*[]); -- loop through the cancellations, updating the seat availability WHILE I <= J DO IF Environment.ListOfReservations.Info[I].CLASSTYPE = 'Y' THEN UPDATE Database.XMLFLIGHTTB AS T SET ECONOMICCLASS = T.ECONOMICCLASS-1, TOTALECONOMIC = T.TOTALECONOMIC+1 WHERE T.FLIGHTNO = Environment.ListOfReservations.Info[I].FLIGHTNO AND T.FLIGHTDATE = Environment.ListOfReservations.Info[I].FLIGHTDATE; END IF; IF Environment.ListOfReservations.Info[I].CLASSTYPE = 'F' THEN UPDATE Database.XMLFLIGHTTB AS T SET FIRSTCLASS = T.FIRSTCLASS-1, TOTALFIRST= T.TOTALFIRST+1 WHERE T.FLIGHTNO = Environment.ListOfReservations.Info[I].FLIGHTNO AND T.FLIGHTDATE = Environment.ListOfReservations.Info[I].FLIGHTDATE; END IF; SET I = I + 1; SET SQLCode1 = SQLCODE; IF SQLCode1 <> 0 THEN SET SQLState1 = SQLSTATE; SET SQLErrorText1 = SQLERRORTEXT; SET SQLNativeError1 = SQLNATIVEERROR; THROW USER EXCEPTION MESSAGE 2950 VALUES('The SQL State' , SQLState1 , SQLCode1 , SQLNativeError1 , SQLErrorText1); END IF; END WHILE; RETURN TRUE; END; END MODULE;
Acaba de crear el flujo de mensajes XML_CancelReservation, que cancela las reservas que ha realizado el flujo de mensajes XML_Reservation anteriormente.