dcovington
/
tracking_kits
1
0
Fork 0
Koodi Ongelmat 0 Pull-pyynnöt 0 Julkaisut 0 Wiki Activity
Tunnisteet Merkkipaalut
Uusi pull pyyntö

#8 CreateCustomOfficeCopyScaffold

Yhdistetty
dcovington yhdistetty 3 committia lähteestä CreateCustomOfficeCopyScaffold kohteeseen master 2 kuukautta sitten
Keskustelu 0 Commitit 3 Files Changed 12
12 muutettua tiedostoa jossa 657 lisäystä ja 9 poistoa
Whitespace
Show all changes Ignore whitespace when comparing lines Ignore changes in amount of whitespace Ignore changes in whitespace at EOL
Jaettu näkymä
Diff Options
Show Stats Download Patch File Download Diff File
  1. +129
    -0
      App/Controllers/CustomOfficeCopyJob/CustomOfficeCopyJobController.asp
  2. +240
    -0
      App/DomainModels/CustomOfficeCopyJobRepository.asp
  3. +1
    -1
      App/ScaffoldRepo.vbs
  4. +32
    -0
      App/ViewModels/CustomOfficeCopyJobViewModels.asp
  5. +46
    -0
      App/Views/CustomOfficeCopyJob/create.asp
  6. +63
    -0
      App/Views/CustomOfficeCopyJob/delete.asp
  7. +61
    -0
      App/Views/CustomOfficeCopyJob/edit.asp
  8. +81
    -0
      App/Views/CustomOfficeCopyJob/index.asp
  9. +1
    -1
      App/Views/Home/Index.asp
  10. +2
    -0
      App/Views/Shared/layout.header.asp
  11. +1
    -7
      App/include_all.asp
  12. BIN
      ImportService/TrackingDataImport.vbs

+ 129
- 0
App/Controllers/CustomOfficeCopyJob/CustomOfficeCopyJobController.asp Näytä tiedosto

@@ -0,0 +1,129 @@
<% Option Explicit %>
<!--#include file="../../include_all.asp"-->
<!--#include file="../../ViewModels/CustomOfficeCopyJobViewModels.asp"-->
<%
Class CustomOfficeCopyJobController
Public Model

Public Sub Index

dim page_size : page_size = 10
dim page_num : page_num = Choice(Len(Request.Querystring("page_num")) > 0, Request.Querystring("page_num"), 1)
dim page_count, record_count
set Model = new PagedIndex_ViewModel_Class
Model.Title = "CustomOfficeCopyJob"
set Model.CustomOfficeCopyJob = CustomOfficeCopyJobRepository.FindPaged(empty, "ID", page_size, page_num, page_count, record_count)
Model.CurrentPageNumber = page_num
Model.PageSize = page_size
Model.PageCount = page_count
Model.RecordCount = record_count
%> <!--#include file="../../Views/CustomOfficeCopyJob/Index.asp"--> <%

End Sub
Public Sub Search

dim searchValue:searchValue = Choice(Request.Form.Count = 0,Request.QueryString("q"),Request.Form("q"))
dim page_size : page_size = 10
dim page_num : page_num = Choice(Len(Request.Querystring("page_num")) > 0, Request.Querystring("page_num"), 1)
dim page_count, record_count
set Model = new PagedIndex_ViewModel_Class
Model.Title = "CustomOfficeCopyJob"
set Model.CustomOfficeCopyJob = CustomOfficeCopyJobRepository.SearchTablePaged(Array("ID","%" & searchValue & "%","Jcode","%" & searchValue & "%","Precinct","%" & searchValue & "%","StartingBallotNumber","%" & searchValue & "%","Amount","%" & searchValue & "%","Status","%" & searchValue & "%","Donedate","%" & searchValue & "%"),"ID", page_size, page_num, page_count, record_count)
Model.CurrentPageNumber = page_num
Model.PageSize = page_size
Model.PageCount = page_count
Model.RecordCount = record_count
%> <!--#include file="../../Views/CustomOfficeCopyJob/Index.asp"--> <%

End Sub

Public Sub Edit

