Editorscripts: create parm method from class declaration

Klaas Deforche — Thu, 27 Aug 2009 11:55:22 +0000

I’ve always found it annoying that when you want to create a parm method using the editorscripts, you have to fill in two fields on a dialog (variable name and type). Most of the time, you’ve already declared the variable in the class declaration of your class, so it would be nice if you could just right click on that and create a parm method from there.

Below is a (quick and dirty) editorscript that allows you to do that.

public void template_method_parmfromCD(Editor editor)
{
int endLine = editor.selectionEndLine();
str line;
str firstCol;
str secondCol;
int linecount;
str source;
container cont;
XppSource xppSource;
TreeNode tn;
TreeNode childNode;

boolean contains(str s, str findStr)
{
if(strscan(s, findStr, 1, strlen(s)) > 0)
return true;

return false;
}

str replace(str s, str findStr, str replStr)
{
int pos = strscan(s, findStr, 1, strlen(s));

while(pos > 0)
{
s = strdel(s, pos, strlen(findStr));
s = strins(s, replStr, pos);

pos = strscan(s, findStr, pos + strlen(replStr), strlen(s));
}
return s;
}
;

editor.firstSelectedLine();
while (editor.moreLines() && endline > editor.lineNo())
{
line = strltrim(editor.getLine());
while(contains(line, " " ))
{
line = replace(line, " ", " " );
}

cont = str2con(line, " ");

firstCol = conpeek(cont, 1);
secondCol = conpeek(cont, 2);
secondCol = strrem(secondCol, ";=");

editor.nextSelectedLine();

tn = EditorScripts::getApplObjectNode(editor);
if(firstCol != "0" && secondCol != "0")
{
if(!tn.AOTfindChild(strfmt("parm%1", strupr(substr(secondCol,1,1))+substr(secondCol,2,strlen(secondCol)))))
{
if(tn.AOTfindChild("Methods"))
tn = tn.AOTfindChild("Methods");

childNode = tn.AOTadd(strfmt("parm%1", strupr(substr(secondCol,1,1))+substr(secondCol,2,strlen(secondCol))));

xppSource = new XppSource();
source = xppSource.parmMethod(firstcol,secondCol);
childNode.AOTsetSource(source, false);
tn.AOTsave();
}
else
{
error(strfmt("Parm method %1 already exists", strfmt("parm%1", strupr(substr(secondCol,1,1))+substr(secondCol,2,strlen(secondCol)))));
}
}
}
}

Some code from Greg Pierce’s awesome String class was used for the inner methods.
I tested it on classes, form and reports, and it works very well.

To install this editorscript, copy the code above in a new method of the class EditorScripts.
To use it, in the classDeclaration, simply select one or more declarations, then right click and choose Scripts – template – method – parmfromCD.

Art Of Creation - Dynamics AX Blog » Editorscripts

Editorscripts: create parm method from class declaration