Show Posts
This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.
And if it works on your machine then it must be a problem with dll's not registering properly on the other machine.
using System;
namespace Moodys
{
public class Main
{
private IAction addAct = null;
private IAction genCode = null;
private IAction gesVC = null;
private IAction addcond = null;
private IAction genDoc = null;
private IAction genModel = null;
//Called Before EA starts to check Add-In Exists
public String EA_Connect(EA.Repository Repository)
{
return "a string";
}
public object EA_GetMenuItems(EA.Repository Repository, string Location, string MenuName)
{
EA.Package aPackage = Repository.GetTreeSelectedPackage();
Boolean debug = isDebug(Repository, "debug");
switch( MenuName )
{
case "":
return "-&Moodys";
case "-&Moodys":
if (debug)
{
string[] ar = { "&Générer Nouvelle dll de calcul", "-&Ajouter Activity", "-&Ajouter Condition", "&Générer Code", "-&Gestion VC", "&Générer doc (HTML)", "&Clear Model" };
return ar;
}
else
{
string[] ar = { "&Générer Nouvelle dll de calcul", "&Ajouter Activity", "&Ajouter Condition", "&Générer Code", "&Générer doc (HTML)"};
return ar;
}
case "-&Gestion VC":
string[] vc = { "&Remove VC"};
return vc;
case "-&Ajouter Activity" :
string[] aa = {"&One","&All"};
return aa;
case "-&Ajouter Condition":
string[] ajC = { "&One", "&All" };
return ajC;
}
return "";
}
bool IsProjectOpen(EA.Repository Repository)
{
try
{
EA.Collection c = Repository.Models;
return true;
}
catch
{
return false;
}
}
public void EA_GetMenuState(EA.Repository Repository, string Location, string MenuName, string ItemName, ref bool IsEnabled, ref bool IsChecked)
{
if( IsProjectOpen(Repository) )
{
if (ItemName == "&Clear Model")
{
IsChecked = false;
IsEnabled = true;
}
else if (ItemName == "&Générer Nouvelle dll de calcul")
{
if (genModel == null)
genModel = new GenModel(this);
IsEnabled = genModel.goodDir(Repository);
}
else if (MenuName == "-&Ajouter Activity" || ItemName == "&Ajouter Activity")
{
if (addAct == null)
addAct = new AddActivity(this);
IsEnabled = addAct.goodDir(Repository) && Location == "TreeView";
}
else if (MenuName == "-&Ajouter Condition" || ItemName == "&Ajouter Condition")
{
if (addcond == null)
addcond = new AddCond();
IsEnabled = addcond.goodDir(Repository) && Location == "TreeView";
}
else if (ItemName == "&Générer Code")
{
if (genCode == null)
genCode = new genereCode(this);
IsEnabled = genCode.goodDir(Repository) && Location == "TreeView";
}
else if (MenuName == "-&Gestion VC")
{
if (gesVC == null)
gesVC = new gestionVC();
IsEnabled = gesVC.goodDir(Repository) && Location == "TreeView";
}
else if (ItemName == "&Générer doc (HTML)")
{
// IsChecked = false;
if (genDoc == null)
genDoc = new GenerationDoc(this);
IsEnabled = genDoc.goodDir(Repository) && Location == "TreeView";
}
}
else
IsEnabled = false;
}
public void EA_MenuClick(EA.Repository Repository, string Location, string MenuName, string ItemName)
{
if (ItemName == "&Générer Nouvelle dll de calcul")
{
genModel.start();
}
else if ((MenuName == "-&Ajouter Activity" && ItemName == "&One") || ItemName == "&Ajouter Activity")
{
addAct.start();
}
else if (MenuName == "-&Ajouter Activity" && ItemName == "&All")
{
((AddActivity)addAct).startAll();
}
else if ((MenuName == "-&Ajouter Condition" && ItemName == "&One") || ItemName == "&Ajouter Condition")
{
addcond.start();
}
else if (MenuName == "-&Ajouter Condition" && ItemName == "&All")
{
((AddCond)addcond).startAll();
}
...
)@echo off
set "VAR=C:\Program Files (x86)\MoodysAddInEA\"
if not exist "%VAR%" md "%VAR%"
reg add "HKEY_CURRENT_USER\Software\Sparx Systems\EAAddins\Moodys" /d "Moodys.Main" /f
copy Moodys.dll "%VAR%"
C:\WINDOWS\Microsoft.NET\Framework\v2.0.50727\RegAsm.exe "%VAR%Moodys.dll" /codebase
)
EA.Element elm = (EA.Element)diag.Elements.AddNew(nomAct, "Action");
elm.Update();
diag.Elements.Refresh();
EA.Element tar = (EA.Element)elm.Elements.AddNew("target", "ActionPin");
tar.Update();
Repository.Execute("UPDATE t_object SET Classifier_guid='"+methodExec.MethodGUID+"' WHERE Name='"+nomAct+"';");
Guid g1 = Guid.NewGuid();
String sqlRequest1 = "INSERT INTO t_xref VALUES ";
sqlRequest1 += "(\""+g1.ToString()+"\",";
sqlRequest1 += "\"CustomProperties\",";
sqlRequest1 += "\"element property\",";
sqlRequest1 += "\"Public\",";
sqlRequest1 += "NULL,";
sqlRequest1 += "NULL,";
sqlRequest1 += "NULL,";
sqlRequest1 += "NULL,";
sqlRequest1 += "0,";
sqlRequest1 += "\"@PROP=@NAME=kind@ENDNAME;@TYPE=ActionKind@ENDTYPE;@VALU=CallOperation@ENDVALU;@PRMT=@ENDPRMT;@ENDPROP;\",";
sqlRequest1 += "\"" +elm.ElementGUID+ "\",";
sqlRequest1 += "\"<none>\",";
sqlRequest1 += "NULL)";
Repository.Execute(sqlRequest1);
Guid g2 = Guid.NewGuid();
String sqlRequest2 = "INSERT into t_xref VALUES";
sqlRequest2+= "(\""+g2.ToString()+"\",";
sqlRequest2+= "\"MOFProps\",";
sqlRequest2+= "\"element property\",";
sqlRequest2+= "\"Public\",";
sqlRequest2+= "NULL,";
sqlRequest2+= "NULL,";
sqlRequest2+= "NULL,";
sqlRequest2+= "\"target\",";
sqlRequest2+= "0,";
sqlRequest2+= "\""+tar.ElementGUID+"\",";
sqlRequest2+= "\""+elm.ElementGUID+"\",";
sqlRequest2+= "\"<none>\",";
sqlRequest2+= "NULL)";
Repository.Execute(sqlRequest2);
EA.DiagramObject ob = (EA.DiagramObject)vue.DiagramObjects.AddNew(nomAct, "");
ob.ElementID = elm.ElementID;
ob.Update();
The trick in these kind of cases is:How can I do that ?
- Start with an empty model
- Create what you need manually
[highlight]- Inspect the results in the database[/highlight]
- Try to replicate the same results using the API
- If that doesn't work (because some attribute isn't exposed) then you resort to Repository.Execute(SQLString)
Classifier_GUID is a column in t_object. It does not seem as there is any corresponding property in Element. So (I guess) you have to poke that in via a SQL.(where can I find example of SQL request to change this table ? It's the first time, I hear spoken of this table !
) EA.Element elm = (EA.Element)diag.Elements.AddNew(nomAct, "Action");
elm.Update();
diag.Elements.Refresh();
