Przeglądaj źródła

Label and Report Changes

master
Daniel Covington 4 dni temu
rodzic
commit
32a86b6532
4 zmienionych plików z 116 dodań i 35 usunięć
  1. +2
    -1
      .gitignore
  2. +6
    -1
      App/Controllers/Kit/KitController.asp
  3. +108
    -33
      Data/Proofs.rep
  4. BIN
      ImportService/TrackingDataImport.vbs

+ 2
- 1
.gitignore Wyświetl plik

@@ -9,4 +9,5 @@ gittoken.txt
/bmad_output /bmad_output
/.agents /.agents
/.claude /.claude
/uploads
/uploads
PSL Custom Proofs/*

+ 6
- 1
App/Controllers/Kit/KitController.asp Wyświetl plik

@@ -158,6 +158,11 @@ Class KitController
Exit Sub Exit Sub
End If End If


dim officeCopiesAmount : officeCopiesAmount = 0
If IsNumeric(kitInfo.OfficeCopiesAmount) Then
officeCopiesAmount = CLng(kitInfo.OfficeCopiesAmount)
End If

dim appPath : appPath = Request.ServerVariables("APPL_PHYSICAL_PATH") dim appPath : appPath = Request.ServerVariables("APPL_PHYSICAL_PATH")
dim labelsTemplatePath : labelsTemplatePath = appPath & "Data\Delivery_Labels.rep" dim labelsTemplatePath : labelsTemplatePath = appPath & "Data\Delivery_Labels.rep"
dim packingSlipTemplatePath : packingSlipTemplatePath = appPath & "Data\Delivery_PackingSlip.rep" dim packingSlipTemplatePath : packingSlipTemplatePath = appPath & "Data\Delivery_PackingSlip.rep"
@@ -172,7 +177,7 @@ Class KitController
Exit Sub Exit Sub
End If End If


dim totalBoxes : totalBoxes = Int((inkjetCount + 1099) / 1100)
dim totalBoxes : totalBoxes = Int((inkjetCount + officeCopiesAmount + 1099) / 1000)
If totalBoxes <= 0 Then If totalBoxes <= 0 Then
Flash.AddError "Delivery paperwork cannot be generated because no shipping boxes were calculated." Flash.AddError "Delivery paperwork cannot be generated because no shipping boxes were calculated."
MVC.RedirectToActionExt "SwitchBoardPurpleEnvelopeEdit", Array("Id", kitId) MVC.RedirectToActionExt "SwitchBoardPurpleEnvelopeEdit", Array("Id", kitId)


+ 108
- 33
Data/Proofs.rep Wyświetl plik

@@ -122,7 +122,32 @@ object TRpReport
item item
Alias = 'JURISDICTION' Alias = 'JURISDICTION'
DatabaseAlias = 'WEBDATA' DatabaseAlias = 'WEBDATA'
SQL = 'SELECT * FROM JURISDICTION WHERE JCode =PBJCODE'
SQL =
'SELECT'#13#10' q.JCode,'#13#10' CStr(q.[OrigName]) AS [Name],'#13#10#13#10' C' +
'Str('#13#10' Left('#13#10' IIf('#13#10' InStr(1, ' +
'q.OrigMailingAddress, "PO BOX", 1) > 0'#13#10' AND Len(' +
'Trim(Left(q.OrigMailingAddress, InStr(1, q.OrigMailingAddress, "' +
'PO BOX", 1) - 1))) > 0,'#13#10' Trim(Left(q.OrigMailing' +
'Address, InStr(1, q.OrigMailingAddress, "PO BOX", 1) - 1)),'#13#10' ' +
' q.OrigMailingAddress'#13#10' ),'#13#10' 2' +
'55'#13#10' )'#13#10' ) AS [Mailing_Address],'#13#10#13#10' CStr('#13#10' ' +
' Left('#13#10' IIf('#13#10' InStr(1, q.OrigMailing' +
'Address, "PO BOX", 1) > 0'#13#10' AND Len(Trim(Left(q.O' +
'rigMailingAddress, InStr(1, q.OrigMailingAddress, "PO BOX", 1) -' +
' 1))) > 0,'#13#10' Trim(Mid(q.OrigMailingAddress, InStr' +
'(1, q.OrigMailingAddress, "PO BOX", 1))),'#13#10' q.CSZ' +
#13#10' ),'#13#10' 255'#13#10' )'#13#10' ) AS [CSZ],'#13#10#13 +
#10' CStr('#13#10' Left('#13#10' IIf('#13#10' InS' +
'tr(1, q.OrigMailingAddress, "PO BOX", 1) > 0'#13#10' AN' +
'D Len(Trim(Left(q.OrigMailingAddress, InStr(1, q.OrigMailingAddr' +
'ess, "PO BOX", 1) - 1))) > 0,'#13#10' q.CSZ,'#13#10' ' +
' ""'#13#10' ),'#13#10' 255'#13#10' )'#13#10' ) AS ' +
'[Over_Flow],'#13#10#13#10' CStr(q.IMB) AS [IMB],'#13#10' CStr(q.IMB_Digits' +
') AS [IMB_Digits]'#13#10#13#10'FROM'#13#10' ('#13#10' SELECT'#13#10' JC' +
'ode,'#13#10' [Name] AS OrigName,'#13#10' Mailing_Addre' +
'ss AS OrigMailingAddress,'#13#10' CSZ,'#13#10' IMB,'#13#10' ' +
' IMB_Digits'#13#10' FROM Jurisdiction'#13#10' ) AS q'#13#10'WH' +
'ERE'#13#10' JCode = PBJCODE;'
end end
item item
Alias = 'CONTACTS' Alias = 'CONTACTS'
@@ -153,7 +178,7 @@ object TRpReport
item item
Name = 'PBKITID' Name = 'PBKITID'
AllowNulls = False AllowNulls = False
Value = 208
Value = 733
ParamType = rpParamInteger ParamType = rpParamInteger
Datasets.Strings = ( Datasets.Strings = (
'KIT' 'KIT'
@@ -170,7 +195,7 @@ object TRpReport
item item
Name = 'PBJCODE' Name = 'PBJCODE'
AllowNulls = False AllowNulls = False
Value = '34000'
Value = '81920'
Datasets.Strings = ( Datasets.Strings = (
'JURISDICTION' 'JURISDICTION'
'CONTACTS') 'CONTACTS')
@@ -183,7 +208,7 @@ object TRpReport
item item
Name = 'PBMIN' Name = 'PBMIN'
AllowNulls = False AllowNulls = False
Value = 346103
Value = 2363859
ParamType = rpParamInteger ParamType = rpParamInteger
Datasets.Strings = ( Datasets.Strings = (
'KITLABELS') 'KITLABELS')
@@ -196,7 +221,7 @@ object TRpReport
item item
Name = 'PBMAX' Name = 'PBMAX'
AllowNulls = False AllowNulls = False
Value = 347342
Value = 2364882
ParamType = rpParamInteger ParamType = rpParamInteger
Datasets.Strings = ( Datasets.Strings = (
'KITLABELS') 'KITLABELS')
@@ -246,6 +271,9 @@ object TRpReport
end end
item item
Component = TRpExpression19 Component = TRpExpression19
end
item
Component = TRpExpression23
end> end>
ExternalTable = 'REPMAN_REPORTS' ExternalTable = 'REPMAN_REPORTS'
ExternalField = 'REPORT' ExternalField = 'REPORT'
@@ -1981,6 +2009,9 @@ object TRpReport
end end
item item
Component = TRpImage0 Component = TRpImage0
end
item
Component = TRpExpression24
end> end>
ExternalTable = 'REPMAN_REPORTS' ExternalTable = 'REPMAN_REPORTS'
ExternalField = 'REPORT' ExternalField = 'REPORT'
@@ -7626,7 +7657,7 @@ object TRpReport
PosX = 8055 PosX = 8055
PosY = 5865 PosY = 5865
Modul = 17 Modul = 17
Ratio = 3.00000000000000000
Ratio = 3.000000000000000000
Typ = bcCode39 Typ = bcCode39
NumColumns = 1 NumColumns = 1
NumRows = 1 NumRows = 1
@@ -7825,8 +7856,8 @@ object TRpReport
object TRpExpression2: TRpExpression object TRpExpression2: TRpExpression
Width = 4200 Width = 4200
Height = 264 Height = 264
PosX = 7540
PosY = 6090
PosX = 7710
PosY = 5890
Type1Font = poHelvetica Type1Font = poHelvetica
AutoExpand = False AutoExpand = False
AutoContract = False AutoContract = False
@@ -7847,8 +7878,8 @@ object TRpReport
object TRpExpression3: TRpExpression object TRpExpression3: TRpExpression
Width = 4200 Width = 4200
Height = 264 Height = 264
PosX = 7540
PosY = 6555
PosX = 7710
PosY = 6355
Type1Font = poHelvetica Type1Font = poHelvetica
AutoExpand = False AutoExpand = False
AutoContract = False AutoContract = False
@@ -7869,8 +7900,8 @@ object TRpReport
object TRpExpression19: TRpExpression object TRpExpression19: TRpExpression
Width = 4200 Width = 4200
Height = 264 Height = 264
PosX = 7540
PosY = 5840
PosX = 7710
PosY = 5640
Type1Font = poHelvetica Type1Font = poHelvetica
AutoExpand = False AutoExpand = False
AutoContract = False AutoContract = False
@@ -7891,8 +7922,8 @@ object TRpReport
object TRpExpression1: TRpExpression object TRpExpression1: TRpExpression
Width = 4200 Width = 4200
Height = 264 Height = 264
PosX = 7540
PosY = 6330
PosX = 7710
PosY = 6130
Type1Font = poHelvetica Type1Font = poHelvetica
AutoExpand = False AutoExpand = False
AutoContract = False AutoContract = False
@@ -7932,11 +7963,11 @@ object TRpReport
AgIniValue = '0' AgIniValue = '0'
ExportExpression = '' ExportExpression = ''
end end
object TRpExpression20: TRpExpression
object TRpExpression21: TRpExpression
Width = 4200 Width = 4200
Height = 264 Height = 264
PosX = 8055 PosX = 8055
PosY = 5080
PosY = 4365
Type1Font = poHelvetica Type1Font = poHelvetica
AutoExpand = False AutoExpand = False
AutoContract = False AutoContract = False
@@ -7948,17 +7979,17 @@ object TRpReport
DoAfterPrint = '' DoAfterPrint = ''
WFontName = 'Arial' WFontName = 'Arial'
LFontName = 'Helvetica' LFontName = 'Helvetica'
Expression = 'JURISDICTION.CSZ'
Expression = 'CONTACTS.TITLE'
DisplayFormat = '' DisplayFormat = ''
ExportDisplayFormat = '' ExportDisplayFormat = ''
AgIniValue = '0' AgIniValue = '0'
ExportExpression = '' ExportExpression = ''
end end
object TRpExpression21: TRpExpression
object TRpExpression22: TRpExpression
Width = 4200 Width = 4200
Height = 264 Height = 264
PosX = 8055 PosX = 8055
PosY = 4365
PosY = 4855
Type1Font = poHelvetica Type1Font = poHelvetica
AutoExpand = False AutoExpand = False
AutoContract = False AutoContract = False
@@ -7970,17 +8001,54 @@ object TRpReport
DoAfterPrint = '' DoAfterPrint = ''
WFontName = 'Arial' WFontName = 'Arial'
LFontName = 'Helvetica' LFontName = 'Helvetica'
Expression = 'CONTACTS.TITLE'
Expression = 'JURISDICTION.Mailing_Address'
DisplayFormat = '' DisplayFormat = ''
ExportDisplayFormat = '' ExportDisplayFormat = ''
AgIniValue = '0' AgIniValue = '0'
ExportExpression = '' ExportExpression = ''
end end
object TRpExpression22: TRpExpression
object TRpImage0: TRpImage
Width = 4245
Height = 240
PosX = 8055
PosY = 5616
DrawStyle = rpDrawTiledpi
CachedImage = rpCachedVariable
PrintCondition = ''
DoBeforePrint = ''
DoAfterPrint = ''
Expression =
#39'\\kci1\inkjet\BMP\Purple_ballot_envelopes\'#39' + KITLABELS.ColorN' +
'ame + '#39'.bmp'#39
Stream = {0000000000000000}
end
object TRpExpression23: TRpExpression
Width = 4245
Height = 270
PosX = 7710
PosY = 6604
Type1Font = poHelvetica
AutoExpand = False
AutoContract = False
ExportPosition = 0
ExportSize = 1
ExportDoNewLine = False
PrintCondition = ''
DoBeforePrint = ''
DoAfterPrint = ''
WFontName = 'Arial'
LFontName = 'Helvetica'
Expression = 'JURISDICTION.Over_Flow'
DisplayFormat = ''
ExportDisplayFormat = ''
AgIniValue = '0'
ExportExpression = ''
end
object TRpExpression20: TRpExpression
Width = 4200 Width = 4200
Height = 264 Height = 264
PosX = 8055 PosX = 8055
PosY = 4855
PosY = 5080
Type1Font = poHelvetica Type1Font = poHelvetica
AutoExpand = False AutoExpand = False
AutoContract = False AutoContract = False
@@ -7992,25 +8060,32 @@ object TRpReport
DoAfterPrint = '' DoAfterPrint = ''
WFontName = 'Arial' WFontName = 'Arial'
LFontName = 'Helvetica' LFontName = 'Helvetica'
Expression = 'JURISDICTION.Mailing_Address'
Expression = 'JURISDICTION.CSZ'
DisplayFormat = '' DisplayFormat = ''
ExportDisplayFormat = '' ExportDisplayFormat = ''
AgIniValue = '0' AgIniValue = '0'
ExportExpression = '' ExportExpression = ''
end end
object TRpImage0: TRpImage
Width = 4245
Height = 240
object TRpExpression24: TRpExpression
Width = 4200
Height = 264
PosX = 8055 PosX = 8055
PosY = 5400
DrawStyle = rpDrawTiledpi
CachedImage = rpCachedVariable
PosY = 5328
Type1Font = poHelvetica
AutoExpand = False
AutoContract = False
ExportPosition = 0
ExportSize = 1
ExportDoNewLine = False
PrintCondition = '' PrintCondition = ''
DoBeforePrint = '' DoBeforePrint = ''
DoAfterPrint = '' DoAfterPrint = ''
Expression =
#39'\\kci1\inkjet\BMP\Purple_ballot_envelopes\'#39' + KITLABELS.ColorN' +
'ame + '#39'.bmp'#39
Stream = {0000000000000000}
WFontName = 'Arial'
LFontName = 'Helvetica'
Expression = 'JURISDICTION.Over_Flow'
DisplayFormat = ''
ExportDisplayFormat = ''
AgIniValue = '0'
ExportExpression = ''
end end
end end

BIN
ImportService/TrackingDataImport.vbs Wyświetl plik


Ładowanie…
Anuluj
Zapisz

Powered by TurnKey Linux.