(DataFlex) Enter/Leave Context in Logging

Demonstrates EnterContext and LeaveContext using the Chilkat Log API.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

Use ChilkatAx-win32.pkg

Procedure Test
    Handle hoLog
    String sTemp1

    Get Create (RefClass(cComChilkatLog)) To hoLog
    If (Not(IsComObjectCreated(hoLog))) Begin
        Send CreateComObject of hoLog
    End

    // Initialize the log object with an initial context tag:
    Send ComClear To hoLog "myLog"

    // Add some information..
    Send ComLogInfo To hoLog "Hello, I'm here..."

    // Open a sub-context
    Send ComEnterContext To hoLog "abc"

    // New information is now logged within the "abc" context.
    Send ComLogInfo To hoLog "This is inside the abc context"
    Send ComLogError To hoLog "File not found."

    // Perhaps open a new context...
    Send ComEnterContext To hoLog "fileInfo"
    Send ComLogData To hoLog "filename" "something.txt"
    Send ComLogData To hoLog "path" "/somedir/xyz"
    Send ComLeaveContext To hoLog

    // Close the "abc" context.
    Send ComLeaveContext To hoLog

    // Examine the content of the log:
    Get ComLastErrorText Of hoLog To sTemp1
    Showln sTemp1

    // This is the output:

    // myLog:
    //   Hello, I'm here...
    //   abc:
    //     This is inside the abc context
    //     File not found.
    //     fileInfo:
    //       filename: something.txt
    //       path: /somedir/xyz
    //     --fileInfo
    //   --abc
    // --myLog


End_Procedure