DataONTAP.PRO.Recovery.CreateEvent.WriteActionModuleType
DataONTAP.PRO.Recovery.CreateEvent.WriteActionModuleType (WriteActionModuleType)
Element properties: Member Modules:
Overrideable Parameters:
Source Code: <WriteActionModuleType ID="DataONTAP.PRO.Recovery.CreateEvent.WriteActionModuleType" Accessibility="Internal" Batching="false" RunAs="DS!DataONTAP.SecureReference.RunAsProfileVirtualization">
<Configuration>
<xsd:element xmlns:xsd="http://www.w3.org/2001/XMLSchema" minOccurs="1" name="Name" type="xsd:string"/>
<xsd:element xmlns:xsd="http://www.w3.org/2001/XMLSchema" minOccurs="1" name="VMMServer" type="xsd:string"/>
<xsd:element xmlns:xsd="http://www.w3.org/2001/XMLSchema" minOccurs="1" name="PROTipID" type="xsd:string"/>
<xsd:element xmlns:xsd="http://www.w3.org/2001/XMLSchema" minOccurs="1" name="EventID" type="xsd:string"/>
<xsd:element xmlns:xsd="http://www.w3.org/2001/XMLSchema" minOccurs="1" name="EventSource" type="xsd:string"/>
<xsd:element xmlns:xsd="http://www.w3.org/2001/XMLSchema" minOccurs="1" name="ScriptParameters" type="xsd:string"/>
<xsd:element xmlns:xsd="http://www.w3.org/2001/XMLSchema" minOccurs="1" name="TimeoutSeconds" type="xsd:integer"/>
</Configuration>
<OverrideableParameters>
<OverrideableParameter ID="TimeoutSeconds" Selector="$Config/TimeoutSeconds$" ParameterType="string"/>
</OverrideableParameters>
<ModuleImplementation Isolation="Any">
<Composite>
<MemberModules>
<WriteAction ID="CreateEventWA" TypeID="Windows!Microsoft.Windows.ScriptWriteAction">
<ScriptName>CreateEventLogEntry.vbs</ScriptName>
<Arguments>"$Config/Name$" "$Config/VMMServer$" "$Config/PROTipID$" "$Config/EventID$" "$Config/EventSource$" "$Config/ScriptParameters$"</Arguments>
<ScriptBody><Script>
' Main
' Create the log entry and then execute eventcreate
' Use the command line parameter as the description of the event
'
SetLocale("en-us")
dim argsCount
set args = WScript.Arguments
argsCount = args.Count
if argsCount = 0 then
WScript.quit 1
end if
LogDesc = args.Item(0)
for k = 1 to argsCount -1
LogDesc = LogDesc & "|" & args.Item(k)
next
EventID = args.Item(argsCount-3)
LogName = "OnCommand"
LogSource = "Data ONTAP PRO MP"
Set WshShell = WScript.CreateObject("WScript.Shell")
strCommand = "eventcreate /T Information /ID " & EventID & " /L " & LogName & " /SO " & LogSource & " /D " & Chr(34) & LogDesc & Chr(34)
WshShell.Run strcommand , 0
</Script> </ScriptBody>
<TimeoutSeconds>$Config/TimeoutSeconds$</TimeoutSeconds>
</WriteAction>
</MemberModules>
<Composition>
<Node ID="CreateEventWA"/>
</Composition>
</Composite>
</ModuleImplementation>
<InputType>System!System.BaseData</InputType>
</WriteActionModuleType>