Repository.XFRACAS.WriteExceptionToDiagnosticsLog: Difference between revisions

From ReliaWiki
Jump to navigation Jump to search
Line 21: Line 21:
     {{APIPrefix|Try}}
     {{APIPrefix|Try}}
         {{APIPrefix|Dim}}ListOfXFRACASEntities(){{APIPrefix|As}}SynthesisAPI.[[NameIdPair Class|NameIdPair]]=MyRepository.[[Repository.GetAllXFRACASEntities|GetAllXFRACASEntities]]()
         {{APIPrefix|Dim}}ListOfXFRACASEntities(){{APIPrefix|As}}SynthesisAPI.[[NameIdPair Class|NameIdPair]]=MyRepository.[[Repository.GetAllXFRACASEntities|GetAllXFRACASEntities]]()
         {{APIPrefix|For}}i{{APIPrefix|As Integer}}=0{{APIPrefix|To}}ListOfXFRACASEntities.GetUpperBound(0)
         {{APIPrefix|For}}i{{APIPrefix|As Integer}}= 0{{APIPrefix|To}}ListOfXFRACASEntities.GetUpperBound(0)
                 MessageBox.Show(ListOfXFRACASEntities(i).Name)
                 MessageBox.Show(ListOfXFRACASEntities(i).Name)
         {{APIPrefix|Next}}
         {{APIPrefix|Next}}

Revision as of 21:46, 28 April 2014


Writes exception information to the diagnostics log

Syntax

Parameters

exObject: Represents an error that occurs during application execution
entryType: The type of diagnostics entry type, specified as XFRACASDiagnosticsEntryType
comment: Optional comment to write to the diagnostics log

Usage Example

Code Block


 'Connect to the Synthesis repository. 
DimSuccessAs Boolean=MyRepository.ConnectToRepository("RepositoryFileNamePath")
 'Get the list of XFRACAS Entities in the current project in the connected repository. 
IfsuccessThen
    MyRepository.WriteToDiagnosticsLog("Successfully connected to repository", SynthesisAPI.XFRACASDiagnosticsEntryType.Information) 
   Try
        DimListOfXFRACASEntities()AsSynthesisAPI.NameIdPair=MyRepository.GetAllXFRACASEntities()
        ForiAs Integer= 0ToListOfXFRACASEntities.GetUpperBound(0)
               MessageBox.Show(ListOfXFRACASEntities(i).Name)
        Next
   CatchexAsException
         'Write error message to diagnostics log 
         MyRepository.WriteToDiagosticsLog(ex, SynthesisAPI.XFRACASDiagnosticsEntryType.Error, "Reading Entities")
   End Try
End If