Posted by Mohammad Rahhal, Last modified by Salameh Abu Hashish on 20 December 2018 01:44 PM


Public Function SymbolInfoInteger(SymbolName As String, propId As ENUM_SYMBOL_INFO_INTEGER, ByRef LongVal As Variant) As Boolean

This function is used to get symbol information for a given symbol name according to proprty ID and receive the result on longval parameter.


Key Description 
SymbolName  Trading symbol name, value of type string.
propId The information to get it, Value of type ENUM_SYMBOL_INFO_INTEGER.
LongVal The received result, value of type Long.

Return value

Returns true if successful. In order to get an error, call GetLastError() function.


 Dim exeResult

 Dim rst

 Dim symbolName

 Public Sub main()


     ShowResult SymbolInfoInteger( cstr(symbolName),SYMBOL_PIP_LOCATION,rst) , "SYMBOL_PIP_LOCATION",cstr(symbolName)

     ShowResult SymbolInfoInteger( CSTR(symbolName),SYMBOL_SPREAD,rst) , "SYMBOL_SPREAD",cstr(symbolName)

     AlertMessage cstr(exeResult)

 End Sub

 Public Sub ShowResult(isTrue,enumDescription,symName)

     if isTrue then

        exeResult=exeResult & CSTR(enumDescription) & " for "  & CSTR(symName) & " is : " & rst


        exeResult=exeResult & "Error during Get " & CSTR(enumDescription) & " due to error code " & ErrorDescription(GetLastError())

    end if

        exeResult=exeResult & vbNewLine


 End Sub


See Also

Back to VTL Client Script Index

(0 vote(s))
Not helpful

Comments (0)
Post a new comment
Full Name:
CAPTCHA Verification 
Please enter the text you see in the image into the textbox below (we use this to prevent automated submissions).

Help Desk Software by Hybrid Solutions