Skip to content

S
StarUML Evológica Plugin
Commit 8fd9f903 authored by Erika Segatto's avatar Erika Segatto
Browse files
Options

Altera geração do acRegisterModelMappings para declarar DBIdoMapTicket da classe correta

parent d2b130a2
Show whitespace changes
Inline Side-by-side
Showing with 1 addition and 1 deletion
EvoUMLPlugin/src/IntegracaoDelphiSUML.pas
View file @ 8fd9f903
...@@ -2375,7 +2375,7 @@ begin ...@@ -2375,7 +2375,7 @@ begin
sRegisterMapping := sRegisterMapping + 'lClassMapTicket.AuditDescription := ' + QuotedStr(lClassTicket.AuditDescription) + ';' + #13#10; sRegisterMapping := sRegisterMapping + 'lClassMapTicket.AuditDescription := ' + QuotedStr(lClassTicket.AuditDescription) + ';' + #13#10;
if lClassTicket.DisplayName <> lClassTicket.PersistentObjectClassName then if lClassTicket.DisplayName <> lClassTicket.PersistentObjectClassName then
sRegisterMapping := sRegisterMapping + 'lClassMapTicket.DisplayName := ' + QuotedStr(lClassTicket.DisplayName) + ';' + #13#10; sRegisterMapping := sRegisterMapping + 'lClassMapTicket.DisplayName := ' + QuotedStr(lClassTicket.DisplayName) + ';' + #13#10;
sRegisterMapping := sRegisterMapping + #13#10 + 'lDBIntIdoMapTicket := acDBIntIdoMapTicket.Create(''' + lsIDO + ''');' + #13#10; sRegisterMapping := sRegisterMapping + #13#10 + 'lDBIntIdoMapTicket := '+lClassToDBMapTicket.IdoDBMapTicket.ClassName+'.Create(''' + lsIDO + ''');' + #13#10;
sRegisterMapping := sRegisterMapping + 'lClassToDBMapTicket := piMetaModelPersistenceMap.NewClassToDBMapRegisterTicket('''+ lsIDOCode +''', lClassMapTicket, lDBIntIdoMapTicket) ;' + #13#10; sRegisterMapping := sRegisterMapping + 'lClassToDBMapTicket := piMetaModelPersistenceMap.NewClassToDBMapRegisterTicket('''+ lsIDOCode +''', lClassMapTicket, lDBIntIdoMapTicket) ;' + #13#10;
sRegisterMapping := sRegisterMapping + 'lClassToDBMapTicket.TableName := ''' + lsTabela + ''';' + #13#10; sRegisterMapping := sRegisterMapping + 'lClassToDBMapTicket.TableName := ''' + lsTabela + ''';' + #13#10;
if lsTypeColumnName <> '' then if lsTypeColumnName <> '' then
......
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