Skip to content

Instantly share code, notes, and snippets.

@eduard93
Created March 29, 2020 08:47
Show Gist options
  • Save eduard93/941dbc0e3d318b3f83c8f789073d2412 to your computer and use it in GitHub Desktop.
Save eduard93/941dbc0e3d318b3f83c8f789073d2412 to your computer and use it in GitHub Desktop.
Parallel calls in InterSYstems IRIS interoperability BPL BPs
<?xml version="1.0" encoding="UTF-8"?>
<Export generator="Cache" version="25" zv="Cache for Windows (x86-64) 2017.2 (Build 744U)" ts="2020-03-29 11:46:26">
<Class name="Test.BO">
<Super>Ens.BusinessOperation</Super>
<TimeChanged>65467,41832.259479</TimeChanged>
<TimeCreated>65467,41832.259479</TimeCreated>
<Parameter name="INVOCATION">
<Default>Queue</Default>
</Parameter>
<Method name="OnMessage">
<FormalSpec>pRequest:Ens.Request,*pResponse:Ens.Response</FormalSpec>
<ReturnType>%Status</ReturnType>
<Implementation><![CDATA[
Hang 5
Set pResponse = ##class(Ens.Request).%New()
Quit $$$OK
]]></Implementation>
</Method>
</Class>
<Class name="Test.BP">
<Description>
</Description>
<ClassType>persistent</ClassType>
<ProcedureBlock>1</ProcedureBlock>
<Super>Ens.BusinessProcessBPL</Super>
<TimeChanged>65467,42161.21319</TimeChanged>
<TimeCreated>65467,41869.760931</TimeCreated>
<XData name="BPL">
<Description>
BPL Definition</Description>
<XMLNamespace>http://www.intersystems.com/bpl</XMLNamespace>
<Data><![CDATA[
<process language='objectscript' request='Ens.Request' response='Ens.Response' height='2000' width='2000' >
<sequence xend='200' yend='750' >
<call name='Call1' target='Test.BO' async='1' xpos='200' ypos='250' >
<request type='Ens.Request' />
<response type='Ens.Response' />
</call>
<call name='Call2' target='Test.BO' async='1' xpos='200' ypos='350' >
<request type='Ens.Request' />
<response type='Ens.Response' />
</call>
<trace name='Before Sync' value='"Before Sync"' xpos='200' ypos='450' />
<sync name='Sync call1,call2' calls='Call2' type='all' xpos='200' ypos='550' />
<trace name='After Sync' value='"After Sync"' xpos='200' ypos='650' />
</sequence>
</process>
]]></Data>
</XData>
<Storage name="Default">
<Type>%Library.CacheStorage</Type>
</Storage>
</Class>
<Class name="Test.Prod">
<Super>Ens.Production</Super>
<TimeChanged>65467,42171.158477</TimeChanged>
<TimeCreated>65467,41897.421357</TimeCreated>
<XData name="ProductionDefinition">
<Data><![CDATA[
<Production Name="Test.Prod" TestingEnabled="true" LogGeneralTraceEvents="false">
<Description></Description>
<ActorPoolSize>2</ActorPoolSize>
<Item Name="Test.BO" Category="" ClassName="Test.BO" PoolSize="1" Enabled="true" Foreground="false" Comment="" LogTraceEvents="true" Schedule="">
</Item>
<Item Name="Test.BP" Category="" ClassName="Test.BP" PoolSize="1" Enabled="true" Foreground="false" Comment="" LogTraceEvents="true" Schedule="">
</Item>
</Production>
]]></Data>
</XData>
</Class>
</Export>
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment