Skip to content

C
curio-biblio
Commit 45f74053 authored by Thiago Anders's avatar Thiago Anders
Browse files
Options

Caso de uso para cadastrar cliente feito

parent b53b431a
Show whitespace changes
Inline Side-by-side
Showing with 962 additions and 35 deletions
mdl/EmprestimoOQL.cxoql
View file @ 45f74053
...@@ -19,8 +19,8 @@ WHERE ngLivro.OID = ?oid:acInt]]></query> ...@@ -19,8 +19,8 @@ WHERE ngLivro.OID = ?oid:acInt]]></query>
<description></description> <description></description>
<query><![CDATA[SELECT ngCliente <query><![CDATA[SELECT ngCliente
FROM ngCliente FROM ngCliente
WHERE (ngCliente.Nome LIKE '%'+?nome:acString+'%' OR ?nome:acString IS NULL) WHERE ((ngCliente.Nome LIKE '%'+?nome:acString+'%' OR ?nome:acString IS NULL) AND ngCliente.Ativo = "1")
AND (ngCliente.CPF = ?cpf:acString OR ?cpf:acString IS NULL)]]></query> AND ((ngCliente.CPF = ?cpf:acString OR ?cpf:acString IS NULL) AND ngCliente.Ativo = "1")]]></query>
</oql> </oql>
<oql name="ObterEmprestimos" oqltype="0"> <oql name="ObterEmprestimos" oqltype="0">
<description>Obtem emprestimos por cliente.</description> <description>Obtem emprestimos por cliente.</description>
......
mdl/model.uml
View file @ 45f74053
...@@ -2249,13 +2249,34 @@ ...@@ -2249,13 +2249,34 @@
&lt;xs:anyAttribute processContents=&quot;skip&quot; /&gt; &lt;xs:anyAttribute processContents=&quot;skip&quot; /&gt;
&lt;/xs:complexType&gt; &lt;/xs:complexType&gt;
&lt;/xs:element&gt; &lt;/xs:element&gt;
&lt;/xs:schema&gt; &lt;/xs:schema&gt;]]&gt;&lt;/text&gt;
]]&gt;&lt;/text&gt;
&lt;/XSD&gt; &lt;/XSD&gt;
&lt;XSD name=&quot;RM_CONCLUIR_EDICAO_IN&quot;&gt; &lt;XSD name=&quot;RM_CONCLUIR_EDICAO_IN&quot;&gt;
&lt;description&gt;&lt;/description&gt; &lt;description&gt;&lt;/description&gt;
&lt;text&gt;&lt;![CDATA[&lt;?xml version=&quot;1.0&quot; encoding=&quot;utf-8&quot; ?&gt; &lt;text&gt;&lt;![CDATA[&lt;?xml version=&quot;1.0&quot; encoding=&quot;utf-8&quot; ?&gt;
&lt;!--Created with Liquid XML Studio 6.1.18.0 - FREE Community Edition (http://www.liquid-technologies.com)--&gt; &lt;!--Created with Liquid XML Studio 6.1.18.0 - FREE Community Edition (http://www.liquid-technologies.com)--&gt;
&lt;xs:schema elementFormDefault=&quot;qualified&quot; xmlns:xs=&quot;http://www.w3.org/2001/XMLSchema&quot;&gt;
&lt;xs:element name=&quot;SYSMSG&quot;&gt;
&lt;xs:complexType&gt;
&lt;xs:sequence minOccurs=&quot;1&quot; maxOccurs=&quot;1&quot;&gt;
&lt;xs:element name=&quot;Livro&quot;&gt;
&lt;xs:complexType&gt;
&lt;xs:attribute name=&quot;Titulo&quot; type=&quot;xs:string&quot; use=&quot;required&quot; /&gt;
&lt;xs:attribute name=&quot;Autor&quot; type=&quot;xs:string&quot; use=&quot;required&quot; /&gt;
&lt;xs:attribute name=&quot;Edicao&quot; type=&quot;xs:string&quot; use=&quot;required&quot; /&gt;
&lt;xs:anyAttribute processContents=&quot;skip&quot; /&gt;
&lt;/xs:complexType&gt;
&lt;/xs:element&gt;
&lt;/xs:sequence&gt;
&lt;xs:anyAttribute namespace=&quot;&quot; processContents=&quot;skip&quot; /&gt;
&lt;/xs:complexType&gt;
&lt;/xs:element&gt;
&lt;/xs:schema&gt;]]&gt;&lt;/text&gt;
&lt;/XSD&gt;
&lt;XSD name=&quot;RM_CONCLUIR_EDICAO_OUT&quot;&gt;
&lt;description&gt;&lt;/description&gt;
&lt;text&gt;&lt;![CDATA[&lt;?xml version=&quot;1.0&quot; encoding=&quot;utf-8&quot; ?&gt;
&lt;!--Created with Liquid XML Studio 6.1.18.0 - FREE Community Edition (http://www.liquid-technologies.com)--&gt;
&lt;xs:schema elementFormDefault=&quot;qualified&quot; xmlns:xs=&quot;http://www.w3.org/2001/XMLSchema&quot;&gt; &lt;xs:schema elementFormDefault=&quot;qualified&quot; xmlns:xs=&quot;http://www.w3.org/2001/XMLSchema&quot;&gt;
&lt;xs:element name=&quot;SYSMSG&quot;&gt; &lt;xs:element name=&quot;SYSMSG&quot;&gt;
&lt;xs:complexType&gt; &lt;xs:complexType&gt;
...@@ -2269,31 +2290,27 @@ ...@@ -2269,31 +2290,27 @@
&lt;xs:element name=&quot;Exemplar&quot;&gt; &lt;xs:element name=&quot;Exemplar&quot;&gt;
&lt;xs:complexType&gt; &lt;xs:complexType&gt;
&lt;xs:attribute name=&quot;Codigo&quot; type=&quot;xs:string&quot; use=&quot;required&quot; /&gt; &lt;xs:attribute name=&quot;Codigo&quot; type=&quot;xs:string&quot; use=&quot;required&quot; /&gt;
&lt;xs:attribute name=&quot;OID&quot; type=&quot;xs:int&quot; use=&quot;required&quot; /&gt;
&lt;xs:anyAttribute processContents=&quot;skip&quot; /&gt; &lt;xs:anyAttribute processContents=&quot;skip&quot; /&gt;
&lt;/xs:complexType&gt; &lt;/xs:complexType&gt;
&lt;/xs:element&gt; &lt;/xs:element&gt;
&lt;/xs:sequence&gt; &lt;/xs:sequence&gt;
&lt;xs:anyAttribute namespace=&quot;&quot; processContents=&quot;skip&quot; /&gt; &lt;xs:anyAttribute processContents=&quot;skip&quot; /&gt;
&lt;/xs:complexType&gt; &lt;/xs:complexType&gt;
&lt;/xs:element&gt; &lt;/xs:element&gt;
&lt;/xs:sequence&gt; &lt;/xs:sequence&gt;
&lt;xs:attribute name=&quot;Titulo&quot; type=&quot;xs:string&quot; use=&quot;required&quot; /&gt; &lt;xs:attribute name=&quot;Titulo&quot; type=&quot;xs:string&quot; use=&quot;required&quot; /&gt;
&lt;xs:attribute name=&quot;Autor&quot; type=&quot;xs:string&quot; use=&quot;required&quot; /&gt; &lt;xs:attribute name=&quot;Autor&quot; type=&quot;xs:string&quot; use=&quot;required&quot; /&gt;
&lt;xs:attribute name=&quot;OID&quot; type=&quot;xs:string&quot; use=&quot;required&quot; /&gt;
&lt;xs:attribute name=&quot;Edicao&quot; type=&quot;xs:string&quot; use=&quot;required&quot; /&gt; &lt;xs:attribute name=&quot;Edicao&quot; type=&quot;xs:string&quot; use=&quot;required&quot; /&gt;
&lt;xs:attribute name=&quot;OID&quot; type=&quot;xs:int&quot; use=&quot;required&quot; /&gt;
&lt;xs:anyAttribute processContents=&quot;skip&quot; /&gt; &lt;xs:anyAttribute processContents=&quot;skip&quot; /&gt;
&lt;/xs:complexType&gt; &lt;/xs:complexType&gt;
&lt;/xs:element&gt; &lt;/xs:element&gt;
&lt;/xs:sequence&gt; &lt;/xs:sequence&gt;
&lt;xs:anyAttribute namespace=&quot;&quot; processContents=&quot;skip&quot; /&gt; &lt;xs:anyAttribute processContents=&quot;skip&quot; /&gt;
&lt;/xs:complexType&gt; &lt;/xs:complexType&gt;
&lt;/xs:element&gt; &lt;/xs:element&gt;
&lt;/xs:schema&gt; &lt;/xs:schema&gt;]]&gt;&lt;/text&gt;
]]&gt;&lt;/text&gt;
&lt;/XSD&gt;
&lt;XSD name=&quot;RM_CONCLUIR_EDICAO_OUT&quot;&gt;
&lt;description&gt;&lt;/description&gt;
&lt;text&gt;&lt;![CDATA[]]&gt;&lt;/text&gt;
&lt;/XSD&gt; &lt;/XSD&gt;
&lt;XSD name=&quot;RM_EDITAR_LIVRO_IN&quot;&gt; &lt;XSD name=&quot;RM_EDITAR_LIVRO_IN&quot;&gt;
&lt;description&gt;&lt;/description&gt; &lt;description&gt;&lt;/description&gt;
...@@ -2313,15 +2330,14 @@ ...@@ -2313,15 +2330,14 @@
&lt;xs:anyAttribute processContents=&quot;skip&quot; /&gt; &lt;xs:anyAttribute processContents=&quot;skip&quot; /&gt;
&lt;/xs:complexType&gt; &lt;/xs:complexType&gt;
&lt;/xs:element&gt; &lt;/xs:element&gt;
&lt;/xs:schema&gt; &lt;/xs:schema&gt;]]&gt;&lt;/text&gt;
]]&gt;&lt;/text&gt;
&lt;/XSD&gt; &lt;/XSD&gt;
&lt;XSD name=&quot;RM_EDITAR_LIVRO_OUT&quot;&gt; &lt;XSD name=&quot;RM_EDITAR_LIVRO_OUT&quot;&gt;
&lt;description&gt;&lt;/description&gt; &lt;description&gt;&lt;/description&gt;
&lt;text&gt;&lt;![CDATA[&lt;?xml version=&quot;1.0&quot; encoding=&quot;utf-8&quot; ?&gt; &lt;text&gt;&lt;![CDATA[&lt;?xml version=&quot;1.0&quot; encoding=&quot;utf-8&quot; ?&gt;
&lt;!--Created with Liquid XML Studio 6.1.18.0 - FREE Community Edition (http://www.liquid-technologies.com)--&gt; &lt;!--Created with Liquid XML Studio 6.1.18.0 - FREE Community Edition (http://www.liquid-technologies.com)--&gt;
&lt;xs:schema elementFormDefault=&quot;qualified&quot; xmlns:xs=&quot;http://www.w3.org/2001/XMLSchema&quot;&gt; &lt;xs:schema elementFormDefault=&quot;qualified&quot; xmlns:xs=&quot;http://www.w3.org/2001/XMLSchema&quot;&gt;
&lt;xs:element name=&quot;SYSMAG&quot;&gt; &lt;xs:element name=&quot;SYSMSG&quot;&gt;
&lt;xs:complexType&gt; &lt;xs:complexType&gt;
&lt;xs:sequence minOccurs=&quot;1&quot; maxOccurs=&quot;1&quot;&gt; &lt;xs:sequence minOccurs=&quot;1&quot; maxOccurs=&quot;1&quot;&gt;
&lt;xs:element name=&quot;Livro&quot;&gt; &lt;xs:element name=&quot;Livro&quot;&gt;
...@@ -2352,8 +2368,7 @@ ...@@ -2352,8 +2368,7 @@
&lt;xs:anyAttribute processContents=&quot;skip&quot; /&gt; &lt;xs:anyAttribute processContents=&quot;skip&quot; /&gt;
&lt;/xs:complexType&gt; &lt;/xs:complexType&gt;
&lt;/xs:element&gt; &lt;/xs:element&gt;
&lt;/xs:schema&gt; &lt;/xs:schema&gt;]]&gt;&lt;/text&gt;
]]&gt;&lt;/text&gt;
&lt;/XSD&gt; &lt;/XSD&gt;
&lt;XSD name=&quot;RM_EXCLUIR_EXEMPLAR_IN&quot;&gt; &lt;XSD name=&quot;RM_EXCLUIR_EXEMPLAR_IN&quot;&gt;
&lt;description&gt;&lt;/description&gt; &lt;description&gt;&lt;/description&gt;
...@@ -2381,7 +2396,7 @@ ...@@ -2381,7 +2396,7 @@
&lt;text&gt;&lt;![CDATA[&lt;?xml version=&quot;1.0&quot; encoding=&quot;utf-8&quot; ?&gt; &lt;text&gt;&lt;![CDATA[&lt;?xml version=&quot;1.0&quot; encoding=&quot;utf-8&quot; ?&gt;
&lt;!--Created with Liquid XML Studio 6.1.18.0 - FREE Community Edition (http://www.liquid-technologies.com)--&gt; &lt;!--Created with Liquid XML Studio 6.1.18.0 - FREE Community Edition (http://www.liquid-technologies.com)--&gt;
&lt;xs:schema elementFormDefault=&quot;qualified&quot; xmlns:xs=&quot;http://www.w3.org/2001/XMLSchema&quot;&gt; &lt;xs:schema elementFormDefault=&quot;qualified&quot; xmlns:xs=&quot;http://www.w3.org/2001/XMLSchema&quot;&gt;
&lt;xs:element name=&quot;SYSMAG&quot;&gt; &lt;xs:element name=&quot;SYSMSG&quot;&gt;
&lt;xs:complexType&gt; &lt;xs:complexType&gt;
&lt;xs:sequence minOccurs=&quot;1&quot; maxOccurs=&quot;1&quot;&gt; &lt;xs:sequence minOccurs=&quot;1&quot; maxOccurs=&quot;1&quot;&gt;
&lt;xs:element name=&quot;Livro&quot;&gt; &lt;xs:element name=&quot;Livro&quot;&gt;
...@@ -2415,8 +2430,7 @@ ...@@ -2415,8 +2430,7 @@
&lt;xs:anyAttribute processContents=&quot;skip&quot; /&gt; &lt;xs:anyAttribute processContents=&quot;skip&quot; /&gt;
&lt;/xs:complexType&gt; &lt;/xs:complexType&gt;
&lt;/xs:element&gt; &lt;/xs:element&gt;
&lt;/xs:schema&gt; &lt;/xs:schema&gt;]]&gt;&lt;/text&gt;
]]&gt;&lt;/text&gt;
&lt;/XSD&gt; &lt;/XSD&gt;
&lt;XSD name=&quot;RM_INCLUIR_EXEMPLAR_OUT&quot;&gt; &lt;XSD name=&quot;RM_INCLUIR_EXEMPLAR_OUT&quot;&gt;
&lt;description&gt;&lt;/description&gt; &lt;description&gt;&lt;/description&gt;
...@@ -2457,8 +2471,7 @@ ...@@ -2457,8 +2471,7 @@
&lt;xs:anyAttribute processContents=&quot;skip&quot; /&gt; &lt;xs:anyAttribute processContents=&quot;skip&quot; /&gt;
&lt;/xs:complexType&gt; &lt;/xs:complexType&gt;
&lt;/xs:element&gt; &lt;/xs:element&gt;
&lt;/xs:schema&gt; &lt;/xs:schema&gt;]]&gt;&lt;/text&gt;
]]&gt;&lt;/text&gt;
&lt;/XSD&gt; &lt;/XSD&gt;
&lt;/DATA&gt; &lt;/DATA&gt;
</XPD:ATTR> </XPD:ATTR>
...@@ -2692,7 +2705,7 @@ ...@@ -2692,7 +2705,7 @@
<XPD:ATTR name="Visible" type="boolean">False</XPD:ATTR> <XPD:ATTR name="Visible" type="boolean">False</XPD:ATTR>
<XPD:ATTR name="Alpha" type="real">-1,5707963267949</XPD:ATTR> <XPD:ATTR name="Alpha" type="real">-1,5707963267949</XPD:ATTR>
<XPD:ATTR name="Distance" type="real">15</XPD:ATTR> <XPD:ATTR name="Distance" type="real">15</XPD:ATTR>
<XPD:ATTR name="Text" type="string">{XSD In = RM_CONCLUIR_EDICAO_I...}</XPD:ATTR> <XPD:ATTR name="Text" type="string">{XSD In = RM_CONCLUIR_EDICAO_I..., XSD Out = RM_CONCLUIR_EDICAO_O...}</XPD:ATTR>
<XPD:REF name="Model">AsYwDeABC0qqLwrvDF5SRQAA</XPD:REF> <XPD:REF name="Model">AsYwDeABC0qqLwrvDF5SRQAA</XPD:REF>
</XPD:OBJ> </XPD:OBJ>
</XPD:OBJ> </XPD:OBJ>
...@@ -2830,7 +2843,7 @@ ...@@ -2830,7 +2843,7 @@
<XPD:ATTR name="Visible" type="boolean">False</XPD:ATTR> <XPD:ATTR name="Visible" type="boolean">False</XPD:ATTR>
<XPD:ATTR name="Alpha" type="real">-1,5707963267949</XPD:ATTR> <XPD:ATTR name="Alpha" type="real">-1,5707963267949</XPD:ATTR>
<XPD:ATTR name="Distance" type="real">15</XPD:ATTR> <XPD:ATTR name="Distance" type="real">15</XPD:ATTR>
<XPD:ATTR name="Text" type="string">{XSD In = RM_EXCLUIR_EXEMPLAR_..., XSD Out = RM_INCLUIR_EXEMPLAR_...}</XPD:ATTR> <XPD:ATTR name="Text" type="string">{XSD In = RM_EXCLUIR_EXEMPLAR_..., XSD Out = }</XPD:ATTR>
<XPD:REF name="Model">PSRSIBrSlEiDqGJwwhVSjwAA</XPD:REF> <XPD:REF name="Model">PSRSIBrSlEiDqGJwwhVSjwAA</XPD:REF>
</XPD:OBJ> </XPD:OBJ>
</XPD:OBJ> </XPD:OBJ>
...@@ -2939,6 +2952,13 @@ ...@@ -2939,6 +2952,13 @@
<XPD:ATTR name="DataValue" type="string">RM_CONCLUIR_EDICAO_IN</XPD:ATTR> <XPD:ATTR name="DataValue" type="string">RM_CONCLUIR_EDICAO_IN</XPD:ATTR>
<XPD:REF name="TaggedModel">AsYwDeABC0qqLwrvDF5SRQAA</XPD:REF> <XPD:REF name="TaggedModel">AsYwDeABC0qqLwrvDF5SRQAA</XPD:REF>
</XPD:OBJ> </XPD:OBJ>
<XPD:OBJ name="TaggedValues" type="TaggedValue" guid="bXwthFA7x0SkXKTgcY3vrQAA">
<XPD:ATTR name="ProfileName" type="string">DBMappings</XPD:ATTR>
<XPD:ATTR name="TagDefinitionSetName" type="string">TransitionMap</XPD:ATTR>
<XPD:ATTR name="Name" type="string">XSD Out</XPD:ATTR>
<XPD:ATTR name="DataValue" type="string">RM_CONCLUIR_EDICAO_OUT</XPD:ATTR>
<XPD:REF name="TaggedModel">AsYwDeABC0qqLwrvDF5SRQAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJCOLL> </XPD:OBJCOLL>
<XPD:OBJCOLL name="Effects"> <XPD:OBJCOLL name="Effects">
<XPD:OBJ name="Effects" type="UMLUninterpretedAction" guid="A07lHC0fL0OfwL8d94EH2gAA"> <XPD:OBJ name="Effects" type="UMLUninterpretedAction" guid="A07lHC0fL0OfwL8d94EH2gAA">
...@@ -3101,7 +3121,6 @@ ...@@ -3101,7 +3121,6 @@
<XPD:ATTR name="ProfileName" type="string">DBMappings</XPD:ATTR> <XPD:ATTR name="ProfileName" type="string">DBMappings</XPD:ATTR>
<XPD:ATTR name="TagDefinitionSetName" type="string">TransitionMap</XPD:ATTR> <XPD:ATTR name="TagDefinitionSetName" type="string">TransitionMap</XPD:ATTR>
<XPD:ATTR name="Name" type="string">XSD Out</XPD:ATTR> <XPD:ATTR name="Name" type="string">XSD Out</XPD:ATTR>
<XPD:ATTR name="DataValue" type="string">RM_INCLUIR_EXEMPLAR_OUT</XPD:ATTR>
<XPD:REF name="TaggedModel">PSRSIBrSlEiDqGJwwhVSjwAA</XPD:REF> <XPD:REF name="TaggedModel">PSRSIBrSlEiDqGJwwhVSjwAA</XPD:REF>
</XPD:OBJ> </XPD:OBJ>
</XPD:OBJCOLL> </XPD:OBJCOLL>
...@@ -3130,6 +3149,497 @@ ...@@ -3130,6 +3149,497 @@
<XPD:REF name="Child">qdnuZanNME+kVU+3R182UAAA</XPD:REF> <XPD:REF name="Child">qdnuZanNME+kVU+3R182UAAA</XPD:REF>
<XPD:REF name="Parent" pathname="::AppModel::FrameworkModel::acuFrameworkPackage::UCU::ucUseCase">CW1L1EW3kkSWfD8DU8ciWwAA</XPD:REF> <XPD:REF name="Parent" pathname="::AppModel::FrameworkModel::acuFrameworkPackage::UCU::ucUseCase">CW1L1EW3kkSWfD8DU8ciWwAA</XPD:REF>
</XPD:OBJ> </XPD:OBJ>
<XPD:OBJ name="OwnedElements" type="UMLUseCase" guid="+z+oyeOqoEuQaEyTrjD9iwAA">
<XPD:ATTR name="Name" type="string">ucCadastrarCliente</XPD:ATTR>
<XPD:REF name="Namespace">Aa1c8sP/hUWifftyY1TXrwAA</XPD:REF>
<XPD:OBJCOLL name="OwnedDiagrams">
<XPD:OBJ name="OwnedDiagrams" type="UMLClassDiagram" guid="d2xj0qH/MUakfOv68QWX7AAA">
<XPD:ATTR name="Name" type="string">ClassDiagram</XPD:ATTR>
<XPD:REF name="DiagramOwner">+z+oyeOqoEuQaEyTrjD9iwAA</XPD:REF>
<XPD:OBJ name="DiagramView" type="UMLClassDiagramView" guid="KwNde2UONUKav/Yy8RNKdQAA">
<XPD:REF name="Diagram">d2xj0qH/MUakfOv68QWX7AAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJ>
</XPD:OBJCOLL>
<XPD:OBJCOLL name="TaggedValues">
<XPD:OBJ name="TaggedValues" type="TaggedValue" guid="9J2wt1pru0WrAPV29/45HQAA">
<XPD:ATTR name="ProfileName" type="string">DBMappings</XPD:ATTR>
<XPD:ATTR name="TagDefinitionSetName" type="string">DBUseCaseMap</XPD:ATTR>
<XPD:ATTR name="Name" type="string">Code</XPD:ATTR>
<XPD:ATTR name="DataValue" type="string">3229</XPD:ATTR>
<XPD:REF name="TaggedModel">+z+oyeOqoEuQaEyTrjD9iwAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJCOLL>
<XPD:OBJCOLL name="Behaviors">
<XPD:OBJ name="Behaviors" type="UMLStateMachine" guid="lro5obGpBkeTZpQ6QEzZDAAA">
<XPD:ATTR name="Name" type="string">smucCadastrarCliente</XPD:ATTR>
<XPD:REF name="Context">+z+oyeOqoEuQaEyTrjD9iwAA</XPD:REF>
<XPD:OBJ name="Top" type="UMLCompositeState" guid="99qEODILFkCphyHiGQ+oaAAA">
<XPD:ATTR name="Name" type="string">TOP</XPD:ATTR>
<XPD:REF name="StateMachine">lro5obGpBkeTZpQ6QEzZDAAA</XPD:REF>
<XPD:OBJCOLL name="Subvertices">
<XPD:OBJ name="Subvertices" type="UMLPseudostate" guid="aJQ6Bq3JgEqqMBhc1F2l6QAA">
<XPD:ATTR name="Name" type="string">Initial1</XPD:ATTR>
<XPD:ATTR name="PseudostateKind" type="UMLPseudostateKind">pkInitial</XPD:ATTR>
<XPD:REF name="ContainerState">99qEODILFkCphyHiGQ+oaAAA</XPD:REF>
<XPD:REFCOLL name="Views">
<XPD:REF name="Views">Og+UYIS1vUas94HpcoV/OgAA</XPD:REF>
</XPD:REFCOLL>
<XPD:REFCOLL name="Outgoings">
<XPD:REF name="Outgoings">ozocV/sFiUe4Zcsi/2mmtQAA</XPD:REF>
</XPD:REFCOLL>
</XPD:OBJ>
<XPD:OBJ name="Subvertices" type="UMLCompositeState" guid="kGA42kgdIUmUs0ugH7vd3QAA">
<XPD:ATTR name="Name" type="string">BuscandoCliente</XPD:ATTR>
<XPD:REF name="ContainerState">99qEODILFkCphyHiGQ+oaAAA</XPD:REF>
<XPD:REFCOLL name="Views">
<XPD:REF name="Views">vWQT6mYrbkKhyEy820W5ZgAA</XPD:REF>
<XPD:REF name="Views">8i6EbzLBtUamlHcbj+KDDgAA</XPD:REF>
</XPD:REFCOLL>
<XPD:REFCOLL name="Outgoings">
<XPD:REF name="Outgoings">d+nU5UjO1U2pHbKHIfUaWQAA</XPD:REF>
<XPD:REF name="Outgoings">hTtqPC5UJk6xGwEqVrziVQAA</XPD:REF>
<XPD:REF name="Outgoings">YZp1SYHdVUqMLge1JLRNXwAA</XPD:REF>
<XPD:REF name="Outgoings">3B6HFVC1MUKfi+0C4Gx5hgAA</XPD:REF>
</XPD:REFCOLL>
<XPD:REFCOLL name="Incomings">
<XPD:REF name="Incomings">ozocV/sFiUe4Zcsi/2mmtQAA</XPD:REF>
<XPD:REF name="Incomings">d+nU5UjO1U2pHbKHIfUaWQAA</XPD:REF>
<XPD:REF name="Incomings">hTtqPC5UJk6xGwEqVrziVQAA</XPD:REF>
<XPD:REF name="Incomings">QEJ49vy3GkWzXZXEiGy+yQAA</XPD:REF>
<XPD:REF name="Incomings">GP6LHRHm80SFTBRGXwI+5gAA</XPD:REF>
</XPD:REFCOLL>
</XPD:OBJ>
<XPD:OBJ name="Subvertices" type="UMLCompositeState" guid="UuFMs9LuUkOAKK7ZWn9YHgAA">
<XPD:ATTR name="Name" type="string">EditandoCliente</XPD:ATTR>
<XPD:REF name="ContainerState">99qEODILFkCphyHiGQ+oaAAA</XPD:REF>
<XPD:REFCOLL name="Views">
<XPD:REF name="Views">4dCxmTuOW0eAbna7bbSCKwAA</XPD:REF>
<XPD:REF name="Views">9AvpNCOrWka4T2GLPg642QAA</XPD:REF>
</XPD:REFCOLL>
<XPD:REFCOLL name="Outgoings">
<XPD:REF name="Outgoings">QEJ49vy3GkWzXZXEiGy+yQAA</XPD:REF>
<XPD:REF name="Outgoings">GP6LHRHm80SFTBRGXwI+5gAA</XPD:REF>
</XPD:REFCOLL>
<XPD:REFCOLL name="Incomings">
<XPD:REF name="Incomings">YZp1SYHdVUqMLge1JLRNXwAA</XPD:REF>
<XPD:REF name="Incomings">3B6HFVC1MUKfi+0C4Gx5hgAA</XPD:REF>
</XPD:REFCOLL>
</XPD:OBJ>
</XPD:OBJCOLL>
</XPD:OBJ>
<XPD:OBJCOLL name="OwnedDiagrams">
<XPD:OBJ name="OwnedDiagrams" type="UMLStatechartDiagram" guid="uVC1PHbwvkOtG8V6x77CeAAA">
<XPD:ATTR name="Name" type="string">scucCadastrarCliente</XPD:ATTR>
<XPD:REF name="DiagramOwner">lro5obGpBkeTZpQ6QEzZDAAA</XPD:REF>
<XPD:OBJ name="DiagramView" type="UMLStatechartDiagramView" guid="uEvGK1oFukqEM71KYXm9zgAA">
<XPD:REF name="Diagram">uVC1PHbwvkOtG8V6x77CeAAA</XPD:REF>
<XPD:OBJCOLL name="OwnedViews">
<XPD:OBJ name="OwnedViews" type="UMLPseudostateView" guid="Og+UYIS1vUas94HpcoV/OgAA">
<XPD:ATTR name="LineColor" type="string">clMaroon</XPD:ATTR>
<XPD:ATTR name="FillColor" type="string">$00B9FFFF</XPD:ATTR>
<XPD:ATTR name="Left" type="integer">532</XPD:ATTR>
<XPD:ATTR name="Top" type="integer">48</XPD:ATTR>
<XPD:ATTR name="Width" type="integer">20</XPD:ATTR>
<XPD:ATTR name="Height" type="integer">20</XPD:ATTR>
<XPD:REF name="Model">aJQ6Bq3JgEqqMBhc1F2l6QAA</XPD:REF>
</XPD:OBJ>
<XPD:OBJ name="OwnedViews" type="UMLStateView" guid="vWQT6mYrbkKhyEy820W5ZgAA">
<XPD:ATTR name="LineColor" type="string">clMaroon</XPD:ATTR>
<XPD:ATTR name="FillColor" type="string">$00B9FFFF</XPD:ATTR>
<XPD:ATTR name="Left" type="integer">496</XPD:ATTR>
<XPD:ATTR name="Top" type="integer">148</XPD:ATTR>
<XPD:ATTR name="Width" type="integer">89</XPD:ATTR>
<XPD:ATTR name="Height" type="integer">40</XPD:ATTR>
<XPD:REF name="Model">kGA42kgdIUmUs0ugH7vd3QAA</XPD:REF>
<XPD:OBJ name="NameCompartment" type="UMLNameCompartmentView" guid="CRQL1Qe6ZUKTzVf7TC/crAAA">
<XPD:OBJ name="NameLabel" type="LabelView" guid="9t2o8Jmw8k++WXev6t7YigAA">
<XPD:ATTR name="Text" type="string">BuscandoCliente</XPD:ATTR>
</XPD:OBJ>
<XPD:OBJ name="StereotypeLabel" type="LabelView" guid="zLyuzgRSH0CwoZL93vO0GgAA">
<XPD:ATTR name="Visible" type="boolean">False</XPD:ATTR>
</XPD:OBJ>
<XPD:OBJ name="PropertyLabel" type="LabelView" guid="IaAyxbFVUUaIwxAmWykZcAAA">
<XPD:ATTR name="Visible" type="boolean">False</XPD:ATTR>
</XPD:OBJ>
</XPD:OBJ>
<XPD:OBJ name="InternalTransitionCompartment" type="UMLInternalTransitionCompartmentView" guid="8i6EbzLBtUamlHcbj+KDDgAA">
<XPD:REF name="Model">kGA42kgdIUmUs0ugH7vd3QAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJ>
<XPD:OBJ name="OwnedViews" type="UMLTransitionView" guid="IuFHyrN27kOWE03b6srldwAA">
<XPD:ATTR name="LineColor" type="string">clMaroon</XPD:ATTR>
<XPD:ATTR name="FillColor" type="string">$00B9FFFF</XPD:ATTR>
<XPD:ATTR name="Points" type="Points">541,67;540,148</XPD:ATTR>
<XPD:REF name="Model">ozocV/sFiUe4Zcsi/2mmtQAA</XPD:REF>
<XPD:REF name="Head">vWQT6mYrbkKhyEy820W5ZgAA</XPD:REF>
<XPD:REF name="Tail">Og+UYIS1vUas94HpcoV/OgAA</XPD:REF>
<XPD:OBJ name="NameLabel" type="EdgeLabelView" guid="4uQe0Uvn8EWRiqyROEkStgAA">
<XPD:ATTR name="Visible" type="boolean">False</XPD:ATTR>
<XPD:ATTR name="Alpha" type="real">1,5707963267949</XPD:ATTR>
<XPD:ATTR name="Distance" type="real">15</XPD:ATTR>
<XPD:REF name="Model">ozocV/sFiUe4Zcsi/2mmtQAA</XPD:REF>
</XPD:OBJ>
<XPD:OBJ name="StereotypeLabel" type="EdgeLabelView" guid="fVJmRvPiIk63euIR+MeM2wAA">
<XPD:ATTR name="Visible" type="boolean">False</XPD:ATTR>
<XPD:ATTR name="Alpha" type="real">1,5707963267949</XPD:ATTR>
<XPD:ATTR name="Distance" type="real">30</XPD:ATTR>
<XPD:REF name="Model">ozocV/sFiUe4Zcsi/2mmtQAA</XPD:REF>
</XPD:OBJ>
<XPD:OBJ name="PropertyLabel" type="EdgeLabelView" guid="qLui/oJtDkmuVim7SnR6xAAA">
<XPD:ATTR name="Visible" type="boolean">False</XPD:ATTR>
<XPD:ATTR name="Alpha" type="real">-1,5707963267949</XPD:ATTR>
<XPD:ATTR name="Distance" type="real">15</XPD:ATTR>
<XPD:REF name="Model">ozocV/sFiUe4Zcsi/2mmtQAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJ>
<XPD:OBJ name="OwnedViews" type="UMLTransitionView" guid="cP20E0WlfU+TIx4zJXlE5gAA">
<XPD:ATTR name="LineColor" type="string">clMaroon</XPD:ATTR>
<XPD:ATTR name="FillColor" type="string">$00B9FFFF</XPD:ATTR>
<XPD:ATTR name="LineStyle" type="LineStyleKind">lsRectilinear</XPD:ATTR>
<XPD:ATTR name="Points" type="Points">564,148;564,128;604,128;604,167;584,167</XPD:ATTR>
<XPD:REF name="Model">d+nU5UjO1U2pHbKHIfUaWQAA</XPD:REF>
<XPD:REF name="Head">vWQT6mYrbkKhyEy820W5ZgAA</XPD:REF>
<XPD:REF name="Tail">vWQT6mYrbkKhyEy820W5ZgAA</XPD:REF>
<XPD:OBJ name="NameLabel" type="EdgeLabelView" guid="yt/knboAkUm5SH/tVhnSRwAA">
<XPD:ATTR name="Alpha" type="real">1,80335298268136</XPD:ATTR>
<XPD:ATTR name="Distance" type="real">78,1024967590665</XPD:ATTR>
<XPD:ATTR name="Text" type="string">RM_BUSCAR_CLIENTE / Effect_BuscarCliente</XPD:ATTR>
<XPD:REF name="Model">d+nU5UjO1U2pHbKHIfUaWQAA</XPD:REF>
</XPD:OBJ>
<XPD:OBJ name="StereotypeLabel" type="EdgeLabelView" guid="FG1DrtJNfUaMmbaserOijAAA">
<XPD:ATTR name="Visible" type="boolean">False</XPD:ATTR>
<XPD:ATTR name="Alpha" type="real">1,5707963267949</XPD:ATTR>
<XPD:ATTR name="Distance" type="real">30</XPD:ATTR>
<XPD:REF name="Model">d+nU5UjO1U2pHbKHIfUaWQAA</XPD:REF>
</XPD:OBJ>
<XPD:OBJ name="PropertyLabel" type="EdgeLabelView" guid="XuXWKPDkcEuX0PSnFFWNJAAA">
<XPD:ATTR name="Visible" type="boolean">False</XPD:ATTR>
<XPD:ATTR name="Alpha" type="real">-1,5707963267949</XPD:ATTR>
<XPD:ATTR name="Distance" type="real">15</XPD:ATTR>
<XPD:REF name="Model">d+nU5UjO1U2pHbKHIfUaWQAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJ>
<XPD:OBJ name="OwnedViews" type="UMLTransitionView" guid="zk0gYu911UiMIZbrHUqFpgAA">
<XPD:ATTR name="LineColor" type="string">clMaroon</XPD:ATTR>
<XPD:ATTR name="FillColor" type="string">$00B9FFFF</XPD:ATTR>
<XPD:ATTR name="LineStyle" type="LineStyleKind">lsRectilinear</XPD:ATTR>
<XPD:ATTR name="Points" type="Points">508,148;508,128;464,128;464,167;496,167</XPD:ATTR>
<XPD:REF name="Model">hTtqPC5UJk6xGwEqVrziVQAA</XPD:REF>
<XPD:REF name="Head">vWQT6mYrbkKhyEy820W5ZgAA</XPD:REF>
<XPD:REF name="Tail">vWQT6mYrbkKhyEy820W5ZgAA</XPD:REF>
<XPD:OBJ name="NameLabel" type="EdgeLabelView" guid="4qPw85cGRkCzM/YsF3Gs2AAA">
<XPD:ATTR name="Alpha" type="real">-1,92770792145254</XPD:ATTR>
<XPD:ATTR name="Distance" type="real">62,9682459657247</XPD:ATTR>
<XPD:ATTR name="Text" type="string">RM_EXCLUIR_CLIENTE / Effect_ExcluirCliente</XPD:ATTR>
<XPD:REF name="Model">hTtqPC5UJk6xGwEqVrziVQAA</XPD:REF>
</XPD:OBJ>
<XPD:OBJ name="StereotypeLabel" type="EdgeLabelView" guid="45MWhS3Oe0GmHpUjVQQAUgAA">
<XPD:ATTR name="Visible" type="boolean">False</XPD:ATTR>
<XPD:ATTR name="Alpha" type="real">1,5707963267949</XPD:ATTR>
<XPD:ATTR name="Distance" type="real">30</XPD:ATTR>
<XPD:REF name="Model">hTtqPC5UJk6xGwEqVrziVQAA</XPD:REF>
</XPD:OBJ>
<XPD:OBJ name="PropertyLabel" type="EdgeLabelView" guid="fSzEnZHpYEmULts8yuV21QAA">
<XPD:ATTR name="Visible" type="boolean">False</XPD:ATTR>
<XPD:ATTR name="Alpha" type="real">-1,5707963267949</XPD:ATTR>
<XPD:ATTR name="Distance" type="real">15</XPD:ATTR>
<XPD:REF name="Model">hTtqPC5UJk6xGwEqVrziVQAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJ>
<XPD:OBJ name="OwnedViews" type="UMLStateView" guid="4dCxmTuOW0eAbna7bbSCKwAA">
<XPD:ATTR name="LineColor" type="string">clMaroon</XPD:ATTR>
<XPD:ATTR name="FillColor" type="string">$00B9FFFF</XPD:ATTR>
<XPD:ATTR name="Left" type="integer">500</XPD:ATTR>
<XPD:ATTR name="Top" type="integer">332</XPD:ATTR>
<XPD:ATTR name="Width" type="integer">85</XPD:ATTR>
<XPD:ATTR name="Height" type="integer">40</XPD:ATTR>
<XPD:REF name="Model">UuFMs9LuUkOAKK7ZWn9YHgAA</XPD:REF>
<XPD:OBJ name="NameCompartment" type="UMLNameCompartmentView" guid="WvoYDslYOEy9VU5Oi0NVbAAA">
<XPD:OBJ name="NameLabel" type="LabelView" guid="q4aB+sjFFEG4wBnWnf9RXAAA">
<XPD:ATTR name="Text" type="string">EditandoCliente</XPD:ATTR>
</XPD:OBJ>
<XPD:OBJ name="StereotypeLabel" type="LabelView" guid="vw2q7AVmqUi6Vl6aJ0NfgQAA">
<XPD:ATTR name="Visible" type="boolean">False</XPD:ATTR>
</XPD:OBJ>
<XPD:OBJ name="PropertyLabel" type="LabelView" guid="QQ5f4rUYuEij39gIZ8lSGQAA">
<XPD:ATTR name="Visible" type="boolean">False</XPD:ATTR>
</XPD:OBJ>
</XPD:OBJ>
<XPD:OBJ name="InternalTransitionCompartment" type="UMLInternalTransitionCompartmentView" guid="9AvpNCOrWka4T2GLPg642QAA">
<XPD:REF name="Model">UuFMs9LuUkOAKK7ZWn9YHgAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJ>
<XPD:OBJ name="OwnedViews" type="UMLTransitionView" guid="96uD3f9JD0KKV70zEyX6bAAA">
<XPD:ATTR name="LineColor" type="string">clMaroon</XPD:ATTR>
<XPD:ATTR name="FillColor" type="string">$00B9FFFF</XPD:ATTR>
<XPD:ATTR name="Points" type="Points">570,187;596,204;596,316;571,332</XPD:ATTR>
<XPD:REF name="Model">YZp1SYHdVUqMLge1JLRNXwAA</XPD:REF>
<XPD:REF name="Head">4dCxmTuOW0eAbna7bbSCKwAA</XPD:REF>
<XPD:REF name="Tail">vWQT6mYrbkKhyEy820W5ZgAA</XPD:REF>
<XPD:OBJ name="NameLabel" type="EdgeLabelView" guid="XC8060UE2kS/djLbuvjRVgAA">
<XPD:ATTR name="Alpha" type="real">1,58818569800097</XPD:ATTR>
<XPD:ATTR name="Distance" type="real">115,017389989514</XPD:ATTR>
<XPD:ATTR name="Text" type="string">RM_INCLUIR_CLIENTE / Effect_IncluirCliente</XPD:ATTR>
<XPD:REF name="Model">YZp1SYHdVUqMLge1JLRNXwAA</XPD:REF>
</XPD:OBJ>
<XPD:OBJ name="StereotypeLabel" type="EdgeLabelView" guid="+1Kl9S4Blky80rumSwyfaQAA">
<XPD:ATTR name="Visible" type="boolean">False</XPD:ATTR>
<XPD:ATTR name="Alpha" type="real">1,5707963267949</XPD:ATTR>
<XPD:ATTR name="Distance" type="real">30</XPD:ATTR>
<XPD:REF name="Model">YZp1SYHdVUqMLge1JLRNXwAA</XPD:REF>
</XPD:OBJ>
<XPD:OBJ name="PropertyLabel" type="EdgeLabelView" guid="0fpxTobwxkyIdVZZ3IJ4RgAA">
<XPD:ATTR name="Visible" type="boolean">False</XPD:ATTR>
<XPD:ATTR name="Alpha" type="real">-1,5707963267949</XPD:ATTR>
<XPD:ATTR name="Distance" type="real">15</XPD:ATTR>
<XPD:REF name="Model">YZp1SYHdVUqMLge1JLRNXwAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJ>
<XPD:OBJ name="OwnedViews" type="UMLTransitionView" guid="qEEr5JtnWkmri6mMS5WCEQAA">
<XPD:ATTR name="LineColor" type="string">clMaroon</XPD:ATTR>
<XPD:ATTR name="FillColor" type="string">$00B9FFFF</XPD:ATTR>
<XPD:ATTR name="Points" type="Points">584,173;832,204;832,312;584,345</XPD:ATTR>
<XPD:REF name="Model">3B6HFVC1MUKfi+0C4Gx5hgAA</XPD:REF>
<XPD:REF name="Head">4dCxmTuOW0eAbna7bbSCKwAA</XPD:REF>
<XPD:REF name="Tail">vWQT6mYrbkKhyEy820W5ZgAA</XPD:REF>
<XPD:OBJ name="NameLabel" type="EdgeLabelView" guid="Bao12Kw5g0O8bV85tfushwAA">
<XPD:ATTR name="Alpha" type="real">1,53662142091216</XPD:ATTR>
<XPD:ATTR name="Distance" type="real">117,068356100186</XPD:ATTR>
<XPD:ATTR name="Text" type="string">RM_EDITAR_CLIENTE / Effect_EditarCliente</XPD:ATTR>
<XPD:REF name="Model">3B6HFVC1MUKfi+0C4Gx5hgAA</XPD:REF>
</XPD:OBJ>
<XPD:OBJ name="StereotypeLabel" type="EdgeLabelView" guid="78DHB/qxLEigSwbxOP4lWwAA">
<XPD:ATTR name="Visible" type="boolean">False</XPD:ATTR>
<XPD:ATTR name="Alpha" type="real">1,5707963267949</XPD:ATTR>
<XPD:ATTR name="Distance" type="real">30</XPD:ATTR>
<XPD:REF name="Model">3B6HFVC1MUKfi+0C4Gx5hgAA</XPD:REF>
</XPD:OBJ>
<XPD:OBJ name="PropertyLabel" type="EdgeLabelView" guid="Wg1O31mcU0SWcReZicxiqgAA">
<XPD:ATTR name="Visible" type="boolean">False</XPD:ATTR>
<XPD:ATTR name="Alpha" type="real">-1,5707963267949</XPD:ATTR>
<XPD:ATTR name="Distance" type="real">15</XPD:ATTR>
<XPD:REF name="Model">3B6HFVC1MUKfi+0C4Gx5hgAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJ>
<XPD:OBJ name="OwnedViews" type="UMLTransitionView" guid="sJWpA3NJFEC1VLeat6wNiAAA">
<XPD:ATTR name="LineColor" type="string">clMaroon</XPD:ATTR>
<XPD:ATTR name="FillColor" type="string">$00B9FFFF</XPD:ATTR>
<XPD:ATTR name="Points" type="Points">523,332;504,312;504,204;521,187</XPD:ATTR>
<XPD:REF name="Model">QEJ49vy3GkWzXZXEiGy+yQAA</XPD:REF>
<XPD:REF name="Head">vWQT6mYrbkKhyEy820W5ZgAA</XPD:REF>
<XPD:REF name="Tail">4dCxmTuOW0eAbna7bbSCKwAA</XPD:REF>
<XPD:OBJ name="NameLabel" type="EdgeLabelView" guid="PFNXR8DBmkG2qzWhjm/fkwAA">
<XPD:ATTR name="Alpha" type="real">-4,70412386626709</XPD:ATTR>
<XPD:ATTR name="Distance" type="real">121,004132160848</XPD:ATTR>
<XPD:ATTR name="Text" type="string">RM_CONCLUIR_EDICAO / Effect_ConcluirEdicao</XPD:ATTR>
<XPD:REF name="Model">QEJ49vy3GkWzXZXEiGy+yQAA</XPD:REF>
</XPD:OBJ>
<XPD:OBJ name="StereotypeLabel" type="EdgeLabelView" guid="Jdz2anTGLEuCDcH+yBanQgAA">
<XPD:ATTR name="Visible" type="boolean">False</XPD:ATTR>
<XPD:ATTR name="Alpha" type="real">1,5707963267949</XPD:ATTR>
<XPD:ATTR name="Distance" type="real">30</XPD:ATTR>
<XPD:REF name="Model">QEJ49vy3GkWzXZXEiGy+yQAA</XPD:REF>
</XPD:OBJ>
<XPD:OBJ name="PropertyLabel" type="EdgeLabelView" guid="efvvA4KVoEOw2xT/Z3qs9wAA">
<XPD:ATTR name="Visible" type="boolean">False</XPD:ATTR>
<XPD:ATTR name="Alpha" type="real">-1,5707963267949</XPD:ATTR>
<XPD:ATTR name="Distance" type="real">15</XPD:ATTR>
<XPD:REF name="Model">QEJ49vy3GkWzXZXEiGy+yQAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJ>
<XPD:OBJ name="OwnedViews" type="UMLTransitionView" guid="6VME4DatDUORW+gi4DZ0ogAA">
<XPD:ATTR name="LineColor" type="string">clMaroon</XPD:ATTR>
<XPD:ATTR name="FillColor" type="string">$00B9FFFF</XPD:ATTR>
<XPD:ATTR name="Points" type="Points">500,346;240,312;240,208;496,173</XPD:ATTR>
<XPD:REF name="Model">GP6LHRHm80SFTBRGXwI+5gAA</XPD:REF>
<XPD:REF name="Head">vWQT6mYrbkKhyEy820W5ZgAA</XPD:REF>
<XPD:REF name="Tail">4dCxmTuOW0eAbna7bbSCKwAA</XPD:REF>
<XPD:OBJ name="NameLabel" type="EdgeLabelView" guid="kmTxir1UX0qzixchSh7V4gAA">
<XPD:ATTR name="Alpha" type="real">-4,7123881344872</XPD:ATTR>
<XPD:ATTR name="Distance" type="real">92</XPD:ATTR>
<XPD:ATTR name="Text" type="string">RM_CANCELAR / Effect_Cancelar</XPD:ATTR>
<XPD:REF name="Model">GP6LHRHm80SFTBRGXwI+5gAA</XPD:REF>
</XPD:OBJ>
<XPD:OBJ name="StereotypeLabel" type="EdgeLabelView" guid="nxCrrpQM1U6i87BVkE6nqAAA">
<XPD:ATTR name="Visible" type="boolean">False</XPD:ATTR>
<XPD:ATTR name="Alpha" type="real">1,5707963267949</XPD:ATTR>
<XPD:ATTR name="Distance" type="real">30</XPD:ATTR>
<XPD:REF name="Model">GP6LHRHm80SFTBRGXwI+5gAA</XPD:REF>
</XPD:OBJ>
<XPD:OBJ name="PropertyLabel" type="EdgeLabelView" guid="8n7O7FjdbEKNhSQ52ps6bgAA">
<XPD:ATTR name="Visible" type="boolean">False</XPD:ATTR>
<XPD:ATTR name="Alpha" type="real">-1,5707963267949</XPD:ATTR>
<XPD:ATTR name="Distance" type="real">15</XPD:ATTR>
<XPD:REF name="Model">GP6LHRHm80SFTBRGXwI+5gAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJ>
</XPD:OBJCOLL>
</XPD:OBJ>
</XPD:OBJ>
</XPD:OBJCOLL>
<XPD:OBJCOLL name="Transitions">
<XPD:OBJ name="Transitions" type="UMLTransition" guid="ozocV/sFiUe4Zcsi/2mmtQAA">
<XPD:REF name="StateMachine">lro5obGpBkeTZpQ6QEzZDAAA</XPD:REF>
<XPD:REF name="Source">aJQ6Bq3JgEqqMBhc1F2l6QAA</XPD:REF>
<XPD:REF name="Target">kGA42kgdIUmUs0ugH7vd3QAA</XPD:REF>
<XPD:REFCOLL name="Views">
<XPD:REF name="Views">IuFHyrN27kOWE03b6srldwAA</XPD:REF>
<XPD:REF name="Views">4uQe0Uvn8EWRiqyROEkStgAA</XPD:REF>
<XPD:REF name="Views">fVJmRvPiIk63euIR+MeM2wAA</XPD:REF>
<XPD:REF name="Views">qLui/oJtDkmuVim7SnR6xAAA</XPD:REF>
</XPD:REFCOLL>
</XPD:OBJ>
<XPD:OBJ name="Transitions" type="UMLTransition" guid="d+nU5UjO1U2pHbKHIfUaWQAA">
<XPD:REF name="StateMachine">lro5obGpBkeTZpQ6QEzZDAAA</XPD:REF>
<XPD:REF name="Source">kGA42kgdIUmUs0ugH7vd3QAA</XPD:REF>
<XPD:REF name="Target">kGA42kgdIUmUs0ugH7vd3QAA</XPD:REF>
<XPD:REFCOLL name="Views">
<XPD:REF name="Views">cP20E0WlfU+TIx4zJXlE5gAA</XPD:REF>
<XPD:REF name="Views">yt/knboAkUm5SH/tVhnSRwAA</XPD:REF>
<XPD:REF name="Views">FG1DrtJNfUaMmbaserOijAAA</XPD:REF>
<XPD:REF name="Views">XuXWKPDkcEuX0PSnFFWNJAAA</XPD:REF>
</XPD:REFCOLL>
<XPD:OBJCOLL name="Effects">
<XPD:OBJ name="Effects" type="UMLUninterpretedAction" guid="Pi+EwuxB/0CsBJzMQhEEiwAA">
<XPD:ATTR name="Name" type="string">Effect_BuscarCliente</XPD:ATTR>
<XPD:REF name="Transition">d+nU5UjO1U2pHbKHIfUaWQAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJCOLL>
<XPD:OBJCOLL name="Triggers">
<XPD:OBJ name="Triggers" type="UMLSignalEvent" guid="Wm9cY7f3F0yI/GqyzaUmfgAA">
<XPD:ATTR name="Name" type="string">RM_BUSCAR_CLIENTE</XPD:ATTR>
<XPD:REF name="Transition">d+nU5UjO1U2pHbKHIfUaWQAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJCOLL>
</XPD:OBJ>
<XPD:OBJ name="Transitions" type="UMLTransition" guid="hTtqPC5UJk6xGwEqVrziVQAA">
<XPD:REF name="StateMachine">lro5obGpBkeTZpQ6QEzZDAAA</XPD:REF>
<XPD:REF name="Source">kGA42kgdIUmUs0ugH7vd3QAA</XPD:REF>
<XPD:REF name="Target">kGA42kgdIUmUs0ugH7vd3QAA</XPD:REF>
<XPD:REFCOLL name="Views">
<XPD:REF name="Views">zk0gYu911UiMIZbrHUqFpgAA</XPD:REF>
<XPD:REF name="Views">4qPw85cGRkCzM/YsF3Gs2AAA</XPD:REF>
<XPD:REF name="Views">45MWhS3Oe0GmHpUjVQQAUgAA</XPD:REF>
<XPD:REF name="Views">fSzEnZHpYEmULts8yuV21QAA</XPD:REF>
</XPD:REFCOLL>
<XPD:OBJCOLL name="Effects">
<XPD:OBJ name="Effects" type="UMLUninterpretedAction" guid="RJaLu7UhCkSsQI/5UqXgsgAA">
<XPD:ATTR name="Name" type="string">Effect_ExcluirCliente</XPD:ATTR>
<XPD:REF name="Transition">hTtqPC5UJk6xGwEqVrziVQAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJCOLL>
<XPD:OBJCOLL name="Triggers">
<XPD:OBJ name="Triggers" type="UMLSignalEvent" guid="kpQ1Zog93EiLQ23vx2f5XwAA">
<XPD:ATTR name="Name" type="string">RM_EXCLUIR_CLIENTE</XPD:ATTR>
<XPD:REF name="Transition">hTtqPC5UJk6xGwEqVrziVQAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJCOLL>
</XPD:OBJ>
<XPD:OBJ name="Transitions" type="UMLTransition" guid="YZp1SYHdVUqMLge1JLRNXwAA">
<XPD:REF name="StateMachine">lro5obGpBkeTZpQ6QEzZDAAA</XPD:REF>
<XPD:REF name="Source">kGA42kgdIUmUs0ugH7vd3QAA</XPD:REF>
<XPD:REF name="Target">UuFMs9LuUkOAKK7ZWn9YHgAA</XPD:REF>
<XPD:REFCOLL name="Views">
<XPD:REF name="Views">96uD3f9JD0KKV70zEyX6bAAA</XPD:REF>
<XPD:REF name="Views">XC8060UE2kS/djLbuvjRVgAA</XPD:REF>
<XPD:REF name="Views">+1Kl9S4Blky80rumSwyfaQAA</XPD:REF>
<XPD:REF name="Views">0fpxTobwxkyIdVZZ3IJ4RgAA</XPD:REF>
</XPD:REFCOLL>
<XPD:OBJCOLL name="Effects">
<XPD:OBJ name="Effects" type="UMLUninterpretedAction" guid="yAaO0bxu00y7LpfI/KozGwAA">
<XPD:ATTR name="Name" type="string">Effect_IncluirCliente</XPD:ATTR>
<XPD:REF name="Transition">YZp1SYHdVUqMLge1JLRNXwAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJCOLL>
<XPD:OBJCOLL name="Triggers">
<XPD:OBJ name="Triggers" type="UMLSignalEvent" guid="UYxuhJ5E8UikvX7KgYnzXgAA">
<XPD:ATTR name="Name" type="string">RM_INCLUIR_CLIENTE</XPD:ATTR>
<XPD:REF name="Transition">YZp1SYHdVUqMLge1JLRNXwAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJCOLL>
</XPD:OBJ>
<XPD:OBJ name="Transitions" type="UMLTransition" guid="3B6HFVC1MUKfi+0C4Gx5hgAA">
<XPD:REF name="StateMachine">lro5obGpBkeTZpQ6QEzZDAAA</XPD:REF>
<XPD:REF name="Source">kGA42kgdIUmUs0ugH7vd3QAA</XPD:REF>
<XPD:REF name="Target">UuFMs9LuUkOAKK7ZWn9YHgAA</XPD:REF>
<XPD:REFCOLL name="Views">
<XPD:REF name="Views">qEEr5JtnWkmri6mMS5WCEQAA</XPD:REF>
<XPD:REF name="Views">Bao12Kw5g0O8bV85tfushwAA</XPD:REF>
<XPD:REF name="Views">78DHB/qxLEigSwbxOP4lWwAA</XPD:REF>
<XPD:REF name="Views">Wg1O31mcU0SWcReZicxiqgAA</XPD:REF>
</XPD:REFCOLL>
<XPD:OBJCOLL name="Effects">
<XPD:OBJ name="Effects" type="UMLUninterpretedAction" guid="jsd4EciFLEmxEoxRNjGKWwAA">
<XPD:ATTR name="Name" type="string">Effect_EditarCliente</XPD:ATTR>
<XPD:REF name="Transition">3B6HFVC1MUKfi+0C4Gx5hgAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJCOLL>
<XPD:OBJCOLL name="Triggers">
<XPD:OBJ name="Triggers" type="UMLSignalEvent" guid="mg6nU9/0CEy5/oRmed5l1gAA">
<XPD:ATTR name="Name" type="string">RM_EDITAR_CLIENTE</XPD:ATTR>
<XPD:REF name="Transition">3B6HFVC1MUKfi+0C4Gx5hgAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJCOLL>
</XPD:OBJ>
<XPD:OBJ name="Transitions" type="UMLTransition" guid="QEJ49vy3GkWzXZXEiGy+yQAA">
<XPD:REF name="StateMachine">lro5obGpBkeTZpQ6QEzZDAAA</XPD:REF>
<XPD:REF name="Source">UuFMs9LuUkOAKK7ZWn9YHgAA</XPD:REF>
<XPD:REF name="Target">kGA42kgdIUmUs0ugH7vd3QAA</XPD:REF>
<XPD:REFCOLL name="Views">
<XPD:REF name="Views">sJWpA3NJFEC1VLeat6wNiAAA</XPD:REF>
<XPD:REF name="Views">PFNXR8DBmkG2qzWhjm/fkwAA</XPD:REF>
<XPD:REF name="Views">Jdz2anTGLEuCDcH+yBanQgAA</XPD:REF>
<XPD:REF name="Views">efvvA4KVoEOw2xT/Z3qs9wAA</XPD:REF>
</XPD:REFCOLL>
<XPD:OBJCOLL name="Effects">
<XPD:OBJ name="Effects" type="UMLUninterpretedAction" guid="IXTjiQKb3EmrWDf9ZsKISgAA">
<XPD:ATTR name="Name" type="string">Effect_ConcluirEdicao</XPD:ATTR>
<XPD:REF name="Transition">QEJ49vy3GkWzXZXEiGy+yQAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJCOLL>
<XPD:OBJCOLL name="Triggers">
<XPD:OBJ name="Triggers" type="UMLSignalEvent" guid="/Zgsmpbut0e4tI46VNsk6AAA">
<XPD:ATTR name="Name" type="string">RM_CONCLUIR_EDICAO</XPD:ATTR>
<XPD:REF name="Transition">QEJ49vy3GkWzXZXEiGy+yQAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJCOLL>
</XPD:OBJ>
<XPD:OBJ name="Transitions" type="UMLTransition" guid="GP6LHRHm80SFTBRGXwI+5gAA">
<XPD:REF name="StateMachine">lro5obGpBkeTZpQ6QEzZDAAA</XPD:REF>
<XPD:REF name="Source">UuFMs9LuUkOAKK7ZWn9YHgAA</XPD:REF>
<XPD:REF name="Target">kGA42kgdIUmUs0ugH7vd3QAA</XPD:REF>
<XPD:REFCOLL name="Views">
<XPD:REF name="Views">6VME4DatDUORW+gi4DZ0ogAA</XPD:REF>
<XPD:REF name="Views">kmTxir1UX0qzixchSh7V4gAA</XPD:REF>
<XPD:REF name="Views">nxCrrpQM1U6i87BVkE6nqAAA</XPD:REF>
<XPD:REF name="Views">8n7O7FjdbEKNhSQ52ps6bgAA</XPD:REF>
</XPD:REFCOLL>
<XPD:OBJCOLL name="Effects">
<XPD:OBJ name="Effects" type="UMLUninterpretedAction" guid="dCTq73hSz0WWUVmiDLxWBAAA">
<XPD:ATTR name="Name" type="string">Effect_Cancelar</XPD:ATTR>
<XPD:REF name="Transition">GP6LHRHm80SFTBRGXwI+5gAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJCOLL>
<XPD:OBJCOLL name="Triggers">
<XPD:OBJ name="Triggers" type="UMLSignalEvent" guid="cHXqPW8foUS6/CjdWtX5cAAA">
<XPD:ATTR name="Name" type="string">RM_CANCELAR</XPD:ATTR>
<XPD:REF name="Transition">GP6LHRHm80SFTBRGXwI+5gAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJCOLL>
</XPD:OBJ>
</XPD:OBJCOLL>
</XPD:OBJ>
</XPD:OBJCOLL>
<XPD:REFCOLL name="Generalizations">
<XPD:REF name="Generalizations">ZYzvpp+WNEeW7zVpWGEFCQAA</XPD:REF>
</XPD:REFCOLL>
</XPD:OBJ>
<XPD:OBJ name="OwnedElements" type="UMLGeneralization" guid="ZYzvpp+WNEeW7zVpWGEFCQAA">
<XPD:REF name="Namespace">Aa1c8sP/hUWifftyY1TXrwAA</XPD:REF>
<XPD:REF name="Child">+z+oyeOqoEuQaEyTrjD9iwAA</XPD:REF>
<XPD:REF name="Parent" pathname="::AppModel::FrameworkModel::acuFrameworkPackage::UCU::ucUseCase">CW1L1EW3kkSWfD8DU8ciWwAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJCOLL> </XPD:OBJCOLL>
</XPD:OBJ> </XPD:OBJ>
<XPD:OBJ name="OwnedElements" type="UMLModel" guid="obeirvlDPkWWKy4NQ48pEQAA"> <XPD:OBJ name="OwnedElements" type="UMLModel" guid="obeirvlDPkWWKy4NQ48pEQAA">
...@@ -3328,8 +3838,8 @@ ...@@ -3328,8 +3838,8 @@
<XPD:ATTR name="FillColor" type="string">$00B9FFFF</XPD:ATTR> <XPD:ATTR name="FillColor" type="string">$00B9FFFF</XPD:ATTR>
<XPD:ATTR name="Left" type="integer">60</XPD:ATTR> <XPD:ATTR name="Left" type="integer">60</XPD:ATTR>
<XPD:ATTR name="Top" type="integer">432</XPD:ATTR> <XPD:ATTR name="Top" type="integer">432</XPD:ATTR>
<XPD:ATTR name="Width" type="integer">167</XPD:ATTR> <XPD:ATTR name="Width" type="integer">169</XPD:ATTR>
<XPD:ATTR name="Height" type="integer">69</XPD:ATTR> <XPD:ATTR name="Height" type="integer">82</XPD:ATTR>
<XPD:REF name="Model">LD37qRs0+0iD9soOT66mPwAA</XPD:REF> <XPD:REF name="Model">LD37qRs0+0iD9soOT66mPwAA</XPD:REF>
<XPD:OBJ name="NameCompartment" type="UMLNameCompartmentView" guid="YAmSEm8Bkkm5LHfTiOV/xgAA"> <XPD:OBJ name="NameCompartment" type="UMLNameCompartmentView" guid="YAmSEm8Bkkm5LHfTiOV/xgAA">
<XPD:OBJ name="NameLabel" type="LabelView" guid="bm2z56pzkUqOMzT1uB9VMQAA"> <XPD:OBJ name="NameLabel" type="LabelView" guid="bm2z56pzkUqOMzT1uB9VMQAA">
...@@ -3358,7 +3868,7 @@ ...@@ -3358,7 +3868,7 @@
<XPD:OBJ name="OwnedViews" type="UMLAssociationView" guid="lBhkqWrgEU276mBS50Gv4QAA"> <XPD:OBJ name="OwnedViews" type="UMLAssociationView" guid="lBhkqWrgEU276mBS50Gv4QAA">
<XPD:ATTR name="LineColor" type="string">clMaroon</XPD:ATTR> <XPD:ATTR name="LineColor" type="string">clMaroon</XPD:ATTR>
<XPD:ATTR name="FillColor" type="string">$00B9FFFF</XPD:ATTR> <XPD:ATTR name="FillColor" type="string">$00B9FFFF</XPD:ATTR>
<XPD:ATTR name="Points" type="Points">226,466;424,467</XPD:ATTR> <XPD:ATTR name="Points" type="Points">228,471;424,469</XPD:ATTR>
<XPD:REF name="Model">jOFWbSFZOkmHXGB37NTHKQAA</XPD:REF> <XPD:REF name="Model">jOFWbSFZOkmHXGB37NTHKQAA</XPD:REF>
<XPD:REF name="Head">PFICJ19CdEuyS8EaQycmTAAA</XPD:REF> <XPD:REF name="Head">PFICJ19CdEuyS8EaQycmTAAA</XPD:REF>
<XPD:REF name="Tail">TF9yIq4a/U6j2rihN5n+vgAA</XPD:REF> <XPD:REF name="Tail">TF9yIq4a/U6j2rihN5n+vgAA</XPD:REF>
...@@ -4209,6 +4719,45 @@ ...@@ -4209,6 +4719,45 @@
</XPD:OBJ> </XPD:OBJ>
</XPD:OBJCOLL> </XPD:OBJCOLL>
</XPD:OBJ> </XPD:OBJ>
<XPD:OBJ name="Attributes" type="UMLAttribute" guid="m0vvzjbTwUC788RpTTAaWgAA">
<XPD:ATTR name="Name" type="string">Ativo</XPD:ATTR>
<XPD:ATTR name="StereotypeProfile" type="string">DBMappings</XPD:ATTR>
<XPD:ATTR name="StereotypeName" type="string">Persistent</XPD:ATTR>
<XPD:ATTR name="Visibility" type="UMLVisibilityKind">vkPrivate</XPD:ATTR>
<XPD:ATTR name="TypeExpression" type="string">acString</XPD:ATTR>
<XPD:REF name="Type_" pathname="::AppModel::FrameworkModel::acuFrameworkPackage::acString">MHfaHHYTfUWw8gyXbrK3AQAA</XPD:REF>
<XPD:REF name="Owner">LD37qRs0+0iD9soOT66mPwAA</XPD:REF>
<XPD:OBJCOLL name="TaggedValues">
<XPD:OBJ name="TaggedValues" type="TaggedValue" guid="d5TknPEw1kaSLvAqLblELwAA">
<XPD:ATTR name="ProfileName" type="string">DBMappings</XPD:ATTR>
<XPD:ATTR name="TagDefinitionSetName" type="string">DBAttributeMap</XPD:ATTR>
<XPD:ATTR name="Name" type="string">Name</XPD:ATTR>
<XPD:ATTR name="DataValue" type="string">ATIVO</XPD:ATTR>
<XPD:REF name="TaggedModel">m0vvzjbTwUC788RpTTAaWgAA</XPD:REF>
</XPD:OBJ>
<XPD:OBJ name="TaggedValues" type="TaggedValue" guid="PxCmkM1Mu06HyNKLvCEt2QAA">
<XPD:ATTR name="ProfileName" type="string">DBMappings</XPD:ATTR>
<XPD:ATTR name="TagDefinitionSetName" type="string">DBAttributeMap</XPD:ATTR>
<XPD:ATTR name="Name" type="string">Type</XPD:ATTR>
<XPD:ATTR name="DataValue" type="string">VARCHAR</XPD:ATTR>
<XPD:REF name="TaggedModel">m0vvzjbTwUC788RpTTAaWgAA</XPD:REF>
</XPD:OBJ>
<XPD:OBJ name="TaggedValues" type="TaggedValue" guid="0Y5GPSFsHU+5aIZhaKhkOQAA">
<XPD:ATTR name="ProfileName" type="string">DBMappings</XPD:ATTR>
<XPD:ATTR name="TagDefinitionSetName" type="string">DBAttributeMap</XPD:ATTR>
<XPD:ATTR name="Name" type="string">Mand</XPD:ATTR>
<XPD:ATTR name="DataValue" type="string">True</XPD:ATTR>
<XPD:REF name="TaggedModel">m0vvzjbTwUC788RpTTAaWgAA</XPD:REF>
</XPD:OBJ>
<XPD:OBJ name="TaggedValues" type="TaggedValue" guid="9RBVrUn4UkCL1Ti5lHsJoQAA">
<XPD:ATTR name="ProfileName" type="string">DBMappings</XPD:ATTR>
<XPD:ATTR name="TagDefinitionSetName" type="string">DBAttributeMap</XPD:ATTR>
<XPD:ATTR name="Name" type="string">VSize</XPD:ATTR>
<XPD:ATTR name="DataValue" type="string">1</XPD:ATTR>
<XPD:REF name="TaggedModel">m0vvzjbTwUC788RpTTAaWgAA</XPD:REF>
</XPD:OBJ>
</XPD:OBJCOLL>
</XPD:OBJ>
</XPD:OBJCOLL> </XPD:OBJCOLL>
</XPD:OBJ> </XPD:OBJ>
<XPD:OBJ name="OwnedElements" type="UMLGeneralization" guid="xwA/2qb2wE2gu/IC0dEiBQAA"> <XPD:OBJ name="OwnedElements" type="UMLGeneralization" guid="xwA/2qb2wE2gu/IC0dEiBQAA">
......
srv/src/HelloWorld.dpr
View file @ 45f74053
...@@ -101,7 +101,8 @@ uses ...@@ -101,7 +101,8 @@ uses
nguSituacaoExemplar in 'ngu\nguSituacaoExemplar.pas', nguSituacaoExemplar in 'ngu\nguSituacaoExemplar.pas',
nguVersaoBanco in 'ngu\nguVersaoBanco.pas', nguVersaoBanco in 'ngu\nguVersaoBanco.pas',
ucuBuscarEmprestimos in 'ucu\ucuBuscarEmprestimos.pas', ucuBuscarEmprestimos in 'ucu\ucuBuscarEmprestimos.pas',
ucuCadastrarLivro in 'ucu\ucuCadastrarLivro.pas'; ucuCadastrarLivro in 'ucu\ucuCadastrarLivro.pas',
ucuCadastrarCliente in 'ucu\ucuCadastrarCliente.pas';
var var
lErros : TStringList; lErros : TStringList;
......
srv/src/lib/acuRegisterModelMappings.pas
View file @ 45f74053
...@@ -343,6 +343,12 @@ begin ...@@ -343,6 +343,12 @@ begin
prop.Mandatory := True; prop.Mandatory := True;
prop.DBType := 'VARCHAR'; prop.DBType := 'VARCHAR';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'CPF'; lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'CPF';
prop := lClassMapTicket.NewAttributeTicket('Ativo', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 1;
prop.Mandatory := True;
prop.DBType := 'VARCHAR';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'ATIVO';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('3000','ngEmprestimo','acPersistentObject', acOIDInt); lClassMapTicket := piMetaModel.NewClassRegisterTicket('3000','ngEmprestimo','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := ''; lClassMapTicket.AuditDescription := '';
...@@ -1248,6 +1254,16 @@ begin ...@@ -1248,6 +1254,16 @@ begin
lUseCaseTicket.InheritsFrom := 'ucUseCase'; lUseCaseTicket.InheritsFrom := 'ucUseCase';
end; end;
procedure NewUseCaseTicket_ucCadastrarCliente_3229(piMetaModel: acMetaModel);
var
lUseCaseTicket: acUseCaseTicket;
begin
//Criao do UseCaseTicket ucCadastrarCliente (3229)
lUseCaseTicket := piMetaModel.NewUseCaseTicket('3229', nil, True);
lUseCaseTicket.Name := 'ucCadastrarCliente';
lUseCaseTicket.InheritsFrom := 'ucUseCase';
end;
function GetXSDIn_3215_smucHelloWorld_Executando_RM_CUMPRIMENTAR: String; function GetXSDIn_3215_smucHelloWorld_Executando_RM_CUMPRIMENTAR: String;
begin begin
Result := '<?xml version="1.0"?>' + #13#10 + Result := '<?xml version="1.0"?>' + #13#10 +
...@@ -2146,6 +2162,81 @@ begin ...@@ -2146,6 +2162,81 @@ begin
''; '';
end; end;
function GetXSDIn_3229_smucCadastrarCliente_BuscandoCliente_RM_BUSCAR_CLIENTE: String;
begin
Result := '<?xml version="1.0"?>' + #13#10 +
'<!--Created with Liquid XML Studio 6.1.18.0 - FREE Community Edition (http://www.liquid-technologies.com)-->' + #13#10 +
'<xs:schema elementFormDefault="qualified" xmlns:xs="http://www.w3.org/2001/XMLSchema">' + #13#10 +
' <xs:element name="SYSMSG">' + #13#10 +
' <xs:complexType>' + #13#10 +
' <xs:sequence minOccurs="1" maxOccurs="1">' + #13#10 +
' <xs:element name="Cliente">' + #13#10 +
' <xs:complexType>' + #13#10 +
' <xs:attribute name="Nome" type="xs:string" use="optional"/>' + #13#10 +
' <xs:attribute name="CPF" type="xs:string" use="optional"/>' + #13#10 +
' <xs:anyAttribute processContents="skip"/>' + #13#10 +
' </xs:complexType>' + #13#10 +
' </xs:element>' + #13#10 +
' </xs:sequence>' + #13#10 +
' <xs:anyAttribute processContents="skip"/>' + #13#10 +
' </xs:complexType>' + #13#10 +
' </xs:element>' + #13#10 +
'</xs:schema>' + #13#10 +
'';
end;
function GetXSDOut_3229_smucCadastrarCliente_BuscandoCliente_RM_BUSCAR_CLIENTE: String;
begin
Result := '<?xml version="1.0"?>' + #13#10 +
'<!--Created with Liquid XML Studio 6.1.18.0 - FREE Community Edition (http://www.liquid-technologies.com)-->' + #13#10 +
'<xs:schema elementFormDefault="qualified" xmlns:xs="http://www.w3.org/2001/XMLSchema">' + #13#10 +
' <xs:element name="SYSMSG">' + #13#10 +
' <xs:complexType>' + #13#10 +
' <xs:sequence minOccurs="1" maxOccurs="1">' + #13#10 +
' <xs:element name="Clientes">' + #13#10 +
' <xs:complexType>' + #13#10 +
' <xs:sequence minOccurs="0" maxOccurs="unbounded">' + #13#10 +
' <xs:element name="Cliente">' + #13#10 +
' <xs:complexType>' + #13#10 +
' <xs:attribute name="Nome" type="xs:string" use="required"/>' + #13#10 +
' <xs:attribute name="CPF" type="xs:string" use="required"/>' + #13#10 +
' <xs:anyAttribute processContents="skip"/>' + #13#10 +
' </xs:complexType>' + #13#10 +
' </xs:element>' + #13#10 +
' </xs:sequence>' + #13#10 +
' <xs:anyAttribute processContents="skip"/>' + #13#10 +
' </xs:complexType>' + #13#10 +
' </xs:element>' + #13#10 +
' </xs:sequence>' + #13#10 +
' <xs:anyAttribute processContents="skip"/>' + #13#10 +
' </xs:complexType>' + #13#10 +
' </xs:element>' + #13#10 +
'</xs:schema>' + #13#10 +
'';
end;
function GetXSDIn_3229_smucCadastrarCliente_BuscandoCliente_RM_EXCLUIR_CLIENTE: String;
begin
Result := '<?xml version="1.0"?>' + #13#10 +
'<!--Created with Liquid XML Studio 6.1.18.0 - FREE Community Edition (http://www.liquid-technologies.com)-->' + #13#10 +
'<xs:schema elementFormDefault="qualified" xmlns:xs="http://www.w3.org/2001/XMLSchema">' + #13#10 +
' <xs:element name="SYSMSG">' + #13#10 +
' <xs:complexType>' + #13#10 +
' <xs:sequence minOccurs="1" maxOccurs="1">' + #13#10 +
' <xs:element name="Cliente">' + #13#10 +
' <xs:complexType>' + #13#10 +
' <xs:attribute name="OID" type="xs:int" use="required"/>' + #13#10 +
' <xs:anyAttribute processContents="skip"/>' + #13#10 +
' </xs:complexType>' + #13#10 +
' </xs:element>' + #13#10 +
' </xs:sequence>' + #13#10 +
' <xs:anyAttribute processContents="skip"/>' + #13#10 +
' </xs:complexType>' + #13#10 +
' </xs:element>' + #13#10 +
'</xs:schema>' + #13#10 +
'';
end;
procedure RegisterUseCases1(piMetaModel: acMetaModel); procedure RegisterUseCases1(piMetaModel: acMetaModel);
var var
lUseCaseTicket: acUseCaseTicket; lUseCaseTicket: acUseCaseTicket;
...@@ -2166,6 +2257,7 @@ begin ...@@ -2166,6 +2257,7 @@ begin
NewUseCaseTicket_ucEmprestarLivro_3219(piMetaModel); NewUseCaseTicket_ucEmprestarLivro_3219(piMetaModel);
NewUseCaseTicket_ucBuscarEmprestimos_3223(piMetaModel); NewUseCaseTicket_ucBuscarEmprestimos_3223(piMetaModel);
NewUseCaseTicket_ucCadastrarLivro_3227(piMetaModel); NewUseCaseTicket_ucCadastrarLivro_3227(piMetaModel);
NewUseCaseTicket_ucCadastrarCliente_3229(piMetaModel);
//Gerando StateMachine para o casu de uso 'ucImportaConfiguracaoSistema' //Gerando StateMachine para o casu de uso 'ucImportaConfiguracaoSistema'
lUseCaseTicket := piMetaModel.UseCaseTicketByCode['1327']; lUseCaseTicket := piMetaModel.UseCaseTicketByCode['1327'];
...@@ -3207,6 +3299,100 @@ begin ...@@ -3207,6 +3299,100 @@ begin
lTransition.XsdIn.XML := GetXSDIn_3227_smucCadastrarLivro_EditandoCadastro_RM_EXCLUIR_EXEMPLAR; lTransition.XsdIn.XML := GetXSDIn_3227_smucCadastrarLivro_EditandoCadastro_RM_EXCLUIR_EXEMPLAR;
//Gerando StateMachine para o casu de uso 'ucCadastrarCliente'
lUseCaseTicket := piMetaModel.UseCaseTicketByCode['3229'];
lStateMachine := lUseCaseTicket.StateMachine;
lStateMachine.Name := 'smServer';
utState.Create(lStateMachine, 'Initializing');
lSubMachineState := utSubMachineState.Create(lStateMachine, 'UseCaseSubmachine');
lSubMachineUseCaseTicket := piMetaModel.UseCaseTicketByCode['3229'];
lSubMachineState.StateMachine := acUseCaseStateMachine.Create(lSubMachineUseCaseTicket, lSubMachineState);
utFinalState.Create(lStateMachine, 'smBase_FinalState');
//Define o InitialState do StateMachine
lStateMachine.InitialState := lStateMachine.FindState('Initializing');
//Adiciona as transicoes dos estados
lState := lStateMachine.FindState('Initializing');
lTransition := lState.NewOutgoingTransition('READY');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('UseCaseSubmachine');
lTransition.AddTrigger('READY');
lState := lStateMachine.FindState('UseCaseSubmachine');
lTransition := lState.NewOutgoingTransition('ABORT');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('smBase_FinalState');
lTransition.AddTrigger('UM_ABORT','4');
lTransition.AddEffect('EFFECT_Abort');
lTransition := lState.NewOutgoingTransition('TIMEOUTCHECK');
lTransition.SourceState := lState;
lTransition.TargetState := lState;
lTransition.AddTrigger('RM_TIMEOUT_CHECK','16');
lTransition.AddEffect('EFFECT_TimeOutCheck');
lTransition := lState.NewOutgoingTransition('GETTRIGGERSFROMCURRENTSTATE');
lTransition.SourceState := lState;
lTransition.TargetState := lState;
lTransition.AddTrigger('RM_GET_TRIGGERS_FROM_CURRENT_STATE');
lTransition.AddEffect('EFFECT_GetTriggersFromCurrentState');
lTransition := lState.NewOutgoingTransition('GETXSDBYTRIGGERFROMCURRENTSTATE');
lTransition.SourceState := lState;
lTransition.TargetState := lState;
lTransition.AddTrigger('RM_GET_XSD_BY_TRIGGER_FROM_CURRENT_STATE');
lTransition.AddEffect('EFFECT_GetXSDByTriggerFromCurrentState');
// SUBSTATEMACHINE smucCadastrarCliente ///////////////////////
lStateMachine := lUseCaseTicket.FindStateMachine('smServer');
lStateMachine := utSubMachineState(lStateMachine.FindState('UseCaseSubmachine')).StateMachine as acUseCaseStateMachine;
lStateMachine.Name := 'smucCadastrarCliente';
utState.Create(lStateMachine, 'BuscandoCliente');
utState.Create(lStateMachine, 'EditandoCliente');
//Define o InitialState do StateMachine
lStateMachine.InitialState := lStateMachine.FindState('BuscandoCliente');
//Adiciona as transicoes dos estados
lState := lStateMachine.FindState('BuscandoCliente');
lTransition := lState.NewOutgoingTransition('RM_BUSCAR_CLIENTE');
lTransition.SourceState := lState;
lTransition.TargetState := lState;
lTransition.AddTrigger('RM_BUSCAR_CLIENTE');
lTransition.AddEffect('Effect_BuscarCliente');
lTransition.XsdIn.XML := GetXSDIn_3229_smucCadastrarCliente_BuscandoCliente_RM_BUSCAR_CLIENTE;
lTransition.XsdOut.XML := GetXSDOut_3229_smucCadastrarCliente_BuscandoCliente_RM_BUSCAR_CLIENTE;
lTransition := lState.NewOutgoingTransition('RM_EXCLUIR_CLIENTE');
lTransition.SourceState := lState;
lTransition.TargetState := lState;
lTransition.AddTrigger('RM_EXCLUIR_CLIENTE');
lTransition.AddEffect('Effect_ExcluirCliente');
lTransition.XsdIn.XML := GetXSDIn_3229_smucCadastrarCliente_BuscandoCliente_RM_EXCLUIR_CLIENTE;
lTransition := lState.NewOutgoingTransition('RM_INCLUIR_CLIENTE');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('EditandoCliente');
lTransition.AddTrigger('RM_INCLUIR_CLIENTE');
lTransition.AddEffect('Effect_IncluirCliente');
lTransition := lState.NewOutgoingTransition('RM_EDITAR_CLIENTE');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('EditandoCliente');
lTransition.AddTrigger('RM_EDITAR_CLIENTE');
lTransition.AddEffect('Effect_EditarCliente');
lState := lStateMachine.FindState('EditandoCliente');
lTransition := lState.NewOutgoingTransition('RM_CONCLUIR_EDICAO');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('BuscandoCliente');
lTransition.AddTrigger('RM_CONCLUIR_EDICAO');
lTransition.AddEffect('Effect_ConcluirEdicao');
lTransition := lState.NewOutgoingTransition('RM_CANCELAR');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('BuscandoCliente');
lTransition.AddTrigger('RM_CANCELAR');
lTransition.AddEffect('Effect_Cancelar');
end; end;
procedure RegisterModelMappings(piMetaModel: acMetaModel); procedure RegisterModelMappings(piMetaModel: acMetaModel);
......
srv/src/ngu/nguCliente.pas
View file @ 45f74053
...@@ -11,19 +11,19 @@ type ...@@ -11,19 +11,19 @@ type
private private
FNome: acString; FNome: acString;
FCPF: acString; FCPF: acString;
FAtivo: acString;
fEmprestimos: acRelationPartnerList; fEmprestimos: acRelationPartnerList;
public public
procedure toXML(piField: utField); procedure toXML(piField: utField);
published published
property Nome: acString read FNome write FNome; property Nome: acString read FNome write FNome;
property CPF: acString read FCPF write FCPF; property CPF: acString read FCPF write FCPF;
property Ativo: acString read FAtivo write FAtivo;
property Emprestimos: acRelationPartnerList read fEmprestimos write fEmprestimos; property Emprestimos: acRelationPartnerList read fEmprestimos write fEmprestimos;
end; end;
implementation implementation
{ ngCliente }
procedure ngCliente.toXML(piField: utField); procedure ngCliente.toXML(piField: utField);
begin begin
piField.AddAttribute('OID').AsString := Self.IDO.AsString; piField.AddAttribute('OID').AsString := Self.IDO.AsString;
...@@ -36,4 +36,3 @@ initialization ...@@ -36,4 +36,3 @@ initialization
PersistenceManager.RegisterClass(ngCliente); PersistenceManager.RegisterClass(ngCliente);
end. end.
srv/src/ucu/ucuCadastrarCliente.pas 0 → 100644
View file @ 45f74053
unit ucuCadastrarCliente;
interface
uses
utuStateMachine, utuRequest, ucuUseCase, acuFramework, nguCliente;
type
ucCadastrarCliente = class(ucUseCase)
public
procedure Initialize; Override;
procedure Finalize; Override;
private
fCliente: ngCliente;
fSavePoint: acPersistenceSessionSavePoint;
published
procedure Effect_BuscarCliente(piRequest: utRequest; piTransition: utTransition);
procedure Effect_ExcluirCliente(piRequest: utRequest; piTransition: utTransition);
procedure Effect_IncluirCliente(piRequest: utRequest; piTransition: utTransition);
procedure Effect_EditarCliente(piRequest: utRequest; piTransition: utTransition);
procedure Effect_ConcluirEdicao(piRequest: utRequest; piTransition: utTransition);
procedure Effect_Cancelar(piRequest: utRequest; piTransition: utTransition);
end;
implementation
uses
ucuManager,
utuMessage {define utField},
utuEmprestimoOQL,
acuObject {define acEnumerator},
nguExemplar,
nguSituacaoExemplar,
nguEmprestimo,
nguLivro,
dateUtils;
procedure ucCadastrarCliente.Initialize;
begin
inherited;
end;
procedure ucCadastrarCliente.Finalize;
begin
inherited;
end;
procedure ucCadastrarCliente.Effect_BuscarCliente(piRequest: utRequest; piTransition: utTransition);
var
lFieldClientes,
lFieldCliente: utField;
lOQL: IObterClientes;
lListClientes: acPersistentObjectList;
lEnumCliente: acEnumerator;
lCliente: ngCliente;
begin
lFieldCliente:= piRequest.Message.RootField.FieldByName('Cliente');
lOQL := utEmprestimoOQL.ObterClientes(Self.Session);
lFieldClientes := piRequest.Response.RootField.AddField('Clientes');
lListClientes := acPersistentObjectList.Create(ngCliente);
try
if lFieldCliente.HasAttribute('CPF')
then lOQL.Param_cpf.Value := lFieldCliente.AttributeByName('CPF').AsString
else lOQL.Param_cpf.SetNull;
if lFieldCliente.HasAttribute('Nome')
then lOQL.Param_nome.Value := lFieldCliente.AttributeByName('Nome').AsString
else lOQL.Param_nome.SetNull;
lOQL.LoadList(lListClientes);
lEnumCliente := acEnumerator.Create(lListClientes);
try
while not lEnumCliente.EOL do
begin
lCliente := lEnumCliente.Current as ngCliente;
lCliente.toXML(lFieldClientes.AddField('Cliente'));
lEnumCliente.MoveNext;
end;
finally
lEnumCliente.Free;
end;
finally
lListClientes.Free;
end;
piRequest.Processed := True;
end;
procedure ucCadastrarCliente.Effect_IncluirCliente(piRequest: utRequest; piTransition: utTransition);
var
lFieldCliente: utField;
begin
fSavePoint := Self.Session.AddSavePoint;
try
fCliente := ngCliente.CreateNew(Self.Session);
lFieldCliente := piRequest.Response.RootField.AddField('Cliente');
lFieldCliente.AddAttribute('OID').AsInteger := fCliente.IDO.AsVariant;
except
Self.Session.RollBackToSavePoint(fSavePoint);
raise;
end;
piRequest.Processed := True;
end;
procedure ucCadastrarCliente.Effect_ExcluirCliente(piRequest: utRequest; piTransition: utTransition);
var
lFieldCliente: utField;
lSavePoint: acPersistenceSessionSavePoint;
begin
lSavePoint := Self.Session.AddSavePoint;
lFieldCliente := piRequest.Message.RootField.FieldByName('Cliente');
try
fCliente := Self.Session.LoadObject(ngCliente,acOIDInt.Create(lFieldCliente.AttributeByName('OID').AsInteger)) as ngCliente;
fCliente.Ativo.Value := '0';
Self.Session.Save;
except
Self.Session.RollBackToSavePoint(lSavePoint);
raise;
end;
piRequest.Processed := True;
end;
procedure ucCadastrarCliente.Effect_EditarCliente(piRequest: utRequest; piTransition: utTransition);
var
lFieldCliente: utField;
begin
fSavePoint := Self.Session.AddSavePoint;
lFieldCliente := piRequest.Message.RootField.FieldByName('Cliente');
try
fCliente := Self.Session.LoadObject(ngCliente,acOIDInt.Create(lFieldCliente.AttributeByName('OID').AsInteger)) as ngCliente;
except
on e:acObjectNotFoundException do
raise EucException.Create('Cliente a ser editado no pode ser encontrado.');
else
raise EucException.Create('No foi possvel editar este cliente.');
end;
lFieldCliente := piRequest.Response.RootField.AddField('Cliente');
fCliente.toXML(lFieldCliente);
piRequest.Processed := True;
end;
procedure ucCadastrarCliente.Effect_ConcluirEdicao(piRequest: utRequest; piTransition: utTransition);
var
lFieldCliente: utField;
begin
lFieldCliente := piRequest.Message.RootField.FieldByName('Cliente');
fCliente.CPF.Value := lFieldCliente.AttributeByName('CPF').AsString;
fCliente.Nome.Value := lFieldCliente.AttributeByName('Nome').AsString;
fCliente.Ativo.Value := '1';
Self.Session.Save;
lFieldCliente := piRequest.Response.RootField.AddField('Cliente');
fCliente.toXML(lFieldCliente);
piRequest.Processed := True;
end;
procedure ucCadastrarCliente.Effect_Cancelar(piRequest: utRequest; piTransition: utTransition);
begin
if Assigned(fSavePoint)
then Session.RollBackToSavePoint(fSavePoint);
piRequest.Processed := True;
end;
initialization
gucManager.RegisterClass(3229,ucCadastrarCliente);
end.
srv/src/utu/utuEmprestimoOQL.pas
View file @ 45f74053
...@@ -163,8 +163,8 @@ begin ...@@ -163,8 +163,8 @@ begin
result := TObterClientes.Create(pisessao, result := TObterClientes.Create(pisessao,
'SELECT ngCliente' + #13#10 + 'SELECT ngCliente' + #13#10 +
'FROM ngCliente' + #13#10 + 'FROM ngCliente' + #13#10 +
'WHERE (ngCliente.Nome LIKE ''%''+?nome:acString+''%'' OR ?nome:acString IS NULL)' + #13#10 + 'WHERE ((ngCliente.Nome LIKE ''%''+?nome:acString+''%'' OR ?nome:acString IS NULL) AND ngCliente.Ativo = "1")' + #13#10 +
' AND (ngCliente.CPF = ?cpf:acString OR ?cpf:acString IS NULL)'); ' AND ((ngCliente.CPF = ?cpf:acString OR ?cpf:acString IS NULL) AND ngCliente.Ativo = "1")');
end; end;
class function utEmprestimoOQL.ObterEmprestimos(piSessao: acPersistenceSession): IObterEmprestimos; class function utEmprestimoOQL.ObterEmprestimos(piSessao: acPersistenceSession): IObterEmprestimos;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment