This commit is contained in:
Jonathan Jenne
2023-12-08 10:21:43 +01:00
parent dbeabab832
commit 951c9d9122
4 changed files with 51 additions and 8 deletions

View File

@@ -60,9 +60,9 @@ Public Class EnvelopeModel
End Try
End Function
Public Function GetById(pEnvelopeId As String) As Envelope
Public Function GetById(pEnvelopeId As Integer) As Envelope
Try
Dim oSql = $"SELECT * FROM [dbo].[TBSIG_ENVELOPE] WHERE GUID = '{pEnvelopeId}'"
Dim oSql = $"SELECT * FROM [dbo].[TBSIG_ENVELOPE] WHERE GUID = {pEnvelopeId}"
Dim oTable = Database.GetDatatable(oSql)
Return ToEnvelope(oTable)