2022-03-25 16:06:00 +01:00

22 lines
547 B
VB.net

Imports System.Runtime.Serialization
Namespace Methods.IDB.CheckInOutFile
<Serializable>
<DataContract>
Public Class CheckInOutFileResponse
Inherits Messages.BaseResponse
<DataMember>
Public Property ObjectId As Long
Public Sub New(pObjectId As Long)
MyBase.New()
ObjectId = pObjectId
End Sub
Public Sub New(pException As Exception, Optional pDetails As String = "")
MyBase.New(pException, pDetails)
End Sub
End Class
End Namespace