[overlord-commits] Overlord SVN: r506 - in cdl/trunk/tools/plugins/org.jboss.tools.overlord.cdl.bpel/src/test/org/jboss/tools/overlord/cdl/bpel/generator: results and 1 other directories.

[overlord-commits at lists.jboss.org]

Author: objectiser
Date: 2009-02-17 19:39:17 -0500 (Tue, 17 Feb 2009)
New Revision: 506

Added:
   cdl/trunk/tools/plugins/org.jboss.tools.overlord.cdl.bpel/src/test/org/jboss/tools/overlord/cdl/bpel/generator/results/
   cdl/trunk/tools/plugins/org.jboss.tools.overlord.cdl.bpel/src/test/org/jboss/tools/overlord/cdl/bpel/generator/results/ESBBrokerProcess at Broker.bpel
   cdl/trunk/tools/plugins/org.jboss.tools.overlord.cdl.bpel/src/test/org/jboss/tools/overlord/cdl/bpel/generator/testmodels/
   cdl/trunk/tools/plugins/org.jboss.tools.overlord.cdl.bpel/src/test/org/jboss/tools/overlord/cdl/bpel/generator/testmodels/ESBBrokerProcess at Broker.scv
Log:
Create conversation test and bpel result.

Added: cdl/trunk/tools/plugins/org.jboss.tools.overlord.cdl.bpel/src/test/org/jboss/tools/overlord/cdl/bpel/generator/results/ESBBrokerProcess at Broker.bpel
===================================================================
--- cdl/trunk/tools/plugins/org.jboss.tools.overlord.cdl.bpel/src/test/org/jboss/tools/overlord/cdl/bpel/generator/results/ESBBrokerProcess at Broker.bpel	                        (rev 0)
+++ cdl/trunk/tools/plugins/org.jboss.tools.overlord.cdl.bpel/src/test/org/jboss/tools/overlord/cdl/bpel/generator/results/ESBBrokerProcess at Broker.bpel	2009-02-18 00:39:17 UTC (rev 506)
@@ -0,0 +1,37 @@
+<process>
+    <sequence>
+        <receive operation="makeEnquiry"/>
+        <while>
+            <sequence>
+                <sequence>
+                    <invoke operation="getQuote"/>
+                </sequence>
+            </sequence>
+        </while>
+        <reply operation="makeEnquiry"/>
+        <if>
+            <sequence>
+                <sequence>
+                    <receive operation="buy"/>
+                    <invoke operation="checkCredit"/>
+                    <if>
+                        <sequence>
+                            <invoke operation="confirm"/>
+                            <reply operation="buy"/>
+                        </sequence>
+                        <else>
+                            <sequence>
+                                <reply operation="buy"/>
+                            </sequence>
+                        </else>
+                    </if>
+                </sequence>
+            </sequence>
+            <else>
+                <sequence>
+                    <receive operation="cancel"/>
+                </sequence>
+            </else>
+        </if>
+    </sequence>
+</process>

Added: cdl/trunk/tools/plugins/org.jboss.tools.overlord.cdl.bpel/src/test/org/jboss/tools/overlord/cdl/bpel/generator/testmodels/ESBBrokerProcess at Broker.scv
===================================================================
--- cdl/trunk/tools/plugins/org.jboss.tools.overlord.cdl.bpel/src/test/org/jboss/tools/overlord/cdl/bpel/generator/testmodels/ESBBrokerProcess at Broker.scv	                        (rev 0)
+++ cdl/trunk/tools/plugins/org.jboss.tools.overlord.cdl.bpel/src/test/org/jboss/tools/overlord/cdl/bpel/generator/testmodels/ESBBrokerProcess at Broker.scv	2009-02-18 00:39:17 UTC (rev 506)
@@ -0,0 +1,46 @@
+namespace org.pi4soa.esbbroker.esbbroker;
+
+conversation ESBBrokerProcess at Broker conforms to LoanBroker at Broker {
+	role	SupplierTxnProcessor, SupplierQuoteEngine, Buyer, CreditAgency;
+	
+	makeEnquiry(enquiry) from Buyer request "makeEnquiry";
+	
+	while @ Broker {
+		run RequestForQuote at Broker;
+	}
+	
+	when @ Broker {
+		makeEnquiry(quoteList) to Buyer replyTo "makeEnquiry";
+	}
+	
+	if @ Buyer {
+		run CompleteTransaction at Broker;
+	} else if {
+		cancel(cancel) from Buyer;
+	}
+	
+	conversation CompleteTransaction at Broker {
+		role	SupplierTxnProcessor, Buyer, CreditAgency;
+		
+		buy(buy) from Buyer request "buy";
+		
+		checkCredit(CreditCheckRequest) to CreditAgency request "checkCredit";
+		
+		if @ CreditAgency {
+			checkCredit(CreditCheckOk) from CreditAgency replyTo "checkCredit";
+			confirm(orderConfirmed) to SupplierTxnProcessor request "confirm";
+			confirm(bookingReference) from SupplierTxnProcessor replyTo "confirm";
+			buy(bookingReference) to Buyer replyTo "buy";
+		} else if {
+			checkCredit(CreditCheckInvalid) from CreditAgency replyTo "checkCredit";
+			buy(orderRejected) to Buyer replyTo "buy";
+		}
+	}
+	
+	conversation RequestForQuote at Broker {
+		role	SupplierQuoteEngine;
+
+		getQuote(requestForQuote) to SupplierQuoteEngine request "getQuote";
+		getQuote(quote) from SupplierQuoteEngine replyTo "getQuote";
+	}
+}