Function Function Run1LPFCommand( sInput$ ) As Long
Purpose: Run OneLiner command: Relay | Check relay performance in stable power swing (PRC-026-1).
Works in: OneLiner.
Parameters:
sInput [in] XML string, or full path name to XML file, containing XML node as described in Remarks section below.
Return value:
1 Success
0 Failure
Remarks: sInput must include XML node CHECKRELAYOPERATIONPRC026 with attributes in the list below (* denotes required entries, [] denotes default value).
REPORTPATHNAME (*) Full pathname of checking report.
REPORTCOMMENT Additional comment string to include in all checking report files
APPENDREPORT [1] Append existing report file: 0-False; 1-True
SELECTEDOBJ Check line with selected relaygroup. Must have one of following values
“PICKED “ the highlighted relaygroup on the 1-line diagram
“BNO1;'BNAME1';KV1;BNO2;'BNAME2';KV2;'CKT';BTYP;” location string of the relaygroup. Format description is in OneLiner help section 10.2.
TIERS [0] Number of tiers around selected object. This attribute is ignored if SELECTEDOBJ is not found.
AREAS [0-9999] Comma delimited list of area numbers and ranges.
ZONES [0-9999] Comma delimited list of zone numbers and ranges. This attribute is ignored if AREAS is found.
KVS [0-999] Comma delimited list of KV levels and ranges. This attribute is ignored if SELECTEDOBJ attribute is present.
TAGS Comma delimited list of tags. This attribute is ignored if SELECTEDOBJ attribute is present.
DEVICETYPE Space delimited list of relay type types to take into consideration in stepped-events: OCP, DSP.
SEPARATIONANGLE [120] System separation angle for stable power swing calculation.
DELAYLIMIT [15] Report violation if relay trips in stable power swing with delay faster than this limit (in cycles)
CURRMULT [1.0] Current multiplier to apply in relay checking performance in stable power swing
Example:
Sub main
sReportFile = "c:\000tmp\PRC026.xml"
sInput$ = "<CHECKRELAYOPERATIONPRC026 " & _
"REPORTPATHNAME=""" & sReportFile & """ " & _
"KVS=""200-500"" " & _
" />"
If Run1LPFCommand( sInput ) Then
Print "Success Report in " & sReportFile
Else
Print "Error: " & ErrorString()
End If
End Sub