dim id : id = Request.QueryString("Id")
set Model = new Edit_ViewModel_Class
set Model.CustomOfficeCopyJob = CustomOfficeCopyJobRepository.FindByID(id)
Model.Title = "Edit CustomOfficeCopyJob"
HTMLSecurity.SetAntiCSRFToken "CustomOfficeCopyJobEditForm"
%> <!--#include file="../../Views/CustomOfficeCopyJob/Edit.asp"--> <%
Flash.Success = "CustomOfficeCopyJob Updated."
End Sub

Public Sub EditPost
MVC.RequirePost
HTMLSecurity.OnInvalidAntiCsrfTokenRedirectToActionExt "CustomOfficeCopyJobEditForm", Request.Form("nonce"), "Edit", Array("Id", Request.Form("Id"))
dim ID : ID = Request.Form("Id")
dim model : set model = CustomOfficeCopyJobRepository.FindByID(ID)
set model = Automapper.AutoMap(Request.Form, model)
'model.Validate
'If model.Validator.HasErrors then
FormCache.SerializeForm "EditCustomOfficeCopyJob", Request.Form
' Flash.Errors = model.Validator.Errors
' MVC.RedirectToActionExt "Edit", Array("Id",ID)
'Else
CustomOfficeCopyJobRepository.Update model
FormCache.ClearForm "EditCustomOfficeCopyJob"
Flash.Success = "CustomOfficeCopyJob updated."
MVC.RedirectToAction "Index"
'End If
End Sub

Public Sub Create

dim form_params : set form_params = FormCache.DeserializeForm("NewCustomOfficeCopyJob")
If Not form_params Is Nothing then
set Model = Automapper.AutoMap(form_params, New Create_ViewModel_Class)
Else
set Model = new Create_ViewModel_Class
End If

HTMLSecurity.SetAntiCSRFToken "CustomOfficeCopyJobCreateForm"

%> <!--#include file="../../Views/CustomOfficeCopyJob/Create.asp"--> <%
End Sub

Public Sub CreatePost

MVC.RequirePost
HtmlSecurity.OnInvalidAntiCSRFTokenRedirectToAction "CustomOfficeCopyJobCreateForm", Request.Form("nonce"), "Create"

dim new_CustomOfficeCopyJob_model : set new_CustomOfficeCopyJob_model = Automapper.AutoMap(Request.Form, new CustomOfficeCopyJobModel_Class)

'new_CustomOfficeCopyJob_model.Validator.Validate

'If new_CustomOfficeCopyJob_model.Validator.HasErrors then
' FormCache.SerializeForm "NewCustomOfficeCopyJob", Request.Form
' Flash.Errors = new_CustomOfficeCopyJob_model.Validator.Errors
' MVC.RedirectToAction "Create"
'Else
CustomOfficeCopyJobRepository.AddNew new_CustomOfficeCopyJob_model
' FormCache.ClearForm "NewCustomOfficeCopyJob"
Flash.Success = "CustomOfficeCopyJob added."
MVC.RedirectToAction "Index"
'End If
End Sub

Public Sub Delete
dim id : id = Request.QueryString("Id")
set Model = new Delete_ViewModel_Class
set Model.CustomOfficeCopyJob = CustomOfficeCopyJobRepository.FindByID(id)
Model.Title = "Delete CustomOfficeCopyJob"

HTMLSecurity.SetAntiCSRFToken "CustomOfficeCopyJobDeleteForm"

%> <!--#include file="../../Views/CustomOfficeCopyJob/Delete.asp"--> <%
End Sub

Public Sub DeletePost
MVC.RequirePost
HtmlSecurity.OnInvalidAntiCSRFTokenRedirectToAction "CustomOfficeCopyJobDeleteForm", Request.Form("nonce"), "Create"

dim id : id = Request.Form("Id")
CustomOfficeCopyJobRepository.Delete id

Flash.Success = "CustomOfficeCopyJob deleted."
MVC.RedirectToAction "Index"
End Sub

End Class
MVC.Dispatch
%>

+ 240
- 0
App/DomainModels/CustomOfficeCopyJobRepository.asp Näytä tiedosto

@@ -0,0 +1,240 @@
<%
'=======================================================================================================================
' CustomOfficeCopyJob Model
'=======================================================================================================================

