Function Function Run1LPFCommand( sInput$ ) As Long
Purpose: Run OneLiner command: Network | Set generator reference angle command.
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 SETGENREFANGLE with attributes in the list below (* denotes required entries, [] denotes default value).
REPORTPATHNAME Full pathname of folder for report files.
REFERENCEGEN Bus name and kV of reference generator in format: 'BNAME', KV.
EQUSOURCEOPTION Option for calculating reference angle of equivalent sources. Must have one of the following values
[ROTATE] apply delta angle of existing reference gen
SKIP Leave unchanged. This option will be in effect automatically when old reference is not valid
ASGEN Use angle computed for regular generator
Example:
Sub main
sInput$ = "<SETGENREFANGLE " & _
"REPORTPATHNAME=""c:\000tmp\setrefangle.txt"" " & _
"EQUSOURCEOPTION=""SKIP"" " & _
"REFERENCEGEN=""'HANCOCK' 13.8"" " & _
" />"
Print sInput
If Run1LPFCommand( sInput ) Then Print "Success" Else Print ErrorString()
End Sub