' Options:
'Date: 2026-07-08 19:50:03
'Version: 8.80
'Tip: To override a DTO option, remove "''" prefix before updating
'BaseUrl: https://api.dev.dynamics.trendsic.com
'
'''GlobalNamespace: 
'''MakePartial: True
'''MakeVirtual: True
'''MakeDataContractsExtensible: False
'''AddReturnMarker: True
'''AddDescriptionAsComments: True
'''AddDataContractAttributes: False
'''AddIndexesToDataMembers: False
'''AddGeneratedCodeAttributes: False
'''AddResponseStatus: False
'''AddImplicitVersion: 
'''InitializeCollections: True
'''ExportValueTypes: False
'IncludeTypes: SafetyRollupRequest.*
'''ExcludeTypes: 
'''AddNamespaces: 
'''AddDefaultXmlNamespace: http://schemas.servicestack.net/types

Imports System
Imports System.IO
Imports System.Collections
Imports System.Collections.Generic
Imports System.Runtime.Serialization
Imports ServiceStack
Imports ServiceStack.DataAnnotations
Imports System.Net
Imports CRM.AgencyPlatform.API.Internal

Namespace Global

    Namespace CRM.AgencyPlatform.API.Internal

        <Route("/v1/safety/rollup", "GET,OPTIONS")>
        Public Partial Class SafetyRollupRequest
            Implements IReturn(Of SafetyRollupResponse)
        End Class

        Public Partial Class SafetyRollupResponse
            Public Overridable Property ResponseStatus As ResponseStatus
            Public Overridable Property Summary As SafetySummary
        End Class

        Public Partial Class SafetySummary
            Public Overridable Property DaysWithoutRecordable As Integer
            Public Overridable Property Trir As Decimal
            Public Overridable Property OpenIncidents As Integer
            Public Overridable Property Recordables12mo As Integer
            Public Overridable Property ObservationsMonth As Integer
            Public Overridable Property ToolboxTalksWeek As Integer
            Public Overridable Property ToolboxAckPct As Integer
            Public Overridable Property OpenCorrectiveActions As Integer
        End Class
    End Namespace

    Namespace ServiceStack

        <DataContract>
        Public Partial Class ResponseStatus
            Implements IMeta
            <DataMember(Order:=1)>
            Public Overridable Property ErrorCode As String

            <DataMember(Order:=2)>
            Public Overridable Property Message As String

            <DataMember(Order:=3)>
            Public Overridable Property StackTrace As String

            <DataMember(Order:=4)>
            Public Overridable Property Errors As List(Of ResponseError) = New List(Of ResponseError)

            <DataMember(Order:=5)>
            Public Overridable Property Meta As Dictionary(Of String, String) Implements IMeta.Meta = New Dictionary(Of String, String)
        End Class
    End Namespace
End Namespace