Class CustomOfficeCopyJobModel_Class
Public Validator
Public Class_Get_Properties

Public ID '90
Public Jcode '106
Public Precinct '106
Public StartingBallotNumber '122
Public Amount '122
Public Status '106
Public Donedate '122

Private Sub Class_Initialize
'ValidateExitsts Me, "",""
Class_Get_Properties = Array("ID, Jcode, Precinct, StartingBallotNumber, Amount, Status, Donedate")
End Sub

End CLass

'=======================================================================================================================
' CustomOfficeCopyJob Repository
'=======================================================================================================================

Class CustomOfficeCopyJobRepository_Class

Public Function FindByID(ID)
dim sql : sql = "Select [ID], [Jcode], [Precinct], [StartingBallotNumber], [Amount], [Status], [Donedate] FROM [CustomOfficeCopyJob] WHERE ID = ?"
dim rs : set rs = DAL.Query(sql,ID)
If rs.EOF then
Err.Raise 1, "CustomOfficeCopyJobRepository_Class", CustomOfficeCopyJobNotFoundException("ID", ID)
Else
set FindByID = Automapper.AutoMap(rs,"CustomOfficeCopyJobModel_Class")
End If
End Function

Public Function GetAll(orderBy)
set GetAll = Find(empty,orderBy)
End Function

Public Function Find(where_kvarray, order_string_or_array)
dim sql : sql = "Select [ID], [Jcode], [Precinct], [StartingBallotNumber], [Amount], [Status], [Donedate] FROM [CustomOfficeCopyJob]"

If Not IsEmpty(where_kvarray) then
sql = sql & " WHERE "
dim where_keys, where_values
KVUnzip where_kvarray, where_keys, where_values

dim i
For i = 0 to UBound(where_keys)
If i > 0 then sql = sql & " AND "
sql = sql & " " & where_keys(i) & " "
Next
End If

If Not IsEmpty(order_string_or_array) then
sql = sql & "ORDER BY "
If IsArray(order_string_or_array) then
dim order_array : order_array = order_string_or_array
For i = 0 to UBound(order_array)
If i > 0 then sql = sql & ", "
sql = sql & " " & order_array(i)
Next
Else
sql = sql & order_string_or_array & " "
End If
End If

dim rs : set rs = DAL.Query(sql, where_values)
set Find = CustomOfficeCopyJobList(rs)
Destroy rs
End Function

Public Function FindPaged(where_kvarray, order_string_or_array, per_page, page_num, ByRef page_count, ByRef record_count)
dim sql : sql = "Select [ID], [Jcode], [Precinct], [StartingBallotNumber], [Amount], [Status], [Donedate] FROM [CustomOfficeCopyJob]"

If Not IsEmpty(where_kvarray) then
sql = sql & " WHERE "
dim where_keys, where_values
KVUnzip where_kvarray, where_keys, where_values

dim i
For i = 0 to UBound(where_keys)
If i > 0 then sql = sql & " AND "
sql = sql & " " & where_keys(i) & " "
Next
End If

If Not IsEmpty(order_string_or_array) then
sql = sql & "ORDER BY "
If IsArray(order_string_or_array) then
dim order_array : order_array = order_string_or_array
For i = 0 to UBound(order_array)
If i > 0 then sql = sql & ", "
sql = sql & " " & order_array(i)
Next
Else
sql = sql & order_string_or_array & " "
End If
End If

dim list : set list = new LinkedList_Class
dim rs : set rs = DAL.PagedQuery(sql, where_values, per_page, page_num)

If Not rs.EOF and Not (IsEmpty(per_page) and IsEmpty(page_num) and IsEmpty(page_count) and IsEmpty(record_count)) then
rs.PageSize = per_page
rs.AbsolutePage = page_num
page_count = rs.PageCount
record_count = rs.RecordCount
End If

set FindPaged = PagedCustomOfficeCopyJobList(rs, per_page)
Destroy rs
End Function

Public Function SearchTablePaged(where_kvarray, order_string_or_array, per_page, page_num, ByRef page_count, ByRef record_count)
dim sql : sql = "Select [ID], [Jcode], [Precinct], [StartingBallotNumber], [Amount], [Status], [Donedate] FROM [CustomOfficeCopyJob]"

