Det finns även möjlighet, att bygga in automatiska åtgärder i ett enkelt skript. Med hjälp av dessa EPLAN-åtgärder kan olika programfunktioner (som t.ex. spara data, skriv ut osv.) köras automatiserat.
Efter klassen, attributet [Start] och funktionen måste först åtgärdens parametersats fastställas i skriptet och sedan åtgärden utföras via CommandLineInterpreter().Execute().
Den allmänna strukturen på ett motsvarande C#-skript ser ut enligt följande:
public class <ScriptName>
{
[Start]
public void <FunctionName>
{
ActionCallingContext <ActionName>Context = new ActionCallingContext ();
<ActionName>Context .AddParameter("<ActionParameter1>","<Value>");
<ActionName>Context .AddParameter("<ActionParameter2>","<Value>");
...
new CommandLineInterpreter().Execute("<ActionName>",<ActionName>Context);
return;
}
}
Exempel: Följande exempel visar ett skript i C# med EPLAN-åtgärden print:
public class PrintScript
{
[Start]
public void PrintFunction()
{
ActionCallingContext printContext = new ActionCallingContext ();
printContext .AddParameter("NUMBER","1");
printContext .AddParameter("PRINTCHANGEDPAGES","0");
printContext .AddParameter("PRINTREVERSE","0");
printContext .AddParameter("PRINTCOLLATE","0");
printContext .AddParameter("PRINTERNAME",@"\\FUEMON\Kyocera FS-1700+ TechDok KX");
printContext .AddParameter("PROJECTNAME",@"C:\Program Files\EPLAN\Electric P8\Projects\EPLAN\ESS_Sample_Project.elk);
printContext .AddParameter("TYPE","PAGES");
printContext .AddParameter("PAGENAME","=GB1+A1&EFS1/1");
new CommandLineInterpreter().Execute("print",printContext);
return;
}
}
Via ActionCallingContext i exemplet ovan fastställs parametersatsen för funktionen PrintFunction. Sedan listas de olika parametrarna och motsvarande värden för åtgärden print. På så sätt fastställs t.ex. antalet utskrifter via parametern NUMBER. I exemplet matades värdet "1" in här. Via Execute utförs sedan åtgärden print.
Samma exempel i Visual Basic.Net ser ut enligt följande:
Public Class PrintScript
{
<Start> _
Public Sub PrintFunction()
Dim printContext As New ActionCallingContext ()
printContext .AddParameter("NUMBER","1")
printContext .AddParameter("PRINTCHANGEDPAGES","0")
printContext .AddParameter("PRINTREVERSE","0")
printContext .AddParameter("PRINTCOLLATE","0")
printContext .AddParameter("PRINTERNAME", "\\FUEMON\Kyocera FS-1700+ TechDok KX")
printContext .AddParameter("PROJECTNAME", "C:\Program Files\EPLAN\Electric P8\Projects\EPLAN\ESS_Sample_Project.elk)
printContext .AddParameter("TYPE","PAGES")
printContext .AddParameter("PAGENAME",""=GB1+A1&EFS1/1")
Dim commandLineInterpreter As New CommandLineInterpreter()
CommandLineInterpreter.Execute("print",printContext)
Return
End Sub 'PrintFunction
End Class 'PrintScript
Tips:
Funktionaliteten Redigera automatiserat (under Hjälpprogram) använder enkla skript för att utföra åtgärder automatiserat. Du kan använda dessa skript, för att skapa egna skript. Innan dessa skript kan utföras via menypunkterna Hjälpprogram > Skript > Utför måste parametern String ProjectName och raden, som denna parameter används på, tas bort för funktionen AutoTreat.
Se också