first pass of creating report

This commit is contained in:
Jonathan Jenne
2023-12-12 16:09:08 +01:00
parent 788d7fac9f
commit f8b30e1a06
12 changed files with 317 additions and 168 deletions

View File

@@ -0,0 +1,14 @@
Public Class ReportModel
Inherits BaseModel
Public Sub New(pState As State)
MyBase.New(pState)
End Sub
Public Function List(pEnvelopeId As Integer) As DataTable
Dim oSql As String = $"SELECT * FROM VWSIG_ENVELOPE_REPORT WHERE ENVELOPE_ID = {pEnvelopeId}"
Dim oTable As DataTable = Database.GetDatatable(oSql)
Return oTable
End Function
End Class