If Not IsEmpty(where_kvarray) then
sql = sql & " WHERE "
dim where_keys, where_values
KVUnzip where_kvarray, where_keys, where_values

dim i
For i = 0 to UBound(where_keys)
If i > 0 then sql = sql & " OR"
sql = sql & " " & where_keys(i) & " LIKE ?"
Next
End If

If Not IsEmpty(order_string_or_array) then
sql = sql & " ORDER BY "
If IsArray(order_string_or_array) then
dim order_array : order_array = order_string_or_array
For i = 0 to UBound(order_array)
If i > 0 then sql = sql & ", "
sql = sql & " " & order_array(i)
Next
Else
sql = sql & order_string_or_array & " "
End If
End If

dim list : set list = new LinkedList_Class
dim rs : set rs = DAL.PagedQuery(sql, where_values, per_page, page_num)

If Not rs.EOF and Not (IsEmpty(per_page) and IsEmpty(page_num) and IsEmpty(page_count) and IsEmpty(record_count)) then
rs.PageSize = per_page
rs.AbsolutePage = page_num
page_count = rs.PageCount
record_count = rs.RecordCount
End If

set SearchTablePaged = PagedCustomOfficeCopyJobList(rs, per_page)
Destroy rs
End Function

Private Function PagedCustomOfficeCopyJobList(rs, per_page)
dim list : set list = new LinkedList_Class

dim x : x =0
Do While x < per_page and Not rs.EOF
list.Push Automapper.AutoMap(rs, new CustomOfficeCopyJobModel_Class)
x = x +1
rs.MoveNext
Loop
set PagedCustomOfficeCopyJobList = list
End Function

Private Function CustomOfficeCopyJobNotFoundException(ByVal field_name, ByVal field_val)
CustomOfficeCopyJobNotFoundException = "CustomOfficeCopyJob was not found with " & field_name & " of '" & field_val & "'."
End Function

Private Function CustomOfficeCopyJobList(rs)
dim list : set list = new LinkedList_Class
dim model

Do until rs.EOF
set model = new CustomOfficeCopyJobModel_Class
list.Push Automapper.AutoMap(rs, model)
rs.MoveNext
Loop
set CustomOfficeCopyJobList = list
End Function

Public Sub AddNew(ByRef model)
dim sql : sql = "INSERT INTO [CustomOfficeCopyJob] (" &_
"[Jcode]," &_
"[Precinct]," &_
"[StartingBallotNumber]," &_
"[Amount]," &_
"[Status])" &_
"VALUES (?,?,?,?,?)"
DAL.Execute sql, Array(model.Jcode, _
model.Precinct, _
model.StartingBallotNumber, _
model.Amount, _
"Ready")
sql = "SELECT TOP 1 ID FROM [CustomOfficeCopyJob] ORDER BY ID DESC"
dim rs : set rs = DAL.Query(sql, empty)
model.ID = rs("ID")
Destroy rs
End Sub

Public Sub Update(model)
dim sql : sql = "UPDATE [CustomOfficeCopyJob] SET [Jcode] = ?," &_
"[Precinct] = ?," &_
"[StartingBallotNumber] = ?," &_
"[Amount] = ?," &_
"[Status] = ?," &_
"[Donedate] = ?" &_
" WHERE [ID] = ?"

DAL.Execute sql, Array(model.Jcode, _
model.Precinct, _
model.StartingBallotNumber, _
model.Amount, _
model.Status, _
model.Donedate, _
model.ID)
End Sub

Public Sub Delete(id)
dim sql : sql = "DELETE FROM [CustomOfficeCopyJob] WHERE [ID] = ?"
DAL.Execute sql, id
End Sub
End Class

dim CustomOfficeCopyJobRepository__Singleton
Function CustomOfficeCopyJobRepository()
If IsEmpty(CustomOfficeCopyJobRepository__Singleton) then
set CustomOfficeCopyJobRepository__Singleton = new CustomOfficeCopyJobRepository_Class
End If
set CustomOfficeCopyJobRepository = CustomOfficeCopyJobRepository__Singleton
End Function
%>

+ 1
- 1
App/ScaffoldRepo.vbs Näytä tiedosto

