Commit 7b8cb443 authored by Thiago Anders's avatar Thiago Anders

Commit Inicial

parents
*.dproj
*.exe
*.~*
{
"generator-curio": {
"srv": {
"path": "srv/src",
"dprname": "HelloWorld"
},
"cli": {
"path": "cli/win/",
"dpkname": "HelloWorld"
}
}
}
\ No newline at end of file
-- CLASS ngCliente
CREATE TABLE CLIENTE (
ID_CLIENTE INT PRIMARY KEY,
NOME VARCHAR(256) NOT NULL,
CPF VARCHAR(11) NOT NULL
);
-- CLASS ngEmprestimo
CREATE TABLE EMPRESTIMO (
ID_EMPRESTIMO INT PRIMARY KEY,
RETIRADA DATETIME NOT NULL,
PREVISTADEV DATETIME NOT NULL,
DATADEV DATETIME NOT NULL,
ID_EXEMPLAR INT NOT NULL,
ID_CLIENTE INT NOT NULL
);
-- CLASS ngEmprestimo
-- RELATION ngExemplar(0..*) <----> (1..1)ngEmprestimo
ALTER TABLE EMPRESTIMO ADD CONSTRAINT F3000ID_EXEMPLAR FOREIGN KEY (ID_EXEMPLAR) REFERENCES EXEMPLAR(ID_EXEMPLAR);
CREATE INDEX I3000ID_EXEMPLAR ON EMPRESTIMO (ID_EXEMPLAR);
-- RELATION ngCliente(0..*) <----> (1..1)ngEmprestimo
ALTER TABLE EMPRESTIMO ADD CONSTRAINT F3000ID_CLIENTE FOREIGN KEY (ID_CLIENTE) REFERENCES CLIENTE(ID_CLIENTE);
CREATE INDEX I3000ID_CLIENTE ON EMPRESTIMO (ID_CLIENTE);
-- CLASS ngExemplar
CREATE TABLE EXEMPLAR (
ID_EXEMPLAR INT PRIMARY KEY,
CODIGO VARCHAR(32) NOT NULL,
ID_SITUACAOEXEMPLAR INT NOT NULL,
ID_LIVRO INT NOT NULL
);
-- CLASS ngExemplar
-- RELATION ngSituacaoExemplar(0..*) <----> (1..1)ngExemplar
ALTER TABLE EXEMPLAR ADD CONSTRAINT F2999ID_SITUACAOEXEMPLAR FOREIGN KEY (ID_SITUACAOEXEMPLAR) REFERENCES SITUACAOEXEMPLAR(ID_SITUACAOEXEMPLAR);
CREATE INDEX I2999ID_SITUACAOEXEMPLAR ON EXEMPLAR (ID_SITUACAOEXEMPLAR);
-- RELATION ngLivro(0..*) <----> (1..1)ngExemplar
ALTER TABLE EXEMPLAR ADD CONSTRAINT F2999ID_LIVRO FOREIGN KEY (ID_LIVRO) REFERENCES LIVRO(ID_LIVRO);
CREATE INDEX I2999ID_LIVRO ON EXEMPLAR (ID_LIVRO);
-- CLASS ngLivro
CREATE TABLE LIVRO (
ID_LIVRO INT PRIMARY KEY,
TITULO VARCHAR(200) NOT NULL,
AUTOR VARCHAR(128) NOT NULL,
EDICAO VARCHAR(64) NOT NULL
);
-- CLASS ngSituacaoExemplar
CREATE TABLE SITUACAOEXEMPLAR (
ID_SITUACAOEXEMPLAR INT PRIMARY KEY,
CODIGO VARCHAR(32) NOT NULL,
DESCRICAO VARCHAR(128) NOT NULL
);
<?xml version="1.0" encoding="UTF-8" ?>
<Config>
<Application DefaultSecurityDriver="NativeSecurityDriver">
<Service Name="svHelloWorld" DisplayName="Idexa - HelloWorld" Description="exemplo" Port="7878"/>
<Database ActiveConnectionString="ConnectionString1">
<ConnectionString1>Provider=SQLOLEDB.1;Password=conexo;Persist Security Info=True;User ID=sa;Initial Catalog=BD_HELLO_WORLD_THIAGO;Data Source=srvd1;Application Name=Produto;cxsqldialect=SQLServer</ConnectionString1>
</Database>
<UseXMLEncode version="1"/>
</Application>
</Config>
<?xml version="1.0" encoding="ISO-8859-1"?>
<SYSMSG><cliente idocliente="23" datahoraexportacao="2017-10-24T10:21:40" obs="Exemplo"/><categorias><C0000000001 codigo="0000000001" nome="Processos"/></categorias><guis><C0000000045 codigo="0000000045" descricao="Cadastro de Servidores" nome="itCadastroServidores"/><C0000000046 codigo="0000000046" descricao="Object Explorer" nome="itObjectExplorerV3"/><C0000000055 codigo="0000000055" descricao="Profiler" nome="itProfiler"/><C0000000060 codigo="0000000060" descricao="Control Panel V3" nome="itControlPanelV3"/><C0000000132 codigo="0000000132" descricao="itTracer" nome="itTracer"/><C0000000183 codigo="0000000183" descricao="itImportaConfiguracaoSistema" nome="itImportaConfiguracaoSistema"/><C0000000190 codigo="0000000190" descricao="Controle de Acessos" nome="itControleAcessos"/><C0000000193 codigo="0000000193" descricao="Cadastro usurio sistema" nome="itCadastroUsuarioSistemaV4"/><C0000000194 codigo="0000000194" descricao="itDetalhesAtualizacaoSistema" nome="itDetalhesAtualizacaoSistema"/><C0000000196 codigo="0000000196" descricao="Cadastro de Naturezas" nome="itCadastroNatureza"/><C0000000240 codigo="0000000240" descricao="itSQLProfiler" nome="itSQLProfiler"/><C0000000263 codigo="0000000263" descricao="itExplorerV4" nome="itExplorerV4"/><C0000000372 codigo="0000000372" descricao="Propriedades do Servio" nome="itPropriedadesDoServico"/><C0000000384 codigo="0000000384" descricao="Mapeamento Externo de Operaes" nome="itMapeamentoExternoOperacoes"/><C0000000398 codigo="0000000398" descricao="Event Log Analyser" nome="itEventLogAnalyser"/><C0000000594 codigo="0000000594" descricao="itCadastroPerfil" nome="itCadastroPerfil"/><C0000000671 codigo="0000000671" descricao="Ativao de Acesso" nome="itAtivacaoAcesso"/><C0000000832 codigo="0000000832" descricao="itDuplicarPermissoes" nome="itDuplicarPermissoes"/><C0000000856 codigo="0000000856" descricao="AlugarLivro" nome="itAlugarLivro"/><C0000001012 codigo="0000001012" descricao="ituCadastrarLivro" nome="ituCadastrarLivro"/><C0000001014 codigo="0000001014" descricao="Finaliza emprestimo em andamento" nome="FinalizarEmprestimo"/><C0000001018 codigo="0000001018" descricao="LivrosMaisEmprestados" nome="LivrosMaisEmprestados"/><C0000001092 codigo="0000001092" descricao="Novo Item de Cardapio" nome="NovoItemCardapio"/><C0000001095 codigo="0000001095" descricao="" nome="AlterarItemCardapio"/><C0000001097 codigo="0000001097" descricao="CadastroItemCardapio" nome="CadastroItemCardapio"/><C0000001100 codigo="0000001100" descricao="CadastroCliente" nome="CadastroCliente"/><C0000001101 codigo="0000001101" descricao="CadastroEntregador" nome="CadastroEntregador"/></guis><sistemasgui><C000000001700000000450000001153 codigo="000000001700000000450000001153" codigosistema="17" codigogui="45" codigocasodeuso="1153"/><C000000001700000000460000001156 codigo="000000001700000000460000001156" codigosistema="17" codigogui="46" codigocasodeuso="1156"/><C000000001700000000550000001154 codigo="000000001700000000550000001154" codigosistema="17" codigogui="55" codigocasodeuso="1154"/><C000000001700000000600000001155 codigo="000000001700000000600000001155" codigosistema="17" codigogui="60" codigocasodeuso="1155"/><C000000001700000001320000001300 codigo="000000001700000001320000001300" codigosistema="17" codigogui="132" codigocasodeuso="1300"/><C000000001700000002400000001408 codigo="000000001700000002400000001408" codigosistema="17" codigogui="240" codigocasodeuso="1408"/><C000000001700000002630000001432 codigo="000000001700000002630000001432" codigosistema="17" codigogui="263" codigocasodeuso="1432"/><C000000001700000003720000001536 codigo="000000001700000003720000001536" codigosistema="17" codigogui="372" codigocasodeuso="1536"/><C000000001700000003980000001611 codigo="000000001700000003980000001611" codigosistema="17" codigogui="398" codigocasodeuso="1611"/><C000000001900000001830000001327 codigo="000000001900000001830000001327" codigosistema="19" codigogui="183" codigocasodeuso="1327"/><C000000001900000001900000000104 codigo="000000001900000001900000000104" codigosistema="19" codigogui="190" codigocasodeuso="104"/><C000000001900000001930000000101 codigo="000000001900000001930000000101" codigosistema="19" codigogui="193" codigocasodeuso="101"/><C000000001900000001940000001359 codigo="000000001900000001940000001359" codigosistema="19" codigogui="194" codigocasodeuso="1359"/><C000000001900000001960000001360 codigo="000000001900000001960000001360" codigosistema="19" codigogui="196" codigocasodeuso="1360"/><C000000001900000003840000001578 codigo="000000001900000003840000001578" codigosistema="19" codigogui="384" codigocasodeuso="1578"/><C000000001900000005940000001963 codigo="000000001900000005940000001963" codigosistema="19" codigogui="594" codigocasodeuso="1963"/><C000000001900000006710000002121 codigo="000000001900000006710000002121" codigosistema="19" codigogui="671" codigocasodeuso="2121"/><C000000001900000008320000002431 codigo="000000001900000008320000002431" codigosistema="19" codigogui="832" codigocasodeuso="2431"/><C000000003800000008560000002480 codigo="000000003800000008560000002480" codigosistema="38" codigogui="856" codigocasodeuso="2480"/><C000000003800000010120000002480 codigo="000000003800000010120000002480" codigosistema="38" codigogui="1012" codigocasodeuso="2480"/><C000000003800000010140000002772 codigo="000000003800000010140000002772" codigosistema="38" codigogui="1014" codigocasodeuso="2772"/><C000000003800000010180000002480 codigo="000000003800000010180000002480" codigosistema="38" codigogui="1018" codigocasodeuso="2480"/><C000000003800000010920000002867 codigo="000000003800000010920000002867" codigosistema="38" codigogui="1092" codigocasodeuso="2867"/><C000000003800000010950000002867 codigo="000000003800000010950000002867" codigosistema="38" codigogui="1095" codigocasodeuso="2867"/><C000000003800000010970000002876 codigo="000000003800000010970000002876" codigosistema="38" codigogui="1097" codigocasodeuso="2876"/><C000000003800000011000000002877 codigo="000000003800000011000000002877" codigosistema="38" codigogui="1100" codigocasodeuso="2877"/><C000000003800000011010000002878 codigo="000000003800000011010000002878" codigosistema="38" codigogui="1101" codigocasodeuso="2878"/></sistemasgui><operacoes><C0000000001 codigo="0000000001" descricao="Inserir"/><C0000000002 codigo="0000000002" descricao="Consultar"/><C0000000003 codigo="0000000003" descricao="Atualizar"/><C0000000004 codigo="0000000004" descricao="Excluir"/><C0000000005 codigo="0000000005" descricao="Executar"/><C0000000006 codigo="0000000006" descricao="Processar"/></operacoes><casosdeuso><C0000000101 codigo="0000000101" nome="Cadastro de Usurio" descricao="Novo Usurio" codigocategoria="1" codigoentidade="13" codigoicone="12"/><C0000000104 codigo="0000000104" nome="Controle de Acessos" descricao="Controle de Acessos" codigocategoria="1" codigoentidade="13" codigoicone="1"/><C0000001153 codigo="0000001153" nome="Cadastro de Servidores" descricao="Cadastro de Servidores" codigocategoria="1" codigoentidade="136" codigoicone="10"/><C0000001154 codigo="0000001154" nome="Profiler" descricao="Profiler" codigocategoria="1" codigoentidade="136" codigoicone="1"/><C0000001155 codigo="0000001155" nome="Painel de Controle" descricao="Painel de Controle" codigocategoria="1" codigoentidade="136" codigoicone="1"/><C0000001156 codigo="0000001156" nome="Object Explorer" descricao="Object Explorer" codigocategoria="1" codigoentidade="136" codigoicone="1"/><C0000001300 codigo="0000001300" nome="Tracer" descricao="Tracer" codigocategoria="1" codigoentidade="136" codigoicone="1"/><C0000001327 codigo="0000001327" nome="Importa configurao sistema" descricao="Importa configurao sistema" codigocategoria="1" codigoentidade="168" codigoicone="1"/><C0000001359 codigo="0000001359" nome="Detalhes atualizao sistemas" descricao="Detalhes atualizao sistemas" codigocategoria="1" codigoentidade="168" codigoicone="12"/><C0000001360 codigo="0000001360" nome="Cadastro de Natureza" descricao="Cadastro de Natureza" codigocategoria="1" codigoentidade="169" codigoicone="10"/><C0000001408 codigo="0000001408" nome="SQL Profiler" descricao="SQL Profiler" codigocategoria="1" codigoentidade="136" codigoicone="1"/><C0000001432 codigo="0000001432" nome="Explorer V4" descricao="Explorer V4" codigocategoria="1" codigoentidade="136" codigoicone="1"/><C0000001536 codigo="0000001536" nome="Propriedades do Servio" descricao="Propriedades do Servio" codigocategoria="1" codigoentidade="136" codigoicone="1"/><C0000001578 codigo="0000001578" nome="Mapeamento Externo de Operaes" descricao="Mapeamento Externo de Operaes" codigocategoria="1" codigoentidade="168" codigoicone="1"/><C0000001603 codigo="0000001603" nome="SISMON EventLog Server" descricao="SISMON EventLog Server" codigocategoria="1" codigoentidade="136" codigoicone="1"/><C0000001611 codigo="0000001611" nome="ucuEventLogAnalyser" descricao="ucuEventLogAnalyser" codigocategoria="1" codigoentidade="136" codigoicone="1"/><C0000001612 codigo="0000001612" nome="ucSISMONEventLogClient" descricao="ucSISMONEventLogClient" codigocategoria="1" codigoentidade="136" codigoicone="1"/><C0000001654 codigo="0000001654" nome="Cadastro Aluno" descricao="Cadastro Aluno" codigocategoria="1" codigoentidade="14" codigoicone="1"/><C0000001655 codigo="0000001655" nome="Cadastro Turma (Treinamento)" descricao="Cadastro Turma (Treinamento)" codigocategoria="1" codigoentidade="15" codigoicone="1"/><C0000001656 codigo="0000001656" nome="Cadastro Disciplina (Treinamento)" descricao="Cadastro Disciplina (Treinamento)" codigocategoria="1" codigoentidade="3" codigoicone="1"/><C0000001657 codigo="0000001657" nome="Cadastro Aluno Graduacao (Treinamento)" descricao="Cadastro Aluno Graduacao (Treinamento)" codigocategoria="1" codigoentidade="1" codigoicone="1"/><C0000001963 codigo="0000001963" nome="Cadastro de Perfis" descricao="Cadastro de Perfis" codigocategoria="1" codigoentidade="316" codigoicone="10"/><C0000002121 codigo="0000002121" nome="Ativao de Acesso" descricao="Ativao de Acesso" codigocategoria="1" codigoentidade="13" codigoicone="1"/><C0000002431 codigo="0000002431" nome="ucDuplicarPermissoes" descricao="ucDuplicarPermissoes" codigocategoria="1" codigoentidade="13" codigoicone="6"/><C0000002480 codigo="0000002480" nome="AlugarLivro" descricao="Pessoa pega um livro emprestado" codigocategoria="1" codigoentidade="450" codigoicone="20"/><C0000002772 codigo="0000002772" nome="ucFinalizarEmprestimo" descricao="Devoluo de exemplar e fechamento do emprestimo" codigocategoria="1" codigoentidade="450" codigoicone="11"/><C0000002775 codigo="0000002775" nome="ucLivroMaisEmprestados" descricao="ucLivroMaisEmprestados" codigocategoria="1" codigoentidade="450" codigoicone="6"/><C0000002867 codigo="0000002867" nome="ucCadastroItemCardapio" descricao="Cadastro de Item de Cardapio" codigocategoria="1" codigoentidade="538" codigoicone="1"/><C0000002876 codigo="0000002876" nome="CadastroItemCardapio" descricao="casdastrar Item de Cardapio" codigocategoria="1" codigoentidade="538" codigoicone="1"/><C0000002877 codigo="0000002877" nome="CadastroCliente" descricao="Cadastra clientes" codigocategoria="1" codigoentidade="538" codigoicone="1"/><C0000002878 codigo="0000002878" nome="CadastroEntregador" descricao="CadastroEntregador" codigocategoria="1" codigoentidade="538" codigoicone="1"/><C0000002933 codigo="0000002933" nome="ucDemonstration" descricao="ucDemonstration" codigocategoria="1" codigoentidade="13" codigoicone="1"/><C0000002936 codigo="0000002936" nome="CreateQuestion" descricao="Creates a new question" codigocategoria="1" codigoentidade="506" codigoicone="1"/><C0000002937 codigo="0000002937" nome="CreateCategory" descricao="Creates a category" codigocategoria="1" codigoentidade="22" codigoicone="1"/><C0000002952 codigo="0000002952" nome="ucEfetuarEmprestimoLivro" descricao="ucEfetuarEmprestimoLivro" codigocategoria="1" codigoentidade="450" codigoicone="1"/><C0000002953 codigo="0000002953" nome="EfetuarEmprestimo" descricao="Efetuar emprstimo de livro" codigocategoria="1" codigoentidade="450" codigoicone="1"/><C0000002982 codigo="0000002982" nome="EfetuarEmprestimo" descricao="Efetuar um emprestimo de um livro" codigocategoria="1" codigoentidade="450" codigoicone="1"/><C0000003000 codigo="0000003000" nome="ReceberPedidoConfirmacaoCentralBonus" descricao="Recebe um pedido de confirmao da Central de Bonus" codigocategoria="1" codigoentidade="186" codigoicone="1"/><C0000003212 codigo="0000003212" nome="HelloWorld" descricao="Primeiro caso de uso do treinamento" codigocategoria="1" codigoentidade="371" codigoicone="1"/><C0000003214 codigo="0000003214" nome="HelloWorld" descricao="caso de uso de exemplo" codigocategoria="1" codigoentidade="371" codigoicone="1"/><C0000003215 codigo="0000003215" nome="HelloWorld" descricao="caso de uso de exemplo" codigocategoria="1" codigoentidade="371" codigoicone="1"/><C0000003216 codigo="0000003216" nome="HelloWorld" descricao="caso de uso de exemplo" codigocategoria="1" codigoentidade="371" codigoicone="23"/></casosdeuso><casosdeusosistema><C00000000170000001153 codigo="00000000170000001153" codigosistema="17" codigocasodeuso="1153"/><C00000000170000001154 codigo="00000000170000001154" codigosistema="17" codigocasodeuso="1154"/><C00000000170000001155 codigo="00000000170000001155" codigosistema="17" codigocasodeuso="1155"/><C00000000170000001156 codigo="00000000170000001156" codigosistema="17" codigocasodeuso="1156"/><C00000000170000001300 codigo="00000000170000001300" codigosistema="17" codigocasodeuso="1300"/><C00000000170000001408 codigo="00000000170000001408" codigosistema="17" codigocasodeuso="1408"/><C00000000170000001432 codigo="00000000170000001432" codigosistema="17" codigocasodeuso="1432"/><C00000000170000001536 codigo="00000000170000001536" codigosistema="17" codigocasodeuso="1536"/><C00000000170000001603 codigo="00000000170000001603" codigosistema="17" codigocasodeuso="1603"/><C00000000170000001611 codigo="00000000170000001611" codigosistema="17" codigocasodeuso="1611"/><C00000000170000001612 codigo="00000000170000001612" codigosistema="17" codigocasodeuso="1612"/><C00000000190000000101 codigo="00000000190000000101" codigosistema="19" codigocasodeuso="101"/><C00000000190000000104 codigo="00000000190000000104" codigosistema="19" codigocasodeuso="104"/><C00000000190000001327 codigo="00000000190000001327" codigosistema="19" codigocasodeuso="1327"/><C00000000190000001359 codigo="00000000190000001359" codigosistema="19" codigocasodeuso="1359"/><C00000000190000001360 codigo="00000000190000001360" codigosistema="19" codigocasodeuso="1360"/><C00000000190000001578 codigo="00000000190000001578" codigosistema="19" codigocasodeuso="1578"/><C00000000190000001963 codigo="00000000190000001963" codigosistema="19" codigocasodeuso="1963"/><C00000000190000002121 codigo="00000000190000002121" codigosistema="19" codigocasodeuso="2121"/><C00000000190000002431 codigo="00000000190000002431" codigosistema="19" codigocasodeuso="2431"/><C00000000380000001536 codigo="00000000380000001536" codigosistema="38" codigocasodeuso="1536"/><C00000000380000001654 codigo="00000000380000001654" codigosistema="38" codigocasodeuso="1654"/><C00000000380000001655 codigo="00000000380000001655" codigosistema="38" codigocasodeuso="1655"/><C00000000380000001656 codigo="00000000380000001656" codigosistema="38" codigocasodeuso="1656"/><C00000000380000001657 codigo="00000000380000001657" codigosistema="38" codigocasodeuso="1657"/><C00000000380000002480 codigo="00000000380000002480" codigosistema="38" codigocasodeuso="2480"/><C00000000380000002772 codigo="00000000380000002772" codigosistema="38" codigocasodeuso="2772"/><C00000000380000002775 codigo="00000000380000002775" codigosistema="38" codigocasodeuso="2775"/><C00000000380000002867 codigo="00000000380000002867" codigosistema="38" codigocasodeuso="2867"/><C00000000380000002876 codigo="00000000380000002876" codigosistema="38" codigocasodeuso="2876"/><C00000000380000002877 codigo="00000000380000002877" codigosistema="38" codigocasodeuso="2877"/><C00000000380000002878 codigo="00000000380000002878" codigosistema="38" codigocasodeuso="2878"/><C00000000380000002933 codigo="00000000380000002933" codigosistema="38" codigocasodeuso="2933"/><C00000000380000002936 codigo="00000000380000002936" codigosistema="38" codigocasodeuso="2936"/><C00000000380000002937 codigo="00000000380000002937" codigosistema="38" codigocasodeuso="2937"/><C00000000380000002952 codigo="00000000380000002952" codigosistema="38" codigocasodeuso="2952"/><C00000000380000002953 codigo="00000000380000002953" codigosistema="38" codigocasodeuso="2953"/><C00000000380000002982 codigo="00000000380000002982" codigosistema="38" codigocasodeuso="2982"/><C00000000380000003212 codigo="00000000380000003212" codigosistema="38" codigocasodeuso="3212"/><C00000000380000003214 codigo="00000000380000003214" codigosistema="38" codigocasodeuso="3214"/><C00000000380000003215 codigo="00000000380000003215" codigosistema="38" codigocasodeuso="3215"/><C00000000380000003216 codigo="00000000380000003216" codigosistema="38" codigocasodeuso="3216"/><C00000000720000003000 codigo="00000000720000003000" codigosistema="72" codigocasodeuso="3000"/></casosdeusosistema><casodeusooperacoes><C00000000010000000101 codigo="00000000010000000101" codigooperacao="1" codigocasodeuso="101"/><C00000000010000001153 codigo="00000000010000001153" codigooperacao="1" codigocasodeuso="1153"/><C00000000010000001360 codigo="00000000010000001360" codigooperacao="1" codigocasodeuso="1360"/><C00000000010000001654 codigo="00000000010000001654" codigooperacao="1" codigocasodeuso="1654"/><C00000000010000001655 codigo="00000000010000001655" codigooperacao="1" codigocasodeuso="1655"/><C00000000010000001656 codigo="00000000010000001656" codigooperacao="1" codigocasodeuso="1656"/><C00000000010000001657 codigo="00000000010000001657" codigooperacao="1" codigocasodeuso="1657"/><C00000000010000001963 codigo="00000000010000001963" codigooperacao="1" codigocasodeuso="1963"/><C00000000010000002867 codigo="00000000010000002867" codigooperacao="1" codigocasodeuso="2867"/><C00000000010000002876 codigo="00000000010000002876" codigooperacao="1" codigocasodeuso="2876"/><C00000000010000002877 codigo="00000000010000002877" codigooperacao="1" codigocasodeuso="2877"/><C00000000010000002878 codigo="00000000010000002878" codigooperacao="1" codigocasodeuso="2878"/><C00000000010000002936 codigo="00000000010000002936" codigooperacao="1" codigocasodeuso="2936"/><C00000000010000002937 codigo="00000000010000002937" codigooperacao="1" codigocasodeuso="2937"/><C00000000010000002952 codigo="00000000010000002952" codigooperacao="1" codigocasodeuso="2952"/><C00000000010000002953 codigo="00000000010000002953" codigooperacao="1" codigocasodeuso="2953"/><C00000000020000000101 codigo="00000000020000000101" codigooperacao="2" codigocasodeuso="101"/><C00000000020000001153 codigo="00000000020000001153" codigooperacao="2" codigocasodeuso="1153"/><C00000000020000001359 codigo="00000000020000001359" codigooperacao="2" codigocasodeuso="1359"/><C00000000020000001654 codigo="00000000020000001654" codigooperacao="2" codigocasodeuso="1654"/><C00000000020000001655 codigo="00000000020000001655" codigooperacao="2" codigocasodeuso="1655"/><C00000000020000001656 codigo="00000000020000001656" codigooperacao="2" codigocasodeuso="1656"/><C00000000020000001657 codigo="00000000020000001657" codigooperacao="2" codigocasodeuso="1657"/><C00000000020000001963 codigo="00000000020000001963" codigooperacao="2" codigocasodeuso="1963"/><C00000000020000002867 codigo="00000000020000002867" codigooperacao="2" codigocasodeuso="2867"/><C00000000020000002876 codigo="00000000020000002876" codigooperacao="2" codigocasodeuso="2876"/><C00000000020000002877 codigo="00000000020000002877" codigooperacao="2" codigocasodeuso="2877"/><C00000000020000002878 codigo="00000000020000002878" codigooperacao="2" codigocasodeuso="2878"/><C00000000020000002936 codigo="00000000020000002936" codigooperacao="2" codigocasodeuso="2936"/><C00000000020000002937 codigo="00000000020000002937" codigooperacao="2" codigocasodeuso="2937"/><C00000000020000002952 codigo="00000000020000002952" codigooperacao="2" codigocasodeuso="2952"/><C00000000030000000101 codigo="00000000030000000101" codigooperacao="3" codigocasodeuso="101"/><C00000000030000001153 codigo="00000000030000001153" codigooperacao="3" codigocasodeuso="1153"/><C00000000030000001360 codigo="00000000030000001360" codigooperacao="3" codigocasodeuso="1360"/><C00000000030000001654 codigo="00000000030000001654" codigooperacao="3" codigocasodeuso="1654"/><C00000000030000001655 codigo="00000000030000001655" codigooperacao="3" codigocasodeuso="1655"/><C00000000030000001656 codigo="00000000030000001656" codigooperacao="3" codigocasodeuso="1656"/><C00000000030000001657 codigo="00000000030000001657" codigooperacao="3" codigocasodeuso="1657"/><C00000000030000001963 codigo="00000000030000001963" codigooperacao="3" codigocasodeuso="1963"/><C00000000030000002772 codigo="00000000030000002772" codigooperacao="3" codigocasodeuso="2772"/><C00000000030000002867 codigo="00000000030000002867" codigooperacao="3" codigocasodeuso="2867"/><C00000000030000002876 codigo="00000000030000002876" codigooperacao="3" codigocasodeuso="2876"/><C00000000030000002877 codigo="00000000030000002877" codigooperacao="3" codigocasodeuso="2877"/><C00000000030000002878 codigo="00000000030000002878" codigooperacao="3" codigocasodeuso="2878"/><C00000000030000002936 codigo="00000000030000002936" codigooperacao="3" codigocasodeuso="2936"/><C00000000030000002937 codigo="00000000030000002937" codigooperacao="3" codigocasodeuso="2937"/><C00000000030000002952 codigo="00000000030000002952" codigooperacao="3" codigocasodeuso="2952"/><C00000000040000000101 codigo="00000000040000000101" codigooperacao="4" codigocasodeuso="101"/><C00000000040000001153 codigo="00000000040000001153" codigooperacao="4" codigocasodeuso="1153"/><C00000000040000001360 codigo="00000000040000001360" codigooperacao="4" codigocasodeuso="1360"/><C00000000040000001654 codigo="00000000040000001654" codigooperacao="4" codigocasodeuso="1654"/><C00000000040000001655 codigo="00000000040000001655" codigooperacao="4" codigocasodeuso="1655"/><C00000000040000001656 codigo="00000000040000001656" codigooperacao="4" codigocasodeuso="1656"/><C00000000040000001657 codigo="00000000040000001657" codigooperacao="4" codigocasodeuso="1657"/><C00000000040000001963 codigo="00000000040000001963" codigooperacao="4" codigocasodeuso="1963"/><C00000000040000002867 codigo="00000000040000002867" codigooperacao="4" codigocasodeuso="2867"/><C00000000040000002876 codigo="00000000040000002876" codigooperacao="4" codigocasodeuso="2876"/><C00000000040000002877 codigo="00000000040000002877" codigooperacao="4" codigocasodeuso="2877"/><C00000000040000002878 codigo="00000000040000002878" codigooperacao="4" codigocasodeuso="2878"/><C00000000040000002936 codigo="00000000040000002936" codigooperacao="4" codigocasodeuso="2936"/><C00000000040000002937 codigo="00000000040000002937" codigooperacao="4" codigocasodeuso="2937"/><C00000000040000002952 codigo="00000000040000002952" codigooperacao="4" codigocasodeuso="2952"/><C00000000050000001154 codigo="00000000050000001154" codigooperacao="5" codigocasodeuso="1154"/><C00000000050000001155 codigo="00000000050000001155" codigooperacao="5" codigocasodeuso="1155"/><C00000000050000001156 codigo="00000000050000001156" codigooperacao="5" codigocasodeuso="1156"/><C00000000050000001300 codigo="00000000050000001300" codigooperacao="5" codigocasodeuso="1300"/><C00000000050000001327 codigo="00000000050000001327" codigooperacao="5" codigocasodeuso="1327"/><C00000000050000001408 codigo="00000000050000001408" codigooperacao="5" codigocasodeuso="1408"/><C00000000050000001432 codigo="00000000050000001432" codigooperacao="5" codigocasodeuso="1432"/><C00000000050000001536 codigo="00000000050000001536" codigooperacao="5" codigocasodeuso="1536"/><C00000000050000001578 codigo="00000000050000001578" codigooperacao="5" codigocasodeuso="1578"/><C00000000050000001603 codigo="00000000050000001603" codigooperacao="5" codigocasodeuso="1603"/><C00000000050000001611 codigo="00000000050000001611" codigooperacao="5" codigocasodeuso="1611"/><C00000000050000001612 codigo="00000000050000001612" codigooperacao="5" codigocasodeuso="1612"/><C00000000050000002121 codigo="00000000050000002121" codigooperacao="5" codigocasodeuso="2121"/><C00000000050000002431 codigo="00000000050000002431" codigooperacao="5" codigocasodeuso="2431"/><C00000000050000002480 codigo="00000000050000002480" codigooperacao="5" codigocasodeuso="2480"/><C00000000050000002775 codigo="00000000050000002775" codigooperacao="5" codigocasodeuso="2775"/><C00000000050000002933 codigo="00000000050000002933" codigooperacao="5" codigocasodeuso="2933"/><C00000000050000002952 codigo="00000000050000002952" codigooperacao="5" codigocasodeuso="2952"/><C00000000050000002953 codigo="00000000050000002953" codigooperacao="5" codigocasodeuso="2953"/><C00000000050000003000 codigo="00000000050000003000" codigooperacao="5" codigocasodeuso="3000"/><C00000000060000000104 codigo="00000000060000000104" codigooperacao="6" codigocasodeuso="104"/><C00000000060000001154 codigo="00000000060000001154" codigooperacao="6" codigocasodeuso="1154"/><C00000000060000001155 codigo="00000000060000001155" codigooperacao="6" codigocasodeuso="1155"/><C00000000060000001156 codigo="00000000060000001156" codigooperacao="6" codigocasodeuso="1156"/><C00000000060000001300 codigo="00000000060000001300" codigooperacao="6" codigocasodeuso="1300"/><C00000000060000001327 codigo="00000000060000001327" codigooperacao="6" codigocasodeuso="1327"/><C00000000060000001432 codigo="00000000060000001432" codigooperacao="6" codigocasodeuso="1432"/><C00000000060000001536 codigo="00000000060000001536" codigooperacao="6" codigocasodeuso="1536"/><C00000000060000001603 codigo="00000000060000001603" codigooperacao="6" codigocasodeuso="1603"/><C00000000060000001611 codigo="00000000060000001611" codigooperacao="6" codigocasodeuso="1611"/><C00000000060000001612 codigo="00000000060000001612" codigooperacao="6" codigocasodeuso="1612"/><C00000000060000002121 codigo="00000000060000002121" codigooperacao="6" codigocasodeuso="2121"/><C00000000060000002772 codigo="00000000060000002772" codigooperacao="6" codigocasodeuso="2772"/><C00000000060000002933 codigo="00000000060000002933" codigooperacao="6" codigocasodeuso="2933"/><C00000000060000002952 codigo="00000000060000002952" codigooperacao="6" codigocasodeuso="2952"/><C00000000060000002953 codigo="00000000060000002953" codigooperacao="6" codigocasodeuso="2953"/><C00000000060000002982 codigo="00000000060000002982" codigooperacao="6" codigocasodeuso="2982"/><C00000000060000003214 codigo="00000000060000003214" codigooperacao="6" codigocasodeuso="3214"/><C00000000060000003215 codigo="00000000060000003215" codigooperacao="6" codigocasodeuso="3215"/><C00000000060000003216 codigo="00000000060000003216" codigooperacao="6" codigocasodeuso="3216"/></casodeusooperacoes><niveis/><icones><C0000000001 codigo="0000000001" descricao="Processo" imagem="424D420800000000000042000000280000002000000020000000010010000300000000080000120B0000120B00000000000000000000007C0000E00300001F000000FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F7A6FD6561432F42DD22DD752FF7F9B735A6FF75ED65E5A6FDE7BFF7BFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FDD7B39677546D3299315372E940D372E1A5B7446D131B225D325B025AE35185FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F1863343AB3219411940D9509940D940D940DDA46730D7409940DD51518227211F8567B6BFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F1B57B419740D9509950D950D7409372E372E372ED90D75057409D515FA113A22D515D84A9452FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FDA467409540D740D950D950D7409F6217B32B905780197057505FA11FA11FA11D515D51D5346FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F9E6FD61D5409740D74097409950DB93E7B32B905B905B909B905F911FA11FA11D5155405734AFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FDD7B5A6FF5295409540D172AF61DD6197B327B32B905FA0DFA11D909DA0DFA11FA11BA0952091042FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F39675346D229B415740D53093C5FDC42DB427B327B327B2E1A1A1A1AFA11FA11FA11FA119A0196056D259456FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F3B5FB41D530974059509740D54095D63FC46BC3ABC3A7B325B265B263A1E5B265B26FA11FA11D909DA09720D6D29113EF85A5B631963DE7BFF7FFF7FFF7FFF7F793654097409950D950D750997053D577D5FBC3ABC3A7B2E7B327B2E5B265B265B265B261A16FA15FA11D90D3109152A563656368D31596BFF7FFF7FFF7FFF7F5836740D750D960DB80DF911FA117B2EBE6B9E67BC3EBC3A9B369B329B367E5F7D67FA56FC465B2A1A16FA11FA15FA15FA15B8054F19524EDE7BFF7FFF7FFF7F7936B709D9111A161B1A3B225B267B2E9E677E633D57DC42DC3EBB3A1D4B9D67D2350D213446FB527B2A1A16FA11FA11FA11DA09950DAE357B6FFF7FFF7FFF7F3C5F39221A1A5B267B2A9B329B36FD4ABE673D539E6B1D53DC42DC467E5FD852CC188A108C10F339DB46DC3AFA15FA15FA151A16B80DB1295A6FFF7FFF7FFF7FFF7F7D6779367A2EBC3ADC42DC46DC46DC463D579E6B7D63DC461D4F9E6734428B10EE18CE10EF0C783E7E63BC3E3B223B221A1AF719D84EFF7FFF7FFF7FFF7FFF7FFF7F9D6F9A3EDC461D533D573D579E677E67BF739E6B1D4F7E5B9E67F4358C0C0F151011F10058327E63BC3E7B2A5B26B419964EFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F1B57FC4E7E5F9E67BE6BBE6FDE77FF7B9E6B3D579E63BF6B573EEE10110D33095505FC467E63BC3E9B367B2A7119D55EFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F3B5BFB52BE6FDE6FFF77FF7FFF7FBE6F7E637D5F9E679E631C53D525120535013A225D575D5BDC46BC3ABC369219514AFF7FFF7FFF7FFF7FFF7FFF7FFF7FBC7B76423C5BDF73DF6FDF73BE6FDF779E677E639E67BE6B7E635E5FFB4EB8117801DC3A5D5B5D5BFC4ADC42DD3EF6216C29F662FF7FFF7FFF7FFF7FFF7F9D6F773E5832FC4ABE6B7D5FFC4ADC42BE6FBE739E6BBE6BBE6B7E635E5F7E5F1D4FDC427E5F9E675D5BFC4AFC46FC46BB3AB31D6C299456BD77FF7FFF7FFF7F1B57191E5B261D4B9E631D4F1C4F1C4F7E67FF7FBE73BE6FDF739E677E637E637E639E67BE6B7E5F3D571D531D4FFC4AFC46BB3EF5256D259452BD77FF7FFF7F7D6739269B369E635D5B5D5B7E677E673D5BDB46D8113B22FC4EDF779E6B7E677E67BE6B9E675D5F5D5B3D573D531D531D4FFD4AFC461626F0357B73FF7FFF7FFF7F1B533C539E633D573D5B1C537932B70DD8113B223B2298093D5BFF7B9E6F9E6BBE6F9E6B7E637D5F5D5F3D5B5E5B7E5B3D531D4F7A36F1317A6FFF7FFF7FFF7FFF7F3C579A3ABA46372A560176017805D811D90DB90578011A1EBE6FDF77BE6FBE6F9E6B9E677E677E637E63FB52363A5D5F7E637932F2319B73FF7FFF7FFF7FFF7F7D677D6B9D6F5C5FF71977013A1ED90DD90D9901D90DFA153D5BFF7FBE6FBE6FBE6F9E6F9E6B9E6B9E6B162EF1009515993A783AD752FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F3C5BF8153B223B22D90D1A1A1A1A5B265D5FFF7FDF6FBE6FBE73BE73BE6FBF6F7E67D61D5405B619783A3B5BFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F5C5B3B221A1A3A1E5B2A7B2EDC42BE6FFF7BFF73FA52B521382E7E67DE73DF77993A8F213963FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F7D5F3A223B229B32DC465D5FDF77DF7BDF77FF7B793A350137017B2EDF77DF7B7D678F25B45AFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F592E1A1A9B32DC465D5F9E6B7E637E63DF77BE775A26B905DA09FA117E63FF7FFF7F5636F039FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F3826F915BC3AFD4A3D573D575D579E631D4F9B321A1A1A165B225B26DC42BE6F7D67783A964AFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F1B53F81D7A32FC4ADB46DB4A7D631C4FF915FA115B227B2E7B2E7A2E592ABA42B946FA52FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F3C5B7936582E983E1B53DE731C57191E7B2E7B32592A582A7936B9465B5FBE73FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FBE733C5F9D6FFF73FF7FFF7FBA4638267836DA4A3B5FBD73FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F"/><C0000000006 codigo="0000000006" descricao="Avanar" imagem="424D360C000000000000360000002800000020000000200000000100180000000000000C0000120B0000120B00000000000000000000C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4B0C1BB95AF9F96AFA097AFA195AD9F9AAFA4ABC1B6C2CCCEC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C9D1D5C8D0D4C8D0D4A1B8AA6E9973477B4A38713A327738327637337538317437326F3738643B49694E68806F99AAA2C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4ABC1B670A07842884617791D006D01007100007E03007D01007B00007B00007600006500005D000D5E103B6E406B867299AAA2C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4A1BCAB47904E006E00007B0708941C0FAF2A10BC2C0EBA270CB9230AB81E09B71A07B81604B81201AE0C008F0300630000480030633489A192C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D490B69826802A037B0A119E2C17B53816B63714B53211B52E11B52B0FB4250DB3220BB31F09B21A07B01607AF1304AE0F00A70A019508035B032559287D9685C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D484B18C2483260A8E1E11A7331BB7421BBD4319BA3E17B83914B6340CB32A00AE1A00AC1400AE1608B21D09B21E09B21A07B21504B21202AD0D009B0501630027572B7D9686C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D497B99E2A8D2E048A1616AD3F23C25620BE4E1DBA471CB94318B83D1BB83D33C0506FD28280D79054CA680AB32409B32209B21E0AB11C08B11905B11304B911009604006500245C288FA698C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4AACDB452A05700870922B44E27C05C25C05822BD5220BB4D1FBB4B15B8402ABD4D79D78FF8FDFAFFFFFFD6F2DB52C9671BB8340AB3230BB3210AB21E08B11A07B11806BA14009D07006101396E3DA0B1AAC8D0D4C8D0D4C8D0D4C8D0D4C8D0D464A76615932119A83F29BF612AC26228BF5C25BE5723BD5422BC5114B74239C25E9DE2AFF2FBF4FFFFFFFFFFFFDDF3E154CA6918B8330BB3240CB3230CB3210AB21D08B21806AF1505990F00530074927BC8D0D4C8D0D4C8D0D4C8D0D4AACDB4409A400194172CBE662EC26B2CC26829C16228BF5E27BE5C24BD561CBB4D2BBF566DD38AEFFAF2FFFFFFFFFFFFFCFEFDDBF4E057CA6C09B2260AB2260EB4270CB3230BB31F09B41B06AA15006D00447D4AA3B4ADC8D0D4C8D0D4C8D0D488BB912D9D3409A32B33C7752FC26D2EC26B2DC2692BC1662AC06128BF5D24BF5822BD5436C3617FD89AE4F7EAFFFFFFFFFFFFFFFFFFCCEFD363CE780AB32A0CB3290EB4290FB4260CB5210AB11C038F0D106B186C8E73C8D0D4C8D0D4C8D0D450AA5627A73B1CB34932C5722FC26C2EC26B2BC16A29C16727C06326BF6124BF5D1FBD561ABB501BBA4F81D99DDCF5E4FFFFFFFFFFFFFFFFFFD1F1D859CC701AB8390FB52E10B52B0FB5270EB32509AC1D00680047764BABC1B6C8D0D4C8D0D42DA23124AD4126BC5C30C36F2FC26C31C36E35C47037C47237C47236C36F33C26B31C2672FC26429BF5C2BBF5A85DA9FFAFEFBFFFFFFFFFFFFFFFFFFDCF5E258CC7220BA3F10B42F11B52F10B42C0FBE2900720037703AABC1B6C8D0D4C8D0D4139D151DAC392ABD612FC36E2DC16B49C97E6ED59985DCA980DAA580DAA580D9A47ED9A27DD99F7BD99C75D69690DDA8CAEFD5FAFDFBFFFFFFFFFFFFFBFEFCDEF5E358CC7111B5330FB43012B63012BB2F008409337F3A9AB6A4C8D0D4C8D0D4039B041EB34331C4712EC26B2CC16A67D393BAEBCEE3F7EBE0F6E9E0F6E9E1F6EAE0F6E9E0F6E8E0F6E8DDF5E5DCF5E4E7F8ECFDFEFDFFFFFFFFFFFFFFFFFFFFFFFFD2F1D970D38520BA4115B73615BC36008B0E33853A95B39FC8D0D4C8D0D4009D001FB74935C6782DC16A2BC16977D89EE0F6E9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA0E2B021BB4718B83D17BD3C008D1134893C97B6A1C8D0D4C8D0D404A2051FB64331C3702DC26B2BC1696DD597C8EFD8F3FCF7F3FBF6F3FBF6F3FBF6F3FBF6F3FBF6F3FCF6F1FBF5F4FCF7FBFEFCFFFFFFFFFFFFFFFFFFFFFFFFFDFEFDDBF4E469D18714B7411BB9441BBD43008F14338A3B96B8A0C8D0D4C8D0D416A91924B5412DC0662CC26C2CC16B54CC868BDDADAAE7C3A5E5BFA5E5BFA5E5BFA5E5BFA5E5BFA5E5BF9CE2B9B2E9C8E4F7EBFCFEFDFFFFFFFFFFFFFFFFFFE7F8ED65D08821BC521EBA4C1DBB481FC04B008B1430843694B79EC8D0D4C8D0D42FB23430B94539C3653DC6782FC16C34C37042C7794ACA7F48CA7E48CA7E48CA7E49CA7E48C97D3CC67551CC83A5E5BFF5FCF8FEFFFEFFFFFFFFFFFFD9F4E369D3902CC0611DBC5323BD5421BC5022C15200830735843794B79EC8D0D4C8D0D45ABC5F36B9413EC45A5ED08E42C77734C46F28C06721BD6223BF6424BF6425BF6522BE6322BF632EC26B81DAA6D5F3E1FFFFFFFFFFFFFFFFFFD6F3E372D69A25BF6124BE5F28C05F26BF5B25BE571EB74C0A8714519353ABC1B6C8D0D4C8D0D490C79835B63830BF3E78D79C62D18A52CC813FC77531C26E30C26D2EC26C2EC26B2CC16A3EC77787DCAAEAF9F0FFFFFFFFFFFFFEFFFEDAF4E472D69C1DBD5F2EC26B2EC1692BC0652BC26327BF5C10A0312A933780AC87C8D0D4C8D0D4C8D0D4C8D0D43BB83D1DBA2375D48D7BD8996BD49258CE8547C97B37C5712FC26D2AC16932C36E64D191E6F7EDFEFFFEFFFFFFFDFEFEE8F8EE6ED49828C1682EC26B2FC26C2FC26C2FC26C2EC46B28BE5E008A104A9A50ABC1B6C8D0D4C8D0D4C8D0D4C8D0D473C27926B82A40C54A9CE1B18BDDA970D59361D08A4FCB7E41C6772CC16B34C37076D69DFAFDFBFFFFFFFFFFFFDDF5E66DD59834C46F28C0672FC26C2FC26C2FC26C31C5712CBF671FAC470D8A167BAE80C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D45BBF6110B9116DD275A1E2B29EE2B67DD89C6CD4915DCF8847C97B3BC57356CD87BCECD0E7F8EEC8EFD86ED5982DC26B27C0672FC26C2FC26C2FC26C30C36F33C6741FB24F0B91185DA8639AC1A0C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4A2CAAB3ABD3D2ABE2B7AD77FAEE6BAA5E3BA8BDDA57BD89B6AD29051CB8041C7776DD59791DFB166D29320BE612CC16A2FC26C2FC26C2FC26D30C36F2FC26C1FB650129F2B2F952D9AC1A0C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4AACDB434BD362DC22D7CD87FBBE9C5A2E2B295DFAC85DAA172D69560D0894FCB7F38C4712EC16A30C26C2FC26C2FC26C2FC26C2FC26C2EC16A24B854059B182498268FBE98C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4AACDB43ABF3D14BE1254CF56A6E4ABB8E8C6A9E4BD8EDEA97AD89D6AD39154CD8245C8793CC67530C26F30C37134C6752BBF6515AF3900990632A3368EBE95C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4AACDB45BC3602CC02D30C62F49CC4C71D57889DA9689DB9D87DBA280D9A368D29046C87232C0611CB94806AE2805A71925A93055AF599AC1A0C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D471C57836BD3A2FBD3146C4475DCA615FCC6557CB6257CB6747C55A31BC4631B9452DB43E2CAD3444AD4477BA7CC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D490CA9858C35D34BC3723B72406B20600AF0003AD0313AE152DB2305AB9609AC1A0C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4"/><C0000000010 codigo="0000000010" descricao="Novo" imagem="424D360800000000000036040000280000002000000020000000010008000000000000040000120B0000120B000000010000000000000000000000008000008000000080800080000000800080008080000080808000C0DCC000F0CAA600AA3F2A00FF3F2A00005F2A00555F2A00AA5F2A00FF5F2A00007F2A00557F2A00AA7F2A00FF7F2A00009F2A00559F2A00AA9F2A00FF9F2A0000BF2A0055BF2A00AABF2A00FFBF2A0000DF2A0055DF2A00AADF2A00FFDF2A0000FF2A0055FF2A00AAFF2A00FFFF2A000000550055005500AA005500FF005500001F5500551F5500AA1F5500FF1F5500003F5500553F5500AA3F5500FF3F5500005F5500555F5500AA5F5500FF5F5500007F5500557F5500AA7F5500FF7F5500009F5500559F5500AA9F5500FF9F550000BF550055BF5500AABF5500FFBF550000DF550055DF5500AADF5500FFDF550000FF550055FF5500AAFF5500FFFF550000007F0055007F00AA007F00FF007F00001F7F00551F7F00AA1F7F00FF1F7F00003F7F00553F7F00AA3F7F00FF3F7F00005F7F00555F7F00AA5F7F00FF5F7F00007F7F00557F7F00AA7F7F00FF7F7F00009F7F00559F7F00AA9F7F00FF9F7F0000BF7F0055BF7F00AABF7F00FFBF7F0000DF7F0055DF7F00AADF7F00FFDF7F0000FF7F0055FF7F00AAFF7F00FFFF7F000000AA005500AA00AA00AA00FF00AA00001FAA00551FAA00AA1FAA00FF1FAA00003FAA00553FAA00AA3FAA00FF3FAA00005FAA00555FAA00AA5FAA00FF5FAA00007FAA00557FAA00AA7FAA00FF7FAA00009FAA00559FAA00AA9FAA00FF9FAA0000BFAA0055BFAA00AABFAA00FFBFAA0000DFAA0055DFAA00AADFAA00FFDFAA0000FFAA0055FFAA00AAFFAA00FFFFAA000000D4005500D400AA00D400FF00D400001FD400551FD400AA1FD400FF1FD400003FD400553FD400AA3FD400FF3FD400005FD400555FD400AA5FD400FF5FD400007FD400557FD400AA7FD400FF7FD400009FD400559FD400AA9FD400FF9FD40000BFD40055BFD400AABFD400FFBFD40000DFD40055DFD400AADFD400FFDFD40000FFD40055FFD400AAFFD400FFFFD4005500FF00AA00FF00001FFF00551FFF00AA1FFF00FF1FFF00003FFF00553FFF00AA3FFF00FF3FFF00005FFF00555FFF00AA5FFF00FF5FFF00007FFF00557FFF00AA7FFF00FF7FFF00009FFF00559FFF00AA9FFF00FF9FFF0000BFFF0055BFFF00AABFFF00FFBFFF0000DFFF0055DFFF00AADFFF00FFDFFF0055FFFF00AAFFFF00FFCCCC00FFCCFF00FFFF3300FFFF6600FFFF9900FFFFCC00007F0000557F0000AA7F0000FF7F0000009F0000559F0000AA9F0000FF9F000000BF000055BF0000AABF0000FFBF000000DF000055DF0000AADF0000FFDF000055FF0000AAFF000000002A0055002A00AA002A00FF002A00001F2A00551F2A00AA1F2A00FF1F2A00003F2A00553F2A00F0FBFF00A4A0A000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FBFBFBFBFBFBF707F707F70707F70707F707F707F70707F70707F70707F7F707FBFBFBFBFBFB07AAAFF6AFF6AFAFF6AFAFF6AFAFF6AFF6AFF6AFF6AFF6AF0807FBFBFBFBFBFB07AFF6FFF6FFFFFFF6F6F6F6F6F6F6F6FFFFFFFFFFFFFFFFAF07FBFBFBFBFBFB07AFFFF6AFF6F6F6AFF6F6AFF6F6AFF6AFD0AF08D108F60808F7FBFBFBFBFBFBF708FFF6D1F6AFF6F6AFF6F6AFF6D108AFAFF6AFF6AFF6F6AF07FBFBFBFBFB6561656165656189AFF6F6AFF6F6AFF6F6F6D0AFF608D108AFF607FBFBFBFBFB898D8E8D8D8D8989F6F6AFF6F6AFF6F6AFF6AFF608AFF6AFF6AF07FBFBFBFBFB658D656489658D65D1AFF6F6AFF6F6AFF6AFF6F6AFF6F608D10807FBFBFBFBFB6589898D8D8D8965D1F6F6AFF6AFF6F6F6F6AFF6F6F6AFF6AFF607FBFBFBFBFB898D8D898D8D8D89B3D1F6D1F6F6AFF6AFF6F6AFF6AFF6F6F6AF07FBFBFBFBFB65898D8D8D8D8985F6F6F6F6F6AFD1F6F6AFF6F6F6F6AFF6AFD1070808AE8A8A858D8D8D8D8D89658A8A8A8AAEF6F6F6AFF6F6AFF6AFF6F6F60807613C41646589898D898D8D8D896565643D61AFF6AFF6F6AFF6F6F6AFF6AFAF07613D65656569898D8D8D8D898D656565653DF6F6F6AFF6F6AFF6AFF6F6F6F6073D60416465658D658D89658C65656564413DF6F6B3F6F6AFF6F6F6AFF6AFAF07613D4165656564898D658D89656441413C61F6FFD1FFAFF6D1F6AFF6F6F608F73D3C3D6465656565658D6565656565643D61F6F6F6F6F6B3F6AFF6F6AFF6AF073D3C413D64416565656565646565413D3C39F6B3F6FFF6D1F6F6AFF6F6AFF6073D6189B28A616465656565616165B2AE653DF6D1F6F6F6F6F6F6F6AFF6F6AF0761143C3C381441416041644118143C3C143DF6F6F6B3FFFFFFF6F6F6F6F6AF07088A8A8A8A3D3D6041613D40398A8A868A08FFFFD1AFF608F6AFF6AFF6FF0807FBFBFBFBFB623C153C19383D61FFFFFFFFFFFFFFAAF75AF75AF707F707F70707FBFBFBFBFB3D383C3C3C3C3861FFFFFFFFFFFFFF860708AA08AA0808AB820708FBFBFBFBFB6114383814381461FFFFFFFFFFFFFFAA07D1AFAFF6AFF6860708FBFBFBFBFBFB3D38616161613D39FFFFFFFFFFFFFF08F708F6D108D1820708FBFBFBFBFBFBFB6165658985613861FFFFFFFFFFFFFFAAF7AF08F6F6860708FBFBFBFBFBFBFBFB08391514151439AFF6FFFFFFFFFFFF08F708D1AF820708FBFBFBFBFBFBFBFBFBFB07D1FFFFFFFFFFFFFFFFFFFFFFFF0807F6AF8207AFFBFBFBFBFBFBFBFBFBFBFBF708FFFFFFFFFFFFFFFFFFFFFFFFAAF7AF860708FBFBFBFBFBFBFBFBFBFBFBFB07AFF6F6F6F6F6F6F6F6F6F6F6F608078207AFFBFBFBFBFBFBFBFBFBFBFBFBFB0708AFF6AFF6AFF6AFF6AFF6AFF6AA0707F6FBFBFBFBFBFBFBFBFBFBFBFBFBFB0707F7F707F7F707F7F707F7F70707F7AFFBFBFBFBFBFBFBFBFB"/><C0000000011 codigo="0000000011" descricao="Alteracao" imagem="424D360800000000000036040000280000002000000020000000010008000000000000040000120B0000120B000000010000000000000000000000008000008000000080800080000000800080008080000080808000C0DCC000F0CAA600AA3F2A00FF3F2A00005F2A00555F2A00AA5F2A00FF5F2A00007F2A00557F2A00AA7F2A00FF7F2A00009F2A00559F2A00AA9F2A00FF9F2A0000BF2A0055BF2A00AABF2A00FFBF2A0000DF2A0055DF2A00AADF2A00FFDF2A0000FF2A0055FF2A00AAFF2A00FFFF2A000000550055005500AA005500FF005500001F5500551F5500AA1F5500FF1F5500003F5500553F5500AA3F5500FF3F5500005F5500555F5500AA5F5500FF5F5500007F5500557F5500AA7F5500FF7F5500009F5500559F5500AA9F5500FF9F550000BF550055BF5500AABF5500FFBF550000DF550055DF5500AADF5500FFDF550000FF550055FF5500AAFF5500FFFF550000007F0055007F00AA007F00FF007F00001F7F00551F7F00AA1F7F00FF1F7F00003F7F00553F7F00AA3F7F00FF3F7F00005F7F00555F7F00AA5F7F00FF5F7F00007F7F00557F7F00AA7F7F00FF7F7F00009F7F00559F7F00AA9F7F00FF9F7F0000BF7F0055BF7F00AABF7F00FFBF7F0000DF7F0055DF7F00AADF7F00FFDF7F0000FF7F0055FF7F00AAFF7F00FFFF7F000000AA005500AA00AA00AA00FF00AA00001FAA00551FAA00AA1FAA00FF1FAA00003FAA00553FAA00AA3FAA00FF3FAA00005FAA00555FAA00AA5FAA00FF5FAA00007FAA00557FAA00AA7FAA00FF7FAA00009FAA00559FAA00AA9FAA00FF9FAA0000BFAA0055BFAA00AABFAA00FFBFAA0000DFAA0055DFAA00AADFAA00FFDFAA0000FFAA0055FFAA00AAFFAA00FFFFAA000000D4005500D400AA00D400FF00D400001FD400551FD400AA1FD400FF1FD400003FD400553FD400AA3FD400FF3FD400005FD400555FD400AA5FD400FF5FD400007FD400557FD400AA7FD400FF7FD400009FD400559FD400AA9FD400FF9FD40000BFD40055BFD400AABFD400FFBFD40000DFD40055DFD400AADFD400FFDFD40000FFD40055FFD400AAFFD400FFFFD4005500FF00AA00FF00001FFF00551FFF00AA1FFF00FF1FFF00003FFF00553FFF00AA3FFF00FF3FFF00005FFF00555FFF00AA5FFF00FF5FFF00007FFF00557FFF00AA7FFF00FF7FFF00009FFF00559FFF00AA9FFF00FF9FFF0000BFFF0055BFFF00AABFFF00FFBFFF0000DFFF0055DFFF00AADFFF00FFDFFF0055FFFF00AAFFFF00FFCCCC00FFCCFF00FFFF3300FFFF6600FFFF9900FFFFCC00007F0000557F0000AA7F0000FF7F0000009F0000559F0000AA9F0000FF9F000000BF000055BF0000AABF0000FFBF000000DF000055DF0000AADF0000FFDF000055FF0000AAFF000000002A0055002A00AA002A00FF002A00001F2A00551F2A00AA1F2A00FF1F2A00003F2A00553F2A00F0FBFF00A4A0A000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FBFBFBFBFBFB077E070707F7070707F707070707070707070707070707070707FBFBFBFBFBFB0708AFAFA5787DA50808F6AFAFAFAFAFF6AFAFF6AFAFAFAF0807FBFBFBFBFBFB0708F6A578A9A578A6F6F6F6F6F6FFF6FFFFF6FFF6F6F6F60807FBFBFBFBFBFB07F6AA78CBCFCFCB78AAAFF6AFF6F6AFF608AFF6AFF6AFF6AF07FBFBFBFBFBFB070778A9CCCFCCCFA578A6F6AFD108F6AFF6D108F608F6AFF607FBFBFBFBFBFB0778A5CFCFCBCFCFCFA578AAF6F6AFF6F608F6AFF6AFF6F6AF07FBFBFBFBFBFB78A5CFCBCFCFCBCBCFCBA57808D1F6AFF6F6AFF6AFF608AFF607FBFBFBFBFB78A5CBCFCBCBCBCBCFCBCBCFA57DAAF6D1AFAFF608F6D1AFF6AF07FBFBFBFB78A1CBCFCBCFCBCFCBCBCBCFCBCBA07D08F6F6F6F6AFF608F6F6AF07FBFBF679A0CBCBCBCBCBCBCBCFCBCBCBCFCBCBA07D08F6AFF6F6AFF6AFAFF607FBFB7D7CCBCFCBCFCBCFCBCFCBCFCBCFCBCFCBCF78A1AFF6AFF6F6AFF6F6AF07FB7C78CBCBCBCBCBCBCBCBCBCBCBCBCBCBCBCBCBCB7C7DF6F6F6AFF6F6AF08077D7DCBCBCBCBCBCBCBCBCBCBCBCBCBCBCBCBCBCBCBCB79A5AFF6F6AFF6F6F60778AED3CFCBCBCBCFCBCBCBCBCBCBCBCBCBCBCBCBCBD3AE78F6AFF6F6AFF6AF0778AAF6F6D3F6D3D0CBCBCBCBCBCBCBCBD0D3D3D3F6F6A978AFF6F6AFF6F6D107A6787D7CA17DA9F6CFCBCBCBCBCBCACBF6A97D7D7D7C79AAF6F6AFF6F6AF0807FBF6AAA6817DA1F6CBCBCBCACBCBCBCFF67D81AA86AAAAF6AFF6F6AFF6F6F607FBFBFBFBFB7D7DF6CBCACBCBCBCBCBCBF6A1AAF6D1F6B3D1F6AFF6F6AFF6AF07FBFBFBFBFB787DF6CBCBCBCBCACBCBCBD37DA6F6FFF6FFF6F6F6F6AFF6F6F607FBFBFBFBFB7D7DD3CBCBCACBCBCBCACBF681A9FFF6FFFFF6F6F6F6F6F6F6AF07FBFBFBFBFB7CA1F6CBCBCBC6CBC6CBCBF6A1AAF6FFF6F6AFF6AFF6AFF6AF0807FBFBFBFBFB7D7DD3CBC6CBCBCACBCACBD37DAAFF8207F75AF7077E07F7F70707FBFBFBFBFB7C7DF6CBCBCBCACBCBCBCBF67DAAF6080708AA08AA0808088207FBFBFBFBFBFB79A1D3CBCAC6C7C6C7C6CBD3A5AAF6AA07F6AFF6AFF6D18607FBFBFBFBFBFBFB7C7DF6D0CBD0CFD0CFCFD0F67DAAF608F7AFD0AFF6AF8607FBFBFBFBFBFBFBFBA57DAAAED0AED0AED0AED0AA79AAFFAA07D1AF08D18607FBFBFBFBFBFBFBFBFBFB557879787879787978787DA5FFFF085A08F6AF8607FBFBFBFBFBFBFBFBFBFBFB07F6F6FFFFFFFFFFFFFFFFFFFFFF0807F6AF8207FBFBFBFBFBFBFBFBFBFBFBFB07AFFFFFFFFFFFFFFFFFFFFFFFFFAAF7AF8607FBFBFBFBFBFBFBFBFBFBFBFBFB07AFFFF6F6F6F6F6F6F6F6F6F6F608078207FBFBFBFBFBFBFBFBFBFBFBFBFBFB0708F6AFF6AFF6AFAFF6AFF6AFF6860707FBFBFBFBFBFBFBFBFBFBFBFBFBFBFB07070707F7070707F7070707F7070707FBFBFBFBFBFBFBFBFBFB"/><C0000000012 codigo="0000000012" descricao="Consulta" imagem="424D360800000000000036040000280000002000000020000000010008000000000000040000120B0000120B000000010000000000000000000000008000008000000080800080000000800080008080000080808000C0DCC000F0CAA600AA3F2A00FF3F2A00005F2A00555F2A00AA5F2A00FF5F2A00007F2A00557F2A00AA7F2A00FF7F2A00009F2A00559F2A00AA9F2A00FF9F2A0000BF2A0055BF2A00AABF2A00FFBF2A0000DF2A0055DF2A00AADF2A00FFDF2A0000FF2A0055FF2A00AAFF2A00FFFF2A000000550055005500AA005500FF005500001F5500551F5500AA1F5500FF1F5500003F5500553F5500AA3F5500FF3F5500005F5500555F5500AA5F5500FF5F5500007F5500557F5500AA7F5500FF7F5500009F5500559F5500AA9F5500FF9F550000BF550055BF5500AABF5500FFBF550000DF550055DF5500AADF5500FFDF550000FF550055FF5500AAFF5500FFFF550000007F0055007F00AA007F00FF007F00001F7F00551F7F00AA1F7F00FF1F7F00003F7F00553F7F00AA3F7F00FF3F7F00005F7F00555F7F00AA5F7F00FF5F7F00007F7F00557F7F00AA7F7F00FF7F7F00009F7F00559F7F00AA9F7F00FF9F7F0000BF7F0055BF7F00AABF7F00FFBF7F0000DF7F0055DF7F00AADF7F00FFDF7F0000FF7F0055FF7F00AAFF7F00FFFF7F000000AA005500AA00AA00AA00FF00AA00001FAA00551FAA00AA1FAA00FF1FAA00003FAA00553FAA00AA3FAA00FF3FAA00005FAA00555FAA00AA5FAA00FF5FAA00007FAA00557FAA00AA7FAA00FF7FAA00009FAA00559FAA00AA9FAA00FF9FAA0000BFAA0055BFAA00AABFAA00FFBFAA0000DFAA0055DFAA00AADFAA00FFDFAA0000FFAA0055FFAA00AAFFAA00FFFFAA000000D4005500D400AA00D400FF00D400001FD400551FD400AA1FD400FF1FD400003FD400553FD400AA3FD400FF3FD400005FD400555FD400AA5FD400FF5FD400007FD400557FD400AA7FD400FF7FD400009FD400559FD400AA9FD400FF9FD40000BFD40055BFD400AABFD400FFBFD40000DFD40055DFD400AADFD400FFDFD40000FFD40055FFD400AAFFD400FFFFD4005500FF00AA00FF00001FFF00551FFF00AA1FFF00FF1FFF00003FFF00553FFF00AA3FFF00FF3FFF00005FFF00555FFF00AA5FFF00FF5FFF00007FFF00557FFF00AA7FFF00FF7FFF00009FFF00559FFF00AA9FFF00FF9FFF0000BFFF0055BFFF00AABFFF00FFBFFF0000DFFF0055DFFF00AADFFF00FFDFFF0055FFFF00AAFFFF00FFCCCC00FFCCFF00FFFF3300FFFF6600FFFF9900FFFFCC00007F0000557F0000AA7F0000FF7F0000009F0000559F0000AA9F0000FF9F000000BF000055BF0000AABF0000FFBF000000DF000055DF0000AADF0000FFDF000055FF0000AAFF000000002A0055002A00AA002A00FF002A00001F2A00551F2A00AA1F2A00FF1F2A00003F2A00553F2A00F0FBFF00A4A0A000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FBFBFBFBFBFB070707070707070707070707070707F7F7F708F7070707070707FBFBFBFBFBFB0708F6AFAFAFF6AFAFAFAFAFAFAFF707F7F707AFAFAFF6AF0807FBFBFBFBFBFB07AFF6FFF6F6F6F6F6F6FFF6F60707F707F70786F6FFFFFF0807FBFBFBFBFBFB07D1FFF6F6AFF6AFF6F6F6D407070707F7F707AAAFF608AFAF07FBFBFBFBFBFB0708F6F6AFF6AFF6AFD108073107070707070708F6AFD1F6F607FBFBFBFBFBFB07AFFFF6F6F6F6F6F6AF0731075507075507F6AF08F608AFAF07FBFBFBFBFBFB07F6F6AFF6AFF6AF86073131070707310708AFF6F6AFF6F6F607FBFBFBFBFBFB07AFFFF6F6F6D1F6552D31550707310708F6F6F6AFF6AFAFAF07FBFBFBFBFBF682828282820808AF31313131313155F6AFF6AFAFF608F6F6AF07FBFBFBFB828208FFFFF6AF868682072D31312D0708AFF6F6F6F6AFF6AFAFF607FBFBFB82F608F6090909F6AFF6F686072D2D07AFF6F6AFF6AFF6F6AFF6F6AF07FBFB82AFF609098B8B8B678B8BAFF6863107AFF6AFF6F6AFF6F6AFF6F6AF0807F68608F68B8B8BD9D9D9AFD98B67AFF6F708F6F6F6AFF6F6AFF6F6AFF6F6F607AB82F6D4678B8F8B8F8B8F8F8F8B09D108AAAFF6AFF6AFF6F6AFF6F6AFF6AF070808D109678B8B8F8B8F8B8B8B8B67AF0886F6F6F6F6F6F6AFF6F6AFF6F6D10708AAAF09678B8B8B8B8B8B8B8B8B67D4AF86D1F6F6AFF6AFF6F6AFF6F6AF0807AB08AF63678B8B8B8BD98B8B8B67638B0882F6F6F6F6F6F6AFF6F6AFF6F6F60708080863678B8F8BD98BD98BD98B6308D586AFF6AFF6B3D1F6AFF6F6AFF6AF07FBAAAF0963D9AFAFAFAFAFD9AF0963D40886FFF6FFF6FFF6F6F6F6AFF6F6F607FB08AB083BAFB3AFB3AFB3AFB3630908AAAFF6FFF6FFFFF6F6F6F6F6F6F6AF07FB0808AB093F8BF6B3B3B3B36363D4AA86F6FFF6FFF6AFF6AFF6AFF6AFF60807FBFBAA0808093B63098B63635FD40886AFFFFFFF8207F75AF7077E07F7F70707FBFBAFAA08AB08095F62830908AA86AFF6FFF6FF080708AA08AA0808088207FBFBFBFBAF08AA08ABAAAB0808AA08AFF6F6FFFFFFAA07F6AFF6AFF6D18607FBFBFBFBFBFBF6AF08080808AA08AFF6FFFFFFFFF6FF08F7AFD0AFF6AF8607FBFBFBFBFBFBFBFBFB0708FFFFFFFFFFFFFFFFFFFFFFFFAA07D1AF08D18607FBFBFBFBFBFBFBFBFBFB07AFF6FFFFFFFFFFFFFFFFFFFFFF085A08F6AF8607FBFBFBFBFBFBFBFBFBFBFB07F6F6FFFFFFFFFFFFFFFFFFFFFF0807F6AF8207FBFBFBFBFBFBFBFBFBFBFBFB07AFFFFFFFFFFFFFFFFFFFFFFFFFAAF7AF8607FBFBFBFBFBFBFBFBFBFBFBFBFB07AFFFF6F6F6F6F6F6F6F6F6F6F608078207FBFBFBFBFBFBFBFBFBFBFBFBFBFB0708F6AFF6AFF6AFAFF6AFF6AFF6860707FBFBFBFBFBFBFBFBFBFBFBFBFBFBFB07070707F7070707F7070707F7070707FBFBFBFBFBFBFBFBFBFB"/><C0000000020 codigo="0000000020" descricao="Evento" imagem="424D360800000000000036040000280000002000000020000000010008000000000000040000C40E0000C40E000000010000000100006834350003467700094B7D009B3500009E3700009D3C1100A03B0000A53F0000A2430200A8490000A94A0000AB4C0000AD4E0400A6450E00B1530000B8580200BA5C0000BE5F0000B1501000BC640000BF660900AC601600C1620000C46C0000C8700000CD750000CC730F00D0780000D27A0000D57E0000C1681300DA830000D2800E00090C9D000D07A600080EAA000F0CA8000E16A4000C16AF001313A200101AA7001619A6001B18A4001F1EA9000308BD000710B5000A15B800031ABC000C19BB002526A7002F2DAD002F32AA003938AF000054890000528C000C60900014709E0018769E00326992003770940039799F000175BE00347AA10040729B004241B1004D4BB3005F5CBF006263BF006661BC007571BF007F78BE000015C4000815C3000413CD00021DC900001AD1000121D7000022E2000328E700002AE9000029F3000076C7000674C500007BC7000072C9000078CA007B77C5007F7BC900628CAE006894B0007197B2000081C7000586C6000D8FC4000483C9000081D5000087D600038CD400088ED7000D93D6000F97D400189ED6000AA3D6000EA7D4001CA3D50031BADC0000A2E3000AA7E90000B1E10000B3E30000B7E10000B5E50019B8E2001BB9E3001EBEE1001DBBE50000BFF20000BCF5002CBFE20009C3F60000CBFA001FC5F1001DCEFB002FC2E5002EC9EE003AC3E60022C7F40029CEF50020D2F90030D4FB0033D8F9003ADEFF003CE2FD0057CAE40040DBFB0042DFF90078D0E50068DDF20048E4FF0051E5FE0053E7FF0054EAFD005CE8FF005EECFE0065E9FF0066ECFD006EEDFD006AF1FF0071F0FF0073F4FD0078F0FF007BF6FE00B69494009B91BF00FDDFBF009C9BD5009BB8CA00BBAFCF00A7BFCF00A3A3D700ABA8D400C3BFDA00A9C1D10097E6F20080F2FF0081F3FF0083F7FE0089F4FF008BF8FD0092F7FF0097F5FD0093FAFD009AFAFB009AF8FF00B5ECF000A6F7FC00A0F8FF00A9FBFF00AFFBFE00BEFBFF00BEFDFC00CECACC00D6C7C200DAC2C300D8C8C400D9C9C500FFE1C100FDE5C900FFE7CA00FFE6D200FFEDD500F1E0DC00FCE8D800FEEADA00FFEBDB00FFEDDD00C6C7E500CFD0EE00D7D4E900DEDEEB00C6FDFF00CBFCFE00EEE4E300F4ECE300FCEEE200FEEFE300F6EBEA00FFF1E400FFF2E600FCF4EB00FEF6ED00FFF7EE00F4EFF200F8F4F600FFF8F000FDFAF500FEFBF600FFFDF700FFFEF800FCFFFE00FFFFFF000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000DBDBDBDBDADADAD8D8DBD5DAD8D8DBD8DBDBDBDBD8DADADBDBDBDADBDBDBDBDCDBDBDBDBDAA23F0101010101010101010101010101010101013FA2DBDBDBDBDCDBDBDBD85A355C5D5C5C5E5B5B5E5E535353515252525254523D3658DBDBDBDCDBDBDB9E37767C7F7E7E7C7E7E777E7E796F7E7E74757575756A55359EDBDBDCDBDBDB3F7B868383767676727671726E716E70706C6C6E6C6C6C6B513FDBDBDCDBDBDB028B8B840E0E12090B0A0D07070507050605030305036C755F02DBDBDCDBDBDB01908B840FD3D5D3D0D0D0BEBEC2BCBDBDBDBABB9A036C786101DBDBDCDBDBDB01908F8A0FD6D6D0D0D0D0CA3399C2C1BCBBBBBA9A0470786001DBDBDCDBDBDB01928E8A10D6D5D1D2D1CB332D2ABEC2BDBDBDBBBA056D786201DBDBDCDBDBDB01908E8A10D8D6D7D3CB34304F249DBEBEC0BDBDBD0370786201DBDBDCDBDBDB0190908C16DAD8D6CE322F504F4741CCC2C2C1BBBB0870786301DBDBDCDBD5DB01968F8C14D5DAC72B48504F504F21BFC3C2BCC1BD0771806201DBDBDCDBDBDB0196908E14DAC4254B4D2F22244E2E45C3C3BEC1C00D71806301DBDBDCDBDBDB0196918D17DA2823242957CE334A4D21CAC3CDC2BE05737A6301DBDBDCDBDBD501A4928E18DBC59BC5DADAD8A1244E2646CDCFC2BE0D767A6401DBDBDCDBDBDB01A5948F1ADBDBDBDADAD5DAD4402F4C21CBBED0CD0D73806301DBDBDCDBDBDB01A7928F1BD5DBDBDADAD5D9D7C6214C2645CDD0BE0D76816501DBDBDCDBDBDB01A5969119DBDBDBDBDBDADADAD8422E4C21CAD0D00B76806401DBDBDCDBDBDB01A7A69220DBDBDBDBDBDADAD5DAC7214C2644D0D00C76826501DBDBDCDBDBDB01A896931CDBDBDBDBDBDBDBDBD5D856264922C6D00E76816501DBDBDCDBDBDB01A7A5941DDBDBDBDBDBDBDBDADAD8D529472E44D30E76866601DBDBDCDBDBDB01A9A59520DBDBDBDBDBDBDBDBDBDAD59F242C27CD1076866501DBDBDCDBDBDB01ADA59720DBDBDBDBDBDBDBDBDBDADBDA4331A0D21376866801DBDBDCDBDBDA01A9A8971FDBDBDAD5D8D5D8D5D8DBDAD5D8D6D8D3117D876601DBDBDCDBDBDB01ACA89720DBDBDBD5B8B8B8B8B8B6B6B6B9B6DAD8147D876701DBDBDCDBDBD802B0ABA61FDADADA00000000000000000000B8DAD6167D8B6802DBDBDCDBDBDB3FA3B1A51F20201F00989898989898989800151E1E1E8C8B693ADBDBDCDBDBDBA23EC9B2A9A9A9A800B6B6B6B6B6B6B6B70085929290908D389CDBDBDCDBDBDBDB593CAEC8B3B4B200D5D5D5D5D5D5D5D50088AFB0AA893958DBDBDBDCDBDBDBDBDB9E3B0101010100BFBFBFBFBFBFBFBF00010101013B9EDBDBDBDBDCDBDBDBDBDBDBDBDBDBDBB500000000000000000000DBDBDBDBDBDBDBDBDBDBDCDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDC"/><C0000000023 codigo="0000000023" descricao="Excluir" imagem="424DF60400000000000076000000280000003000000030000000010004000000000080040000C40E0000C40E000010000000000000000000000000008000008000000080800080000000800080008080000080808000C0C0C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFF83997FFFFFFFFFFFFFFFFFFFFFFFFFF79938FFFFFFFFFFF3999999FFFFFFFFFFFFFFFFFFFFFFFF9999993FFFFFFFFF399999999FFFFFFFFFFFFFFFFFFFFFF999999993FFFFFFF39999999999FFFFFFFFFFFFFFFFFFFF99999999993FFFFF3999999999999FFFFFFFFFFFFFFFFFF9999999999993FFF399999999999999FFFFFFFFFFFFFFFF999999999999993F89999999999999999FFFFFFFFFFFFFF99999999999999998999999999999999999FFFFFFFFFFFF9999999999999999999999999999999999999FFFFFFFFFF999999999999999999999999999999999999999FFFFFFFF99999999999999999999799999999999999999999FFFFFF999999999999999999997F999999999999999999999FFFF999999999999999999999FFF999999999999999999999FF999999999999999999999FFFFF999999999999999999999999999999999999999999FFFFFFF9999999999999999999999999999999999999999FFFFFFFFF99999999999999999999999999999999999999FFFFFFFFFFF999999999999999999999999999999999999FFFFFFFFFFFFF9999999999999999999999999999999999FFFFFFFFFFFFFFF99999999999999999999999999999999FFFFFFFFFFFFFFFFF999999999999999999999999999999FFFFFFFFFFFFFFFFFFF9999999999999999999999999999FFFFFFFFFFFFFFFFFFFFF99999999999999999999999999FFFFFFFFFFFFFFFFFFFFFFF999999999999999999999999FFFFFFFFFFFFFFFFFFFFFFFFF9999999999999999999999FFFFFFFFFFFFFFFFFFFFFFFFFF9999999999999999999999FFFFFFFFFFFFFFFFFFFFFFFFF399999999999999999999993FFFFFFFFFFFFFFFFFFFFFFF39999999999999999999999993FFFFFFFFFFFFFFFFFFFFF3999999999999999999999999993FFFFFFFFFFFFFFFFFFF399999999999999999999999999993FFFFFFFFFFFFFFFFF39999999999999999999999999999993FFFFFFFFFFFFFFF3999999999999999999999999999999993FFFFFFFFFFFFF399999999999999999999999999999999993FFFFFFFFFFF39999999999999999999999999999999999993FFFFFFFFF3999999999999999999999999999999999999993FFFFFFF399999999999999999999999999999999999999993FFFFF399999999999999999999FF999999999999999999993FFF999999999999999999999FFFF999999999999999999999F799999999999999999999FFFFFF99999999999999999999799999999999999999999FFFFFFFF999999999999999999999999999999999999999FFFFFFFFFF9999999999999999999799999999999999999FFFFFFFFFFFF99999999999999999789999999999999999FFFFFFFFFFFFFF99999999999999998F799999999999999FFFFFFFFFFFFFFFF999999999999997FFF7999999999999FFFFFFFFFFFFFFFFFF9999999999997FFFFF79999999999FFFFFFFFFFFFFFFFFFFF99999999997FFFFFFF799999999FFFFFFFFFFFFFFFFFFFFFF999999997FFFFFFFFF7999997FFFFFFFFFFFFFFFFFFFFFFFF7999997FFFFFFFFFFF87978FFFFFFFFFFFFFFFFFFFFFFFFFF87978FFFFFF"/></icones><mensagens><C0000002820 codigo="0000002820" mostracodigo="N" descricao="Este servio no est disponvel para este canal." descricaodetalhada="" sigla="CHANNEL_NOT_ENABLED" codigosistema="19"/><C0000002821 codigo="0000002821" mostracodigo="N" descricao="Esta verso do portal de sistemas est desatualizada." descricaodetalhada="" sigla="UNSUPPORTED_CLIENT_VERSION" codigosistema="19"/><C0000003992 codigo="0000003992" mostracodigo="N" descricao="Estado no encontrado nos registros" descricaodetalhada="Estado no encontrado na tabela do banco em que se armazena as siglas de todos os estados" sigla="ESTADO_NAO_ENCONTRADO" codigosistema="38"/><C0000003993 codigo="0000003993" mostracodigo="N" descricao="Exemplar no est cadastrado!" descricaodetalhada="" sigla="EXEMPLAR_NAO_EXISTE" codigosistema="38"/><C0000003994 codigo="0000003994" mostracodigo="N" descricao="Exemplar indisponivel!!!" descricaodetalhada="" sigla="EXEMPLAR_INDISPONIVEL" codigosistema="38"/><C0000003995 codigo="0000003995" mostracodigo="N" descricao="Exemplar reservado!" descricaodetalhada="" sigla="EXEMPLAR_RESERVADO" codigosistema="38"/><C0000003997 codigo="0000003997" mostracodigo="N" descricao="Emprstimo no existe!" descricaodetalhada="" sigla="EMPRESTIMO_NAO_EXISTE" codigosistema="38"/><C0000003998 codigo="0000003998" mostracodigo="N" descricao="Emprstimo j finalizado!!!!" descricaodetalhada="" sigla="EMPRESITMO_FINALIZADO" codigosistema="38"/><C0000003999 codigo="0000003999" mostracodigo="N" descricao="Nome do autor no informado." descricaodetalhada="" sigla="AUTOR_SEM_NOME" codigosistema="38"/><C0000004000 codigo="0000004000" mostracodigo="N" descricao="Autor possui livros registrados com seu nome, %S livro(s)." descricaodetalhada="" sigla="AUTOR_COM_LIVROS" codigosistema="38"/><C0000004001 codigo="0000004001" mostracodigo="N" descricao="Cdigo de emprstimo no informado." descricaodetalhada="" sigla="EMPRESTIMO_SEM_CODIGO" codigosistema="38"/><C0000004002 codigo="0000004002" mostracodigo="N" descricao="Data de emprstimo no informada." descricaodetalhada="" sigla="EMPRESTIMO_SEM_DATA" codigosistema="38"/><C0000004003 codigo="0000004003" mostracodigo="N" descricao="Data limite de entrega no informada." descricaodetalhada="" sigla="LIMITE_SEM_DATA" codigosistema="38"/><C0000004004 codigo="0000004004" mostracodigo="N" descricao="Nenhum exemplar associado ao emprtimo." descricaodetalhada="" sigla="EMPRESTIMO_SEM_EXEMPLAR" codigosistema="38"/><C0000004005 codigo="0000004005" mostracodigo="N" descricao="Nenhum usurio associado ao emprtimo." descricaodetalhada="" sigla="EMPRESTIMO_SEM_USUARIO" codigosistema="38"/><C0000004006 codigo="0000004006" mostracodigo="N" descricao="Bairro no informado." descricaodetalhada="" sigla="ENDERECO_SEM_BAIRRO" codigosistema="38"/><C0000004007 codigo="0000004007" mostracodigo="N" descricao="Rua no informada." descricaodetalhada="" sigla="ENDERECO_SEM_RUA" codigosistema="38"/><C0000004008 codigo="0000004008" mostracodigo="N" descricao="Nmero nao informado." descricaodetalhada="" sigla="ENDERECO_SEM_NUMERO" codigosistema="38"/><C0000004009 codigo="0000004009" mostracodigo="N" descricao="Endereo sem estado." descricaodetalhada="" sigla="ENDERECO_SEM_ESTADO" codigosistema="38"/><C0000004010 codigo="0000004010" mostracodigo="N" descricao="Endereo sem usurio." descricaodetalhada="" sigla="ENDERECO_SEM_USUARIO" codigosistema="38"/><C0000004011 codigo="0000004011" mostracodigo="N" descricao="Cdigo de exemplar no informado." descricaodetalhada="" sigla="EXEMPLAR_SEM_CODIGO" codigosistema="38"/><C0000004012 codigo="0000004012" mostracodigo="N" descricao="Nenhum livro associado ao exemplar." descricaodetalhada="" sigla="EXEMPLAR_SEM_LIVRO" codigosistema="38"/><C0000004013 codigo="0000004013" mostracodigo="N" descricao="Nenhuma situao associado ao exemplar." descricaodetalhada="" sigla="EXEMPLAR_SEM_SITUACAO" codigosistema="38"/><C0000004014 codigo="0000004014" mostracodigo="N" descricao="Exemplar possui emprstimos associados a ele, %s emprstimo(s)." descricaodetalhada="" sigla="EXEMPLAR_COM_EMPRESTIMO" codigosistema="38"/><C0000004015 codigo="0000004015" mostracodigo="N" descricao="Ttulo do livro no informado." descricaodetalhada="" sigla="LIVRO_SEM_TITULO" codigosistema="38"/><C0000004016 codigo="0000004016" mostracodigo="N" descricao="ISBN DO LIVRO NO INFORMADO" descricaodetalhada="" sigla="ISBN_LIVRO_NAO_INFORMADO" codigosistema="38"/><C0000004017 codigo="0000004017" mostracodigo="N" descricao="Edicao do livro no informada" descricaodetalhada="" sigla="EDICAO_LIVRO_NAO_INFORMADA" codigosistema="38"/><C0000004018 codigo="0000004018" mostracodigo="N" descricao="O livro nao tem autores" descricaodetalhada="" sigla="LIVRO_SEM_AUTORES" codigosistema="38"/><C0000004019 codigo="0000004019" mostracodigo="N" descricao="ISBN J EXISTENTE" descricaodetalhada="" sigla="ISBN_EXISTENTE" codigosistema="38"/><C0000004020 codigo="0000004020" mostracodigo="N" descricao="Este livro possui exemplares ativos." descricaodetalhada="" sigla="LIVRO_EXEMPLARES_ATIVOS" codigosistema="38"/><C0000004021 codigo="0000004021" mostracodigo="N" descricao="Nome do usuario no informado" descricaodetalhada="" sigla="USUARIO_NAO_ENCONTRADO" codigosistema="38"/><C0000004023 codigo="0000004023" mostracodigo="N" descricao="CPF do Usuario no informado" descricaodetalhada="" sigla="CPF_USUARIO_ NAO_INFORMADO" codigosistema="38"/><C0000004024 codigo="0000004024" mostracodigo="N" descricao="Data de nascimento nao informada" descricaodetalhada="" sigla="DATA_NASCIMENTO_NAO_INFORMADA" codigosistema="38"/><C0000004025 codigo="0000004025" mostracodigo="N" descricao="ISBN j existente" descricaodetalhada="" sigla="ISBN_EXISTENTE" codigosistema="38"/><C0000004026 codigo="0000004026" mostracodigo="N" descricao="Existem emprestimos associados a esse usurio." descricaodetalhada="" sigla="USUARIO_ASSOCIADO_EMPRESTIMO" codigosistema="38"/><C0000004027 codigo="0000004027" mostracodigo="N" descricao="Existe usuario associado a esse endereco" descricaodetalhada="" sigla="ENDERECO_ASSOCIADO_COM_USUARIO" codigosistema="38"/><C0000004028 codigo="0000004028" mostracodigo="N" descricao="Exemplar reservado" descricaodetalhada="" sigla="EXEMPLAR_RESERVADO" codigosistema="38"/><C0000004705 codigo="0000004705" mostracodigo="N" descricao="No foi possivel obter o servio da central de bonus." descricaodetalhada="" sigla="CNSEG_INDISPONIVEL" codigosistema="72"/><C0000004706 codigo="0000004706" mostracodigo="N" descricao="Erro no retorno da mensagem: %s not assigned!" descricaodetalhada="" sigla="CNSEG_RETORNO_INVALIDO" codigosistema="72"/><C0000004707 codigo="0000004707" mostracodigo="N" descricao="O Codigo Status da mensagem de retorno a CNSeg diferente de 0. %s." descricaodetalhada="" sigla="CNSEG_COD_STATUS_INVALIDO" codigosistema="72"/><C0000004708 codigo="0000004708" mostracodigo="N" descricao="O evento &amp;quot;%s&amp;quot; no est relacionado uma solicitao de bnus." descricaodetalhada="" sigla="EVENTO_SOLIC_INVALIDO" codigosistema="72"/><C0000004709 codigo="0000004709" mostracodigo="N" descricao="Erro na stored procedure: %s." descricaodetalhada="" sigla="ERRO_STORED_PROCED" codigosistema="72"/><C0000004710 codigo="0000004710" mostracodigo="N" descricao="No existe tratamento para o tipo de evento %d no subscriber %d." descricaodetalhada="" sigla="EVENTO_SUBS_INVALIDO" codigosistema="72"/><C0000004712 codigo="0000004712" mostracodigo="N" descricao="A solicitao de protocolo &amp;quot;%s&amp;quot; no foi encontrada." descricaodetalhada="" sigla="SOLIC_NAO_ENCONTRADA" codigosistema="72"/><C0000004714 codigo="0000004714" mostracodigo="N" descricao="J existe uma solicitao cadastrada para o protocolo &amp;quot;%s&amp;quot;." descricaodetalhada="" sigla="SOLIC_EXISTENTE" codigosistema="72"/><C0000004715 codigo="0000004715" mostracodigo="N" descricao="A seguradora com id &amp;quot;%d&amp;quot; no foi encontrada." descricaodetalhada="" sigla="SEGURADORA_NAO_ENCONTRADA" codigosistema="72"/><C0000004716 codigo="0000004716" mostracodigo="N" descricao="Seguradora no instanciada anteriormente." descricaodetalhada="" sigla="SEGURADORA_NAO_INSTANCIADA" codigosistema="72"/><C0000004717 codigo="0000004717" mostracodigo="N" descricao="Evento com id &amp;quot;%d&amp;quot; no foi encontrado." descricaodetalhada="" sigla="EVENTO_NAO_ENCONTRADO" codigosistema="72"/><C0000004718 codigo="0000004718" mostracodigo="N" descricao="A solicitao com Id &amp;quot;%d&amp;quot; no foi encontrada." descricaodetalhada="" sigla="SOLICITACAO_NAO_ENCONTRADA" codigosistema="72"/><C0000004735 codigo="0000004735" mostracodigo="N" descricao="Parmetro de cdigo &amp;quot;%s&amp;quot; no encontrado." descricaodetalhada="" sigla="PARAM_NAO_ENCONTRADO" codigosistema="72"/><C0000004751 codigo="0000004751" mostracodigo="N" descricao="O Evento de Erro no foi informado." descricaodetalhada="" sigla="EVENT_ERROR_NAO_INFORMADO" codigosistema="72"/><C0000004752 codigo="0000004752" mostracodigo="N" descricao="Operao invlida para erros no ativos. (Erro %s, Subscriber %s)" descricaodetalhada="" sigla="OPERACAO_INVALIDA" codigosistema="72"/><C0000004753 codigo="0000004753" mostracodigo="N" descricao="O Evento de Erro %d no foi encontrado." descricaodetalhada="" sigla="EVENT_ERROR_NAO_ENCONTRADO" codigosistema="72"/><C0000004754 codigo="0000004754" mostracodigo="N" descricao="A verso do banco de dados (%s, %d) no a esperada pelo sistema (%s, %d). Entre em contato com o suporte." descricaodetalhada="" sigla="VERSAO_BANCO_INVALIDA" codigosistema="72"/><C0000004858 codigo="0000004858" mostracodigo="N" descricao="O campo &amp;quot;%s&amp;quot; no foi encontrado." descricaodetalhada="" sigla="FIELD_NOT_FOUND" codigosistema="17"/><C0000004859 codigo="0000004859" mostracodigo="N" descricao="A request de id &amp;quot;%d&amp;quot; no foi encontrada." descricaodetalhada="" sigla="LOG_STATISTICS_NOT_FOUND" codigosistema="17"/><C0000005116 codigo="0000005116" mostracodigo="N" descricao="Dados do pedido de solicitao de bnus no informado." descricaodetalhada="" sigla="PEDIDO_NAO_INFORMADO" codigosistema="72"/><C0000005117 codigo="0000005117" mostracodigo="N" descricao="O campo &amp;quot;%s&amp;quot; no foi informado." descricaodetalhada="" sigla="CAMPO_NAO_INFORMADO" codigosistema="72"/><C0000005125 codigo="0000005125" mostracodigo="N" descricao="O cdigo do sistema origem da solicitao de bnus invlido." descricaodetalhada="" sigla="CODIGO_ORIGEM_SISTEMA_INVALIDO" codigosistema="72"/></mensagens><sistemas><C0000000017 codigo="0000000017" nome="SISMON" descricao="Sistema de Monitorao"/><C0000000019 codigo="0000000019" nome="SISEG" descricao="Sistema de Segurana"/><C0000000038 codigo="0000000038" nome="TREIN" descricao="TREINAMENTO"/><C0000000072 codigo="0000000072" nome="CBS" descricao="CentralBonus"/></sistemas><entidades><C0000000001 codigo="0000000001" nome="Alunos Graduaco" caption="Alunos"/><C0000000003 codigo="0000000003" nome="Disciplinas" caption="Disciplinas"/><C0000000013 codigo="0000000013" nome="Usurios" caption="Usurios"/><C0000000014 codigo="0000000014" nome="Alunos" caption="Alunos"/><C0000000015 codigo="0000000015" nome="Turmas" caption="Turmas"/><C0000000022 codigo="0000000022" nome="Cobranas" caption="Cobranas"/><C0000000136 codigo="0000000136" nome="Service" caption="Service"/><C0000000168 codigo="0000000168" nome="Configuraes" caption="Configuraes"/><C0000000169 codigo="0000000169" nome="Natureza" caption="Naturezas"/><C0000000186 codigo="0000000186" nome="Eventos de Negcio" caption="Eventos de Negcio"/><C0000000316 codigo="0000000316" nome="Perfis" caption="Perfis"/><C0000000371 codigo="0000000371" nome="Cliente" caption="Cliente"/><C0000000450 codigo="0000000450" nome="Livro" caption="Livro"/><C0000000506 codigo="0000000506" nome="VGBLEscoragem" caption="VGBL Escoragem"/><C0000000538 codigo="0000000538" nome="Cardpio" caption="Cardpio"/></entidades></SYSMSG>
package HelloWorld;
{$R *.res}
{$ALIGN 8}
{$ASSERTIONS ON}
{$BOOLEVAL OFF}
{$DEBUGINFO OFF}
{$EXTENDEDSYNTAX ON}
{$IMPORTEDDATA ON}
{$IOCHECKS ON}
{$LOCALSYMBOLS OFF}
{$LONGSTRINGS ON}
{$OPENSTRINGS ON}
{$OPTIMIZATION ON}
{$OVERFLOWCHECKS OFF}
{$RANGECHECKS OFF}
{$REFERENCEINFO OFF}
{$SAFEDIVIDE OFF}
{$STACKFRAMES OFF}
{$TYPEDADDRESS OFF}
{$VARSTRINGCHECKS ON}
{$WRITEABLECONST OFF}
{$MINENUMSIZE 1}
{$IMAGEBASE $400000}
{$DESCRIPTION 'Conexo HelloWorld'}
{$RUNONLY}
{$IMPLICITBUILD ON}
{$DEFINE RELEASE}
{$DEFINE DEBUG}
requires
rtl,
CXClient,
vcl,
JvCore,
dbrtl,
vcljpg,
vclx,
JclVcl,
Jcl,
vclimg,
JvStdCtrls,
JvSystem,
JvMM,
JvControls,
elpackD11,
tee,
teeUI,
teedb,
vcldb,
JvDB,
JvDlgs,
JvCustom,
JvGlobus,
bdertl,
xmlrtl,
vclie,
VclSmp,
JvWizards;
contains
ituHelloWorldMain in 'itu\ituHelloWorldMain.pas';
end.
unit ituHelloWorldMain;
interface
uses
ituInterfaceFactory, ituMain, ituMainPortal;
type
itHelloWorldMain = class(itMainPortal)
protected
function InitialLevel: integer; override;
public
procedure Initialize; override;
end;
var
fUsuario, fSenha, fCodigoSusep : string;
implementation
procedure itHelloWorldMain.Initialize;
begin
MainPortal := TMainPortal.Create(nil);
inherited;
end;
function itHelloWorldMain.InitialLevel: integer;
begin
result := 0;
end;
initialization
gInterfaceFactory.RegisterClass(ITCTLMAIN, itHelloWorldMain);
finalization
gInterfaceFactory.UnregisterClass(ITCTLMAIN);
end.
unit acuRegisterModelMappings;
interface
uses
acuframework, classes;
procedure RegisterModelMappings(piMetaModel: acMetaModel);
implementation
uses
acuRepositorySQL, utuStateMachine;
procedure RegisterClassTickets1(piMetaModel: acMetaModel);
var
lClassMapTicket: acClassTicket;
lClassToDBMapTicket: acClassToDBMapTicket;
lDBIntIdoMapTicket: acDBIdoMapTicket;
prop: acAttributeTicket;
begin
lClassMapTicket := piMetaModel.NewClassRegisterTicket('362','ngAuditEvent','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('SISCIDAUDI');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('362', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'SISCTAUDIT';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('TransactionId', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 38;
prop.Mandatory := True;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SISCTRANID';
prop := lClassMapTicket.NewAttributeTicket('Date', 'acDateTime', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'datetime';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SISCDATETI';
prop := lClassMapTicket.NewAttributeTicket('UserName', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 30;
prop.Mandatory := True;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SISCUSERNA';
prop := lClassMapTicket.NewAttributeTicket('EventType', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 10;
prop.Mandatory := True;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SISCEVNTYP';
prop := lClassMapTicket.NewAttributeTicket('UseCaseName', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 100;
prop.Mandatory := True;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SISCUCNAME';
prop := lClassMapTicket.NewAttributeTicket('ObjectClassName', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 100;
prop.Mandatory := True;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SISCCLNAME';
prop := lClassMapTicket.NewAttributeTicket('ObjectOID', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 40;
prop.Mandatory := True;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SISCOBJOID';
prop := lClassMapTicket.NewAttributeTicket('Context', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 255;
prop.Mandatory := False;
prop.DBType := 'VARCHAR';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SISCCONTEX';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('363','ngAuditEventData','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('SISDIDEVND');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('363', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'SISDTEVNDA';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('DataName', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 100;
prop.Mandatory := True;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SISDDATNAM';
prop := lClassMapTicket.NewAttributeTicket('OldValue', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 4000;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SISDOLDVAL';
prop := lClassMapTicket.NewAttributeTicket('NewValue', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 4000;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SISDNEWVAL';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('278','NGBusinessEvent','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('INTAIDBUEV');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('278', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'INTATBUEVN';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('Data', 'acText', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'TEXT';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'INTADATAAA';
prop := lClassMapTicket.NewAttributeTicket('PublishDateTime', 'acDateTime', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'DATETIME';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'INTAPUBLDT';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('744','NGBusinessEventDistributed','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('INTLIDBUED');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('744', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'INTLTBUEVD';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('DistributedDateTime', 'acDateTime', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'DATETIME';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'INTLDISTDT';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('279','NGBusinessEventSubscriber','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('INTBIDSUBS');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('279', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'INTBTSUBSC';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('code', 'acInt', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'INT';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'INTBCODEE';
prop := lClassMapTicket.NewAttributeTicket('Name', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 50;
prop.Mandatory := True;
prop.DBType := 'VARCHAR';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'INTBNAMEE';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('743','NGBusinessEventSubscriberError','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('INTJIDSBER');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('743', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'INTJTSBERR';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('ErrorDate', 'acDateTime', pvPersistent, False);
prop.FixSize := 8;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'DATETIME';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'INTJDTERRO';
prop := lClassMapTicket.NewAttributeTicket('Description', 'acText', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 512;
prop.Mandatory := True;
prop.DBType := 'VARCHAR';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'INTJDESCRI';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('280','NGBusinessEventType','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('INTCIDEVNT');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('280', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'INTCTEVNTP';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('Code', 'acInt', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'INT';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'INTCCODEEE';
prop := lClassMapTicket.NewAttributeTicket('Name', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 50;
prop.Mandatory := True;
prop.DBType := 'VARCHAR';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'INTCNAMEEE';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('742','NGBusinessSubscriberNotifierEventualTimeWindow','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('INTHIDETMW');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('742', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'INTHTETMWI';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('ValidAt', 'acDateTime', pvPersistent, False);
prop.FixSize := 8;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'DATETIME';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'INTHVDATTT';
prop := lClassMapTicket.NewAttributeTicket('StartAt', 'acInt', pvPersistent, False);
prop.FixSize := 4;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'INT';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'INTHSTARTA';
prop := lClassMapTicket.NewAttributeTicket('EndAt', 'acInt', pvPersistent, False);
prop.FixSize := 4;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'INT';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'INTHENDATT';
prop := lClassMapTicket.NewAttributeTicket('Code', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 20;
prop.Mandatory := True;
prop.DBType := 'VARCHAR';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'INTHCODEEE';
prop := lClassMapTicket.NewAttributeTicket('ClosedAt', 'acInt', pvPersistent, False);
prop.FixSize := 4;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'INT';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'INTHCLOSAT';
prop := lClassMapTicket.NewAttributeTicket('OpenedAt', 'acInt', pvPersistent, False);
prop.FixSize := 4;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'INT';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'INTHOPENAT';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('740','NGBusinessSubscriberNotifierTimeGrid','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('INTFIDTMGR');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('740', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'INTFTTMGRD';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('ValidFrom', 'acDateTime', pvPersistent, False);
prop.FixSize := 8;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'DATETIME';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'INTFVDFROM';
prop := lClassMapTicket.NewAttributeTicket('ValidTo', 'acDateTime', pvPersistent, False);
prop.FixSize := 8;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'DATETIME';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'INTFVDTOOO';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('741','NGBusinessSubscriberNotifierTimeWindow','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('INTGIDTMWI');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('741', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'INTGTTMWIN';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('StartAt', 'acInt', pvPersistent, False);
prop.FixSize := 4;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'INT';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'INTGSTARTA';
prop := lClassMapTicket.NewAttributeTicket('EndAt', 'acInt', pvPersistent, False);
prop.FixSize := 4;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'INT';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'INTGENDATT';
prop := lClassMapTicket.NewAttributeTicket('Code', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 20;
prop.Mandatory := True;
prop.DBType := 'VARCHAR';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'INTGCODEEE';
prop := lClassMapTicket.NewAttributeTicket('OpenedAt', 'acInt', pvPersistent, False);
prop.FixSize := 4;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'INT';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'INTGOPENAT';
prop := lClassMapTicket.NewAttributeTicket('ClosedAt', 'acInt', pvPersistent, False);
prop.FixSize := 4;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'INT';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'INTGCLOSAT';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('-3','ngCategory','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('IESDIDCATE');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('-3', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'IESDTCATEG';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('Name', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 20;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESDNMCATE';
prop := lClassMapTicket.NewAttributeTicket('Code', 'acInt', pvPersistent, False);
prop.FixSize := 10;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'int';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESDCDCATE';
prop := lClassMapTicket.NewAttributeTicket('Situation', 'acString', pvPersistent, False);
prop.FixSize := 1;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'CHAR';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESDCDSITU';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('-4','ngEntity','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('IESCIDENTI');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('-4', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'IESCTENTID';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('Name', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 20;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESCNMENTI';
prop := lClassMapTicket.NewAttributeTicket('Code', 'acInt', pvPersistent, False);
prop.FixSize := 10;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'int';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESCCDENTI';
prop := lClassMapTicket.NewAttributeTicket('Caption', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 20;
prop.Mandatory := True;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESCTIENTI';
prop := lClassMapTicket.NewAttributeTicket('Situation', 'acString', pvPersistent, False);
prop.FixSize := 1;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'CHAR';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESCCDSITU';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('-8','ngEvent','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('SEGCIDESEG');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('-8', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'SEGCTEVSEG';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('DtLaunching', 'acDateTime', pvPersistent, False);
prop.FixSize := 8;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'datetime';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGCDTLANC';
prop := lClassMapTicket.NewAttributeTicket('EventType', 'acString', pvPersistent, False);
prop.FixSize := 1;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'char';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGCTPEVEN';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('128','ngGUITicket','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('IESOIDINTE');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('128', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'IESOTINTER';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('Name', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 50;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESONMINTE';
prop := lClassMapTicket.NewAttributeTicket('Code', 'acInt', pvPersistent, False);
prop.FixSize := 10;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'int';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESOCDINTE';
prop := lClassMapTicket.NewAttributeTicket('Description', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 250;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESODSINTE';
prop := lClassMapTicket.NewAttributeTicket('Situation', 'acString', pvPersistent, False);
prop.FixSize := 1;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'CHAR';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESOCDSITU';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('-2','ngIcon','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('IESFIDCUIC');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('-2', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'IESFTCUICO';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('Description', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 50;
prop.Mandatory := True;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESFDSCUIC';
prop := lClassMapTicket.NewAttributeTicket('Code', 'acInt', pvPersistent, False);
prop.FixSize := 10;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'int';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESFCDCUIC';
prop := lClassMapTicket.NewAttributeTicket('Image', 'acBlob', pvPersistent, False);
prop.FixSize := 16;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'image';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESFIMCUIC';
prop := lClassMapTicket.NewAttributeTicket('Situation', 'acString', pvPersistent, False);
prop.FixSize := 1;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'CHAR';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESFCDSITU';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('-11','ngLevel','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('IESHIDLEVE');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('-11', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'IESHTLEVEL';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('Code', 'acInt', pvPersistent, False);
prop.FixSize := 10;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'int';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESHCDLEVE';
prop := lClassMapTicket.NewAttributeTicket('Description', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 50;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESHDSLEVE';
prop := lClassMapTicket.NewAttributeTicket('Situation', 'acString', pvPersistent, False);
prop.FixSize := 1;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'CHAR';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESHCDSITU';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('515','ngMessage','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('IESRIDMESS');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('515', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'IESRTMESSG';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('Code', 'acInt', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'int';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESRCDMESS';
prop := lClassMapTicket.NewAttributeTicket('Description', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 300;
prop.Mandatory := True;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESRDSMESS';
prop := lClassMapTicket.NewAttributeTicket('Name', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 100;
prop.Mandatory := True;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESRSGMESS';
prop := lClassMapTicket.NewAttributeTicket('Situation', 'acString', pvPersistent, False);
prop.FixSize := 1;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'CHAR';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESRCDSITU';
prop := lClassMapTicket.NewAttributeTicket('DetailedDescription', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 4000;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESRDSDETA';
prop := lClassMapTicket.NewAttributeTicket('ShowCode', 'acString', pvPersistent, False);
prop.FixSize := 1;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'char';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESRSHOCOD';
prop := lClassMapTicket.NewAttributeTicket('DescriptionUser', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 300;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESRDSMEUS';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('132','NGNatureza','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('SEGDIDNAUS');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('132', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'SEGDTNAUSU';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('Codigo', 'acInt', pvPersistent, False);
prop.FixSize := 10;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'int';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGDCDNAUS';
prop := lClassMapTicket.NewAttributeTicket('Descricao', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 50;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGDDSNAUS';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('-9','ngOperation','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('IESJIDOPER');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('-9', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'IESJTOPERA';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('Description', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 20;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESJDSOPER';
prop := lClassMapTicket.NewAttributeTicket('Code', 'acInt', pvPersistent, False);
prop.FixSize := 10;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'int';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESJCDOPER';
prop := lClassMapTicket.NewAttributeTicket('Situation', 'acString', pvPersistent, False);
prop.FixSize := 1;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'CHAR';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESJCDSITU';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('-7','ngPermission','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('SEGBIDPERM');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('-7', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'SEGBTPERMI';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('1518','ngProfile','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('IESSIDPROF');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('1518', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'IESSTPROFI';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('Code', 'acInt', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'int';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESSCDPROF';
prop := lClassMapTicket.NewAttributeTicket('Name', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 40;
prop.Mandatory := True;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESSNMPROF';
prop := lClassMapTicket.NewAttributeTicket('Description', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 100;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESSDSPROF';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('-5','ngSystem','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('IESAIDSIST');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('-5', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'IESATSISTE';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('Name', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 10;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESANMSIST';
prop := lClassMapTicket.NewAttributeTicket('Description', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 50;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESADSSIST';
prop := lClassMapTicket.NewAttributeTicket('Version', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 10;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESAVERSAO';
prop := lClassMapTicket.NewAttributeTicket('Code', 'acInt', pvPersistent, False);
prop.FixSize := 10;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'int';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESACDSIST';
prop := lClassMapTicket.NewAttributeTicket('Situation', 'acString', pvPersistent, False);
prop.FixSize := 1;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'CHAR';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESACDSITU';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('-12','ngSystemConfigUpdateLog','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('IESQIDUPLO');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('-12', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'IESQTUPLOG';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('XMLLog', 'acString', pvPersistent, False);
prop.FixSize := 9999999;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'Text';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESQXMLOG';
prop := lClassMapTicket.NewAttributeTicket('UpdateDate', 'acDateTime', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'datetime';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESQUDATE';
prop := lClassMapTicket.NewAttributeTicket('UserLogin', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 50;
prop.Mandatory := True;
prop.DBType := 'VARCHAR';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESQCDLOGI';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('129','ngSystemGUITickets','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('IESPIDSISI');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('129', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'IESPTSISIN';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('Situation', 'acString', pvPersistent, False);
prop.FixSize := 1;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'CHAR';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESPCDSITU';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('-14','ngSystemUseCaseTicket','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('IESEIDSISC');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('-14', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'IESETSISCU';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('Situation', 'acString', pvPersistent, False);
prop.FixSize := 1;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'CHAR';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESECDSITU';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('-1','ngUseCaseTicket','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('IESBIDCASO');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('-1', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'IESBTCASOU';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('Description', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 250;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESBDSCASO';
prop := lClassMapTicket.NewAttributeTicket('Name', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 50;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESBNMCASO';
prop := lClassMapTicket.NewAttributeTicket('Code', 'acInt', pvPersistent, False);
prop.FixSize := 10;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'int';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESBCDCASO';
prop := lClassMapTicket.NewAttributeTicket('UseCaseType', 'acString', pvPersistent, False);
prop.FixSize := 1;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'char';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESBTPCASO';
prop := lClassMapTicket.NewAttributeTicket('Situation', 'acString', pvPersistent, False);
prop.FixSize := 1;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'CHAR';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESBCDSITU';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('-10','ngUseCaseTicketOperation','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('IESGIDCUOP');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('-10', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'IESGTCUOPE';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('Situation', 'acString', pvPersistent, False);
prop.FixSize := 1;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'CHAR';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESGCDSITU';
prop := lClassMapTicket.NewAttributeTicket('AccessControlExternalCode', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 20;
prop.Mandatory := False;
prop.DBType := 'VARCHAR';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'IESGCDACEX';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('-6','NGUser','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('SEGAIDUSUA');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('-6', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'SEGATUSUAR';
lClassToDBMapTicket.TypeColumnName := 'SEGACDHERA';
// registrando os atributos da classe
prop := lClassMapTicket.NewAttributeTicket('Login', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 25;
prop.Mandatory := True;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGACDUSUA';
prop := lClassMapTicket.NewAttributeTicket('Password', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 12;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGASENHAU';
prop := lClassMapTicket.NewAttributeTicket('PasswordResetCode', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 20;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGAPRSETC';
prop := lClassMapTicket.NewAttributeTicket('DtRegister', 'acDateTime', pvPersistent, False);
prop.FixSize := 8;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'datetime';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGADTCADU';
prop := lClassMapTicket.NewAttributeTicket('DtLastChangePassword', 'acDateTime', pvPersistent, False);
prop.FixSize := 8;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'datetime';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGADTULSE';
prop := lClassMapTicket.NewAttributeTicket('CancelIndicator', 'acString', pvPersistent, False);
prop.FixSize := 1;
prop.VarSize := 0;
prop.Mandatory := True;
prop.DBType := 'char';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGAINCANC';
prop := lClassMapTicket.NewAttributeTicket('CodigoReferencia', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 25;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGACDREFE';
prop := lClassMapTicket.NewAttributeTicket('PasswordFormat', 'acInt', pvPersistent, False);
prop.FixSize := 10;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'int';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGAFORMSE';
prop := lClassMapTicket.NewAttributeTicket('PasswordSalt', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 128;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGASALTSE';
prop := lClassMapTicket.NewAttributeTicket('MobilePIN', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 16;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGAMOBILE';
prop := lClassMapTicket.NewAttributeTicket('Email', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 256;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGAEEMAIL';
prop := lClassMapTicket.NewAttributeTicket('LoweredEmail', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 256;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGALEMAIL';
prop := lClassMapTicket.NewAttributeTicket('PasswordQuestion', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 256;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGASENHAQ';
prop := lClassMapTicket.NewAttributeTicket('PasswordAnswer', 'acString', pvPersistent, False);
prop.FixSize := 0;
prop.VarSize := 256;
prop.Mandatory := False;
prop.DBType := 'varchar';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGASENHAA';
prop := lClassMapTicket.NewAttributeTicket('IsLockedOut', 'acString', pvPersistent, False);
prop.FixSize := 1;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'char';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGABLOQUE';
prop := lClassMapTicket.NewAttributeTicket('LastLoginDate', 'acDateTime', pvPersistent, False);
prop.FixSize := 8;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'datetime';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGAULTLGN';
prop := lClassMapTicket.NewAttributeTicket('LastLockoutDate', 'acDateTime', pvPersistent, False);
prop.FixSize := 8;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'datetime';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGAULTBLQ';
prop := lClassMapTicket.NewAttributeTicket('FailedPasswordAttemptCount', 'acInt', pvPersistent, False);
prop.FixSize := 10;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'int';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGAFSACOU';
prop := lClassMapTicket.NewAttributeTicket('FailedPasswordAttemptWindowStart', 'acDateTime', pvPersistent, False);
prop.FixSize := 8;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'datetime';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGAFSAWST';
prop := lClassMapTicket.NewAttributeTicket('FailedPasswordAnswerAttemptCount', 'acInt', pvPersistent, False);
prop.FixSize := 10;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'int';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGAFSAACO';
prop := lClassMapTicket.NewAttributeTicket('FailedPasswordAnswerAttemptWindowStart', 'acDateTime', pvPersistent, False);
prop.FixSize := 8;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'datetime';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGAFSAAWS';
prop := lClassMapTicket.NewAttributeTicket('Comment', 'acString', pvPersistent, False);
prop.FixSize := 16;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'text';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGACOMMEN';
prop := lClassMapTicket.NewAttributeTicket('LastActivityDate', 'acDateTime', pvPersistent, False);
prop.FixSize := 8;
prop.VarSize := 0;
prop.Mandatory := False;
prop.DBType := 'datetime';
lClassToDBMapTicket.NewDbColumnMapRegisterTicket(prop).ColumnName := 'SEGAULTACT';
lClassMapTicket := piMetaModel.NewClassRegisterTicket('1540','ngUserProfile','acPersistentObject', acOIDInt);
lClassMapTicket.AuditDescription := '';
lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create('IESUIDUSEP');
lClassToDBMapTicket := (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewClassToDBMapRegisterTicket('1540', lClassMapTicket, lDBIntIdoMapTicket) ;
lClassToDBMapTicket.TableName := 'IESUTUSERP';
end;
procedure RegisterClassRelationTickets(piMetaModel: acMetaModel);
var
lRelationTicket: acRelationTicket;
begin
lRelationTicket := piMetaModel.NewRelationRegisterTicket('NGBusinessEvent', 'Distributed', 0, 1, pvComposite, 'Distributed BusinessEvent', 'NGBusinessEventDistributed', '', 1, 1, pvNone, False, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToOneDbRelationMapRegisterTicket(lRelationTicket, 'INTLIDBUEV');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('NGBusinessEvent', '', 0, 2147483647, pvNone, 'SubscriberError has Event', 'NGBusinessEventSubscriberError', 'BusinessEvent', 1, 1, pvNone, False, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'INTJIDBUEV');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('NGBusinessEventSubscriber', 'NotifierEventualTimeWindows', 0, 2147483647, pvComposite, 'Subscriber has eventual notifier time windows', 'NGBusinessSubscriberNotifierEventualTimeWindow', 'Subscriber', 1, 1, pvNone, True, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'INTHIDSUBS');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('NGBusinessEventSubscriber', 'NotifierTimeGrids', 0, 2147483647, pvComposite, 'Subscriber has notifier time grids', 'NGBusinessSubscriberNotifierTimeGrid', 'Subscriber', 1, 1, pvNone, True, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'INTFIDSUBS');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('NGBusinessEventSubscriber', 'ActiveError', 0, 1, pvNone, 'Subscriber''s Active Error', 'NGBusinessEventSubscriberError', '', 1, 1, pvNone, False, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewIndirectOneToOneDbRelationMapRegisterTicket(lRelationTicket, 'INTBIDSUBS', 'INTJIDSBER', 'INTKTSUBER');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('NGBusinessEventSubscriber', 'Errors', 0, 2147483647, pvComposite, 'Subscriber''s Errors', 'NGBusinessEventSubscriberError', '', 1, 1, pvNone, False, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'INTJIDSUBS');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('NGBusinessEventSubscriber', 'EventsType', 0, 2147483647, pvNone, 'Subscriber''s Events Type of Interest', 'NGBusinessEventType', 'Subscribers', 0, 2147483647, pvNone, True, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewManyToManyDbRelationMapRegisterTicket(lRelationTicket, 'INTBIDSUBS', 'INTCIDEVNT', 'INTETINTER');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('NGBusinessEventSubscriber', 'IgnoredEvents', 0, 2147483647, pvNone, 'Subscriber''s Ignored Events', 'NGBusinessEvent', '', 0, 2147483647, pvNone, False, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewManyToManyDbRelationMapRegisterTicket(lRelationTicket, 'INTBIDSUBS', 'INTAIDBUEV', 'INTITIGNOR');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('NGBusinessEventSubscriber', 'NotifiedEvents', 0, 2147483647, pvNone, 'Subscriber''s Notified Events', 'NGBusinessEvent', '', 0, 2147483647, pvNone, False, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewManyToManyDbRelationMapRegisterTicket(lRelationTicket, 'INTBIDSUBS', 'INTAIDBUEV', 'INTMTNOTEV');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('NGBusinessEventSubscriber', 'UnnotifiedEvents', 0, 2147483647, pvNone, 'Subscriber''s Unnotified Events', 'NGBusinessEvent', '', 0, 2147483647, pvNone, False, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewManyToManyDbRelationMapRegisterTicket(lRelationTicket, 'INTBIDSUBS', 'INTAIDBUEV', 'INTDTUNNOT');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('NGBusinessEventType', '', 0, 2147483647, pvNone, 'Event has type', 'NGBusinessEvent', 'EventType', 1, 1, pvNone, False, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'INTAIDEVNT');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('NGBusinessSubscriberNotifierTimeGrid', 'TimeWindows', 0, 2147483647, pvComposite, 'Time grid has time windows', 'NGBusinessSubscriberNotifierTimeWindow', 'TimeGrid', 1, 1, pvNone, True, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'INTGIDTMGR');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('NGNatureza', '', 0, 2147483647, pvNone, 'User has nature', 'NGUser', 'Natureza', 1, 1, pvNone, False, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'SEGAIDNAUS');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('NGNatureza', 'Systems', 0, 2147483647, pvNone, 'User nature can access systems', 'ngSystem', '', 0, 2147483647, pvNone, False, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewManyToManyDbRelationMapRegisterTicket(lRelationTicket, 'SEGEIDNAUS', 'SEGEIDSIST', 'SEGETSINAU');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('NGUser', 'PermissionSecurityEvents', 0, 2147483647, pvNone, 'User generate security events', 'ngEvent', 'User', 1, 1, pvNone, True, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'SEGCIDUSUA');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('NGUser', 'Permissions', 0, 2147483647, pvNone, 'User has Permissions', 'ngPermission', 'User', 1, 1, pvNone, True, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'SEGBIDUSUA');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('NGUser', '', 0, 2147483647, pvNone, 'User has Profiles', 'ngUserProfile', 'User', 1, 1, pvNone, False, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'IESUIDUSUA');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('NGUser', 'SecurityEvents', 0, 2147483647, pvNone, 'User has security events', 'ngEvent', 'AuthorizedUser', 1, 1, pvNone, True, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'SEGCIDRESP');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('ngAuditEvent', 'Data', 0, 2147483647, pvNone, 'Audit Event has Data', 'ngAuditEventData', 'AuditEvent', 1, 1, pvNone, True, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'SISDIDAUDI');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('ngCategory', 'UseCases', 0, 2147483647, pvNone, 'Usecases have a category', 'ngUseCaseTicket', 'Category', 1, 1, pvNone, True, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'IESBIDCATE');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('ngEntity', 'UseCases', 0, 2147483647, pvNone, 'Entity has Usecases', 'ngUseCaseTicket', 'Entity', 1, 1, pvNone, True, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'IESBIDENTI');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('ngGUITicket', 'SystemGUIs', 0, 2147483647, pvNone, 'System GUIs have GUI', 'ngSystemGUITickets', 'GUI', 1, 1, pvNone, True, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'IESPIDINTE');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('ngIcon', 'UseCases', 0, 2147483647, pvNone, 'Usecases have an icon', 'ngUseCaseTicket', 'Icon', 1, 1, pvNone, True, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'IESBIDCUIC');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('ngOperation', 'UseCaseOperations', 0, 2147483647, pvNone, 'UseCase operations has operation', 'ngUseCaseTicketOperation', 'Operation', 1, 1, pvNone, True, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'IESGIDOPER');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('ngProfile', 'UseCaseOperations', 0, 2147483647, pvNone, 'Profile has Usecase Operations', 'ngUseCaseTicketOperation', '', 0, 2147483647, pvNone, False, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewManyToManyDbRelationMapRegisterTicket(lRelationTicket, 'IESSIDPROF', 'IESGIDCUOP', 'IESTTOPPRO');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('ngProfile', 'UserProfiles', 0, 2147483647, pvNone, 'Profile has Users', 'ngUserProfile', 'Profile', 1, 1, pvNone, True, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'IESUIDPROF');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('ngSystem', 'SystemGUIs', 0, 2147483647, pvNone, 'System has GUIs', 'ngSystemGUITickets', 'System', 1, 1, pvNone, True, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'IESPIDSIST');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('ngSystem', 'Levels', 0, 2147483647, pvNone, 'System has Levels', 'ngLevel', 'System', 1, 1, pvNone, True, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'IESHIDSIST');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('ngSystem', '', 0, 2147483647, pvNone, 'System has Message', 'ngMessage', 'System', 1, 1, pvNone, False, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'IESRIDSIST');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('ngSystem', 'SystemUseCases', 0, 2147483647, pvNone, 'System has Usecases', 'ngSystemUseCaseTicket', 'System', 1, 1, pvNone, True, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'IESEIDSIST');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('ngSystem', 'Permissions', 0, 2147483647, pvNone, 'System has permissions', 'ngPermission', 'System', 1, 1, pvNone, True, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'SEGBIDSIST');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('ngSystem', 'Events', 0, 2147483647, pvNone, 'System has security events', 'ngEvent', '', 1, 1, pvNone, False, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'SEGCIDSIST');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('ngUseCaseTicket', 'SystemGUIs', 0, 2147483647, pvNone, 'UseCase has system GUIs', 'ngSystemGUITickets', 'UseCase', 1, 1, pvNone, True, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'IESPIDCASO');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('ngUseCaseTicket', 'UseCaseSystems', 0, 2147483647, pvNone, 'Usecas has systems', 'ngSystemUseCaseTicket', 'UseCase', 1, 1, pvNone, True, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'IESEIDCASO');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('ngUseCaseTicket', 'UseCaseOperations', 0, 2147483647, pvNone, 'Usecase has usecase operations', 'ngUseCaseTicketOperation', 'UseCase', 1, 1, pvNone, True, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'IESGIDCASO');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('ngUseCaseTicketOperation', 'Events', 0, 2147483647, pvNone, 'Use Case Operations have security events', 'ngEvent', '', 1, 1, pvNone, False, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'SEGCIDCUOP');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('ngUseCaseTicketOperation', 'Permissions', 0, 2147483647, pvNone, 'UseCase Operation has permissions', 'ngPermission', 'UseCaseOperation', 1, 1, pvNone, True, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewOneToManyDbRelationMapRegisterTicket(lRelationTicket, 'SEGBIDCUOP');
lRelationTicket := piMetaModel.NewRelationRegisterTicket('ngUseCaseTicketOperation', 'Levels', 0, 2147483647, pvNone, 'Usecase Operations has levels', 'ngLevel', 'UseCaseOperations', 0, 2147483647, pvNone, True, False);
if lRelationTicket <> nil then (piMetaModel.DefaultMetaModelPersistenceMap as acMetaModelPersistenceMapSql).NewManyToManyDbRelationMapRegisterTicket(lRelationTicket, 'IESIIDCUOP', 'IESIIDLEVE', 'IESITOPLEV');
end;
procedure NewUseCaseTicket_ucImportaConfiguracaoSistema_1327(piMetaModel: acMetaModel);
var
lUseCaseTicket: acUseCaseTicket;
begin
//Criao do UseCaseTicket ucImportaConfiguracaoSistema (1327)
lUseCaseTicket := piMetaModel.NewUseCaseTicket('1327', nil, True);
lUseCaseTicket.Name := 'ucImportaConfiguracaoSistema';
lUseCaseTicket.InheritsFrom := 'ucUseCase';
end;
procedure NewUseCaseTicket_ucCadastroNatureza_1360(piMetaModel: acMetaModel);
var
lUseCaseTicket: acUseCaseTicket;
begin
//Criao do UseCaseTicket ucCadastroNatureza (1360)
lUseCaseTicket := piMetaModel.NewUseCaseTicket('1360', nil, True);
lUseCaseTicket.Name := 'ucCadastroNatureza';
lUseCaseTicket.InheritsFrom := 'ucUseCase';
end;
procedure NewUseCaseTicket_ucDetalhesAtualizacaoSistema_1359(piMetaModel: acMetaModel);
var
lUseCaseTicket: acUseCaseTicket;
begin
//Criao do UseCaseTicket ucDetalhesAtualizacaoSistema (1359)
lUseCaseTicket := piMetaModel.NewUseCaseTicket('1359', nil, True);
lUseCaseTicket.Name := 'ucDetalhesAtualizacaoSistema';
lUseCaseTicket.InheritsFrom := 'ucUseCase';
end;
procedure NewUseCaseTicket_ucControleAcesso_104(piMetaModel: acMetaModel);
var
lUseCaseTicket: acUseCaseTicket;
begin
//Criao do UseCaseTicket ucControleAcesso (104)
lUseCaseTicket := piMetaModel.NewUseCaseTicket('104', nil, True);
lUseCaseTicket.Name := 'ucControleAcesso';
lUseCaseTicket.InheritsFrom := 'ucUseCase';
end;
procedure NewUseCaseTicket_ucExplorerV4_1432(piMetaModel: acMetaModel);
var
lUseCaseTicket: acUseCaseTicket;
begin
//Criao do UseCaseTicket ucExplorerV4 (1432)
lUseCaseTicket := piMetaModel.NewUseCaseTicket('1432', nil, True);
lUseCaseTicket.Name := 'ucExplorerV4';
lUseCaseTicket.InheritsFrom := 'ucUseCase';
end;
procedure NewUseCaseTicket_ucCadastroPerfil_1963(piMetaModel: acMetaModel);
var
lUseCaseTicket: acUseCaseTicket;
begin
//Criao do UseCaseTicket ucCadastroPerfil (1963)
lUseCaseTicket := piMetaModel.NewUseCaseTicket('1963', nil, False);
lUseCaseTicket.Name := 'ucCadastroPerfil';
lUseCaseTicket.InheritsFrom := 'ucUseCase';
end;
procedure NewUseCaseTicket_ucCadastroUsuarioSistema_101(piMetaModel: acMetaModel);
var
lUseCaseTicket: acUseCaseTicket;
begin
//Criao do UseCaseTicket ucCadastroUsuarioSistema (101)
lUseCaseTicket := piMetaModel.NewUseCaseTicket('101', nil, True);
lUseCaseTicket.Name := 'ucCadastroUsuarioSistema';
lUseCaseTicket.InheritsFrom := 'ucUseCase';
end;
procedure NewUseCaseTicket_ucHelloWorld_3215(piMetaModel: acMetaModel);
var
lUseCaseTicket: acUseCaseTicket;
begin
//Criao do UseCaseTicket ucHelloWorld (3215)
lUseCaseTicket := piMetaModel.NewUseCaseTicket('3215', nil, True);
lUseCaseTicket.Name := 'ucHelloWorld';
lUseCaseTicket.InheritsFrom := 'ucUseCase';
end;
procedure RegisterUseCases1(piMetaModel: acMetaModel);
var
lUseCaseTicket: acUseCaseTicket;
lSubMachineUseCaseTicket: acUseCaseTicket;
lStateMachine: acUseCaseStateMachine;
lSubMachineState: utSubMachineState;
lState: utState;
lTransition: utTransition;
begin
NewUseCaseTicket_ucImportaConfiguracaoSistema_1327(piMetaModel);
NewUseCaseTicket_ucCadastroNatureza_1360(piMetaModel);
NewUseCaseTicket_ucDetalhesAtualizacaoSistema_1359(piMetaModel);
NewUseCaseTicket_ucControleAcesso_104(piMetaModel);
NewUseCaseTicket_ucExplorerV4_1432(piMetaModel);
NewUseCaseTicket_ucCadastroPerfil_1963(piMetaModel);
NewUseCaseTicket_ucCadastroUsuarioSistema_101(piMetaModel);
NewUseCaseTicket_ucHelloWorld_3215(piMetaModel);
//Gerando StateMachine para o casu de uso 'ucImportaConfiguracaoSistema'
lUseCaseTicket := piMetaModel.UseCaseTicketByCode['1327'];
lStateMachine := lUseCaseTicket.StateMachine;
lStateMachine.Name := 'smServer';
utState.Create(lStateMachine, 'Initializing');
lSubMachineState := utSubMachineState.Create(lStateMachine, 'UseCaseSubmachine');
lSubMachineUseCaseTicket := piMetaModel.UseCaseTicketByCode['1327'];
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 smImportaConfiguracaoSistema ///////////////////////
lStateMachine := lUseCaseTicket.FindStateMachine('smServer');
lStateMachine := utSubMachineState(lStateMachine.FindState('UseCaseSubmachine')).StateMachine as acUseCaseStateMachine;
lStateMachine.Name := 'smImportaConfiguracaoSistema';
utState.Create(lStateMachine, 'AguardandoXML');
utState.Create(lStateMachine, 'XMLCarregado_AlteracoesMapeadas');
utFinalState.Create(lStateMachine, 'FinalState1');
//Define o InitialState do StateMachine
lStateMachine.InitialState := lStateMachine.FindState('AguardandoXML');
//Adiciona as transicoes dos estados
lState := lStateMachine.FindState('AguardandoXML');
lTransition := lState.NewOutgoingTransition('RM_CARREGARXML');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('XMLCarregado_AlteracoesMapeadas');
lTransition.AddTrigger('RM_CARREGARXML');
lTransition.AddEffect('EFFECT_CARREGARXML');
lTransition := lState.NewOutgoingTransition('RM_IMPORTA_CONFIGURACAO');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('FinalState1');
lTransition.AddTrigger('RM_IMPORTA_CONFIGURACAO');
lTransition.AddEffect('EFFECT_IMPORTA_CONFIGURACAO');
lState := lStateMachine.FindState('XMLCarregado_AlteracoesMapeadas');
lTransition := lState.NewOutgoingTransition('RM_APLICAR_ALTERACOES');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('FinalState1');
lTransition.AddTrigger('RM_APLICAR_ALTERACOES');
lTransition.AddEffect('EFFECT_APLICAR_ALTERACOES');
//Gerando StateMachine para o casu de uso 'ucCadastroNatureza'
lUseCaseTicket := piMetaModel.UseCaseTicketByCode['1360'];
lStateMachine := lUseCaseTicket.StateMachine;
lStateMachine.Name := 'smServer';
utState.Create(lStateMachine, 'Initializing');
lSubMachineState := utSubMachineState.Create(lStateMachine, 'UseCaseSubmachine');
lSubMachineUseCaseTicket := piMetaModel.UseCaseTicketByCode['1360'];
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 smCadastroNatureza ///////////////////////
lStateMachine := lUseCaseTicket.FindStateMachine('smServer');
lStateMachine := utSubMachineState(lStateMachine.FindState('UseCaseSubmachine')).StateMachine as acUseCaseStateMachine;
lStateMachine.Name := 'smCadastroNatureza';
utState.Create(lStateMachine, 'stEditando');
utState.Create(lStateMachine, 'stConsultando');
utState.Create(lStateMachine, 'stAguardando');
//Define o InitialState do StateMachine
lStateMachine.InitialState := lStateMachine.FindState('stEditando');
//Adiciona as transicoes dos estados
lState := lStateMachine.FindState('stEditando');
lTransition := lState.NewOutgoingTransition('RM_OBTEM_CONTEXTO');
lTransition.SourceState := lState;
lTransition.TargetState := lState;
lTransition.AddTrigger('RM_OBTEM_CONTEXTO');
lTransition.AddEffect('EFFECT_MontaContexto');
lTransition := lState.NewOutgoingTransition('RM_SALVA_OBJETO');
lTransition.GuardCondition := 'GUARD_ValidaObjeto';
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('stConsultando');
lTransition.AddTrigger('RM_SALVA_OBJETO');
lTransition.AddEffect('EFFECT_SalvaObjeto');
lTransition := lState.NewOutgoingTransition('RM_EXCLUI_OBJETO');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('stAguardando');
lTransition.AddTrigger('RM_EXCLUI_OBJETO');
lTransition.AddEffect('EFFECT_ExcluiObjeto');
lTransition := lState.NewOutgoingTransition('RM_VALIDA_OBJETO');
lTransition.GuardCondition := 'GUARD_ValidaObjeto';
lTransition.SourceState := lState;
lTransition.TargetState := lState;
lTransition.AddTrigger('RM_VALIDA_OBJETO');
lState := lStateMachine.FindState('stConsultando');
lTransition := lState.NewOutgoingTransition('RM_INCLUI_OBJETO');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('stEditando');
lTransition.AddTrigger('RM_INCLUI_OBJETO');
lTransition.AddEffect('EFFECT_IncluiObjeto');
lTransition := lState.NewOutgoingTransition('RM_EDITA_OBJETO');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('stEditando');
lTransition.AddTrigger('RM_EDITA_OBJETO');
lTransition.AddEffect('EFFECT_MontaContexto');
lTransition := lState.NewOutgoingTransition('RM_EXCLUI_OBJETO');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('stAguardando');
lTransition.AddTrigger('RM_EXCLUI_OBJETO');
lTransition.AddEffect('EFFECT_ExcluiObjeto');
lState := lStateMachine.FindState('stAguardando');
lTransition := lState.NewOutgoingTransition('RM_INCLUI_OBJETO');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('stEditando');
lTransition.AddTrigger('RM_INCLUI_OBJETO');
lTransition.AddEffect('EFFECT_IncluiObjeto');
//Gerando StateMachine para o casu de uso 'ucDetalhesAtualizacaoSistema'
lUseCaseTicket := piMetaModel.UseCaseTicketByCode['1359'];
lStateMachine := lUseCaseTicket.StateMachine;
lStateMachine.Name := 'smServer';
utState.Create(lStateMachine, 'Initializing');
lSubMachineState := utSubMachineState.Create(lStateMachine, 'UseCaseSubmachine');
lSubMachineUseCaseTicket := piMetaModel.UseCaseTicketByCode['1359'];
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 smDetalhesAtualizacaoSistema ///////////////////////
lStateMachine := lUseCaseTicket.FindStateMachine('smServer');
lStateMachine := utSubMachineState(lStateMachine.FindState('UseCaseSubmachine')).StateMachine as acUseCaseStateMachine;
lStateMachine.Name := 'smDetalhesAtualizacaoSistema';
utState.Create(lStateMachine, 'Executando');
utFinalState.Create(lStateMachine, 'FinalState1');
//Define o InitialState do StateMachine
lStateMachine.InitialState := lStateMachine.FindState('Executando');
//Adiciona as transicoes dos estados
lState := lStateMachine.FindState('Executando');
lTransition := lState.NewOutgoingTransition('RM_RETORNA_XML');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('FinalState1');
lTransition.AddTrigger('RM_RETORNA_XML');
lTransition.AddEffect('EFFECT_RETORNA_XML');
//Gerando StateMachine para o casu de uso 'ucControleAcesso'
lUseCaseTicket := piMetaModel.UseCaseTicketByCode['104'];
lStateMachine := lUseCaseTicket.StateMachine;
lStateMachine.Name := 'smServer';
utState.Create(lStateMachine, 'Initializing');
lSubMachineState := utSubMachineState.Create(lStateMachine, 'UseCaseSubmachine');
lSubMachineUseCaseTicket := piMetaModel.UseCaseTicketByCode['104'];
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 smControleAcesso ///////////////////////
lStateMachine := lUseCaseTicket.FindStateMachine('smServer');
lStateMachine := utSubMachineState(lStateMachine.FindState('UseCaseSubmachine')).StateMachine as acUseCaseStateMachine;
lStateMachine.Name := 'smControleAcesso';
utState.Create(lStateMachine, 'Inicializando');
utState.Create(lStateMachine, 'Executando');
//Define o InitialState do StateMachine
lStateMachine.InitialState := lStateMachine.FindState('Inicializando');
//Adiciona as transicoes dos estados
lState := lStateMachine.FindState('Inicializando');
lTransition := lState.NewOutgoingTransition('RM_INICIALIZAR_INTERFACE');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('Executando');
lTransition.AddTrigger('RM_INICIALIZAR_INTERFACE');
lTransition.AddEffect('EFFECT_INICIALIZAR_INTERFACE');
lState := lStateMachine.FindState('Executando');
lTransition := lState.NewOutgoingTransition('RM_CARREGAR_PERMISSOES');
lTransition.SourceState := lState;
lTransition.TargetState := lState;
lTransition.AddTrigger('RM_CARREGAR_PERMISSOES');
lTransition.AddEffect('EFFECT_CARREGAR_PERMISSOES');
lTransition := lState.NewOutgoingTransition('RM_SALVAR');
lTransition.SourceState := lState;
lTransition.TargetState := lState;
lTransition.AddTrigger('RM_SALVAR');
lTransition.AddEffect('EFFECT_SALVAR');
//Gerando StateMachine para o casu de uso 'ucExplorerV4'
lUseCaseTicket := piMetaModel.UseCaseTicketByCode['1432'];
lStateMachine := lUseCaseTicket.StateMachine;
lStateMachine.Name := 'smServer';
utState.Create(lStateMachine, 'Initializing');
lSubMachineState := utSubMachineState.Create(lStateMachine, 'UseCaseSubmachine');
lSubMachineUseCaseTicket := piMetaModel.UseCaseTicketByCode['1432'];
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 smExplorerV4 ///////////////////////
lStateMachine := lUseCaseTicket.FindStateMachine('smServer');
lStateMachine := utSubMachineState(lStateMachine.FindState('UseCaseSubmachine')).StateMachine as acUseCaseStateMachine;
lStateMachine.Name := 'smExplorerV4';
utState.Create(lStateMachine, 'Aguardando');
//Define o InitialState do StateMachine
lStateMachine.InitialState := lStateMachine.FindState('Aguardando');
//Adiciona as transicoes dos estados
lState := lStateMachine.FindState('Aguardando');
lTransition := lState.NewOutgoingTransition('RM_EXECUTE_OQL');
lTransition.SourceState := lState;
lTransition.TargetState := lState;
lTransition.AddTrigger('RM_EXECUTE_OQL');
lTransition.AddEffect('EFFECT_EXECUTE_OQL');
lTransition := lState.NewOutgoingTransition('RM_GET_OBJECT_DATA');
lTransition.SourceState := lState;
lTransition.TargetState := lState;
lTransition.AddTrigger('RM_GET_OBJECT_DATA');
lTransition.AddEffect('EFFECT_GET_OBJECT_DATA');
lTransition := lState.NewOutgoingTransition('RM_EXECUTE_SQL');
lTransition.SourceState := lState;
lTransition.TargetState := lState;
lTransition.AddTrigger('RM_EXECUTE_SQL');
lTransition.AddEffect('EFFECT_EXECUTE_SQL');
lTransition := lState.NewOutgoingTransition('RM_GET_MODEL_OBJECT_DATA');
lTransition.SourceState := lState;
lTransition.TargetState := lState;
lTransition.AddTrigger('RM_GET_MODEL_OBJECT_DATA');
lTransition.AddEffect('EFFECT_GET_MODEL_OBJECT_DATA');
lTransition := lState.NewOutgoingTransition('RM_GET_OQL_FROM_OBJECT');
lTransition.SourceState := lState;
lTransition.TargetState := lState;
lTransition.AddTrigger('RM_GET_OQL_FROM_OBJECT');
lTransition.AddEffect('EFFECT_GET_OQL_FROM_OBJECT');
//Gerando StateMachine para o casu de uso 'ucCadastroPerfil'
lUseCaseTicket := piMetaModel.UseCaseTicketByCode['1963'];
lStateMachine := lUseCaseTicket.StateMachine;
lStateMachine.Name := 'smServer';
utState.Create(lStateMachine, 'Initializing');
lSubMachineState := utSubMachineState.Create(lStateMachine, 'UseCaseSubmachine');
lSubMachineUseCaseTicket := piMetaModel.UseCaseTicketByCode['1963'];
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 smucCadastroPerfil ///////////////////////
lStateMachine := lUseCaseTicket.FindStateMachine('smServer');
lStateMachine := utSubMachineState(lStateMachine.FindState('UseCaseSubmachine')).StateMachine as acUseCaseStateMachine;
lStateMachine.Name := 'smucCadastroPerfil';
utState.Create(lStateMachine, 'stAguardando');
utState.Create(lStateMachine, 'stEditando');
utState.Create(lStateMachine, 'stConsultando');
//Define o InitialState do StateMachine
lStateMachine.InitialState := lStateMachine.FindState('stAguardando');
//Adiciona as transicoes dos estados
lState := lStateMachine.FindState('stAguardando');
lTransition := lState.NewOutgoingTransition('RM_OBTEM_CONTEXTO');
lTransition.SourceState := lState;
lTransition.TargetState := lState;
lTransition.AddTrigger('RM_OBTEM_CONTEXTO');
lTransition.AddEffect('EFFECT_MontaContexto');
lTransition := lState.NewOutgoingTransition('RM_INCLUI_OBJETO');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('stEditando');
lTransition.AddTrigger('RM_INCLUI_OBJETO');
lTransition.AddEffect('EFFECT_IncluiObjeto');
lTransition := lState.NewOutgoingTransition('RM_EXCLUI_OBJETO');
lTransition.SourceState := lState;
lTransition.TargetState := lState;
lTransition.AddTrigger('RM_EXCLUI_OBJETO');
lTransition.AddEffect('EFFECT_ExcluiObjeto');
lTransition := lState.NewOutgoingTransition('RM_EDITA_OBJETO');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('stEditando');
lTransition.AddTrigger('RM_EDITA_OBJETO');
lTransition.AddEffect('EFFECT_EditaObjeto');
lTransition := lState.NewOutgoingTransition('RM_CONSULTA_OBJETO');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('stConsultando');
lTransition.AddTrigger('RM_CONSULTA_OBJETO');
lTransition.AddEffect('Effect_ConsultaObjeto');
lState := lStateMachine.FindState('stEditando');
lTransition := lState.NewOutgoingTransition('RM_EXCLUI_OBJETO');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('stAguardando');
lTransition.AddTrigger('RM_EXCLUI_OBJETO');
lTransition.AddEffect('EFFECT_ExcluiObjeto');
lTransition := lState.NewOutgoingTransition('RM_SALVA_OBJETO');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('stConsultando');
lTransition.AddTrigger('RM_SALVA_OBJETO');
lTransition.AddEffect('Effect_SalvaObjeto');
lState := lStateMachine.FindState('stConsultando');
lTransition := lState.NewOutgoingTransition('RM_INCLUI_OBJETO');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('stEditando');
lTransition.AddTrigger('RM_INCLUI_OBJETO');
lTransition.AddEffect('EFFECT_IncluiObjeto');
lTransition := lState.NewOutgoingTransition('RM_EDITA_OBJETO');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('stEditando');
lTransition.AddTrigger('RM_EDITA_OBJETO');
lTransition.AddEffect('EFFECT_EditaObjeto');
lTransition := lState.NewOutgoingTransition('RM_EXCLUI_OBJETO');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('stAguardando');
lTransition.AddTrigger('RM_EXCLUI_OBJETO');
lTransition.AddEffect('EFFECT_ExcluiObjeto');
lTransition := lState.NewOutgoingTransition('RM_CONSULTA_OBJETO');
lTransition.SourceState := lState;
lTransition.TargetState := lState;
lTransition.AddTrigger('RM_CONSULTA_OBJETO');
lTransition.AddEffect('Effect_ConsultaObjeto');
//Gerando StateMachine para o casu de uso 'ucCadastroUsuarioSistema'
lUseCaseTicket := piMetaModel.UseCaseTicketByCode['101'];
lStateMachine := lUseCaseTicket.StateMachine;
lStateMachine.Name := 'smServer';
utState.Create(lStateMachine, 'Initializing');
lSubMachineState := utSubMachineState.Create(lStateMachine, 'UseCaseSubmachine');
lSubMachineUseCaseTicket := piMetaModel.UseCaseTicketByCode['101'];
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 smCadastroUsuarioSistema ///////////////////////
lStateMachine := lUseCaseTicket.FindStateMachine('smServer');
lStateMachine := utSubMachineState(lStateMachine.FindState('UseCaseSubmachine')).StateMachine as acUseCaseStateMachine;
lStateMachine.Name := 'smCadastroUsuarioSistema';
utState.Create(lStateMachine, 'stConsultando');
utState.Create(lStateMachine, 'stEditando');
utState.Create(lStateMachine, 'stAguardando');
//Define o InitialState do StateMachine
lStateMachine.InitialState := lStateMachine.FindState('stConsultando');
//Adiciona as transicoes dos estados
lState := lStateMachine.FindState('stConsultando');
lTransition := lState.NewOutgoingTransition('RM_INCLUI_OBJETO');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('stEditando');
lTransition.AddTrigger('RM_INCLUI_OBJETO');
lTransition.AddEffect('EFFECT_IncluiObjeto');
lTransition := lState.NewOutgoingTransition('RM_EDITA_OBJETO');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('stEditando');
lTransition.AddTrigger('RM_EDITA_OBJETO');
lTransition.AddEffect('EFFECT_MontaContexto');
lTransition := lState.NewOutgoingTransition('RM_EXCLUI_OBJETO');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('stAguardando');
lTransition.AddTrigger('RM_EXCLUI_OBJETO');
lTransition.AddEffect('EFFECT_ExcluiObjeto');
lTransition := lState.NewOutgoingTransition('RM_OBTEM_CONTEXTO');
lTransition.SourceState := lState;
lTransition.TargetState := lState;
lTransition.AddTrigger('RM_OBTEM_CONTEXTO');
lTransition.AddEffect('EFFECT_MontaContexto');
lTransition := lState.NewOutgoingTransition('RM_SALVA_OBJETO');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('stAguardando');
lTransition.AddTrigger('RM_SALVA_OBJETO');
lTransition.AddEffect('EFFECT_SalvaObjeto');
lState := lStateMachine.FindState('stEditando');
lTransition := lState.NewOutgoingTransition('RM_OBTEM_CONTEXTO');
lTransition.SourceState := lState;
lTransition.TargetState := lState;
lTransition.AddTrigger('RM_OBTEM_CONTEXTO');
lTransition.AddEffect('EFFECT_MontaContexto');
lTransition := lState.NewOutgoingTransition('RM_SALVA_OBJETO');
lTransition.GuardCondition := 'GUARD_ValidaObjeto';
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('stConsultando');
lTransition.AddTrigger('RM_SALVA_OBJETO');
lTransition.AddEffect('EFFECT_SalvaObjeto');
lTransition := lState.NewOutgoingTransition('RM_EXCLUI_OBJETO');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('stAguardando');
lTransition.AddTrigger('RM_EXCLUI_OBJETO');
lTransition.AddEffect('EFFECT_ExcluiObjeto');
lTransition := lState.NewOutgoingTransition('RM_VALIDA_OBJETO');
lTransition.GuardCondition := 'GUARD_ValidaObjeto';
lTransition.SourceState := lState;
lTransition.TargetState := lState;
lTransition.AddTrigger('RM_VALIDA_OBJETO');
lState := lStateMachine.FindState('stAguardando');
lTransition := lState.NewOutgoingTransition('RM_INCLUI_OBJETO');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('stEditando');
lTransition.AddTrigger('RM_INCLUI_OBJETO');
lTransition.AddEffect('EFFECT_IncluiObjeto');
//Gerando StateMachine para o casu de uso 'ucHelloWorld'
lUseCaseTicket := piMetaModel.UseCaseTicketByCode['3215'];
lStateMachine := lUseCaseTicket.StateMachine;
lStateMachine.Name := 'smServer';
utState.Create(lStateMachine, 'Initializing');
lSubMachineState := utSubMachineState.Create(lStateMachine, 'UseCaseSubmachine');
lSubMachineUseCaseTicket := piMetaModel.UseCaseTicketByCode['3215'];
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 smucHelloWorld ///////////////////////
lStateMachine := lUseCaseTicket.FindStateMachine('smServer');
lStateMachine := utSubMachineState(lStateMachine.FindState('UseCaseSubmachine')).StateMachine as acUseCaseStateMachine;
lStateMachine.Name := 'smucHelloWorld';
utState.Create(lStateMachine, 'Executando');
utState.Create(lStateMachine, 'Cumprimentando');
utFinalState.Create(lStateMachine, 'FinalState1');
//Define o InitialState do StateMachine
lStateMachine.InitialState := lStateMachine.FindState('Executando');
//Adiciona as transicoes dos estados
lState := lStateMachine.FindState('Executando');
lTransition := lState.NewOutgoingTransition('RM_CUMPRIMENTAR');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('Cumprimentando');
lTransition.AddTrigger('RM_CUMPRIMENTAR');
lTransition.AddEffect('Effect_Cumprimentar');
lState := lStateMachine.FindState('Cumprimentando');
lTransition := lState.NewOutgoingTransition('RM_DESPEDIR');
lTransition.SourceState := lState;
lTransition.TargetState := lStateMachine.FindState('FinalState1');
lTransition.AddTrigger('RM_DESPEDIR');
lTransition.AddEffect('Effect_Despedir');
end;
procedure RegisterModelMappings(piMetaModel: acMetaModel);
begin
RegisterClassTickets1(piMetaModel){1 - 200};
RegisterClassRelationTickets(piMetaModel);
RegisterUseCases1(piMetaModel){1 - 100};
end;
end.
This source diff could not be displayed because it is too large. You can view the blob instead.
-- SCRIPT CREATION DATE/TIME 24/10/2017 @ 1002
--DROP CONSTRAINTS AND INDEXES FROM DBASSOCIATIONMAP (RELATIONS)
-- RELATION ngUseCaseTicketOperation(0..*) <--Usecase Operations has levels--> (0..*)ngLevel
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('FS10Levels') AND parent_object_id = OBJECT_ID('IESITOPLEV'))
ALTER TABLE IESITOPLEV DROP CONSTRAINT FS10Levels
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('FS11UseCaseOperations') AND parent_object_id = OBJECT_ID('IESITOPLEV'))
ALTER TABLE IESITOPLEV DROP CONSTRAINT FS11UseCaseOperations
-- RELATION NGBusinessEventSubscriber(0..*) <--Subscriber''s Events Type of Interest--> (0..*)NGBusinessEventType
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F279EventsType') AND parent_object_id = OBJECT_ID('INTETINTER'))
ALTER TABLE INTETINTER DROP CONSTRAINT F279EventsType
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F280Subscribers') AND parent_object_id = OBJECT_ID('INTETINTER'))
ALTER TABLE INTETINTER DROP CONSTRAINT F280Subscribers
-- RELATION NGBusinessEventSubscriber(0..*) <--Subscriber''s Unnotified Events--> (0..*)NGBusinessEvent
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F279UnnotifiedEvents') AND parent_object_id = OBJECT_ID('INTDTUNNOT'))
ALTER TABLE INTDTUNNOT DROP CONSTRAINT F279UnnotifiedEvents
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F278UnnotifiedEvents') AND parent_object_id = OBJECT_ID('INTDTUNNOT'))
ALTER TABLE INTDTUNNOT DROP CONSTRAINT F278UnnotifiedEvents
-- RELATION ngProfile(0..*) <--Profile has Usecase Operations--> (0..*)ngUseCaseTicketOperation
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F1518UseCaseOperations') AND parent_object_id = OBJECT_ID('IESTTOPPRO'))
ALTER TABLE IESTTOPPRO DROP CONSTRAINT F1518UseCaseOperations
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('FS10UseCaseOperations') AND parent_object_id = OBJECT_ID('IESTTOPPRO'))
ALTER TABLE IESTTOPPRO DROP CONSTRAINT FS10UseCaseOperations
-- RELATION NGBusinessEventSubscriber(0..1) <--Subscriber''s Active Error--> (1..1)NGBusinessEventSubscriberError
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F279ActiveError') AND parent_object_id = OBJECT_ID('INTKTSUBER'))
ALTER TABLE INTKTSUBER DROP CONSTRAINT F279ActiveError
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F743ActiveError') AND parent_object_id = OBJECT_ID('INTKTSUBER'))
ALTER TABLE INTKTSUBER DROP CONSTRAINT F743ActiveError
-- RELATION NGBusinessEventSubscriber(0..*) <--Subscriber''s Notified Events--> (0..*)NGBusinessEvent
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F279NotifiedEvents') AND parent_object_id = OBJECT_ID('INTMTNOTEV'))
ALTER TABLE INTMTNOTEV DROP CONSTRAINT F279NotifiedEvents
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F278NotifiedEvents') AND parent_object_id = OBJECT_ID('INTMTNOTEV'))
ALTER TABLE INTMTNOTEV DROP CONSTRAINT F278NotifiedEvents
-- RELATION NGBusinessEventSubscriber(0..*) <--Subscriber''s Ignored Events--> (0..*)NGBusinessEvent
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F279IgnoredEvents') AND parent_object_id = OBJECT_ID('INTITIGNOR'))
ALTER TABLE INTITIGNOR DROP CONSTRAINT F279IgnoredEvents
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F278IgnoredEvents') AND parent_object_id = OBJECT_ID('INTITIGNOR'))
ALTER TABLE INTITIGNOR DROP CONSTRAINT F278IgnoredEvents
-- RELATION NGNatureza(0..*) <--User nature can access systems--> (0..*)ngSystem
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F132Systems') AND parent_object_id = OBJECT_ID('SEGETSINAU'))
ALTER TABLE SEGETSINAU DROP CONSTRAINT F132Systems
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('FS5Systems') AND parent_object_id = OBJECT_ID('SEGETSINAU'))
ALTER TABLE SEGETSINAU DROP CONSTRAINT FS5Systems
--DROP CONSTRAINTS AND INDEXES FROM DBACLASSMAP
-- CLASS ngAuditEventData
-- RELATION ngAuditEvent(0..*) <--Audit Event has Data--> (1..1)ngAuditEventData
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F363SISDIDAUDI') AND parent_object_id = OBJECT_ID('SISDTEVNDA'))
ALTER TABLE SISDTEVNDA DROP CONSTRAINT F363SISDIDAUDI
-- CLASS NGBusinessEvent
-- RELATION NGBusinessEventType(0..*) <--Event has type--> (1..1)NGBusinessEvent
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F278INTAIDEVNT') AND parent_object_id = OBJECT_ID('INTATBUEVN'))
ALTER TABLE INTATBUEVN DROP CONSTRAINT F278INTAIDEVNT
-- CLASS NGBusinessEventDistributed
-- RELATION NGBusinessEvent(0..1) <--Distributed BusinessEvent--> (1..1)NGBusinessEventDistributed
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F744INTLIDBUEV') AND parent_object_id = OBJECT_ID('INTLTBUEVD'))
ALTER TABLE INTLTBUEVD DROP CONSTRAINT F744INTLIDBUEV
-- CLASS NGBusinessEventSubscriberError
-- RELATION NGBusinessEventSubscriber(0..*) <--Subscriber''s Errors--> (1..1)NGBusinessEventSubscriberError
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F743INTJIDSUBS') AND parent_object_id = OBJECT_ID('INTJTSBERR'))
ALTER TABLE INTJTSBERR DROP CONSTRAINT F743INTJIDSUBS
-- RELATION NGBusinessEvent(0..*) <--SubscriberError has Event--> (1..1)NGBusinessEventSubscriberError
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F743INTJIDBUEV') AND parent_object_id = OBJECT_ID('INTJTSBERR'))
ALTER TABLE INTJTSBERR DROP CONSTRAINT F743INTJIDBUEV
-- CLASS NGBusinessSubscriberNotifierEventualTimeWindow
-- RELATION NGBusinessEventSubscriber(0..*) <--Subscriber has eventual notifier time windows--> (1..1)NGBusinessSubscriberNotifierEventualTimeWindow
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F742INTHIDSUBS') AND parent_object_id = OBJECT_ID('INTHTETMWI'))
ALTER TABLE INTHTETMWI DROP CONSTRAINT F742INTHIDSUBS
-- CLASS NGBusinessSubscriberNotifierTimeGrid
-- RELATION NGBusinessEventSubscriber(0..*) <--Subscriber has notifier time grids--> (1..1)NGBusinessSubscriberNotifierTimeGrid
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F740INTFIDSUBS') AND parent_object_id = OBJECT_ID('INTFTTMGRD'))
ALTER TABLE INTFTTMGRD DROP CONSTRAINT F740INTFIDSUBS
-- CLASS NGBusinessSubscriberNotifierTimeWindow
-- RELATION NGBusinessSubscriberNotifierTimeGrid(0..*) <--Time grid has time windows--> (1..1)NGBusinessSubscriberNotifierTimeWindow
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F741INTGIDTMGR') AND parent_object_id = OBJECT_ID('INTGTTMWIN'))
ALTER TABLE INTGTTMWIN DROP CONSTRAINT F741INTGIDTMGR
-- CLASS ngEvent
-- RELATION ngUseCaseTicketOperation(0..*) <--Use Case Operations have security events--> (1..1)ngEvent
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('FS8SEGCIDCUOP') AND parent_object_id = OBJECT_ID('SEGCTEVSEG'))
ALTER TABLE SEGCTEVSEG DROP CONSTRAINT FS8SEGCIDCUOP
-- RELATION ngSystem(0..*) <--System has security events--> (1..1)ngEvent
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('FS8SEGCIDSIST') AND parent_object_id = OBJECT_ID('SEGCTEVSEG'))
ALTER TABLE SEGCTEVSEG DROP CONSTRAINT FS8SEGCIDSIST
-- RELATION NGUser(0..*) <--User has security events--> (1..1)ngEvent
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('FS8SEGCIDRESP') AND parent_object_id = OBJECT_ID('SEGCTEVSEG'))
ALTER TABLE SEGCTEVSEG DROP CONSTRAINT FS8SEGCIDRESP
-- RELATION NGUser(0..*) <--User generate security events--> (1..1)ngEvent
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('FS8SEGCIDUSUA') AND parent_object_id = OBJECT_ID('SEGCTEVSEG'))
ALTER TABLE SEGCTEVSEG DROP CONSTRAINT FS8SEGCIDUSUA
-- CLASS ngLevel
-- RELATION ngSystem(0..*) <--System has Levels--> (1..1)ngLevel
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('FS11IESHIDSIST') AND parent_object_id = OBJECT_ID('IESHTLEVEL'))
ALTER TABLE IESHTLEVEL DROP CONSTRAINT FS11IESHIDSIST
-- CLASS ngMessage
-- RELATION ngSystem(0..*) <--System has Message--> (1..1)ngMessage
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F515IESRIDSIST') AND parent_object_id = OBJECT_ID('IESRTMESSG'))
ALTER TABLE IESRTMESSG DROP CONSTRAINT F515IESRIDSIST
-- CLASS ngPermission
-- RELATION ngUseCaseTicketOperation(0..*) <--UseCase Operation has permissions--> (1..1)ngPermission
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('FS7SEGBIDCUOP') AND parent_object_id = OBJECT_ID('SEGBTPERMI'))
ALTER TABLE SEGBTPERMI DROP CONSTRAINT FS7SEGBIDCUOP
-- RELATION ngSystem(0..*) <--System has permissions--> (1..1)ngPermission
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('FS7SEGBIDSIST') AND parent_object_id = OBJECT_ID('SEGBTPERMI'))
ALTER TABLE SEGBTPERMI DROP CONSTRAINT FS7SEGBIDSIST
-- RELATION NGUser(0..*) <--User has Permissions--> (1..1)ngPermission
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('FS7SEGBIDUSUA') AND parent_object_id = OBJECT_ID('SEGBTPERMI'))
ALTER TABLE SEGBTPERMI DROP CONSTRAINT FS7SEGBIDUSUA
-- CLASS ngSystemGUITickets
-- RELATION ngUseCaseTicket(0..*) <--UseCase has system GUIs--> (1..1)ngSystemGUITickets
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F129IESPIDCASO') AND parent_object_id = OBJECT_ID('IESPTSISIN'))
ALTER TABLE IESPTSISIN DROP CONSTRAINT F129IESPIDCASO
-- RELATION ngSystem(0..*) <--System has GUIs--> (1..1)ngSystemGUITickets
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F129IESPIDSIST') AND parent_object_id = OBJECT_ID('IESPTSISIN'))
ALTER TABLE IESPTSISIN DROP CONSTRAINT F129IESPIDSIST
-- RELATION ngGUITicket(0..*) <--System GUIs have GUI--> (1..1)ngSystemGUITickets
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F129IESPIDINTE') AND parent_object_id = OBJECT_ID('IESPTSISIN'))
ALTER TABLE IESPTSISIN DROP CONSTRAINT F129IESPIDINTE
-- CLASS ngSystemUseCaseTicket
-- RELATION ngUseCaseTicket(0..*) <--Usecas has systems--> (1..1)ngSystemUseCaseTicket
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('FS14IESEIDCASO') AND parent_object_id = OBJECT_ID('IESETSISCU'))
ALTER TABLE IESETSISCU DROP CONSTRAINT FS14IESEIDCASO
-- RELATION ngSystem(0..*) <--System has Usecases--> (1..1)ngSystemUseCaseTicket
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('FS14IESEIDSIST') AND parent_object_id = OBJECT_ID('IESETSISCU'))
ALTER TABLE IESETSISCU DROP CONSTRAINT FS14IESEIDSIST
-- CLASS ngUseCaseTicket
-- RELATION ngIcon(0..*) <--Usecases have an icon--> (1..1)ngUseCaseTicket
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('FS1IESBIDCUIC') AND parent_object_id = OBJECT_ID('IESBTCASOU'))
ALTER TABLE IESBTCASOU DROP CONSTRAINT FS1IESBIDCUIC
-- RELATION ngEntity(0..*) <--Entity has Usecases--> (1..1)ngUseCaseTicket
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('FS1IESBIDENTI') AND parent_object_id = OBJECT_ID('IESBTCASOU'))
ALTER TABLE IESBTCASOU DROP CONSTRAINT FS1IESBIDENTI
-- RELATION ngCategory(0..*) <--Usecases have a category--> (1..1)ngUseCaseTicket
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('FS1IESBIDCATE') AND parent_object_id = OBJECT_ID('IESBTCASOU'))
ALTER TABLE IESBTCASOU DROP CONSTRAINT FS1IESBIDCATE
-- CLASS ngUseCaseTicketOperation
-- RELATION ngUseCaseTicket(0..*) <--Usecase has usecase operations--> (1..1)ngUseCaseTicketOperation
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('FS10IESGIDCASO') AND parent_object_id = OBJECT_ID('IESGTCUOPE'))
ALTER TABLE IESGTCUOPE DROP CONSTRAINT FS10IESGIDCASO
-- RELATION ngOperation(0..*) <--UseCase operations has operation--> (1..1)ngUseCaseTicketOperation
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('FS10IESGIDOPER') AND parent_object_id = OBJECT_ID('IESGTCUOPE'))
ALTER TABLE IESGTCUOPE DROP CONSTRAINT FS10IESGIDOPER
-- CLASS NGUser
-- RELATION NGNatureza(0..*) <--User has nature--> (1..1)NGUser
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('FS6SEGAIDNAUS') AND parent_object_id = OBJECT_ID('SEGATUSUAR'))
ALTER TABLE SEGATUSUAR DROP CONSTRAINT FS6SEGAIDNAUS
-- CLASS ngUserProfile
-- RELATION ngProfile(0..*) <--Profile has Users--> (1..1)ngUserProfile
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F1540IESUIDPROF') AND parent_object_id = OBJECT_ID('IESUTUSERP'))
ALTER TABLE IESUTUSERP DROP CONSTRAINT F1540IESUIDPROF
-- RELATION NGUser(0..*) <--User has Profiles--> (1..1)ngUserProfile
IF EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID('F1540IESUIDUSUA') AND parent_object_id = OBJECT_ID('IESUTUSERP'))
ALTER TABLE IESUTUSERP DROP CONSTRAINT F1540IESUIDUSUA
--CREATE TABLES FROM DBASSOCIATIONMAP (RELATIONS)
-- RELATION ngUseCaseTicketOperation(0..*) <--Usecase Operations has levels--> (0..*)ngLevel
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('IESITOPLEV') AND type in ('U'))
DROP TABLE IESITOPLEV
-- RELATION NGBusinessEventSubscriber(0..*) <--Subscriber''s Events Type of Interest--> (0..*)NGBusinessEventType
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('INTETINTER') AND type in ('U'))
DROP TABLE INTETINTER
-- RELATION NGBusinessEventSubscriber(0..*) <--Subscriber''s Unnotified Events--> (0..*)NGBusinessEvent
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('INTDTUNNOT') AND type in ('U'))
DROP TABLE INTDTUNNOT
-- RELATION ngProfile(0..*) <--Profile has Usecase Operations--> (0..*)ngUseCaseTicketOperation
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('IESTTOPPRO') AND type in ('U'))
DROP TABLE IESTTOPPRO
-- RELATION NGBusinessEventSubscriber(0..1) <--Subscriber''s Active Error--> (1..1)NGBusinessEventSubscriberError
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('INTKTSUBER') AND type in ('U'))
DROP TABLE INTKTSUBER
-- RELATION NGBusinessEventSubscriber(0..*) <--Subscriber''s Notified Events--> (0..*)NGBusinessEvent
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('INTMTNOTEV') AND type in ('U'))
DROP TABLE INTMTNOTEV
-- RELATION NGBusinessEventSubscriber(0..*) <--Subscriber''s Ignored Events--> (0..*)NGBusinessEvent
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('INTITIGNOR') AND type in ('U'))
DROP TABLE INTITIGNOR
-- RELATION NGNatureza(0..*) <--User nature can access systems--> (0..*)ngSystem
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('SEGETSINAU') AND type in ('U'))
DROP TABLE SEGETSINAU--CREATE TABLES FROM DBCLASSMAP
-- CLASS ngAuditEvent
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('SISCTAUDIT') AND type in ('U'))
DROP TABLE SISCTAUDIT
-- CLASS ngAuditEventData
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('SISDTEVNDA') AND type in ('U'))
DROP TABLE SISDTEVNDA
-- CLASS NGBusinessEvent
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('INTATBUEVN') AND type in ('U'))
DROP TABLE INTATBUEVN
-- CLASS NGBusinessEventDistributed
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('INTLTBUEVD') AND type in ('U'))
DROP TABLE INTLTBUEVD
-- CLASS NGBusinessEventSubscriber
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('INTBTSUBSC') AND type in ('U'))
DROP TABLE INTBTSUBSC
-- CLASS NGBusinessEventSubscriberError
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('INTJTSBERR') AND type in ('U'))
DROP TABLE INTJTSBERR
-- CLASS NGBusinessEventType
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('INTCTEVNTP') AND type in ('U'))
DROP TABLE INTCTEVNTP
-- CLASS NGBusinessSubscriberNotifierEventualTimeWindow
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('INTHTETMWI') AND type in ('U'))
DROP TABLE INTHTETMWI
-- CLASS NGBusinessSubscriberNotifierTimeGrid
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('INTFTTMGRD') AND type in ('U'))
DROP TABLE INTFTTMGRD
-- CLASS NGBusinessSubscriberNotifierTimeWindow
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('INTGTTMWIN') AND type in ('U'))
DROP TABLE INTGTTMWIN
-- CLASS ngCategory
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('IESDTCATEG') AND type in ('U'))
DROP TABLE IESDTCATEG
-- CLASS ngEntity
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('IESCTENTID') AND type in ('U'))
DROP TABLE IESCTENTID
-- CLASS ngEvent
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('SEGCTEVSEG') AND type in ('U'))
DROP TABLE SEGCTEVSEG
-- CLASS ngGUITicket
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('IESOTINTER') AND type in ('U'))
DROP TABLE IESOTINTER
-- CLASS ngIcon
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('IESFTCUICO') AND type in ('U'))
DROP TABLE IESFTCUICO
-- CLASS ngLevel
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('IESHTLEVEL') AND type in ('U'))
DROP TABLE IESHTLEVEL
-- CLASS ngMessage
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('IESRTMESSG') AND type in ('U'))
DROP TABLE IESRTMESSG
-- CLASS NGNatureza
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('SEGDTNAUSU') AND type in ('U'))
DROP TABLE SEGDTNAUSU
-- CLASS ngOperation
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('IESJTOPERA') AND type in ('U'))
DROP TABLE IESJTOPERA
-- CLASS ngPermission
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('SEGBTPERMI') AND type in ('U'))
DROP TABLE SEGBTPERMI
-- CLASS ngProfile
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('IESSTPROFI') AND type in ('U'))
DROP TABLE IESSTPROFI
-- CLASS ngSystem
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('IESATSISTE') AND type in ('U'))
DROP TABLE IESATSISTE
-- CLASS ngSystemConfigUpdateLog
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('IESQTUPLOG') AND type in ('U'))
DROP TABLE IESQTUPLOG
-- CLASS ngSystemGUITickets
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('IESPTSISIN') AND type in ('U'))
DROP TABLE IESPTSISIN
-- CLASS ngSystemUseCaseTicket
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('IESETSISCU') AND type in ('U'))
DROP TABLE IESETSISCU
-- CLASS ngUseCaseTicket
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('IESBTCASOU') AND type in ('U'))
DROP TABLE IESBTCASOU
-- CLASS ngUseCaseTicketOperation
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('IESGTCUOPE') AND type in ('U'))
DROP TABLE IESGTCUOPE
-- CLASS NGUser
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('SEGATUSUAR') AND type in ('U'))
DROP TABLE SEGATUSUAR
-- CLASS ngUserProfile
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('IESUTUSERP') AND type in ('U'))
DROP TABLE IESUTUSERP--CREATE TABLES FROM DBCLASSMAP
-- CLASS ngAuditEvent
CREATE TABLE SISCTAUDIT (
SISCIDAUDI INT PRIMARY KEY,
SISCTRANID VARCHAR(38) NOT NULL,
SISCDATETI DATETIME NOT NULL,
SISCUSERNA VARCHAR(30) NOT NULL,
SISCEVNTYP VARCHAR(10) NOT NULL,
SISCUCNAME VARCHAR(100) NOT NULL,
SISCCLNAME VARCHAR(100) NOT NULL,
SISCOBJOID VARCHAR(40) NOT NULL,
SISCCONTEX VARCHAR(255) NULL
);
-- CLASS ngAuditEventData
CREATE TABLE SISDTEVNDA (
SISDIDEVND INT PRIMARY KEY,
SISDDATNAM VARCHAR(100) NOT NULL,
SISDOLDVAL VARCHAR(4000) NULL,
SISDNEWVAL VARCHAR(4000) NULL,
SISDIDAUDI INT NOT NULL
);
-- CLASS NGBusinessEvent
CREATE TABLE INTATBUEVN (
INTAIDBUEV INT PRIMARY KEY,
INTADATAAA TEXT NOT NULL,
INTAPUBLDT DATETIME NOT NULL,
INTAIDEVNT INT NOT NULL
);
-- CLASS NGBusinessEventDistributed
CREATE TABLE INTLTBUEVD (
INTLIDBUED INT PRIMARY KEY,
INTLDISTDT DATETIME NOT NULL,
INTLIDBUEV INT NOT NULL
);
-- CLASS NGBusinessEventSubscriber
CREATE TABLE INTBTSUBSC (
INTBIDSUBS INT PRIMARY KEY,
INTBCODEE INT NOT NULL,
INTBNAMEE VARCHAR(50) NOT NULL
);
-- CLASS NGBusinessEventSubscriberError
CREATE TABLE INTJTSBERR (
INTJIDSBER INT PRIMARY KEY,
INTJDTERRO DATETIME NOT NULL,
INTJDESCRI VARCHAR(512) NOT NULL,
INTJIDSUBS INT NOT NULL,
INTJIDBUEV INT NOT NULL
);
-- CLASS NGBusinessEventType
CREATE TABLE INTCTEVNTP (
INTCIDEVNT INT PRIMARY KEY,
INTCCODEEE INT NOT NULL,
INTCNAMEEE VARCHAR(50) NOT NULL
);
-- CLASS NGBusinessSubscriberNotifierEventualTimeWindow
CREATE TABLE INTHTETMWI (
INTHIDETMW INT PRIMARY KEY,
INTHVDATTT DATETIME NOT NULL,
INTHSTARTA INT NOT NULL,
INTHENDATT INT NOT NULL,
INTHCODEEE VARCHAR(20) NOT NULL,
INTHCLOSAT INT NULL,
INTHOPENAT INT NULL,
INTHIDSUBS INT NOT NULL
);
-- CLASS NGBusinessSubscriberNotifierTimeGrid
CREATE TABLE INTFTTMGRD (
INTFIDTMGR INT PRIMARY KEY,
INTFVDFROM DATETIME NOT NULL,
INTFVDTOOO DATETIME NULL,
INTFIDSUBS INT NOT NULL
);
-- CLASS NGBusinessSubscriberNotifierTimeWindow
CREATE TABLE INTGTTMWIN (
INTGIDTMWI INT PRIMARY KEY,
INTGSTARTA INT NOT NULL,
INTGENDATT INT NOT NULL,
INTGCODEEE VARCHAR(20) NOT NULL,
INTGOPENAT INT NULL,
INTGCLOSAT INT NULL,
INTGIDTMGR INT NOT NULL
);
-- CLASS ngCategory
CREATE TABLE IESDTCATEG (
IESDIDCATE INT PRIMARY KEY,
IESDNMCATE VARCHAR(20) NULL,
IESDCDCATE INT NOT NULL,
IESDCDSITU CHAR(1) NOT NULL
);
-- CLASS ngEntity
CREATE TABLE IESCTENTID (
IESCIDENTI INT PRIMARY KEY,
IESCNMENTI VARCHAR(20) NULL,
IESCCDENTI INT NULL,
IESCTIENTI VARCHAR(20) NOT NULL,
IESCCDSITU CHAR(1) NOT NULL
);
-- CLASS ngEvent
CREATE TABLE SEGCTEVSEG (
SEGCIDESEG INT PRIMARY KEY,
SEGCDTLANC DATETIME NULL,
SEGCTPEVEN CHAR(1) NULL,
SEGCIDCUOP INT NOT NULL,
SEGCIDSIST INT NOT NULL,
SEGCIDRESP INT NOT NULL,
SEGCIDUSUA INT NOT NULL
);
-- CLASS ngGUITicket
CREATE TABLE IESOTINTER (
IESOIDINTE INT PRIMARY KEY,
IESONMINTE VARCHAR(50) NULL,
IESOCDINTE INT NULL,
IESODSINTE VARCHAR(250) NULL,
IESOCDSITU CHAR(1) NOT NULL
);
-- CLASS ngIcon
CREATE TABLE IESFTCUICO (
IESFIDCUIC INT PRIMARY KEY,
IESFDSCUIC VARCHAR(50) NOT NULL,
IESFCDCUIC INT NOT NULL,
IESFIMCUIC IMAGE NULL,
IESFCDSITU CHAR(1) NOT NULL
);
-- CLASS ngLevel
CREATE TABLE IESHTLEVEL (
IESHIDLEVE INT PRIMARY KEY,
IESHCDLEVE INT NULL,
IESHDSLEVE VARCHAR(50) NULL,
IESHCDSITU CHAR(1) NOT NULL,
IESHIDSIST INT NOT NULL
);
-- CLASS ngMessage
CREATE TABLE IESRTMESSG (
IESRIDMESS INT PRIMARY KEY,
IESRCDMESS INT NOT NULL,
IESRDSMESS VARCHAR(300) NOT NULL,
IESRSGMESS VARCHAR(100) NOT NULL,
IESRCDSITU CHAR(1) NOT NULL,
IESRDSDETA VARCHAR(4000) NULL,
IESRSHOCOD CHAR(1) NULL,
IESRDSMEUS VARCHAR(300) NULL,
IESRIDSIST INT NOT NULL
);
-- CLASS NGNatureza
CREATE TABLE SEGDTNAUSU (
SEGDIDNAUS INT PRIMARY KEY,
SEGDCDNAUS INT NULL,
SEGDDSNAUS VARCHAR(50) NULL
);
-- CLASS ngOperation
CREATE TABLE IESJTOPERA (
IESJIDOPER INT PRIMARY KEY,
IESJDSOPER VARCHAR(20) NULL,
IESJCDOPER INT NOT NULL,
IESJCDSITU CHAR(1) NOT NULL
);
-- CLASS ngPermission
CREATE TABLE SEGBTPERMI (
SEGBIDPERM INT PRIMARY KEY,
SEGBIDCUOP INT NOT NULL,
SEGBIDSIST INT NOT NULL,
SEGBIDUSUA INT NOT NULL
);
-- CLASS ngProfile
CREATE TABLE IESSTPROFI (
IESSIDPROF INT PRIMARY KEY,
IESSCDPROF INT NOT NULL,
IESSNMPROF VARCHAR(40) NOT NULL,
IESSDSPROF VARCHAR(100) NULL
);
-- CLASS ngSystem
CREATE TABLE IESATSISTE (
IESAIDSIST INT PRIMARY KEY,
IESANMSIST VARCHAR(10) NULL,
IESADSSIST VARCHAR(50) NULL,
IESAVERSAO VARCHAR(10) NULL,
IESACDSIST INT NOT NULL,
IESACDSITU CHAR(1) NOT NULL
);
-- CLASS ngSystemConfigUpdateLog
CREATE TABLE IESQTUPLOG (
IESQIDUPLO INT PRIMARY KEY,
IESQXMLOG TEXT NOT NULL,
IESQUDATE DATETIME NOT NULL,
IESQCDLOGI VARCHAR(50) NOT NULL
);
-- CLASS ngSystemGUITickets
CREATE TABLE IESPTSISIN (
IESPIDSISI INT PRIMARY KEY,
IESPCDSITU CHAR(1) NOT NULL,
IESPIDCASO INT NOT NULL,
IESPIDSIST INT NOT NULL,
IESPIDINTE INT NOT NULL
);
-- CLASS ngSystemUseCaseTicket
CREATE TABLE IESETSISCU (
IESEIDSISC INT PRIMARY KEY,
IESECDSITU CHAR(1) NULL,
IESEIDCASO INT NOT NULL,
IESEIDSIST INT NOT NULL
);
-- CLASS ngUseCaseTicket
CREATE TABLE IESBTCASOU (
IESBIDCASO INT PRIMARY KEY,
IESBDSCASO VARCHAR(250) NULL,
IESBNMCASO VARCHAR(50) NULL,
IESBCDCASO INT NULL,
IESBTPCASO CHAR(1) NULL,
IESBCDSITU CHAR(1) NULL,
IESBIDCUIC INT NOT NULL,
IESBIDENTI INT NOT NULL,
IESBIDCATE INT NOT NULL
);
-- CLASS ngUseCaseTicketOperation
CREATE TABLE IESGTCUOPE (
IESGIDCUOP INT PRIMARY KEY,
IESGCDSITU CHAR(1) NOT NULL,
IESGCDACEX VARCHAR(20) NULL,
IESGIDCASO INT NOT NULL,
IESGIDOPER INT NOT NULL
);
-- CLASS NGUser
CREATE TABLE SEGATUSUAR (
SEGAIDUSUA INT PRIMARY KEY,
SEGACDUSUA VARCHAR(25) NOT NULL,
SEGASENHAU VARCHAR(12) NULL,
SEGAPRSETC VARCHAR(20) NULL,
SEGADTCADU DATETIME NOT NULL,
SEGADTULSE DATETIME NULL,
SEGAINCANC CHAR(1) NOT NULL,
SEGACDREFE VARCHAR(25) NULL,
SEGAFORMSE INT NULL,
SEGASALTSE VARCHAR(128) NULL,
SEGAMOBILE VARCHAR(16) NULL,
SEGAEEMAIL VARCHAR(256) NULL,
SEGALEMAIL VARCHAR(256) NULL,
SEGASENHAQ VARCHAR(256) NULL,
SEGASENHAA VARCHAR(256) NULL,
SEGABLOQUE CHAR(1) NULL,
SEGAULTLGN DATETIME NULL,
SEGAULTBLQ DATETIME NULL,
SEGAFSACOU INT NULL,
SEGAFSAWST DATETIME NULL,
SEGAFSAACO INT NULL,
SEGAFSAAWS DATETIME NULL,
SEGACOMMEN TEXT NULL,
SEGAULTACT DATETIME NULL,
SEGAIDNAUS INT NOT NULL,
SEGACDHERA INT NOT NULL
);
-- CLASS ngUserProfile
CREATE TABLE IESUTUSERP (
IESUIDUSEP INT PRIMARY KEY,
IESUIDPROF INT NOT NULL,
IESUIDUSUA INT NOT NULL
);
--CREATE TABLES FROM DBASSOCIATIONMAP (RELATIONS)
-- RELATION ngUseCaseTicketOperation(0..*) <--Usecase Operations has levels--> (0..*)ngLevel
CREATE TABLE IESITOPLEV (
IESIIDCUOP INT NOT NULL,
IESIIDLEVE INT NOT NULL
);
-- RELATION NGBusinessEventSubscriber(0..*) <--Subscriber''s Events Type of Interest--> (0..*)NGBusinessEventType
CREATE TABLE INTETINTER (
INTBIDSUBS INT NOT NULL,
INTCIDEVNT INT NOT NULL
);
-- RELATION NGBusinessEventSubscriber(0..*) <--Subscriber''s Unnotified Events--> (0..*)NGBusinessEvent
CREATE TABLE INTDTUNNOT (
INTBIDSUBS INT NOT NULL,
INTAIDBUEV INT NOT NULL
);
-- RELATION ngProfile(0..*) <--Profile has Usecase Operations--> (0..*)ngUseCaseTicketOperation
CREATE TABLE IESTTOPPRO (
IESSIDPROF INT NOT NULL,
IESGIDCUOP INT NOT NULL
);
-- RELATION NGBusinessEventSubscriber(0..1) <--Subscriber''s Active Error--> (1..1)NGBusinessEventSubscriberError
CREATE TABLE INTKTSUBER (
INTBIDSUBS INT NOT NULL,
INTJIDSBER INT NOT NULL
);
-- RELATION NGBusinessEventSubscriber(0..*) <--Subscriber''s Notified Events--> (0..*)NGBusinessEvent
CREATE TABLE INTMTNOTEV (
INTBIDSUBS INT NOT NULL,
INTAIDBUEV INT NOT NULL
);
-- RELATION NGBusinessEventSubscriber(0..*) <--Subscriber''s Ignored Events--> (0..*)NGBusinessEvent
CREATE TABLE INTITIGNOR (
INTBIDSUBS INT NOT NULL,
INTAIDBUEV INT NOT NULL
);
-- RELATION NGNatureza(0..*) <--User nature can access systems--> (0..*)ngSystem
CREATE TABLE SEGETSINAU (
SEGEIDNAUS INT NOT NULL,
SEGEIDSIST INT NOT NULL
);
--ADD CONSTRAINTS AND INDEXES FROM DBACLASSMAP
-- CLASS ngAuditEventData
-- RELATION ngAuditEvent(0..*) <--Audit Event has Data--> (1..1)ngAuditEventData
ALTER TABLE SISDTEVNDA ADD CONSTRAINT F363SISDIDAUDI FOREIGN KEY (SISDIDAUDI) REFERENCES SISCTAUDIT(SISCIDAUDI);
CREATE INDEX I363SISDIDAUDI ON SISDTEVNDA (SISDIDAUDI);
-- CLASS NGBusinessEvent
-- RELATION NGBusinessEventType(0..*) <--Event has type--> (1..1)NGBusinessEvent
ALTER TABLE INTATBUEVN ADD CONSTRAINT F278INTAIDEVNT FOREIGN KEY (INTAIDEVNT) REFERENCES INTCTEVNTP(INTCIDEVNT);
CREATE INDEX I278INTAIDEVNT ON INTATBUEVN (INTAIDEVNT);
-- CLASS NGBusinessEventDistributed
-- RELATION NGBusinessEvent(0..1) <--Distributed BusinessEvent--> (1..1)NGBusinessEventDistributed
ALTER TABLE INTLTBUEVD ADD CONSTRAINT F744INTLIDBUEV FOREIGN KEY (INTLIDBUEV) REFERENCES INTATBUEVN(INTAIDBUEV);
CREATE INDEX I744INTLIDBUEV ON INTLTBUEVD (INTLIDBUEV);
-- CLASS NGBusinessEventSubscriberError
-- RELATION NGBusinessEventSubscriber(0..*) <--Subscriber''s Errors--> (1..1)NGBusinessEventSubscriberError
ALTER TABLE INTJTSBERR ADD CONSTRAINT F743INTJIDSUBS FOREIGN KEY (INTJIDSUBS) REFERENCES INTBTSUBSC(INTBIDSUBS);
CREATE INDEX I743INTJIDSUBS ON INTJTSBERR (INTJIDSUBS);
-- RELATION NGBusinessEvent(0..*) <--SubscriberError has Event--> (1..1)NGBusinessEventSubscriberError
ALTER TABLE INTJTSBERR ADD CONSTRAINT F743INTJIDBUEV FOREIGN KEY (INTJIDBUEV) REFERENCES INTATBUEVN(INTAIDBUEV);
CREATE INDEX I743INTJIDBUEV ON INTJTSBERR (INTJIDBUEV);
-- CLASS NGBusinessSubscriberNotifierEventualTimeWindow
-- RELATION NGBusinessEventSubscriber(0..*) <--Subscriber has eventual notifier time windows--> (1..1)NGBusinessSubscriberNotifierEventualTimeWindow
ALTER TABLE INTHTETMWI ADD CONSTRAINT F742INTHIDSUBS FOREIGN KEY (INTHIDSUBS) REFERENCES INTBTSUBSC(INTBIDSUBS);
CREATE INDEX I742INTHIDSUBS ON INTHTETMWI (INTHIDSUBS);
-- CLASS NGBusinessSubscriberNotifierTimeGrid
-- RELATION NGBusinessEventSubscriber(0..*) <--Subscriber has notifier time grids--> (1..1)NGBusinessSubscriberNotifierTimeGrid
ALTER TABLE INTFTTMGRD ADD CONSTRAINT F740INTFIDSUBS FOREIGN KEY (INTFIDSUBS) REFERENCES INTBTSUBSC(INTBIDSUBS);
CREATE INDEX I740INTFIDSUBS ON INTFTTMGRD (INTFIDSUBS);
-- CLASS NGBusinessSubscriberNotifierTimeWindow
-- RELATION NGBusinessSubscriberNotifierTimeGrid(0..*) <--Time grid has time windows--> (1..1)NGBusinessSubscriberNotifierTimeWindow
ALTER TABLE INTGTTMWIN ADD CONSTRAINT F741INTGIDTMGR FOREIGN KEY (INTGIDTMGR) REFERENCES INTFTTMGRD(INTFIDTMGR);
CREATE INDEX I741INTGIDTMGR ON INTGTTMWIN (INTGIDTMGR);
-- CLASS ngEvent
-- RELATION ngUseCaseTicketOperation(0..*) <--Use Case Operations have security events--> (1..1)ngEvent
ALTER TABLE SEGCTEVSEG ADD CONSTRAINT FS8SEGCIDCUOP FOREIGN KEY (SEGCIDCUOP) REFERENCES IESGTCUOPE(IESGIDCUOP);
CREATE INDEX IS8SEGCIDCUOP ON SEGCTEVSEG (SEGCIDCUOP);
-- RELATION ngSystem(0..*) <--System has security events--> (1..1)ngEvent
ALTER TABLE SEGCTEVSEG ADD CONSTRAINT FS8SEGCIDSIST FOREIGN KEY (SEGCIDSIST) REFERENCES IESATSISTE(IESAIDSIST);
CREATE INDEX IS8SEGCIDSIST ON SEGCTEVSEG (SEGCIDSIST);
-- RELATION NGUser(0..*) <--User has security events--> (1..1)ngEvent
ALTER TABLE SEGCTEVSEG ADD CONSTRAINT FS8SEGCIDRESP FOREIGN KEY (SEGCIDRESP) REFERENCES SEGATUSUAR(SEGAIDUSUA);
CREATE INDEX IS8SEGCIDRESP ON SEGCTEVSEG (SEGCIDRESP);
-- RELATION NGUser(0..*) <--User generate security events--> (1..1)ngEvent
ALTER TABLE SEGCTEVSEG ADD CONSTRAINT FS8SEGCIDUSUA FOREIGN KEY (SEGCIDUSUA) REFERENCES SEGATUSUAR(SEGAIDUSUA);
CREATE INDEX IS8SEGCIDUSUA ON SEGCTEVSEG (SEGCIDUSUA);
-- CLASS ngLevel
-- RELATION ngSystem(0..*) <--System has Levels--> (1..1)ngLevel
ALTER TABLE IESHTLEVEL ADD CONSTRAINT FS11IESHIDSIST FOREIGN KEY (IESHIDSIST) REFERENCES IESATSISTE(IESAIDSIST);
CREATE INDEX IS11IESHIDSIST ON IESHTLEVEL (IESHIDSIST);
-- CLASS ngMessage
-- RELATION ngSystem(0..*) <--System has Message--> (1..1)ngMessage
ALTER TABLE IESRTMESSG ADD CONSTRAINT F515IESRIDSIST FOREIGN KEY (IESRIDSIST) REFERENCES IESATSISTE(IESAIDSIST);
CREATE INDEX I515IESRIDSIST ON IESRTMESSG (IESRIDSIST);
-- CLASS ngPermission
-- RELATION ngUseCaseTicketOperation(0..*) <--UseCase Operation has permissions--> (1..1)ngPermission
ALTER TABLE SEGBTPERMI ADD CONSTRAINT FS7SEGBIDCUOP FOREIGN KEY (SEGBIDCUOP) REFERENCES IESGTCUOPE(IESGIDCUOP);
CREATE INDEX IS7SEGBIDCUOP ON SEGBTPERMI (SEGBIDCUOP);
-- RELATION ngSystem(0..*) <--System has permissions--> (1..1)ngPermission
ALTER TABLE SEGBTPERMI ADD CONSTRAINT FS7SEGBIDSIST FOREIGN KEY (SEGBIDSIST) REFERENCES IESATSISTE(IESAIDSIST);
CREATE INDEX IS7SEGBIDSIST ON SEGBTPERMI (SEGBIDSIST);
-- RELATION NGUser(0..*) <--User has Permissions--> (1..1)ngPermission
ALTER TABLE SEGBTPERMI ADD CONSTRAINT FS7SEGBIDUSUA FOREIGN KEY (SEGBIDUSUA) REFERENCES SEGATUSUAR(SEGAIDUSUA);
CREATE INDEX IS7SEGBIDUSUA ON SEGBTPERMI (SEGBIDUSUA);
-- CLASS ngSystemGUITickets
-- RELATION ngUseCaseTicket(0..*) <--UseCase has system GUIs--> (1..1)ngSystemGUITickets
ALTER TABLE IESPTSISIN ADD CONSTRAINT F129IESPIDCASO FOREIGN KEY (IESPIDCASO) REFERENCES IESBTCASOU(IESBIDCASO);
CREATE INDEX I129IESPIDCASO ON IESPTSISIN (IESPIDCASO);
-- RELATION ngSystem(0..*) <--System has GUIs--> (1..1)ngSystemGUITickets
ALTER TABLE IESPTSISIN ADD CONSTRAINT F129IESPIDSIST FOREIGN KEY (IESPIDSIST) REFERENCES IESATSISTE(IESAIDSIST);
CREATE INDEX I129IESPIDSIST ON IESPTSISIN (IESPIDSIST);
-- RELATION ngGUITicket(0..*) <--System GUIs have GUI--> (1..1)ngSystemGUITickets
ALTER TABLE IESPTSISIN ADD CONSTRAINT F129IESPIDINTE FOREIGN KEY (IESPIDINTE) REFERENCES IESOTINTER(IESOIDINTE);
CREATE INDEX I129IESPIDINTE ON IESPTSISIN (IESPIDINTE);
-- CLASS ngSystemUseCaseTicket
-- RELATION ngUseCaseTicket(0..*) <--Usecas has systems--> (1..1)ngSystemUseCaseTicket
ALTER TABLE IESETSISCU ADD CONSTRAINT FS14IESEIDCASO FOREIGN KEY (IESEIDCASO) REFERENCES IESBTCASOU(IESBIDCASO);
CREATE INDEX IS14IESEIDCASO ON IESETSISCU (IESEIDCASO);
-- RELATION ngSystem(0..*) <--System has Usecases--> (1..1)ngSystemUseCaseTicket
ALTER TABLE IESETSISCU ADD CONSTRAINT FS14IESEIDSIST FOREIGN KEY (IESEIDSIST) REFERENCES IESATSISTE(IESAIDSIST);
CREATE INDEX IS14IESEIDSIST ON IESETSISCU (IESEIDSIST);
-- CLASS ngUseCaseTicket
-- RELATION ngIcon(0..*) <--Usecases have an icon--> (1..1)ngUseCaseTicket
ALTER TABLE IESBTCASOU ADD CONSTRAINT FS1IESBIDCUIC FOREIGN KEY (IESBIDCUIC) REFERENCES IESFTCUICO(IESFIDCUIC);
CREATE INDEX IS1IESBIDCUIC ON IESBTCASOU (IESBIDCUIC);
-- RELATION ngEntity(0..*) <--Entity has Usecases--> (1..1)ngUseCaseTicket
ALTER TABLE IESBTCASOU ADD CONSTRAINT FS1IESBIDENTI FOREIGN KEY (IESBIDENTI) REFERENCES IESCTENTID(IESCIDENTI);
CREATE INDEX IS1IESBIDENTI ON IESBTCASOU (IESBIDENTI);
-- RELATION ngCategory(0..*) <--Usecases have a category--> (1..1)ngUseCaseTicket
ALTER TABLE IESBTCASOU ADD CONSTRAINT FS1IESBIDCATE FOREIGN KEY (IESBIDCATE) REFERENCES IESDTCATEG(IESDIDCATE);
CREATE INDEX IS1IESBIDCATE ON IESBTCASOU (IESBIDCATE);
-- CLASS ngUseCaseTicketOperation
-- RELATION ngUseCaseTicket(0..*) <--Usecase has usecase operations--> (1..1)ngUseCaseTicketOperation
ALTER TABLE IESGTCUOPE ADD CONSTRAINT FS10IESGIDCASO FOREIGN KEY (IESGIDCASO) REFERENCES IESBTCASOU(IESBIDCASO);
CREATE INDEX IS10IESGIDCASO ON IESGTCUOPE (IESGIDCASO);
-- RELATION ngOperation(0..*) <--UseCase operations has operation--> (1..1)ngUseCaseTicketOperation
ALTER TABLE IESGTCUOPE ADD CONSTRAINT FS10IESGIDOPER FOREIGN KEY (IESGIDOPER) REFERENCES IESJTOPERA(IESJIDOPER);
CREATE INDEX IS10IESGIDOPER ON IESGTCUOPE (IESGIDOPER);
-- CLASS NGUser
-- RELATION NGNatureza(0..*) <--User has nature--> (1..1)NGUser
ALTER TABLE SEGATUSUAR ADD CONSTRAINT FS6SEGAIDNAUS FOREIGN KEY (SEGAIDNAUS) REFERENCES SEGDTNAUSU(SEGDIDNAUS);
CREATE INDEX IS6SEGAIDNAUS ON SEGATUSUAR (SEGAIDNAUS);
-- CLASS ngUserProfile
-- RELATION ngProfile(0..*) <--Profile has Users--> (1..1)ngUserProfile
ALTER TABLE IESUTUSERP ADD CONSTRAINT F1540IESUIDPROF FOREIGN KEY (IESUIDPROF) REFERENCES IESSTPROFI(IESSIDPROF);
CREATE INDEX I1540IESUIDPROF ON IESUTUSERP (IESUIDPROF);
-- RELATION NGUser(0..*) <--User has Profiles--> (1..1)ngUserProfile
ALTER TABLE IESUTUSERP ADD CONSTRAINT F1540IESUIDUSUA FOREIGN KEY (IESUIDUSUA) REFERENCES SEGATUSUAR(SEGAIDUSUA);
CREATE INDEX I1540IESUIDUSUA ON IESUTUSERP (IESUIDUSUA);
--ADD CONSTRAINTS AND INDEXES FROM DBASSOCIATIONMAP (RELATIONS)
-- RELATION ngUseCaseTicketOperation(0..*) <--Usecase Operations has levels--> (0..*)ngLevel
ALTER TABLE IESITOPLEV ADD CONSTRAINT FS10Levels FOREIGN KEY (IESIIDCUOP) REFERENCES IESGTCUOPE(IESGIDCUOP);
ALTER TABLE IESITOPLEV ADD CONSTRAINT FS11UseCaseOperations FOREIGN KEY (IESIIDLEVE) REFERENCES IESHTLEVEL(IESHIDLEVE);
CREATE UNIQUE INDEX IS10Levels ON IESITOPLEV (IESIIDCUOP, IESIIDLEVE);
CREATE UNIQUE INDEX IS11UseCaseOperations ON IESITOPLEV (IESIIDLEVE, IESIIDCUOP);
-- RELATION NGBusinessEventSubscriber(0..*) <--Subscriber''s Events Type of Interest--> (0..*)NGBusinessEventType
ALTER TABLE INTETINTER ADD CONSTRAINT F279EventsType FOREIGN KEY (INTBIDSUBS) REFERENCES INTBTSUBSC(INTBIDSUBS);
ALTER TABLE INTETINTER ADD CONSTRAINT F280Subscribers FOREIGN KEY (INTCIDEVNT) REFERENCES INTCTEVNTP(INTCIDEVNT);
CREATE UNIQUE INDEX I279EventsType ON INTETINTER (INTBIDSUBS, INTCIDEVNT);
CREATE UNIQUE INDEX I280Subscribers ON INTETINTER (INTCIDEVNT, INTBIDSUBS);
-- RELATION NGBusinessEventSubscriber(0..*) <--Subscriber''s Unnotified Events--> (0..*)NGBusinessEvent
ALTER TABLE INTDTUNNOT ADD CONSTRAINT F279UnnotifiedEvents FOREIGN KEY (INTBIDSUBS) REFERENCES INTBTSUBSC(INTBIDSUBS);
ALTER TABLE INTDTUNNOT ADD CONSTRAINT F278UnnotifiedEvents FOREIGN KEY (INTAIDBUEV) REFERENCES INTATBUEVN(INTAIDBUEV);
CREATE UNIQUE INDEX I279UnnotifiedEvents ON INTDTUNNOT (INTBIDSUBS, INTAIDBUEV);
-- RELATION ngProfile(0..*) <--Profile has Usecase Operations--> (0..*)ngUseCaseTicketOperation
ALTER TABLE IESTTOPPRO ADD CONSTRAINT F1518UseCaseOperations FOREIGN KEY (IESSIDPROF) REFERENCES IESSTPROFI(IESSIDPROF);
ALTER TABLE IESTTOPPRO ADD CONSTRAINT FS10UseCaseOperations FOREIGN KEY (IESGIDCUOP) REFERENCES IESGTCUOPE(IESGIDCUOP);
CREATE UNIQUE INDEX I1518UseCaseOperations ON IESTTOPPRO (IESSIDPROF, IESGIDCUOP);
-- RELATION NGBusinessEventSubscriber(0..1) <--Subscriber''s Active Error--> (1..1)NGBusinessEventSubscriberError
ALTER TABLE INTKTSUBER ADD CONSTRAINT F279ActiveError FOREIGN KEY (INTBIDSUBS) REFERENCES INTBTSUBSC(INTBIDSUBS);
ALTER TABLE INTKTSUBER ADD CONSTRAINT F743ActiveError FOREIGN KEY (INTJIDSBER) REFERENCES INTJTSBERR(INTJIDSBER);
CREATE UNIQUE INDEX I279ActiveError ON INTKTSUBER (INTBIDSUBS, INTJIDSBER);
-- RELATION NGBusinessEventSubscriber(0..*) <--Subscriber''s Notified Events--> (0..*)NGBusinessEvent
ALTER TABLE INTMTNOTEV ADD CONSTRAINT F279NotifiedEvents FOREIGN KEY (INTBIDSUBS) REFERENCES INTBTSUBSC(INTBIDSUBS);
ALTER TABLE INTMTNOTEV ADD CONSTRAINT F278NotifiedEvents FOREIGN KEY (INTAIDBUEV) REFERENCES INTATBUEVN(INTAIDBUEV);
CREATE UNIQUE INDEX I279NotifiedEvents ON INTMTNOTEV (INTBIDSUBS, INTAIDBUEV);
-- RELATION NGBusinessEventSubscriber(0..*) <--Subscriber''s Ignored Events--> (0..*)NGBusinessEvent
ALTER TABLE INTITIGNOR ADD CONSTRAINT F279IgnoredEvents FOREIGN KEY (INTBIDSUBS) REFERENCES INTBTSUBSC(INTBIDSUBS);
ALTER TABLE INTITIGNOR ADD CONSTRAINT F278IgnoredEvents FOREIGN KEY (INTAIDBUEV) REFERENCES INTATBUEVN(INTAIDBUEV);
CREATE UNIQUE INDEX I279IgnoredEvents ON INTITIGNOR (INTBIDSUBS, INTAIDBUEV);
-- RELATION NGNatureza(0..*) <--User nature can access systems--> (0..*)ngSystem
ALTER TABLE SEGETSINAU ADD CONSTRAINT F132Systems FOREIGN KEY (SEGEIDNAUS) REFERENCES SEGDTNAUSU(SEGDIDNAUS);
ALTER TABLE SEGETSINAU ADD CONSTRAINT FS5Systems FOREIGN KEY (SEGEIDSIST) REFERENCES IESATSISTE(IESAIDSIST);
CREATE UNIQUE INDEX I132Systems ON SEGETSINAU (SEGEIDNAUS, SEGEIDSIST);
-- END OF SCRIPT --
\ No newline at end of file
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('SISBTNUMER') AND type in ('U'))
DROP TABLE SISBTNUMER
CREATE TABLE SISBTNUMER(
SISBDSNUME varchar(50) PRIMARY KEY,
SISBNONUME int NOT NULL,
)
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID('VERSAO_BANCO') AND type in ('U'))
DROP TABLE VERSAO_BANCO
CREATE TABLE VERSAO_BANCO (
ID_VERSAO_BANCO int NOT NULL PRIMARY KEY,
VERSAO INT NOT NULL,
BRANCH varchar(50) NOT NULL,
NOME_ARQUIVO varchar(50) NOT NULL,
DATA_ATUALIZACAO datetime NOT NULL,
)
INSERT IESATSISTE (IESAIDSIST, IESANMSIST, IESADSSIST, IESAVERSAO, IESACDSIST, IESACDSITU)
VALUES (1, 'SISEG', 'Sistema de Seguranca', '1.0', 19, 'A')
INSERT IESDTCATEG (IESDIDCATE, IESDNMCATE, IESDCDCATE, IESDCDSITU)
VALUES (1, 'Processos', 1, 'A')
INSERT IESOTINTER (IESOIDINTE, IESONMINTE, IESOCDINTE, IESODSINTE, IESOCDSITU)
VALUES (1, 'itImportaConfiguracaoSistema', 183, 'itImportaConfiguracaoSistema', 'A')
INSERT IESCTENTID (IESCIDENTI, IESCNMENTI, IESCCDENTI, IESCTIENTI, IESCCDSITU)
VALUES (1, 'Configuracoes', 168, 'Configuracoes', 'A')
INSERT IESFTCUICO (IESFIDCUIC, IESFDSCUIC, IESFCDCUIC, IESFCDSITU)
VALUES (1, 'Processo', 1, 'A')
INSERT IESBTCASOU (IESBIDCASO, IESBDSCASO, IESBNMCASO, IESBCDCASO, IESBTPCASO, IESBIDCUIC, IESBIDENTI, IESBIDCATE, IESBCDSITU)
VALUES (1, 'Importa configuracao sistema', 'Importa configuracao sistema', 1327, NULL, 1, 1, 1, 'A')
INSERT IESETSISCU (IESEIDSIST, IESEIDCASO, IESEIDSISC, IESECDSITU)
VALUES (1, 1, 1, 'A')
INSERT IESJTOPERA (IESJIDOPER, IESJDSOPER, IESJCDOPER, IESJCDSITU)
VALUES (1, 'Executar', 5, 'A')
INSERT IESPTSISIN (IESPIDSISI, IESPIDCASO, IESPIDSIST, IESPIDINTE, IESPCDSITU)
VALUES (1, 1, 1, 1, 'A')
INSERT IESGTCUOPE (IESGIDCUOP, IESGIDCASO, IESGIDOPER, IESGCDSITU)
VALUES (1, 1, 1, 'A')
INSERT SEGDTNAUSU (SEGDIDNAUS, SEGDCDNAUS, SEGDDSNAUS)
VALUES (1, 0, 'ADMINISTRADOR')
INSERT SEGDTNAUSU (SEGDIDNAUS, SEGDCDNAUS, SEGDDSNAUS)
VALUES (2, 3, 'OUTROS')
INSERT SEGETSINAU (SEGEIDSIST, SEGEIDNAUS)
VALUES (1, 1)
INSERT SEGATUSUAR (SEGAIDUSUA, SEGACDUSUA, SEGASENHAU, SEGADTULSE, SEGADTCADU, SEGAINCANC, SEGACDHERA, SEGACDREFE, SEGAIDNAUS, SEGAFORMSE, SEGASALTSE, SEGAMOBILE, SEGAEEMAIL, SEGALEMAIL, SEGASENHAQ, SEGASENHAA, SEGABLOQUE, SEGAULTLGN, SEGAULTBLQ, SEGAFSACOU, SEGAFSAWST, SEGAFSAACO, SEGAFSAAWS, SEGACOMMEN, SEGAULTACT, SEGAPRSETC)
VALUES (1, 'Administrador', '', NULL, CAST(0x00009BBE00000000 AS DateTime), 'N', -6, NULL, 1, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL)
\ No newline at end of file
program HelloWorld;
{$R 'VersionInfo.res' 'VersionInfo.rc'}
{$R 'mmenu.res' 'mmenu.rc'}
uses
Classes,
SvcMgr,
acuNativeSecurityDriver,
acuConexoSecurityDriver,
acuSQLDialectDB2,
acuSQLDialectOracle,
acuSQLDialectSQLServer,
acuObject,
ucuManager,
acuCollection,
ucuUseCase,
nguEvent,
nguOperation,
nguPermission,
utuMessage,
utuRequest,
utuRequestQueue,
utuParamFields,
mxuConnectionServer,
utuLinksManager,
utuLink,
utuLinkSharedMemory,
utuLinkSock,
blcksock,
synsock,
mxuUseCaseCommCenter,
mxuCommCenter,
utuProtectedList,
sucuBuscaObjetosBasica,
utuFactory,
ucuUseCaseFactory,
acOQL,
acuRepositorySQL,
ucuMain,
ucuSecurityManager,
acuUseCaseServer,
acuContainers,
acuPersistenceLog,
acuApplicationLog,
acuPersistenceEventsToApplicationLogSubscriber,
utuStateMachine,
acuSystem,
acuQuerySQLADO,
NGUAuditEvent,
NGUAuditEventData,
nguSystemConfigUpdateLog,
nguUser,
nguCategory,
nguEntity,
nguGUITicket,
nguIcon,
nguLevel,
nguSystem,
nguMessage,
nguSystemGUITickets,
nguSystemUseCaseTicket,
nguUseCaseTicket,
nguUseCaseTicketOperation,
nguBusinessEvent,
NGuBusinessEventDistributed,
nguBusinessEventSubscriber,
NGuBusinessEventSubscriberError,
nguBusinessEventType,
NGuBusinessSubscriberNotifierEventualTimeWindow,
NGuBusinessSubscriberNotifierTimeGrid,
NGuBusinessSubscriberNotifierTimeWindow,
ucuCadastroBasicoV4,
SysUtils,
acuFramework,
ucuExplorerV4,
ucuControlPanelConsole,
ucuProfiler,
sucuBuscaObjetosServidores,
ucuControlPanel,
sucuBuscaObjetosUsuarioV4,
sucuBuscaLogAtualizacaoSistema,
sucuBuscaNaturezas,
ucuCadastroNatureza,
ucuControleAcesso,
ucuPropriedadesDoServico,
ucuDetalhesAtualizacaoSistema,
ucuImportaConfiguracaoSistema,
ucuCadastroUsuarioSistema,
utuSysUtils,
acuRegisterModelMappings in 'lib\acuRegisterModelMappings.pas',
nguVersaoBanco in 'ngu\nguVersaoBanco.pas',
ucuHelloWorldMain in 'ucu\ucuHelloWorldMain.pas',
svuHelloWorld in 'svuHelloWorld.pas' {svHelloWorld: TService},
ucuHelloWorld in 'ucu\ucuHelloWorld.pas';
var
lErros : TStringList;
begin
gDefaultConnetionString := gSystem.ParamByName['Application.Database.' + gSystem.ParamByName['Application.Database.@ActiveConnectionString']];
Application.Initialize;
RegisterModelMappings(PersistenceManager.DefaultMetaModel);
PersistenceManager.Initialize;
lErros := TStringList.Create;
try
if not PersistenceManager.DefaultMetaModel.ImplementationOK(lErros) then
begin
lErros.SaveToFile(IncludeTrailingPathDelimiter(ExtractFileDir(ParamStr(0))) + 'ModelErrors.log');
raise Exception.Create('Error initalizing service, check ModelErrors.log for details.');
end;
finally
lErros.Free;
end;
Application.CreateForm(TsvHelloWorld, svHelloWorld);
Application.Run;
end.
// Version Information Resource File
1 VERSIONINFO
FILEVERSION 1, 0, 8, 12
PRODUCTVERSION 1, 0, 8, 12
FILEFLAGSMASK VS_FFI_FILEFLAGSMASK
//FILEFLAGS VS_FF_DEBUG | VS_FF_PRERELEASE
FILEOS VOS__WINDOWS32
FILETYPE VFT_APP
{
BLOCK "StringFileInfo"
{
BLOCK "041604E4"
{
VALUE "CompanyName", "CONEXO Projetos e Sistemas Ltda\000"
VALUE "FileVersion", "1.0.8.12\000"
VALUE "ProductName", "GED - Gest�o Eletr�nica de Documentos\000"
VALUE "ProductVersion", "1.0.8.12\000"
VALUE "LegalCopyright", "Copyright (C) CONEXO Projetos e Sistemas Ltda. Todos os direitos reservados\000"
}
}
BLOCK "VarFileInfo"
{
VALUE "Translation", 1046, 1252
}
}
This source diff could not be displayed because it is too large. You can view the blob instead.
<?xml version="1.0" encoding="iso-8859-1"?>
<SYSMSG>
<System Name="HelloWorld">
<Menu>
</Menu>
</System>
</SYSMSG>
\ No newline at end of file
mmenu RCDATA mainmenu.xml
\ No newline at end of file
unit nguCliente;
interface
uses
acuframework;
type
ngCliente = class(acPersistentObject)
private
FNome: acString;
FCPF: acString;
fEmprestimos: acRelationPartnerList;
published
property Nome: acString read FNome write FNome;
property CPF: acString read FCPF write FCPF;
property Emprestimos: acRelationPartnerList read fEmprestimos write fEmprestimos;
end;
implementation
initialization
PersistenceManager.RegisterClass(ngCliente);
end.
unit nguEmprestimo;
interface
uses
acuframework;
type
ngEmprestimo = class(acPersistentObject)
private
FRetirada: acDateTime;
FPrevistaDev: acDateTime;
FDataDev: acDateTime;
fCliente: acRelationPartnerShip;
fExemplar: acRelationPartnerShip;
published
property Retirada: acDateTime read FRetirada write FRetirada;
property PrevistaDev: acDateTime read FPrevistaDev write FPrevistaDev;
property DataDev: acDateTime read FDataDev write FDataDev;
property Cliente: acRelationPartnerShip read fCliente write fCliente;
property Exemplar: acRelationPartnerShip read fExemplar write fExemplar;
end;
implementation
initialization
PersistenceManager.RegisterClass(ngEmprestimo);
end.
unit nguExemplar;
interface
uses
acuframework;
type
ngExemplar = class(acPersistentObject)
private
FCodigo: acString;
fLivro: acRelationPartnerShip;
fSituacao: acRelationPartnerShip;
fEmprestimos: acRelationPartnerList;
published
property Codigo: acString read FCodigo write FCodigo;
property Livro: acRelationPartnerShip read fLivro write fLivro;
property Situacao: acRelationPartnerShip read fSituacao write fSituacao;
property Emprestimos: acRelationPartnerList read fEmprestimos write fEmprestimos;
end;
implementation
initialization
PersistenceManager.RegisterClass(ngExemplar);
end.
unit nguLivro;
interface
uses
acuframework;
type
ngLivro = class(acPersistentObject)
private
FTitulo: acString;
FAutor: acString;
FEdicao: acString;
fExemplares: acRelationPartnerList;
published
property Titulo: acString read FTitulo write FTitulo;
property Autor: acString read FAutor write FAutor;
property Edicao: acString read FEdicao write FEdicao;
property Exemplares: acRelationPartnerList read fExemplares write fExemplares;
end;
implementation
initialization
PersistenceManager.RegisterClass(ngLivro);
end.
unit nguSituacaoExemplar;
interface
uses
acuframework;
type
ngSituacaoExemplar = class(acPersistentObject)
private
FCodigo: acString;
FDescricao: acString;
published
property Codigo: acString read FCodigo write FCodigo;
property Descricao: acString read FDescricao write FDescricao;
end;
implementation
initialization
PersistenceManager.RegisterClass(ngSituacaoExemplar);
end.
unit nguVersaoBanco;
interface
uses
acuframework;
type
ngVersaoBanco = class(acPersistentObject)
private
FVersao: acInt;
FBranch: acString;
FNomeArquivo: acString;
FDataAtualizacao: acDateTime;
published
property Versao: acInt read FVersao write FVersao;
property Branch: acString read FBranch write FBranch;
property NomeArquivo: acString read FNomeArquivo write FNomeArquivo;
property DataAtualizacao: acDateTime read FDataAtualizacao write FDataAtualizacao;
end;
implementation
initialization
PersistenceManager.RegisterClass(ngVersaoBanco);
end.
object svHelloWorld: TsvHelloWorld
OldCreateOrder = False
OnCreate = ServiceCreate
DisplayName = 'svHelloWorld'
BeforeInstall = ServiceBeforeInstall
AfterInstall = ServiceAfterInstall
AfterUninstall = ServiceAfterUninstall
OnStart = ServiceStart
OnStop = ServiceStop
Height = 150
Width = 215
end
unit svuHelloWorld;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, SvcMgr,
mxuConnectionServer;
type
TsvHelloWorld = class(TService)
procedure ServiceStart(Sender: TService; var Started: Boolean);
procedure ServiceBeforeInstall(Sender: TService);
procedure ServiceCreate(Sender: TObject);
procedure ServiceAfterInstall(Sender: TService);
procedure ServiceAfterUninstall(Sender: TService);
procedure ServiceStop(Sender: TService; var Stopped: Boolean);
private
fConnectionServer: mxConnectionServer;
fDescription: string;
fPortNumber : Word;
procedure LerConfiguracao;
public
function GetServiceController: TServiceController; override;
end;
var
svHelloWorld: TsvHelloWorld;
implementation
{$R *.DFM}
uses
Registry,
acuSystem;
procedure ServiceController(CtrlCode: DWord); stdcall;
begin
svHelloWorld.Controller(CtrlCode);
end;
function TsvHelloWorld.GetServiceController: TServiceController;
begin
Result := ServiceController;
end;
procedure TsvHelloWorld.LerConfiguracao;
begin
if gSystem.HasParam('Application.Service') then
begin
Self.Name:=gSystem.ParamByName['Application.Service.@Name'];
Self.DisplayName:=gSystem.ParamByName['Application.Service.@DisplayName'];
Self.fPortNumber:=StrToInt(gSystem.ParamByName['Application.Service.@Port']);
Self.fDescription:=gSystem.ParamByName['Application.Service.@Description']
end;
end;
procedure TsvHelloWorld.ServiceAfterInstall(Sender: TService);
var
Reg: TRegistry;
begin
Reg := TRegistry.Create(KEY_READ or KEY_WRITE);
try
Reg.RootKey := HKEY_LOCAL_MACHINE;
//entrada do registro com a descri��o do servi�o
if Reg.OpenKey('\SYSTEM\CurrentControlSet\Services\' + Self.Name, false) then
begin
Reg.WriteString('Description', fDescription);
Reg.CloseKey;
end;
//Entrada do registro com a vincula��o dos eventos do event viewer
{ if Reg.OpenKey('\SYSTEM\CurrentControlSet\Services\Eventlog\Application\' + Self.Name, True) then
begin
Reg.WriteString('EventMessageFile', ParamStr(0));
Reg.WriteInteger('TypesSupported', 7);
Reg.CloseKey;
end; }
finally
Reg.Free;
end;
end;
procedure TsvHelloWorld.ServiceAfterUninstall(Sender: TService);
{var
Reg : TRegistry;
Chave : string;}
begin
//Remover entrada no registro da vincula��o com o event viewer
{ Chave := '\SYSTEM\CurrentControlSet\Services\Eventlog\Application\' + Self.Name;
Reg := TRegistry.Create(KEY_READ or KEY_WRITE);
try
Reg.RootKey := HKEY_LOCAL_MACHINE;
if Reg.KeyExists(Chave) then
Reg.DeleteKey(Chave);
finally
Reg.Free;
end;}
end;
procedure TsvHelloWorld.ServiceBeforeInstall(Sender: TService);
begin
LerConfiguracao;
end;
procedure TsvHelloWorld.ServiceCreate(Sender: TObject);
begin
LerConfiguracao;
end;
procedure TsvHelloWorld.ServiceStart(Sender: TService; var Started: Boolean);
begin
fConnectionServer := mxConnectionServer.Create;
if fPortNumber > 0 then fConnectionServer.Start(fPortNumber) else fConnectionServer.Start;
end;
procedure TsvHelloWorld.ServiceStop(Sender: TService; var Stopped: Boolean);
begin
fConnectionServer.Free;
end;
initialization
finalization
end.
unit ucuEmprestarLivro;
interface
uses
utuStateMachine, utuRequest, ucuUseCase;
type
ucEmprestarLivro = class(ucUseCase)
public
procedure Initialize; Override;
procedure Finalize; Override;
published
procedure Effect_PesquisarUsuario(piRequest: utRequest; piTransition: utTransition);
procedure Effect_EscolherUsuario(piRequest: utRequest; piTransition: utTransition);
procedure Effect_PesquisarExemplar(piRequest: utRequest; piTransition: utTransition);
procedure Effect_CancelarEscolhaExemplar(piRequest: utRequest; piTransition: utTransition);
procedure Effect_ConcluirEdicaoEmprestimo(piRequest: utRequest; piTransition: utTransition);
procedure Effect_RemoverExemplar(piRequest: utRequest; piTransition: utTransition);
procedure Effect_ConfirmarEmprestimo(piRequest: utRequest; piTransition: utTransition);
procedure Effect_CancelarEmprestimo(piRequest: utRequest; piTransition: utTransition);
end;
implementation
uses
ucuManager;
procedure ucEmprestarLivro.Initialize;
begin
inherited;
end;
procedure ucEmprestarLivro.Finalize;
begin
inherited;
end;
procedure ucEmprestarLivro.Effect_PesquisarUsuario(piRequest: utRequest; piTransition: utTransition);
begin
piRequest.Processed := True;
end;
procedure ucEmprestarLivro.Effect_EscolherUsuario(piRequest: utRequest; piTransition: utTransition);
begin
piRequest.Processed := True;
end;
procedure ucEmprestarLivro.Effect_PesquisarExemplar(piRequest: utRequest; piTransition: utTransition);
begin
piRequest.Processed := True;
end;
procedure ucEmprestarLivro.Effect_CancelarEscolhaExemplar(piRequest: utRequest; piTransition: utTransition);
begin
piRequest.Processed := True;
end;
procedure ucEmprestarLivro.Effect_ConcluirEdicaoEmprestimo(piRequest: utRequest; piTransition: utTransition);
begin
piRequest.Processed := True;
end;
procedure ucEmprestarLivro.Effect_RemoverExemplar(piRequest: utRequest; piTransition: utTransition);
begin
piRequest.Processed := True;
end;
procedure ucEmprestarLivro.Effect_ConfirmarEmprestimo(piRequest: utRequest; piTransition: utTransition);
begin
piRequest.Processed := True;
end;
procedure ucEmprestarLivro.Effect_CancelarEmprestimo(piRequest: utRequest; piTransition: utTransition);
begin
piRequest.Processed := True;
end;
initialization
gucManager.RegisterClass(3219,ucEmprestarLivro);
end.
unit ucuHelloWorld;
interface
uses
utuStateMachine, utuRequest, ucuUseCase, utuMessage;
type
ucHelloWorld = class(ucUseCase)
private
fNome: String;
public
procedure Initialize; Override;
procedure Finalize; Override;
published
procedure Effect_Cumprimentar(piRequest: utRequest; piTransition: utTransition);
procedure Effect_Despedir(piRequest: utRequest; piTransition: utTransition);
end;
implementation
uses
ucuManager;
procedure ucHelloWorld.Initialize;
begin
inherited;
end;
procedure ucHelloWorld.Finalize;
begin
inherited;
end;
procedure ucHelloWorld.Effect_Cumprimentar(piRequest: utRequest; piTransition: utTransition);
var
lFieldCumprimento: utField;
begin
fNome := piRequest.Message.RootField.FieldByName('Nome').AsString;
lFieldCumprimento := piRequest.Response.RootField.AddField('Cumprimento');
lFieldCumprimento.asString := 'Ol, ' + fNome;
piRequest.Processed := True;
end;
procedure ucHelloWorld.Effect_Despedir(piRequest: utRequest; piTransition: utTransition);
var
lFieldDespedida: utField;
begin
lFieldDespedida := piRequest.Response.RootField.AddField('Despedida');
lFieldDespedida.asString := 'Tchau, ' + fNome;
piRequest.Processed := True;
end;
initialization
gucManager.RegisterClass(3215,ucHelloWorld);
end.
unit ucuHelloWorldMain;
interface
uses
ucuMain;
type
ucHelloWorldMain = class(ucMain)
protected
function GetGUIXML(piLevel: Integer): string; override;
private
end;
implementation
uses
acuSystem, SysUtils, SvcMgr, ucuManager, Classes, Windows;
function ucHelloWorldMain.GetGUIXML(piLevel: Integer): string;
var
lStream: TResourceStream;
lResult: TStringStream;
begin
lStream := TResourceStream.Create(HInstance, 'mmenu', RT_RCDATA);
try
lResult := TStringStream.Create('');
try
lResult.CopyFrom(lStream, lStream.Size);
Result := lResult.DataString;
finally
lResult.Free;
end;
finally
lStream.Free;
end;
end;
initialization
gucManager.RegisterClass(UCAPLMAIN, ucHelloWorldMain);
end.
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