@@ -23,7 +23,7 @@ Init
fixedTableName = Replace(rs("TABLE_NAME")," ","_")
tableName = rs("TABLE_NAME")
'If tableName <> "meta_migrations" Then
If tableName <> "meta_migrations" AND tableName = "InkjetRecords" Then
If tableName <> "meta_migrations" AND tableName = "CustomOfficeCopyJob" Then

debug.WriteLine(tableName)
If Not fso.FolderExists(ScriptDirectory()& "Controllers\"& fixedTableName) Then fso.CreateFolder(ScriptDirectory()& "Controllers\"& fixedTableName)


+ 32
- 0
App/ViewModels/CustomOfficeCopyJobViewModels.asp Näytä tiedosto

@@ -0,0 +1,32 @@
<%
Class PagedIndex_ViewModel_Class
Public Title
Public CustomOfficeCopyJob

Public CurrentPageNumber
Public PageSize
Public PageCount
Public RecordCount
End Class

Class Edit_ViewModel_Class
Public Title
Public CustomOfficeCopyJob

End Class

Class Create_ViewModel_Class
Public Jcode
Public Precinct
Public StartingBallotNumber
Public Amount
Public Status
Public Donedate
End Class

Class Delete_ViewModel_Class
Public Title
Public CustomOfficeCopyJob
End Class

%>

+ 46
- 0
App/Views/CustomOfficeCopyJob/create.asp Näytä tiedosto

@@ -0,0 +1,46 @@
<h2>Create Custom Office Copy Job</h2>

<%= HTML.FormTag("CustomOfficeCopyJob", "CreatePost", empty, empty) %>
<%= HTML.Hidden("nonce", HTMLSecurity.GetAntiCSRFToken("CustomOfficeCopyJobCreateForm")) %>
<hr />

<div class="form-group">
<div class="row">
<div class="col-md-4">
<div class="form-group">
<label for="Jcode">Jcode</label>
<%= HTML.TextboxExt("Jcode", Model.Jcode, Array("class", "form-control")) %>
</div>
</div>
</div>
<div class="row">
<div class="col-md-4">
<div class="form-group">
<label for="Precinct">Precinct</label>
<%= HTML.TextboxExt("Precinct", Model.Precinct, Array("class", "form-control")) %>
</div>
</div>
</div>
<div class="row">
<div class="col-md-4">
<div class="form-group">
<label for="StartingBallotNumber">StartingBallotNumber</label>
<%= HTML.TextboxExt("StartingBallotNumber", Model.StartingBallotNumber, Array("class", "form-control")) %>
</div>
</div>
</div>
<div class="row">
<div class="col-md-4">
<div class="form-group">
<label for="Amount">Amount</label>
<%= HTML.TextboxExt("Amount", Model.Amount, Array("class", "form-control")) %>
</div>
</div>
</div>
<p></P>
<%= HTML.Button("submit", "<i class='glyphicon glyphicon-ok'></i> Create", "btn-primary") %>
&nbsp;&nbsp;
<%= HTML.LinkToExt("<i class='glyphicon glyphicon-remove'></i> Cancel", "CustomOfficeCopyJob", "Index", empty, Array("class", "btn btn-default")) %>
</div>

</form>

+ 63
- 0
App/Views/CustomOfficeCopyJob/delete.asp Näytä tiedosto

@@ -0,0 +1,63 @@
<h2><%= H(Model.Title) %></h2>

<p class="alert alert-danger">Are you sure you want to delete this CustomOfficeCopyJob?</p>

<%= HTML.FormTag("CustomOfficeCopyJob", "DeletePost", empty, Array("class", "form-horizontal")) %>
<%= HTML.Hidden("nonce", HTMLSecurity.GetAntiCSRFToken("CustomOfficeCopyJobDeleteForm")) %>
<%= HTML.Hidden("Id", Model.CustomOfficeCopyJob.ID) %>
<div class="col-md-10">
<div class="form-group">
<%= HTML.Button("submit", "<i class='glyphicon glyphicon-remove'></i> Confirm Delete", "btn-danger") %>
&nbsp;&nbsp;
<%= HTML.LinkToExt("Cancel", "CustomOfficeCopyJob", "Index", empty, Array("class", "btn btn-success")) %>
<div class="row">
<div class="col-md-4">
<div class="form-group">
<label for="Jcode">Jcode</label>
<%= HTML.TextboxExt("Jcode", Model.CustomOfficeCopyJob.Jcode, Array("class", "form-control")) %>
</div>
</div>
</div>
<div class="row">
<div class="col-md-4">
<div class="form-group">
<label for="Precinct">Precinct</label>
<%= HTML.TextboxExt("Precinct", Model.CustomOfficeCopyJob.Precinct, Array("class", "form-control")) %>
</div>
</div>
</div>
<div class="row">
<div class="col-md-4">
<div class="form-group">
<label for="StartingBallotNumber">StartingBallotNumber</label>
<%= HTML.TextboxExt("StartingBallotNumber", Model.CustomOfficeCopyJob.StartingBallotNumber, Array("class", "form-control")) %>
</div>
</div>
</div>
<div class="row">
<div class="col-md-4">
<div class="form-group">
<label for="Amount">Amount</label>
<%= HTML.TextboxExt("Amount", Model.CustomOfficeCopyJob.Amount, Array("class", "form-control")) %>
</div>
</div>
</div>
<div class="row">
<div class="col-md-4">
<div class="form-group">
<label for="Status">Status</label>
<%= HTML.TextboxExt("Status", Model.CustomOfficeCopyJob.Status, Array("class", "form-control")) %>
</div>
</div>
</div>
<div class="row">
<div class="col-md-4">
<div class="form-group">
<label for="Donedate">Donedate</label>
<%= HTML.TextboxExt("Donedate", Model.CustomOfficeCopyJob.Donedate, Array("class", "form-control")) %>
</div>
</div>
</div>
</div>
</div>
</form>

+ 61
- 0
App/Views/CustomOfficeCopyJob/edit.asp Näytä tiedosto

@@ -0,0 +1,61 @@
<h2><%= H(Model.Title) %></h2>
<%= HTML.FormTag("CustomOfficeCopyJob", "EditPost", empty, empty) %>
<%= HTML.Hidden("nonce", HTMLSecurity.GetAntiCSRFToken("CustomOfficeCopyJobEditForm")) %>
<%= HTML.Hidden("Id", Model.CustomOfficeCopyJob.ID) %>
<div class="row">
<div class="col-md-4">
<div class="form-group">
<label for="Jcode">Jcode</label>
<%= HTML.TextboxExt("Jcode", Model.CustomOfficeCopyJob.Jcode, Array("class", "form-control")) %>
</div>
</div>
</div>
<div class="row">
<div class="col-md-4">
<div class="form-group">
<label for="Precinct">Precinct</label>
<%= HTML.TextboxExt("Precinct", Model.CustomOfficeCopyJob.Precinct, Array("class", "form-control")) %>
</div>
</div>
</div>
<div class="row">
<div class="col-md-4">
<div class="form-group">
<label for="StartingBallotNumber">StartingBallotNumber</label>
<%= HTML.TextboxExt("StartingBallotNumber", Model.CustomOfficeCopyJob.StartingBallotNumber, Array("class", "form-control")) %>
</div>
</div>
</div>
<div class="row">
<div class="col-md-4">
<div class="form-group">
<label for="Amount">Amount</label>
<%= HTML.TextboxExt("Amount", Model.CustomOfficeCopyJob.Amount, Array("class", "form-control")) %>
</div>
</div>
</div>
<div class="row">
<div class="col-md-4">
<div class="form-group">
<label for="Status">Status</label>
<%= HTML.TextboxExt("Status", Model.CustomOfficeCopyJob.Status, Array("class", "form-control")) %>
</div>
</div>
</div>
<div class="row">
<div class="col-md-4">
<div class="form-group">
<label for="Donedate">Donedate</label>
<%= HTML.TextboxExt("Donedate", Model.CustomOfficeCopyJob.Donedate, Array("class", "form-control")) %>
</div>
</div>
</div>
<hr />
<div class="form-group">
<% = HTML.Button("submit", "<i class='glyphicon glyphicon-ok'></i> Save", "btn-primary") %>
&nbsp;&nbsp;
<%= HTML.LinkToExt("<i class='glyphicon glyphicon-remove'></i> Delete", "CustomOfficeCopyJob", "Delete", Array("id", Model.CustomOfficeCopyJob.ID), Array("class", "btn btn-danger")) %>
&nbsp;&nbsp;
<%= HTML.LinkToExt("Cancel", "CustomOfficeCopyJob", "Index", empty, Array("class", "btn btn-default")) %>
</div>
</form>

+ 81
- 0
App/Views/CustomOfficeCopyJob/index.asp Näytä tiedosto

@@ -0,0 +1,81 @@
<h2><%= H(Model.Title) %></h2>
<div class="row">
<div class="col-md-8 col-sm-8 col-xs-12">
<%= H(Model.RecordCount) %> CustomOfficeCopyJob found. Showing <%= H(Model.PageSize) %> records per page.
<%= HTML.LinkToExt("<i class='bi bi-plus-square-fill'></i> New","CustomOfficeCopyJob", "Create", empty, Array("class", "btn btn-xs btn-primary")) %>
</div>
<div class="col-md-4 col-sm-4 col-xs-12">

<%= HTML.FormTag("CustomOfficeCopyJob", "Search", empty, empty) %>

<div class="col-md-10 col-sm-10 col-xs-12">
<label class="sr-only" for="search">Search</label>
<div class="input-group">
<input type="text" class="form-control input-search" value='<%= Choice(Request.Form.Count = 0,Request.QueryString("q"),Request.Form("q")) %>' name="q" id="search" placeholder="Search">
<span class="input-group-addon group-icon"><span class="glyphicon glyphicon-eye-open"></span>
<button type="submit" class="btn btn-success"><i class="bi bi-search"></i>Search</buttton>
</div>
</div>

</form>
</div>
</div>
<table id="CustomOfficeCopyJob" class="table table-striped">
<thead>
<tr>
<th></th>
<th style="text-align: left">ID</th>
<th style="text-align: left">Jcode</th>
<th style="text-align: left">Precinct</th>
<th style="text-align: left">StartingBallotNumber</th>
<th style="text-align: left">Amount</th>
<th style="text-align: left">Status</th>
<th style="text-align: left">Donedate</th>
<th></th>
</tr>
</thead>
<tbody>
<% dim it : set it = Model.CustomOfficeCopyJob.Iterator %>
<% dim CustomOfficeCopyJob %>
<% While it.HasNext %>
<% set CustomOfficeCopyJob = it.GetNext() %>
<tr>
<td>
<%= HTML.LinkToExt("<i class='bi bi-search'></i>", "CustomOfficeCopyJob", "Edit", Array("Id", CustomOfficeCopyJob.ID), Array("class", "btn btn-primary")) %>
</td>
<td><% = H(CustomOfficeCopyJob.ID) %></td>
<td><% = H(CustomOfficeCopyJob.Jcode) %></td>
<td><% = H(CustomOfficeCopyJob.Precinct) %></td>
<td><% = H(CustomOfficeCopyJob.StartingBallotNumber) %></td>
<td><% = H(CustomOfficeCopyJob.Amount) %></td>
<td><% = H(CustomOfficeCopyJob.Status) %></td>
<td><% = H(CustomOfficeCopyJob.Donedate) %></td>
</tr>
<% Wend %>
</tbody>
</table>
<div>
<% If Model.CurrentPageNumber <> 1 then %>
<%= HTML.LinkToExt("<i class='bi bi-chevron-left'></i><i class='bi bi-chevron-left'></i>", MVC.ControllerName, MVC.ActionName, Array("page_num", 1,"q", Choice(Request.Form.Count = 0,Request.QueryString("q"),Request.Form("q"))), Array("class", "btn btn-default")) %>
&nbsp;
<%= HTML.LinkToExt("<i class='bi bi-chevron-left'></i>", MVC.ControllerName, MVC.ActionName, Array("page_num", Model.CurrentPageNumber - 1,"q", Choice(Request.Form.Count = 0,Request.QueryString("q"),Request.Form("q"))), Array("class", "btn btn-default")) %>
&nbsp;
<% Else %>
<a class='btn btn-default disabled'><i class='bi bi-chevron-left'></i><i class='bi bi-chevron-left'></i></a>
&nbsp;
<a class='btn btn-default disabled'><i class='bi bi-chevron-left'></i></a>
&nbsp;
<% End If %>
<% If CInt(Model.CurrentPageNumber) < CInt(Model.PageCount) then %>
<%= HTML.LinkToExt("<i class='bi bi-chevron-right'></i>", MVC.ControllerName, MVC.ActionName, Array("page_num", Model.CurrentPageNumber + 1,"q", Choice(Request.Form.Count = 0,Request.QueryString("q"),Request.Form("q"))), Array("class", "btn btn-default")) %>
&nbsp;
<%= HTML.LinkToExt("<i class='bi bi-chevron-right'></i><i class='bi bi-chevron-right'></i>", MVC.ControllerName, MVC.ActionName, Array("page_num", Model.PageCount,"q", Choice(Request.Form.Count = 0,Request.QueryString("q"),Request.Form("q"))), Array("class", "btn btn-default")) %>
&nbsp;
<% Else %>
<a class='btn btn-default disabled'><i class='bi bi-chevron-right'></i><i class='bi bi-chevron-right'></i></a>
&nbsp;
<a class='btn btn-default disabled'><i class='bi bi-chevron-right'></i></a>
&nbsp;
<% End If %>
</div>
</div>

+ 1
- 1
App/Views/Home/Index.asp Näytä tiedosto

@@ -12,7 +12,7 @@
<%= Html.LinkTOExt("Create Kit","Home","CreateKit",empty,Array("Class","list-group-item list-group-item-action")) %>
<%= Html.LinkTOExt("View Tracking Kits","Kit","SwitchBoardIndex",empty,Array("Class","list-group-item list-group-item-action")) %>
<%= Html.LinkTOExt("View Purple Envelope Jobs","Kit","SwitchBoardPurpleEnvelopsIndex",empty,Array("Class","list-group-item list-group-item-action")) %>
<%= Html.LinkTOExt("Custom Office Copies","Kit","SwitchBoardPurpleEnvelopsIndex",empty,Array("Class","list-group-item list-group-item-action")) %>
<%= Html.LinkTOExt("Custom Office Copies","CustomOfficeCopyJob","Index",empty,Array("Class","list-group-item list-group-item-action")) %>
</div>
</div>
</div


+ 2
- 0
App/Views/Shared/layout.header.asp Näytä tiedosto

@@ -30,6 +30,7 @@
<li><%= Html.LinkTOExt("Settings","Settings","Index",empty,Array("Class","dropdown-item")) %></li>
<li><%= Html.LinkTOExt("InkjetRecords","InkjetRecords","Index",empty,Array("Class","dropdown-item")) %></li>
<li><%= Html.LinkTOExt("Import Jurisdiction File","Jurisdiction","Import",empty,Array("Class","dropdown-item")) %></li>
<li><%= Html.LinkTOExt("CustomOfficeCopyJob","CustomOfficeCopyJob","Index",empty,Array("Class","nav-link")) %></li>
<!--nav bar admin placeholder-->
</ul>
</li>
@@ -60,3 +61,4 @@





+ 1
- 7
App/include_all.asp Näytä tiedosto

@@ -1,10 +1,4 @@
<!--#include file="../MVC/lib.all.asp"-->
<!--#include file="DAL/lib.DAL.asp"-->
<!--#include file="app.Config.asp"-->
<!--#include file="DomainModels/InkjetRecordsRepository.asp"-->
<!--#include file="DomainModels/JurisdictionRepository.asp"-->
<!--#include file="DomainModels/KitRepository.asp"-->
<!--#include file="DomainModels/KitLabelsRepository.asp"-->
<!--#include file="DomainModels/SettingsRepository.asp"-->
<!--#include file="DomainModels/ContactsRepository.asp"-->
<!--#include file="DomainModels/SnailWorksRepository.asp"-->
<!--#include file="DomainModels/CustomOfficeCopyJobRepository.asp"-->

BIN
ImportService/TrackingDataImport.vbs Näytä tiedosto


Write Preview
Loading…
Peruuta
Tallenna

Powered by TurnKey Linux.