Skip to content

K
KGOrders
Commit 227def3a by Mac Stephens
Options

Removed hardcoded uniconnection data, ini is updated, cleaned up some html

parent c99cd8f1
Showing with 2342 additions and 1789 deletions
kgOrdersClient/View.Main.dfm
object FViewMain: TFViewMain
Width = 640
Height = 586
CSSLibrary = cssBootstrap
Color = clWhite
ElementFont = efCSS
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
FormStyle = fsNormal
Height = 586
Left = 0
OnCreate = WebFormCreate
TabOrder = 0
Top = 0
Width = 640
object lblUsername: TWebLabel
Left = 529
Top = 4
Width = 66
Height = 15
Caption = 'lblUsername'
ElementID = 'view.main.username'
HeightPercent = 100.000000000000000000
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 21
Left = 529
Top = 4
Transparent = False
WidthPercent = 100.000000000000000000
Width = 88
end
object wllblUserProfile: TWebLinkLabel
Left = 529
Top = 21
Width = 63
Height = 15
Caption = ' User Profile'
ElementID = 'dropdown.menu.userprofile'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 0
Left = 529
OnClick = wllblUserProfileClick
Caption = ' User Profile'
Top = 21
Width = 0
end
object wllblLogout: TWebLinkLabel
Left = 551
Top = 143
Width = 41
Height = 15
Caption = ' Logout'
ElementID = 'dropdown.menu.logout'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 0
Left = 551
OnClick = wllblLogoutClick
Caption = ' Logout'
Top = 143
Width = 0
end
object lblHome: TWebLinkLabel
Left = 556
Top = 38
Width = 33
Height = 15
Caption = 'Home'
ElementID = 'dropdown.menu.home'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 0
Left = 556
OnClick = lblHomeClick
Caption = 'Home'
Top = 38
Width = 0
end
object lblAppTitle: TWebLabel
Left = 57
Top = 31
Width = 82
Height = 15
Caption = 'Koehler-Gibson'
ElementID = 'view.main.apptitle'
HeightPercent = 100.000000000000000000
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 40
Left = 57
Top = 31
Transparent = False
WidthPercent = 100.000000000000000000
Width = 78
end
object lblItemsList: TWebLinkLabel
Left = 560
Top = 85
Width = 29
Height = 15
ElementID = 'dropdown.menu.itemlist'
Caption = 'Items'
ElementFont = efCSS
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
ElementID = 'dropdown.menu.itemlist'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 32
Left = 560
OnClick = lblItemsListClick
Caption = 'Items'
Top = 85
Width = 71
end
object lblUsers: TWebLinkLabel
Left = 561
Top = 108
Width = 28
Height = 15
ElementID = 'dropdown.menu.users'
Caption = 'Users'
ElementFont = efCSS
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
ElementID = 'dropdown.menu.users'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 0
Left = 561
OnClick = lblUsersClick
Caption = 'Users'
Top = 108
Width = 0
end
object lblorders: TWebLabel
Left = 556
Top = 52
Width = 35
Height = 15
Caption = 'Orders'
ElementID = 'lblorders'
ElementFont = efCSS
ElementID = 'lblorders'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 8
HeightStyle = ssAuto
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Left = 556
OnClick = lblordersClick
Top = 52
Width = 32
end
object lblCustomers: TWebLabel
Left = 540
Top = 69
Width = 57
Height = 15
Caption = 'Customers'
ElementID = 'lblcustomers'
ElementFont = efCSS
ElementID = 'lblcustomers'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 8
HeightStyle = ssAuto
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Left = 540
OnClick = lblCustomersClick
Top = 69
Width = 32
end
object lblQuickbooks: TWebLabel
Left = 546
Top = 125
Width = 63
Height = 15
Caption = 'QuickBooks'
ElementID = 'lblquickbooks'
ElementFont = efCSS
ElementID = 'lblquickbooks'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 8
HeightStyle = ssAuto
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Left = 546
OnClick = lblQuickbooksClick
Top = 125
Width = 32
end
object WebPanel1: TWebPanel
Left = 77
Top = 112
Width = 471
Height = 369
ElementID = 'main.webpanel'
HeightStyle = ssAuto
WidthStyle = ssAuto
ChildOrder = 3
Color = clBtnFace
ElementFont = efCSS
ElementID = 'main.webpanel'
ElementPosition = epIgnore
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 32
HeightStyle = ssAuto
Left = 77
Role = 'null'
TabOrder = 0
end
object WebMessageDlg1: TWebMessageDlg
Left = 47
Top = 232
Width = 24
Height = 24
Buttons = []
CustomButtons = <>
Opacity = 0.200000000000000000
TabStop = False
Top = 112
Width = 640
WidthStyle = ssAuto
end
object WebMemo1: TWebMemo
Left = 77
Top = 479
Width = 471
Height = 83
AutoSize = False
Color = clWindow
ElementID = 'main.debugmemo'
HeightPercent = 100.000000000000000000
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 83
Left = 77
Lines.Strings = (
'WebMemo1')
ReadOnly = False
Role = 'null'
SelLength = 0
SelStart = 0
SelStart = 8
ShowFocus = True
TabOrder = 0
Top = 479
Visible = False
WidthPercent = 100.000000000000000000
Width = 471
end
object WebMessageDlg1: TWebMessageDlg
CustomButtons = <>
DialogText.Strings = (
'Warning'
'Error'
'Information'
'Confirm'
'Custom'
'OK'
'Cancel'
'Yes'
'No'
'Abort'
'Retry'
'Ignore'
'All'
'Yes to all'
'No to all'
'Help'
'Close')
Height = 24
Left = 47
Opacity = 0.200000000000000000
Top = 232
Width = 24
Left = 47
Top = 232
end
object XDataWebClient: TXDataWebClient
Connection = DMConnection.ApiConnection
......
kgOrdersClient/View.Main.pas
......@@ -176,7 +176,7 @@ begin
lblAppTitle.Caption := 'Koehler-Gibson User Profile';
end;
//needs to be changed
function TFViewMain.GetUserInfo: string;
var
userStr: string;
......
kgOrdersClient/View.OrderEntryCorrugated.dfm
object FOrderEntryCorrugated: TFOrderEntryCorrugated
Width = 1018
Height = 764
Color = clWhite
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
ParentFont = False
FormStyle = fsNormal
Height = 764
Left = 0
OnCreate = WebFormCreate
OnShow = WebFormShow
ParentFont = False
TabOrder = 0
Top = 0
Width = 1322
object WebLabel1: TWebLabel
Caption = 'Staff Fields'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 16
Left = 34
Top = 188
Width = 55
Height = 14
Caption = 'Staff Fields'
HeightPercent = 100.000000000000000000
Visible = False
WidthPercent = 100.000000000000000000
Width = 53
end
object WebLabel2: TWebLabel
Caption = 'Company'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 16
Left = 26
Top = 72
Width = 45
Height = 14
Caption = 'Company'
HeightPercent = 100.000000000000000000
Visible = False
WidthPercent = 100.000000000000000000
Width = 46
end
object WebLabel3: TWebLabel
Caption = 'Supplied by Customer'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 16
Left = 320
Top = 188
Width = 105
Height = 14
Caption = 'Supplied by Customer'
HeightPercent = 100.000000000000000000
Visible = False
WidthPercent = 100.000000000000000000
Width = 105
end
object WebLabel4: TWebLabel
Caption = 'Layout'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 16
Left = 496
Top = 19
Width = 33
Height = 14
Caption = 'Layout'
HeightPercent = 100.000000000000000000
Visible = False
WidthPercent = 100.000000000000000000
Width = 32
end
object WebLabel5: TWebLabel
Caption = 'Mounting'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 16
Left = 496
Top = 289
Width = 43
Height = 14
Caption = 'Mounting'
HeightPercent = 100.000000000000000000
Visible = False
WidthPercent = 100.000000000000000000
Width = 44
end
object WebLabel6: TWebLabel
Caption = 'Colors'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 16
Left = 658
Top = 19
Width = 31
Height = 14
Caption = 'Colors'
HeightPercent = 100.000000000000000000
Visible = False
WidthPercent = 100.000000000000000000
Width = 31
end
object WebLabel7: TWebLabel
Caption = 'Proofing'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 16
Left = 662
Top = 199
Width = 40
Height = 14
Caption = 'Proofing'
HeightPercent = 100.000000000000000000
Visible = False
WidthPercent = 100.000000000000000000
Width = 40
end
object WebLabel8: TWebLabel
Caption = 'Plates'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 16
Left = 872
Top = 19
Width = 29
Height = 14
Caption = 'Plates'
HeightPercent = 100.000000000000000000
Visible = False
WidthPercent = 100.000000000000000000
Width = 30
end
object WebLabel9: TWebLabel
Caption = 'General'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 16
Left = 862
Top = 147
Width = 38
Height = 14
Caption = 'General'
HeightPercent = 100.000000000000000000
Visible = False
WidthPercent = 100.000000000000000000
Width = 38
end
object pnlMessage: TWebPanel
Left = 324
Top = 19
Width = 121
Height = 33
ElementID = 'pnl_message'
ChildOrder = 5
Color = clBtnFace
ElementID = 'pnl_message'
ElementPosition = epRelative
Role = 'alert'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 33
Left = 324
Role = 'null'
TabOrder = 0
TabStop = False
Top = 19
Width = 121
object lblMessage: TWebLabel
Left = 28
Top = 9
Width = 44
Height = 14
Caption = 'Message'
ElementID = 'view.login.message.label'
ElementPosition = epRelative
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 12
Left = 28
Top = 9
Width = 815
end
object btnCloseNotification: TWebButton
Left = 96
Top = 3
Width = 22
Height = 25
ChildOrder = 1
Color = clNone
ElementID = 'view.login.message.button'
ElementPosition = epRelative
HeightPercent = 100.000000000000000000
Role = 'button'
WidthPercent = 100.000000000000000000
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 25
Left = 96
Role = 'null'
TabOrder = 0
Top = 3
Width = 22
end
end
object dtpOrderDate: TWebDateTimePicker
ChildOrder = 4
Color = clWhite
Date = 0
ElementID = 'dtporderdate'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Kind = dtkDate
Left = 22
Max = 0
Min = 0
Role = 'null'
ShowFocus = True
TabOrder = 0
Time = 0
Top = 218
Width = 170
Height = 22
ElementID = 'dtporderdate'
BorderStyle = bsSingle
ChildOrder = 4
Color = clWhite
Date = 45638.529943136570000000
Role = ''
Text = ''
end
object dtpProofDate: TWebDateTimePicker
ChildOrder = 4
Color = clWhite
Date = 0
ElementID = 'dtpproofdate'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Kind = dtkDate
Left = 22
Max = 0
Min = 0
Role = 'null'
ShowFocus = True
TabOrder = 0
Time = 0
Top = 250
Width = 170
Height = 22
ElementID = 'dtpproofdate'
BorderStyle = bsSingle
ChildOrder = 4
Color = clWhite
Date = 45638.529943136570000000
Role = ''
Text = ''
end
object dtpShipDate: TWebDateTimePicker
ChildOrder = 4
Color = clWhite
Date = 0
ElementID = 'dtpshipdate'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Kind = dtkDate
Left = 22
Max = 0
Min = 0
Role = 'null'
ShowFocus = True
TabOrder = 0
Time = 0
Top = 282
Width = 170
Height = 22
ElementID = 'dtpshipdate'
BorderStyle = bsSingle
ChildOrder = 4
Color = clWhite
Date = 45638.529943136570000000
Role = ''
Text = ''
end
object dtpArtDue: TWebDateTimePicker
ChildOrder = 17
Color = clWhite
Date = 0
ElementID = 'dtpartdue'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Kind = dtkDate
Left = 24
Max = 0
Min = 0
Role = 'null'
ShowFocus = True
TabOrder = 0
Time = 0
Top = 544
Width = 170
Height = 22
ElementID = 'dtpartdue'
BorderStyle = bsSingle
ChildOrder = 17
Color = clWhite
Date = 45638.529943136570000000
Role = ''
Text = ''
end
object dtpPlateDue: TWebDateTimePicker
ChildOrder = 17
Color = clWhite
Date = 0
ElementID = 'dtpplatedue'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Kind = dtkDate
Left = 24
Max = 0
Min = 0
Role = 'null'
ShowFocus = True
TabOrder = 0
Time = 0
Top = 568
Width = 170
Height = 22
ElementID = 'dtpplatedue'
BorderStyle = bsSingle
ChildOrder = 17
Color = clWhite
Date = 45638.529943136570000000
Role = ''
Text = ''
end
object dtpMountDue: TWebDateTimePicker
ChildOrder = 17
Color = clWhite
Date = 0
ElementID = 'dtpmountdue'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Kind = dtkDate
Left = 24
Max = 0
Min = 0
Role = 'null'
ShowFocus = True
TabOrder = 0
Time = 0
Top = 592
Width = 170
Height = 22
ElementID = 'dtpmountdue'
BorderStyle = bsSingle
ChildOrder = 17
Color = clWhite
Date = 45638.529943136570000000
Role = ''
Text = ''
end
object WebButton1: TWebButton
Left = 658
Top = 150
Width = 96
Height = 25
Caption = '+'
ChildOrder = 59
Color = clNone
ElementID = 'btnaddcolor'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 25
Left = 658
OnClick = WebButton1Click
Role = 'null'
TabOrder = 0
Top = 150
Width = 96
end
object dtpApprovedDate: TWebDateTimePicker
ChildOrder = 72
Color = clWhite
Date = 0
ElementID = 'dtpapproveddate'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Kind = dtkDate
Left = 662
Max = 0
Min = 0
Role = 'null'
ShowFocus = True
TabOrder = 0
Time = 0
Top = 508
Width = 170
Height = 22
ElementID = 'dtpapproveddate'
BorderStyle = bsSingle
ChildOrder = 72
Color = clWhite
Date = 45638.529943136570000000
Role = ''
Text = ''
end
object edtCompanyName: TWebDBEdit
Left = 24
Top = 92
Width = 260
Height = 22
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
Color = clWindow
DataField = 'NAME'
DataSource = WebDataSource1
ElementID = 'edtcompanyname'
HeightPercent = 100.000000000000000000
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 24
MaxLength = 90
ShowFocus = True
TabOrder = 0
Top = 92
Width = 300
WidthStyle = ssAuto
WidthPercent = 100.000000000000000000
DataField = 'NAME'
DataSource = WebDataSource1
end
object edtCompanyAccountName: TWebDBEdit
Left = 24
Top = 120
Width = 121
Height = 22
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtaccountcompanyname'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'SHORT_NAME'
DataSource = WebDataSource1
ElementID = 'edtaccountcompanyname'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 24
ShowFocus = True
TabOrder = 0
Top = 120
Width = 121
end
object edtInQuickBooks: TWebDBEdit
Left = 26
Top = 148
Width = 121
Height = 22
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtinquickbooks'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'inQuickBooks'
DataSource = WebDataSource1
ElementID = 'edtinquickbooks'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 26
ShowFocus = True
TabOrder = 0
Top = 148
Width = 121
end
object edtShipVia: TWebDBEdit
Left = 24
Top = 314
Width = 121
Height = 22
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtshipvia'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'staff_fields_ship_via'
DataSource = WebDataSource1
end
object edtQuantity: TWebDBEdit
ElementID = 'edtshipvia'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 24
Top = 346
ShowFocus = True
TabOrder = 0
Top = 314
Width = 121
Height = 22
end
object edtQuantity: TWebDBEdit
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtquantity'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'staff_fields_quantity'
DataSource = WebDataSource1
end
object edtPrice: TWebDBEdit
ElementID = 'edtquantity'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 24
Top = 374
ShowFocus = True
TabOrder = 0
Top = 346
Width = 121
Height = 22
end
object edtPrice: TWebDBEdit
Alignment = taLeftJustify
ChildOrder = 79
ElementID = 'edtprice'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'staff_fields_price'
DataSource = WebDataSource1
ElementID = 'edtprice'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 24
ShowFocus = True
TabOrder = 0
Top = 374
Width = 121
end
object edtInvoiceTo: TWebDBEdit
Left = 26
Top = 402
Width = 121
Height = 22
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtinvoiceto'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'staff_fields_invoice_to'
DataSource = WebDataSource1
end
object edtPONumber: TWebDBEdit
ElementID = 'edtinvoiceto'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 26
Top = 458
ShowFocus = True
TabOrder = 0
Top = 402
Width = 121
Height = 22
end
object edtPONumber: TWebDBEdit
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtponumber'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'staff_fields_po_number'
DataSource = WebDataSource1
end
object edtJobName: TWebDBEdit
ElementID = 'edtponumber'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 26
Top = 486
ShowFocus = True
TabOrder = 0
Top = 458
Width = 121
Height = 22
end
object edtJobName: TWebDBEdit
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtjobname'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'staff_fields_job_name'
DataSource = WebDataSource1
ElementID = 'edtjobname'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 26
ShowFocus = True
TabOrder = 0
Top = 486
Width = 121
end
object edtOther: TWebDBEdit
Left = 316
Top = 348
Width = 121
Height = 22
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtother'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'supplied_by_customer_other'
DataSource = WebDataSource1
ElementID = 'edtother'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 316
ShowFocus = True
TabOrder = 0
Top = 348
Width = 121
end
object edtCADFile: TWebDBEdit
Left = 496
Top = 207
Width = 121
Height = 22
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtcadfile'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'layout_cad_file'
DataSource = WebDataSource1
end
object edtAroundNo: TWebDBEdit
ElementID = 'edtcadfile'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 496
Top = 179
ShowFocus = True
TabOrder = 0
Top = 207
Width = 121
Height = 22
end
object edtAroundNo: TWebDBEdit
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtaroundno'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'layout_around_no'
DataSource = WebDataSource1
end
object edtAcrossNo: TWebDBEdit
ElementID = 'edtaroundno'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 496
Top = 151
ShowFocus = True
TabOrder = 0
Top = 179
Width = 121
Height = 22
end
object edtAcrossNo: TWebDBEdit
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtacrossno'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'layout_accross_no'
DataSource = WebDataSource1
end
object edtDieCutNo: TWebDBEdit
ElementID = 'edtacrossno'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 496
Top = 123
ShowFocus = True
TabOrder = 0
Top = 151
Width = 121
Height = 22
end
object edtDieCutNo: TWebDBEdit
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtdiecutno'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'layout_die_cut_no'
DataSource = WebDataSource1
end
object edtRSCD: TWebDBEdit
ElementID = 'edtdiecutno'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 496
Top = 95
ShowFocus = True
TabOrder = 0
Top = 123
Width = 121
Height = 22
end
object edtRSCD: TWebDBEdit
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtrscd'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'layout_rcs_d'
DataSource = WebDataSource1
end
object edtRSCW: TWebDBEdit
ElementID = 'edtrscd'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 496
Top = 64
ShowFocus = True
TabOrder = 0
Top = 95
Width = 121
Height = 22
end
object edtRSCW: TWebDBEdit
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtrscw'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'layout_rcs_w'
DataSource = WebDataSource1
end
object edtRSCL: TWebDBEdit
ElementID = 'edtrscw'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 496
Top = 39
ShowFocus = True
TabOrder = 0
Top = 64
Width = 121
Height = 22
end
object edtRSCL: TWebDBEdit
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtrscl'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'layout_rsc_l'
DataSource = WebDataSource1
end
object edtCustomAdhesive: TWebDBEdit
ElementID = 'edtrscl'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 496
Top = 506
ShowFocus = True
TabOrder = 0
Top = 39
Width = 121
Height = 22
end
object edtCustomAdhesive: TWebDBEdit
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtcustomadhesive'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'mounting_custom_adhesive'
DataSource = WebDataSource1
end
object edtCustomBacking: TWebDBEdit
ElementID = 'edtcustomadhesive'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 496
Top = 478
ShowFocus = True
TabOrder = 0
Top = 506
Width = 121
Height = 22
end
object edtCustomBacking: TWebDBEdit
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtcustombacking'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'mounting_custom_backing'
DataSource = WebDataSource1
end
object edtStandardSetup: TWebDBEdit
ElementID = 'edtcustombacking'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 496
Top = 450
ShowFocus = True
TabOrder = 0
Top = 478
Width = 121
Height = 22
end
object edtStandardSetup: TWebDBEdit
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtstandardsetup'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'mounting_standard_setup'
DataSource = WebDataSource1
end
object edtStripMount: TWebDBEdit
ElementID = 'edtstandardsetup'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 496
Top = 430
ShowFocus = True
TabOrder = 0
Top = 450
Width = 121
Height = 22
end
object edtStripMount: TWebDBEdit
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtstripmount'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'mounting_strip_mount'
DataSource = WebDataSource1
end
object edtLoose: TWebDBEdit
ElementID = 'edtstripmount'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 496
Top = 334
ShowFocus = True
TabOrder = 0
Top = 430
Width = 121
Height = 22
end
object edtLoose: TWebDBEdit
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtloose'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'mounting_loose'
DataSource = WebDataSource1
end
object edtRSCStyle: TWebDBEdit
ElementID = 'edtloose'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 496
Top = 261
ShowFocus = True
TabOrder = 0
Top = 334
Width = 121
Height = 22
end
object edtRSCStyle: TWebDBEdit
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtrscstyle'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'layout_rsc_style'
DataSource = WebDataSource1
ElementID = 'edtrscstyle'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 496
ShowFocus = True
TabOrder = 0
Top = 261
Width = 121
end
object edtProofOther: TWebDBEdit
Left = 666
Top = 458
Width = 121
Height = 22
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtproofother'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'proofing_other'
DataSource = WebDataSource1
ElementID = 'edtproofother'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 666
ShowFocus = True
TabOrder = 0
Top = 458
Width = 121
end
object edtProofShipTo: TWebDBEdit
Left = 658
Top = 328
Width = 121
Height = 22
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtproofshipto'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'proofing_ship_to'
DataSource = WebDataSource1
end
object edtEmailAttn: TWebDBEdit
ElementID = 'edtproofshipto'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 658
Top = 300
ShowFocus = True
TabOrder = 0
Top = 328
Width = 121
Height = 22
end
object edtEmailAttn: TWebDBEdit
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtemailattn'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'proofing_e_mail_attn'
DataSource = WebDataSource1
end
object edtProofEmail: TWebDBEdit
ElementID = 'edtemailattn'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 658
Top = 272
ShowFocus = True
TabOrder = 0
Top = 300
Width = 121
Height = 22
end
object edtProofEmail: TWebDBEdit
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtproofemail'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'proofing_e_mail'
DataSource = WebDataSource1
end
object edtFaxAttn: TWebDBEdit
ElementID = 'edtproofemail'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 658
Top = 244
ShowFocus = True
TabOrder = 0
Top = 272
Width = 121
Height = 22
end
object edtFaxAttn: TWebDBEdit
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtfaxattn'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'proofing_fax_attn'
DataSource = WebDataSource1
ElementID = 'edtfaxattn'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 658
ShowFocus = True
TabOrder = 0
Top = 244
Width = 121
end
object edtFax: TWebDBEdit
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
Color = clWindow
DataField = 'proofing_fax'
DataSource = WebDataSource1
ElementID = 'edtfax'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 658
ShowFocus = True
TabOrder = 0
Top = 219
Width = 121
Height = 22
AutoSize = True
ChildOrder = 79
ElementID = 'edtfax'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
DataField = 'proofing_fax'
DataSource = WebDataSource1
end
object edtClemson: TWebDBEdit
Left = 658
Top = 117
Width = 121
Height = 22
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtclemson'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'colors_clemson'
DataSource = WebDataSource1
end
object edtCrossHairs: TWebDBEdit
ElementID = 'edtclemson'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 658
Top = 89
ShowFocus = True
TabOrder = 0
Top = 117
Width = 121
Height = 22
end
object edtCrossHairs: TWebDBEdit
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtcrosshairs'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'colors_cross_hairs'
DataSource = WebDataSource1
end
object edtMachineIndent: TWebDBEdit
ElementID = 'edtcrosshairs'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 658
Top = 64
ShowFocus = True
TabOrder = 0
Top = 89
Width = 121
Height = 22
end
object edtMachineIndent: TWebDBEdit
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtmachineindent'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'colors_machine_ident'
DataSource = WebDataSource1
end
object edtCylinderSize: TWebDBEdit
ElementID = 'edtmachineindent'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 658
Top = 39
ShowFocus = True
TabOrder = 0
Top = 64
Width = 121
Height = 22
end
object edtCylinderSize: TWebDBEdit
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtcylindersize'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'colors_cylinder_size'
DataSource = WebDataSource1
ElementID = 'edtcylindersize'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 658
ShowFocus = True
TabOrder = 0
Top = 39
Width = 121
end
object edtJobNumber: TWebDBEdit
Left = 852
Top = 105
Width = 121
Height = 22
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 79
ElementID = 'edtjobnumber'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'plates_job_number'
DataSource = WebDataSource1
ElementID = 'edtjobnumber'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 852
ShowFocus = True
TabOrder = 0
Top = 105
Width = 121
end
object cbArtApprovedAsIs: TWebDBCheckBox
Left = 662
Top = 480
Width = 113
Height = 22
Caption = 'Art Approved As Is'
ChildOrder = 79
ElementID = 'cbartapprovedasis'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
DataField = 'proofing_art_approved_as_is'
DataSource = WebDataSource1
end
object cbPDFFile: TWebDBCheckBox
ElementID = 'cbartapprovedasis'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Left = 662
Top = 430
Role = 'null'
ShowFocus = True
TabOrder = 0
Top = 480
ValueChecked = 'True'
ValueUnChecked = 'False'
Width = 113
Height = 22
end
object cbPDFFile: TWebDBCheckBox
Caption = 'PDF File'
ChildOrder = 79
ElementID = 'cbpdffile'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
DataField = 'proofing_pdf_file'
DataSource = WebDataSource1
ElementID = 'cbpdffile'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Left = 662
Role = 'null'
ShowFocus = True
TabOrder = 0
Top = 430
ValueChecked = 'True'
ValueUnChecked = 'False'
Width = 113
end
object cbWideFormat: TWebDBCheckBox
Left = 658
Top = 406
Width = 113
Height = 22
Caption = 'Wide Format'
ChildOrder = 79
ElementID = 'cbwideformat'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
DataField = 'proofing_wide_format'
DataSource = WebDataSource1
end
object cbPrintCard: TWebDBCheckBox
ElementID = 'cbwideformat'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Left = 658
Top = 382
Role = 'null'
ShowFocus = True
TabOrder = 0
Top = 406
ValueChecked = 'True'
ValueUnChecked = 'False'
Width = 113
Height = 22
end
object cbPrintCard: TWebDBCheckBox
Caption = 'Print Card'
ChildOrder = 79
ElementID = 'cbprintcard'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
DataField = 'proofing_print_card'
DataSource = WebDataSource1
end
object cbFullSizePanel: TWebDBCheckBox
ElementID = 'cbprintcard'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Left = 658
Top = 356
Role = 'null'
ShowFocus = True
TabOrder = 0
Top = 382
ValueChecked = 'True'
ValueUnChecked = 'False'
Width = 113
Height = 22
end
object cbFullSizePanel: TWebDBCheckBox
Caption = 'Full Size Panel'
ChildOrder = 79
ElementID = 'cbfullsizepanel'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
DataField = 'proofing_full_size_panel'
DataSource = WebDataSource1
ElementID = 'cbfullsizepanel'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Left = 658
Role = 'null'
ShowFocus = True
TabOrder = 0
Top = 356
ValueChecked = 'True'
ValueUnChecked = 'False'
Width = 113
end
object edtSpecialInstructions: TWebDBEdit
Left = 852
Top = 185
Width = 121
Height = 22
Alignment = taLeftJustify
AutoSize = True
ChildOrder = 78
ElementID = 'edtspecialinstructions'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Color = clWindow
DataField = 'general_special_instructions'
DataSource = WebDataSource1
ElementID = 'edtspecialinstructions'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
HideSelection = False
Left = 852
ShowFocus = True
TabOrder = 0
Top = 185
Width = 121
end
object btnConfirm: TWebButton
Left = 652
Top = 560
Width = 96
Height = 25
Caption = 'Confirm'
ChildOrder = 79
Color = clNone
ElementID = 'btnconfirm'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 25
Left = 652
OnClick = btnConfirmClick
Role = 'null'
TabOrder = 0
Top = 560
Width = 96
end
object cbRefArtAPDF: TWebCheckBox
Left = 316
Top = 463
Width = 113
Height = 22
Caption = 'Ref Art A PDF?'
ChildOrder = 76
ElementID = 'edtrefartapdf'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
end
object cbRefArtPrintCard: TWebCheckBox
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Left = 316
Top = 435
Role = 'null'
ShowFocus = True
TabOrder = 0
Top = 463
Width = 113
Height = 22
end
object cbRefArtPrintCard: TWebCheckBox
Caption = 'Ref Art Print Card?'
ChildOrder = 76
ElementID = 'edtrefartprintcard'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
end
object cbExistingCuttingDie: TWebCheckBox
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Left = 316
Top = 407
Role = 'null'
ShowFocus = True
TabOrder = 0
Top = 435
Width = 113
Height = 22
end
object cbExistingCuttingDie: TWebCheckBox
Caption = 'Existing Cutting Die?'
ChildOrder = 76
ElementID = 'edtexistingcuttingdie'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Left = 316
Role = 'null'
ShowFocus = True
TabOrder = 0
Top = 407
Width = 113
end
object cbFTP: TWebCheckBox
Left = 320
Top = 318
Width = 113
Height = 22
Caption = 'FTP?'
ChildOrder = 76
ElementID = 'cbftp'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Left = 320
Role = 'null'
ShowFocus = True
TabOrder = 0
Top = 318
Width = 113
end
object cbSampleCarton: TWebCheckBox
Left = 316
Top = 283
Width = 113
Height = 22
Caption = 'Sample Carton'
ChildOrder = 76
ElementID = 'cbsampleCarton'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
end
object cbPlates: TWebCheckBox
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Left = 316
Top = 255
Role = 'null'
ShowFocus = True
TabOrder = 0
Top = 283
Width = 113
Height = 22
end
object cbPlates: TWebCheckBox
Caption = 'Plates'
ChildOrder = 76
ElementID = 'cbplates'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
end
object cbColorCopy: TWebCheckBox
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Left = 316
Top = 227
Role = 'null'
ShowFocus = True
TabOrder = 0
Top = 255
Width = 113
Height = 22
end
object cbColorCopy: TWebCheckBox
Caption = 'Color Copy'
ChildOrder = 76
ElementID = 'cbcolorcopy'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Left = 316
Role = 'null'
ShowFocus = True
TabOrder = 0
Top = 227
Width = 113
end
object cbStripMount: TWebCheckBox
Left = 496
Top = 406
Width = 113
Height = 22
Caption = 'Strip Mount'
ChildOrder = 76
ElementID = 'cbstripmount'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
end
object cbFullMount: TWebCheckBox
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Left = 496
Top = 382
Role = 'null'
ShowFocus = True
TabOrder = 0
Top = 406
Width = 113
Height = 22
end
object cbFullMount: TWebCheckBox
Caption = 'Full Mount'
ChildOrder = 76
ElementID = 'cbfullmount'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
end
object cbStickyBak: TWebCheckBox
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Left = 496
Top = 358
Role = 'null'
ShowFocus = True
TabOrder = 0
Top = 382
Width = 113
Height = 22
end
object cbStickyBak: TWebCheckBox
Caption = 'Sticky Bak'
ChildOrder = 76
ElementID = 'cbstickybak'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
end
object cbLoose: TWebCheckBox
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Left = 496
Top = 309
Role = 'null'
ShowFocus = True
TabOrder = 0
Top = 358
Width = 113
Height = 22
end
object cbLoose: TWebCheckBox
Caption = 'Loose'
ChildOrder = 76
ElementID = 'cbloose'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
end
object cbExcaliburDie: TWebCheckBox
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Left = 496
Top = 233
Role = 'null'
ShowFocus = True
TabOrder = 0
Top = 309
Width = 113
Height = 22
end
object cbExcaliburDie: TWebCheckBox
Caption = 'Excalibur Die'
ChildOrder = 76
ElementID = 'cbexcaliburdie'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Left = 496
Role = 'null'
ShowFocus = True
TabOrder = 0
Top = 233
Width = 113
end
object WebDBComboBox1: TWebDBComboBox
Left = 26
Top = 430
Width = 145
Height = 22
ElementID = 'wcbshipto'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
ItemIndex = -1
Color = clWindow
DataField = 'staff_fields_ship_to'
DataSource = WebDataSource1
ElementID = 'wcbshipto'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Left = 26
ListField = 'ADDRESS'
ListSource = wdsShipTo
Role = 'null'
ShowFocus = True
Style = csDropDownList
TabOrder = 0
Top = 430
Width = 145
end
object cbEmail: TWebCheckBox
Left = 316
Top = 376
Width = 113
Height = 22
Caption = 'Email?'
ChildOrder = 75
ElementID = 'edtemail'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Left = 316
Role = 'null'
ShowFocus = True
TabOrder = 0
Top = 376
Width = 113
end
object btnCancel: TWebButton
Left = 764
Top = 560
Width = 96
Height = 25
Caption = 'Cancel'
ChildOrder = 79
Color = clNone
ElementID = 'btncancel'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 25
Left = 764
OnClick = btnCancelClick
Role = 'null'
TabOrder = 0
Top = 560
Width = 96
end
object WebDBComboBox2: TWebDBComboBox
Left = 26
Top = 515
Width = 145
Height = 22
ElementID = 'wcbqbitem'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
ItemIndex = -1
Color = clWindow
DataField = 'staff_fields_quickbooks_item'
DataSource = WebDataSource1
ElementID = 'wcbqbitem'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Left = 26
ListField = 'name'
ListSource = wdsQBItem
Role = 'null'
ShowFocus = True
Style = csDropDownList
TabOrder = 0
Top = 515
Width = 145
end
object WebDBComboBox3: TWebDBComboBox
Left = 833
Top = 77
Width = 145
Height = 22
Color = clWindow
DataField = 'plates_plate_material'
DataSource = WebDataSource1
ElementID = 'wcbmaterial'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
ItemIndex = -1
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Items.Strings = (
'PhotoPolymer'
'Rubber')
DataField = 'plates_plate_material'
DataSource = WebDataSource1
end
object WebDBComboBox4: TWebDBComboBox
Left = 833
Top = 48
Role = 'null'
ShowFocus = True
Style = csDropDownList
TabOrder = 0
Top = 77
Width = 145
Height = 22
end
object WebDBComboBox4: TWebDBComboBox
Color = clWindow
DataField = 'plates_thickness'
DataSource = WebDataSource1
ElementID = 'wcbthickness'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
ItemIndex = -1
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Items.Strings = (
'.250'
'.155'
'.107'
'.067'
'.045')
DataField = 'plates_thickness'
DataSource = WebDataSource1
Left = 833
Role = 'null'
ShowFocus = True
Style = csDropDownList
TabOrder = 0
Top = 48
Width = 145
end
object btnPDF: TWebButton
Left = 877
Top = 560
Width = 96
Height = 25
Caption = 'PDF'
ChildOrder = 77
Color = clNone
ElementID = 'btnpdf'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 25
Left = 877
OnClick = btnPDFClick
Role = 'null'
TabOrder = 0
Top = 560
Width = 96
end
object XDataWebClient1: TXDataWebClient
Connection = DMConnection.ApiConnection
Left = 160
Top = 18
Left = 1014
Top = 44
end
object tmrScrollTop: TWebTimer
Interval = 100
OnTimer = tmrScrollTopTimer
Left = 240
Top = 8
Left = 1176
Top = 256
end
object XDataWebDataSet1: TXDataWebDataSet
Connection = DMConnection.ApiConnection
Left = 90
Top = 20
DesignLoad = False
Indexes = <>
Left = 1060
Top = 182
object XDataWebDataSet1ORDER_ID: TIntegerField
FieldKind = fkData
FieldName = 'ORDER_ID'
Index = 0
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1COMPANY_ID: TIntegerField
FieldKind = fkData
FieldName = 'COMPANY_ID'
Index = 1
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1USER_ID: TIntegerField
FieldKind = fkData
FieldName = 'USER_ID'
Index = 2
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1ORDER_DATE: TDateField
FieldKind = fkData
FieldName = 'ORDER_DATE'
Index = 3
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1START_DATE: TDateField
FieldKind = fkData
FieldName = 'START_DATE'
Index = 4
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1END_DATE: TDateField
FieldKind = fkData
FieldName = 'END_DATE'
Index = 5
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1ORDER_STATUS: TStringField
FieldKind = fkData
FieldName = 'ORDER_STATUS'
Index = 6
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1SCHED_JSON: TStringField
FieldKind = fkData
FieldName = 'SCHED_JSON'
Index = 7
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1NAME: TStringField
FieldKind = fkData
FieldName = 'NAME'
Index = 8
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1SHORT_NAME: TStringField
FieldKind = fkData
FieldName = 'SHORT_NAME'
Index = 9
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1staff_fields_ship_via: TStringField
FieldKind = fkData
FieldName = 'staff_fields_ship_via'
Index = 10
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1staff_fields_price: TStringField
FieldKind = fkData
FieldName = 'staff_fields_price'
Index = 11
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1staff_fields_invoice_to: TStringField
FieldKind = fkData
FieldName = 'staff_fields_invoice_to'
Index = 12
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1staff_fields_invoice_attention: TStringField
FieldKind = fkData
FieldName = 'staff_fields_invoice_attention'
Index = 13
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1staff_fields_ship_to: TStringField
FieldKind = fkData
FieldName = 'staff_fields_ship_to'
Index = 14
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1staff_fields_ship_attention: TStringField
FieldKind = fkData
FieldName = 'staff_fields_ship_attention'
Index = 15
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1staff_fields_po_number: TStringField
FieldKind = fkData
FieldName = 'staff_fields_po_number'
Index = 16
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1staff_fields_job_name: TStringField
FieldKind = fkData
FieldName = 'staff_fields_job_name'
Index = 17
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1plates_job_number: TStringField
FieldKind = fkData
FieldName = 'plates_job_number'
Index = 18
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1supplied_by_customer_b_w_copy: TBooleanField
DisplayValues = 'True;False'
FieldKind = fkData
FieldName = 'supplied_by_customer_b_w_copy'
Index = 19
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1supplied_by_customer_dimension: TStringField
FieldKind = fkData
FieldName = 'supplied_by_customer_dimension'
Index = 20
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1supplied_by_customer_e_mail: TStringField
FieldKind = fkData
FieldName = 'supplied_by_customer_e_mail'
Index = 21
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1supplied_by_customer_ftp: TStringField
FieldKind = fkData
FieldName = 'supplied_by_customer_ftp'
Index = 22
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1supplied_by_customer_other: TStringField
FieldKind = fkData
FieldName = 'supplied_by_customer_other'
Index = 23
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1supplied_by_customer_existing_: TStringField
FieldKind = fkData
FieldName = 'supplied_by_customer_existing_'
Index = 24
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1supplied_by_customer_ref_art_p: TStringField
FieldKind = fkData
FieldName = 'supplied_by_customer_ref_art_p'
Index = 25
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1supplied_by_customer_ref_art_a: TStringField
FieldKind = fkData
FieldName = 'supplied_by_customer_ref_art_a'
Index = 26
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1cut_die_cutdier: TStringField
FieldKind = fkData
FieldName = 'cut_die_cutdier'
Index = 27
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1cut_die_cutdieb: TStringField
FieldKind = fkData
FieldName = 'cut_die_cutdieb'
Index = 28
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1cut_die_cutdief: TStringField
FieldKind = fkData
FieldName = 'cut_die_cutdief'
Index = 29
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1cut_die_cutdierkr: TStringField
FieldKind = fkData
FieldName = 'cut_die_cutdierkr'
Index = 30
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1cut_die_cutdiefkr: TStringField
FieldKind = fkData
FieldName = 'cut_die_cutdiefkr'
Index = 31
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1cut_die_cad_file: TStringField
FieldKind = fkData
FieldName = 'cut_die_cad_file'
Index = 32
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1cut_die_attached: TStringField
FieldKind = fkData
FieldName = 'cut_die_attached'
Index = 33
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1cut_die_boxpol250: TStringField
FieldKind = fkData
FieldName = 'cut_die_boxpol250'
Index = 34
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1cut_die_boxpol155: TStringField
FieldKind = fkData
FieldName = 'cut_die_boxpol155'
Index = 35
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1cut_die_boxpol125: TStringField
FieldKind = fkData
FieldName = 'cut_die_boxpol125'
Index = 36
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1cut_die_brub: TStringField
FieldKind = fkData
FieldName = 'cut_die_brub'
Index = 37
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1proofing_fax: TStringField
FieldKind = fkData
FieldName = 'proofing_fax'
Index = 38
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1proofing_fax_attn: TStringField
FieldKind = fkData
FieldName = 'proofing_fax_attn'
Index = 39
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1proofing_e_mail: TStringField
FieldKind = fkData
FieldName = 'proofing_e_mail'
Index = 40
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1proofing_ship_to: TStringField
FieldKind = fkData
FieldName = 'proofing_ship_to'
Index = 41
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1proofing_other: TStringField
FieldKind = fkData
FieldName = 'proofing_other'
Index = 42
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1proofing_changes_required: TStringField
FieldKind = fkData
FieldName = 'proofing_changes_required'
Index = 43
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1proofing_changes_date: TDateField
FieldKind = fkData
FieldName = 'proofing_changes_date'
Index = 44
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1layout_rsc_l: TStringField
FieldKind = fkData
FieldName = 'layout_rsc_l'
Index = 45
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1layout_rcs_w: TStringField
FieldKind = fkData
FieldName = 'layout_rcs_w'
Index = 46
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1layout_rcs_d: TStringField
FieldKind = fkData
FieldName = 'layout_rcs_d'
Index = 47
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1layout_die_cut_no: TStringField
FieldKind = fkData
FieldName = 'layout_die_cut_no'
Index = 48
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1layout_accross_no: TStringField
FieldKind = fkData
FieldName = 'layout_accross_no'
Index = 49
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1layout_around_no: TStringField
FieldKind = fkData
FieldName = 'layout_around_no'
Index = 50
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1layout_cad_file: TStringField
FieldKind = fkData
FieldName = 'layout_cad_file'
Index = 51
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1mounting_standard_setup: TStringField
FieldKind = fkData
FieldName = 'mounting_standard_setup'
Index = 52
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1mounting_custom_backing: TStringField
FieldKind = fkData
FieldName = 'mounting_custom_backing'
Index = 53
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1mounting_custom_adhesive: TStringField
FieldKind = fkData
FieldName = 'mounting_custom_adhesive'
Index = 54
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1colors_cylinder_size: TStringField
FieldKind = fkData
FieldName = 'colors_cylinder_size'
Index = 55
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1colors_cross_hairs: TStringField
FieldKind = fkData
FieldName = 'colors_cross_hairs'
Index = 56
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1colors_machine_ident: TStringField
FieldKind = fkData
FieldName = 'colors_machine_ident'
Index = 57
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1colors_clemson: TStringField
FieldKind = fkData
FieldName = 'colors_clemson'
Index = 58
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1plates_thickness: TStringField
FieldKind = fkData
FieldName = 'plates_thickness'
Index = 59
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1plates_plate_material: TStringField
FieldKind = fkData
FieldName = 'plates_plate_material'
Index = 60
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1general_special_instructions: TStringField
FieldKind = fkData
FieldName = 'general_special_instructions'
Index = 61
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1colors_colors: TStringField
FieldKind = fkData
FieldName = 'colors_colors'
Index = 62
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1staff_fields_quickbooks_item: TStringField
FieldKind = fkData
FieldName = 'staff_fields_quickbooks_item'
Index = 63
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1staff_fields_quantity: TStringField
FieldKind = fkData
FieldName = 'staff_fields_quantity'
Index = 64
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1layout_rsc_style: TStringField
FieldKind = fkData
FieldName = 'layout_rsc_style'
Index = 65
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1staff_fields_art_location: TStringField
FieldKind = fkData
FieldName = 'staff_fields_art_location'
Index = 66
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1supplied_by_customer_color_copy: TBooleanField
DisplayValues = 'True;False'
FieldKind = fkData
FieldName = 'supplied_by_customer_color_copy'
Index = 67
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1supplied_by_customer_plates: TBooleanField
DisplayValues = 'True;False'
FieldKind = fkData
FieldName = 'supplied_by_customer_plates'
Index = 68
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1supplied_by_customer_sample_ca: TBooleanField
DisplayValues = 'True;False'
FieldKind = fkData
FieldName = 'supplied_by_customer_sample_ca'
Index = 69
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1supplied_by_customer_disk_or_cd: TBooleanField
DisplayValues = 'True;False'
FieldKind = fkData
FieldName = 'supplied_by_customer_disk_or_cd'
Index = 70
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1mounting_loose: TStringField
FieldKind = fkData
FieldName = 'mounting_loose'
Index = 71
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1mounting_sticky_bak: TBooleanField
DisplayValues = 'True;False'
FieldKind = fkData
FieldName = 'mounting_sticky_bak'
Index = 72
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1mounting_full_mount: TBooleanField
DisplayValues = 'True;False'
FieldKind = fkData
FieldName = 'mounting_full_mount'
Index = 73
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1mounting_strip_mount: TStringField
FieldKind = fkData
FieldName = 'mounting_strip_mount'
Index = 74
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1layout_excalibur_die: TBooleanField
DisplayValues = 'True;False'
FieldKind = fkData
FieldName = 'layout_excalibur_die'
Index = 75
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1proofing_full_size_panel: TBooleanField
DisplayValues = 'True;False'
FieldKind = fkData
FieldName = 'proofing_full_size_panel'
Index = 76
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1proofing_print_card: TBooleanField
DisplayValues = 'True;False'
FieldKind = fkData
FieldName = 'proofing_print_card'
Index = 77
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1proofing_wide_format: TBooleanField
DisplayValues = 'True;False'
FieldKind = fkData
FieldName = 'proofing_wide_format'
Index = 78
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1proofing_pdf_file: TBooleanField
DisplayValues = 'True;False'
FieldKind = fkData
FieldName = 'proofing_pdf_file'
Index = 79
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1proofing_art_approved_as_is: TBooleanField
DisplayValues = 'True;False'
FieldKind = fkData
FieldName = 'proofing_art_approved_as_is'
Index = 80
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1proofing_e_mail_attn: TStringField
FieldKind = fkData
FieldName = 'proofing_e_mail_attn'
Index = 81
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1proofing_approved_date: TStringField
FieldKind = fkData
FieldName = 'proofing_approved_date'
Index = 82
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1staff_fields_order_date: TStringField
FieldKind = fkData
FieldName = 'staff_fields_order_date'
Index = 83
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1staff_fields_proof_date: TStringField
FieldKind = fkData
FieldName = 'staff_fields_proof_date'
Index = 84
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1staff_fields_ship_date: TStringField
FieldKind = fkData
FieldName = 'staff_fields_ship_date'
Index = 85
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1staff_fields_art_due: TStringField
FieldKind = fkData
FieldName = 'staff_fields_art_due'
Index = 86
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1staff_fields_plate_due: TStringField
FieldKind = fkData
FieldName = 'staff_fields_plate_due'
Index = 87
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1staff_fields_mount_due: TStringField
FieldKind = fkData
FieldName = 'staff_fields_mount_due'
Index = 88
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1ADDRESS_LIST: TStringField
FieldKind = fkData
FieldName = 'ADDRESS_LIST'
Index = 89
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
object XDataWebDataSet1supplied_by_customer_order_date: TStringField
FieldKind = fkData
FieldName = 'supplied_by_customer_order_date'
Index = 90
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
end
object WebDataSource1: TWebDataSource
DataSet = XDataWebDataSet1
Left = 22
Top = 10
Left = 1170
Top = 192
end
object wdsShipTo: TWebDataSource
DataSet = xdwdsShipTo
Left = 212
Top = 436
Left = 1090
Top = 124
end
object xdwdsShipTo: TXDataWebDataSet
Left = 202
Top = 416
DesignLoad = False
Indexes = <>
Left = 1096
Top = 40
object xdwdsShipToADDRESS: TStringField
FieldKind = fkData
FieldName = 'ADDRESS'
Index = 0
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
end
object wdsQBItem: TWebDataSource
DataSet = xdwdsQBItem
Left = 240
Top = 518
Left = 1172
Top = 128
end
object xdwdsQBItem: TXDataWebDataSet
Left = 200
Top = 512
DesignLoad = False
Indexes = <>
Left = 1174
Top = 38
object xdwdsQBItemname: TStringField
FieldKind = fkData
FieldName = 'name'
Index = 0
LookupCache = False
ProviderFlags = [pfInUpdate, pfInWhere]
ReadOnly = False
Required = False
end
end
end
kgOrdersClient/View.OrderEntryCorrugated.html
<div class="row mx-5">
<div class="col-12 col-md-8">
<div class="row">
<div class=col-sm>
<div id="pnl_message" class="alert alert-danger">
<div class="col-sm">
<div id="pnl_message" class="alert alert-danger mt-3">
<button id="view.login.message.button" type="button" class="btn-close" aria-label="Close"></button>
<span id="view.login.message.label"></span>
</div>
......@@ -310,6 +311,4 @@
</div>
</div>
</div>
<script>
</script>
kgOrdersClient/View.OrderEntryCorrugated.pas
......@@ -365,7 +365,7 @@ begin
if mode = 'EDIT' then
orderJSON.AddPair('ORDER_ID', orderID);
AddCorrugatedOrder(orderJSON);
FViewMain.ViewOrders('Success:Order Successfully Added');
FViewMain.ViewOrders('Order added successfully!');
end;
procedure TFOrderEntryCorrugated.btnPDFClick(Sender: TObject);
......
kgOrdersClient/View.UserProfile.dfm
object FViewUserProfile: TFViewUserProfile
Width = 604
Height = 434
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Size = 8
Font.Style = []
ParentFont = False
FormStyle = fsNormal
Height = 434
Left = 0
OnShow = WebFormShow
ParentFont = False
TabOrder = 0
Top = 0
Width = 604
object WebLabel1: TWebLabel
Left = 24
Top = 24
Width = 55
Height = 13
Caption = 'User Profile'
ElementID = 'view.userprofile.title'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Size = 8
Font.Style = []
Height = 16
Left = 24
Top = 24
Visible = False
Width = 54
end
object WebLabel3: TWebLabel
Caption = 'User ID:'
ElementID = 'view.userprofile.form.lblUserID'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 16
Left = 39
Top = 59
Width = 40
Height = 13
Caption = 'User ID:'
ElementID = 'view.userprofile.form.lblUserID'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
end
object WebLabel2: TWebLabel
Caption = 'Email Address:'
ElementID = 'view.userprofile.form.lblEmail'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 16
Left = 13
Top = 157
Width = 70
Height = 13
Caption = 'Email Address:'
ElementID = 'view.userprofile.form.lblEmail'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
end
object WebLabel4: TWebLabel
Left = 29
Top = 83
Width = 52
Height = 13
Caption = 'Username:'
ElementID = 'view.userprofile.form.lblUserName'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 16
Left = 29
Top = 83
Width = 51
end
object WebLabel5: TWebLabel
Left = 29
Top = 107
Width = 50
Height = 13
Caption = 'Full Name:'
ElementID = 'view.userprofile.form.lblFullName'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 16
Left = 29
Top = 107
Width = 51
end
object WebLabel6: TWebLabel
Caption = 'Phone Number:'
ElementID = 'view.userprofile.form.lblPhone'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 16
Left = 5
Top = 133
Width = 74
Height = 13
Caption = 'Phone Number:'
ElementID = 'view.userprofile.form.lblPhone'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
end
object lblResult: TWebLabel
ElementID = 'view.userprofile.form.lblresult'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 13
Left = 85
Top = 246
Width = 3
Height = 13
ElementID = 'view.userprofile.form.lblresult'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
end
object edtUsername: TWebEdit
Left = 85
Top = 80
Width = 121
Height = 21
Alignment = taLeftJustify
Color = clWindow
ElementID = 'view.userprofile.form.edtUsername'
ElementPosition = epRelative
Enabled = False
HeightPercent = 100.000000000000000000
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 21
HideSelection = False
Left = 85
ReadOnly = True
WidthPercent = 100.000000000000000000
ShowFocus = True
TabOrder = 0
Top = 80
Width = 121
end
object edtUserId: TWebEdit
Left = 85
Top = 56
Width = 121
Height = 21
Alignment = taLeftJustify
Color = clWindow
ElementID = 'view.userprofile.form.edtUserID'
ElementPosition = epRelative
Enabled = False
HeightPercent = 100.000000000000000000
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 21
HideSelection = False
Left = 85
ReadOnly = True
ShowFocus = True
TabOrder = 1
WidthPercent = 100.000000000000000000
Top = 56
Width = 121
end
object edtFullName: TWebEdit
Alignment = taLeftJustify
ChildOrder = 5
Color = clWindow
ElementID = 'view.userprofile.form.edtFullName'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 21
HideSelection = False
Left = 85
ShowFocus = True
TabOrder = 0
Top = 104
Width = 121
Height = 21
ChildOrder = 5
ElementID = 'view.userprofile.form.edtFullName'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
end
object edtPhone: TWebEdit
Alignment = taLeftJustify
ChildOrder = 7
Color = clWindow
ElementID = 'view.userprofile.form.edtPhone'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 21
HideSelection = False
Left = 85
ShowFocus = True
TabOrder = 0
Top = 128
Width = 121
Height = 21
ChildOrder = 7
ElementID = 'view.userprofile.form.edtPhone'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
end
object chkAdminUser: TWebCheckBox
Left = 85
Top = 179
Width = 113
Height = 22
Caption = 'chkAdminUser'
ChildOrder = 9
ElementID = 'view.userprofile.form.chkAdminUser'
ElementPosition = epRelative
Enabled = False
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 22
Left = 85
Role = 'null'
ShowFocus = True
TabOrder = 0
Top = 179
Width = 113
end
object edtEmail: TWebEdit
Alignment = taLeftJustify
ChildOrder = 7
Color = clWindow
ElementID = 'view.userprofile.form.edtEmail'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 21
HideSelection = False
Left = 85
ShowFocus = True
TabOrder = 0
Top = 152
Width = 121
Height = 21
ChildOrder = 7
ElementID = 'view.userprofile.form.edtEmail'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
end
object btnConfirm: TWebButton
Left = 85
Top = 210
Width = 96
Height = 25
Caption = 'Confirm Changes'
ChildOrder = 12
Color = clNone
ElementID = 'view.userprofile.form.btnconfirm'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 25
Left = 85
OnClick = btnConfirmClick
end
object WebButton1: TWebButton
Left = 208
Role = 'button'
TabOrder = 0
Top = 210
Width = 96
Height = 25
end
object WebButton1: TWebButton
Caption = 'Cancel Changes'
ChildOrder = 14
Color = clNone
ElementID = 'view.userprofile.form.btncancel'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 25
Left = 208
OnClick = WebButton1Click
Role = 'button'
TabOrder = 0
Top = 210
Width = 96
end
object pnlMessage: TWebPanel
ChildOrder = 17
Color = clBtnFace
ElementID = 'view.login.message'
ElementPosition = epRelative
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 33
Left = 236
Role = 'null'
TabOrder = 8
TabStop = False
Top = 4
Width = 121
Height = 33
ElementID = 'view.login.message'
ChildOrder = 17
TabOrder = 8
object lblMessage: TWebLabel
Left = 16
Top = 11
Width = 42
Height = 13
Caption = 'Message'
ElementID = 'view.login.message.label'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 16
Left = 16
Top = 11
Width = 43
end
object btnCloseNotification: TWebButton
Left = 96
Top = 3
Width = 22
Height = 25
ChildOrder = 1
Color = clNone
ElementID = 'view.login.message.button'
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Size = 8
Font.Style = []
Height = 25
Left = 96
OnClick = btnCloseNotificationClick
Role = 'button'
TabOrder = 0
Top = 3
Width = 22
end
end
object XDataWebClient1: TXDataWebClient
Connection = DMConnection.ApiConnection
Left = 359
Top = 52
end
......
kgOrdersClient/View.UserProfile.pas
......@@ -6,7 +6,7 @@ uses
System.SysUtils, System.Classes, JS, Web, WEBLib.Graphics, WEBLib.Controls,
WEBLib.Forms, WEBLib.Dialogs, Vcl.Controls, Vcl.StdCtrls, WEBLib.StdCtrls,
XData.Web.Client, WEBLib.ExtCtrls, DB, XData.Web.JsonDataset,
XData.Web.Dataset, XData.Web.Connection, Vcl.Forms;
XData.Web.Dataset, XData.Web.Connection, Vcl.Forms, ConnectionModule;
type
TFViewUserProfile = class(TWebForm)
......@@ -47,8 +47,7 @@ implementation
uses
Auth.Service,
XData.Model.Classes,
ConnectionModule;
XData.Model.Classes;
{$R *.dfm}
......
kgOrdersServer/Source/Api.Database.dfm
......@@ -4,12 +4,9 @@ object ApiDatabase: TApiDatabase
Width = 519
object ucKG: TUniConnection
ProviderName = 'MySQL'
Database = 'kg_order_entry'
Username = 'root'
LoginPrompt = False
Left = 75
Top = 65
EncryptedPassword = '9AFF92FF8CFF86FF8CFFCFFFCEFF'
end
object UniQuery1: TUniQuery
Connection = ucKG
......
kgOrdersServer/Source/Auth.Database.dfm
......@@ -18,12 +18,9 @@ object AuthDatabase: TAuthDatabase
end
object ucKG: TUniConnection
ProviderName = 'MySQL'
Database = 'kg_order_entry'
Username = 'root'
LoginPrompt = False
Left = 67
Top = 131
EncryptedPassword = '9AFF92FF8CFF86FF8CFFCFFFCEFF'
end
object MySQLUniProvider1: TMySQLUniProvider
Left = 230
......
kgOrdersServer/Source/rOrderCorrugated.dfm
object rptOrderCorrugated: TrptOrderCorrugated
OnCreate = DataModuleCreate
Height = 480
Width = 640
object ucKG: TUniConnection
ProviderName = 'MySQL'
Database = 'kg_order_entry'
Username = 'root'
Server = '192.168.159.132'
Connected = True
LoginPrompt = False
Left = 289
Top = 119
EncryptedPassword = '9AFF92FF8CFF86FF8CFFCFFFCEFF'
end
object frxPDFExport1: TfrxPDFExport
FileName = 'C:\Users\Admin\Downloads\rptOrderWeb.pdf'
......@@ -51,388 +47,6 @@ object rptOrderCorrugated: TrptOrderCorrugated
DataSetOptions = []
Left = 444
Top = 206
FieldDefs = <
item
FieldName = 'ORDER_ID'
end
item
FieldName = 'COMPANY_ID'
end
item
FieldName = 'USER_ID'
end
item
FieldName = 'ORDER_DATE'
FieldType = fftDateTime
end
item
FieldName = 'START_DATE'
FieldType = fftDateTime
end
item
FieldName = 'END_DATE'
FieldType = fftDateTime
end
item
FieldName = 'ORDER_STATUS'
FieldType = fftString
end
item
FieldName = 'SCHED_JSON'
FieldType = fftString
Size = 4096
end
item
FieldName = 'staff_fields_order_date'
FieldType = fftDateTime
end
item
FieldName = 'staff_fields_proof_date'
FieldType = fftDateTime
end
item
FieldName = 'staff_fields_ship_date'
FieldType = fftDateTime
end
item
FieldName = 'staff_fields_ship_via'
FieldType = fftString
Size = 45
end
item
FieldName = 'staff_fields_price'
FieldType = fftString
end
item
FieldName = 'staff_fields_invoice_to'
FieldType = fftString
Size = 128
end
item
FieldName = 'staff_fields_invoice_attention'
FieldType = fftString
Size = 256
end
item
FieldName = 'staff_fields_ship_to'
FieldType = fftString
Size = 128
end
item
FieldName = 'staff_fields_ship_attention'
FieldType = fftString
Size = 256
end
item
FieldName = 'staff_fields_po_number'
FieldType = fftString
Size = 16
end
item
FieldName = 'staff_fields_job_name'
FieldType = fftString
Size = 45
end
item
FieldName = 'staff_fields_art_due'
FieldType = fftDateTime
end
item
FieldName = 'staff_fields_plate_due'
FieldType = fftDateTime
end
item
FieldName = 'staff_fields_mount_due'
FieldType = fftDateTime
end
item
FieldName = 'plates_job_number'
FieldType = fftString
Size = 16
end
item
FieldName = 'supplied_by_customer_b_w_copy'
FieldType = fftString
end
item
FieldName = 'supplied_by_customer_color_copy'
FieldType = fftString
end
item
FieldName = 'supplied_by_customer_plates'
FieldType = fftString
end
item
FieldName = 'supplied_by_customer_sample_ca'
FieldType = fftString
end
item
FieldName = 'supplied_by_customer_dimension'
FieldType = fftString
Size = 64
end
item
FieldName = 'supplied_by_customer_disk_or_cd'
FieldType = fftString
end
item
FieldName = 'supplied_by_customer_e_mail'
FieldType = fftString
Size = 256
end
item
FieldName = 'supplied_by_customer_ftp'
FieldType = fftString
Size = 256
end
item
FieldName = 'supplied_by_customer_other'
FieldType = fftString
Size = 96
end
item
FieldName = 'supplied_by_customer_existing_'
FieldType = fftString
Size = 16
end
item
FieldName = 'supplied_by_customer_ref_art_p'
FieldType = fftString
Size = 256
end
item
FieldName = 'supplied_by_customer_ref_art_a'
FieldType = fftString
Size = 256
end
item
FieldName = 'cut_die_cutdier'
FieldType = fftString
end
item
FieldName = 'cut_die_cutdieb'
FieldType = fftString
end
item
FieldName = 'cut_die_cutdief'
FieldType = fftString
end
item
FieldName = 'cut_die_cutdierkr'
FieldType = fftString
end
item
FieldName = 'cut_die_cutdiefkr'
FieldType = fftString
end
item
FieldName = 'cut_die_cad_file'
FieldType = fftString
Size = 128
end
item
FieldName = 'cut_die_attached'
FieldType = fftString
end
item
FieldName = 'cut_die_boxpol250'
FieldType = fftString
end
item
FieldName = 'cut_die_boxpol155'
FieldType = fftString
end
item
FieldName = 'cut_die_boxpol125'
FieldType = fftString
end
item
FieldName = 'cut_die_brub'
FieldType = fftString
end
item
FieldName = 'proofing_fax'
FieldType = fftString
Size = 16
end
item
FieldName = 'proofing_fax_attn'
FieldType = fftString
Size = 256
end
item
FieldName = 'proofing_e_mail'
FieldType = fftString
Size = 256
end
item
FieldName = 'proofing_e_mail_attn'
FieldType = fftString
Size = 256
end
item
FieldName = 'proofing_ship_to'
FieldType = fftString
Size = 1024
end
item
FieldName = 'proofing_full_size_panel'
FieldType = fftString
end
item
FieldName = 'proofing_print_card'
FieldType = fftString
end
item
FieldName = 'proofing_wide_format'
FieldType = fftString
end
item
FieldName = 'proofing_pdf_file'
FieldType = fftString
end
item
FieldName = 'proofing_other'
FieldType = fftString
Size = 64
end
item
FieldName = 'proofing_art_approved_as_is'
FieldType = fftString
end
item
FieldName = 'proofing_approved_date'
FieldType = fftDateTime
end
item
FieldName = 'proofing_changes_required'
FieldType = fftString
end
item
FieldName = 'proofing_changes_date'
FieldType = fftDateTime
end
item
FieldName = 'layout_rsc_l'
FieldType = fftString
end
item
FieldName = 'layout_rcs_w'
FieldType = fftString
end
item
FieldName = 'layout_rcs_d'
FieldType = fftString
end
item
FieldName = 'layout_die_cut_no'
FieldType = fftString
Size = 45
end
item
FieldName = 'layout_accross_no'
FieldType = fftString
end
item
FieldName = 'layout_around_no'
FieldType = fftString
end
item
FieldName = 'layout_cad_file'
FieldType = fftString
Size = 45
end
item
FieldName = 'layout_excalibur_die'
FieldType = fftString
end
item
FieldName = 'mounting_loose'
FieldType = fftString
end
item
FieldName = 'mounting_sticky_bak'
FieldType = fftString
end
item
FieldName = 'mounting_full_mount'
FieldType = fftString
end
item
FieldName = 'mounting_strip_mount'
FieldType = fftString
end
item
FieldName = 'colors_cylinder_size'
FieldType = fftString
Size = 45
end
item
FieldName = 'colors_machine_ident'
FieldType = fftString
Size = 45
end
item
FieldName = 'mounting_standard_setup'
FieldType = fftString
Size = 45
end
item
FieldName = 'mounting_custom_backing'
FieldType = fftString
Size = 96
end
item
FieldName = 'mounting_custom_adhesive'
FieldType = fftString
Size = 45
end
item
FieldName = 'colors_cross_hairs'
FieldType = fftString
end
item
FieldName = 'colors_clemson'
FieldType = fftString
end
item
FieldName = 'plates_thickness'
FieldType = fftString
end
item
FieldName = 'plates_plate_material'
FieldType = fftString
Size = 16
end
item
FieldName = 'general_special_instructions'
FieldType = fftString
Size = 2048
end
item
FieldName = 'colors_colors'
FieldType = fftString
Size = 4096
end
item
FieldName = 'staff_fields_quickbooks_item'
FieldType = fftString
Size = 45
end
item
FieldName = 'staff_fields_quantity'
FieldType = fftString
end
item
FieldName = 'layout_rsc_style'
FieldType = fftString
Size = 32
end
item
FieldName = 'staff_fields_art_location'
FieldType = fftString
Size = 16
end>
end
object frxOrderCorrugated: TfrxReport
Version = '2025.1.4'
......@@ -3547,7 +3161,6 @@ object rptOrderCorrugated: TrptOrderCorrugated
Connection = ucKG
SQL.Strings = (
'select * from corrugated_plate_orders where ORDER_ID = 11424')
Active = True
Left = 457
Top = 106
object uqOrderCorrugatedORDER_ID: TIntegerField
......
kgOrdersServer/Source/rOrderCorrugated.pas
......@@ -101,6 +101,7 @@ type
uqOrderCorrugatedstaff_fields_quantity: TStringField;
uqOrderCorrugatedlayout_rsc_style: TStringField;
uqOrderCorrugatedstaff_fields_art_location: TStringField;
procedure DataModuleCreate(Sender: TObject);
private
{ Private declarations }
public
......@@ -121,6 +122,21 @@ implementation
uses
uLibrary, Common.Config;
procedure TrptOrderCorrugated.DataModuleCreate(Sender: TObject);
begin
Logger.Log( 3, 'TAuthDatabase.DataModuleCreate' );
LoadDatabaseSettings( ucKG, 'kgOrdersServer.ini' );
try
ucKG.Connect;
except
on E: Exception do
begin
Logger.Log(3, '--TrptOrderList.DataModuleCreate -Error connecting to database: ' + E.Message);
end;
end;
end;
procedure TrptOrderCorrugated.PopulateColorTable;
var
row: TfrxCustomTableRow;
......@@ -183,6 +199,7 @@ begin
Logger.Log(3, 'Report preparation complete.');
end;
function TrptOrderCorrugated.GeneratePDF: string;
var
ReportDir, ReportFileName: string;
......
kgOrdersServer/Source/rOrderCutting.dfm
object rptOrderCutting: TrptOrderCutting
OnCreate = DataModuleCreate
Height = 480
Width = 640
object ucKG: TUniConnection
ProviderName = 'MySQL'
Database = 'kg_order_entry'
Username = 'root'
Server = '192.168.159.132'
Connected = True
LoginPrompt = False
Left = 289
Top = 119
EncryptedPassword = '9AFF92FF8CFF86FF8CFFCFFFCEFF'
end
object frxPDFExport1: TfrxPDFExport
FileName = 'C:\Users\Admin\Downloads\rptOrderWeb.pdf'
......@@ -51,75 +47,6 @@ object rptOrderCutting: TrptOrderCutting
DataSetOptions = []
Left = 444
Top = 206
FieldDefs = <
item
FieldName = 'ORDER_ID'
end
item
FieldName = 'COMPANY_ID'
end
item
FieldName = 'USER_ID'
end
item
FieldName = 'ORDER_DATE'
FieldType = fftDateTime
end
item
FieldName = 'staff_fields_order_date'
FieldType = fftDateTime
end
item
FieldName = 'staff_fields_proof_date'
FieldType = fftDateTime
end
item
FieldName = 'staff_fields_ship_date'
FieldType = fftDateTime
end
item
FieldName = 'staff_fields_ship_via'
FieldType = fftString
Size = 45
end
item
FieldName = 'staff_fields_quantity'
FieldType = fftString
end
item
FieldName = 'staff_fields_price'
FieldType = fftString
end
item
FieldName = 'staff_fields_invoice_to'
FieldType = fftString
Size = 128
end
item
FieldName = 'staff_fields_ship_to'
FieldType = fftString
Size = 128
end
item
FieldName = 'staff_fields_po_number'
FieldType = fftString
Size = 16
end
item
FieldName = 'staff_fields_job_name'
FieldType = fftString
Size = 45
end
item
FieldName = 'staff_fields_quickbooks_item'
FieldType = fftString
Size = 45
end
item
FieldName = 'general_special_instructions'
FieldType = fftString
Size = 2048
end>
end
object frxOrderCutting: TfrxReport
Version = '2025.1.4'
......@@ -886,7 +813,6 @@ object rptOrderCutting: TrptOrderCutting
Connection = ucKG
SQL.Strings = (
'select * from cutting_die_orders where ORDER_ID = 18793')
Active = True
Left = 457
Top = 106
object uqOrderCuttingORDER_ID: TIntegerField
......
kgOrdersServer/Source/rOrderCutting.pas
......@@ -31,6 +31,7 @@ type
uqOrderCuttingstaff_fields_job_name: TStringField;
uqOrderCuttingstaff_fields_quickbooks_item: TStringField;
uqOrderCuttinggeneral_special_instructions: TStringField;
procedure DataModuleCreate(Sender: TObject);
private
{ Private declarations }
public
......@@ -51,6 +52,21 @@ uses
{$R *.dfm}
procedure TrptOrderCutting.DataModuleCreate(Sender: TObject);
begin
Logger.Log( 3, 'TAuthDatabase.DataModuleCreate' );
LoadDatabaseSettings( ucKG, 'kgOrdersServer.ini' );
try
ucKG.Connect;
except
on E: Exception do
begin
Logger.Log(3, '--TrptOrderList.DataModuleCreate -Error connecting to database: ' + E.Message);
end;
end;
end;
function TrptOrderCutting.PrepareReport(SQL: string): string;
var
orderList : TJSObject;
......@@ -78,6 +94,7 @@ begin
Logger.Log(3, 'Report preparation complete.');
end;
function TrptOrderCutting.GeneratePDF: string;
var
ReportDir, ReportFileName: string;
......
kgOrdersServer/Source/rOrderList.dfm
......@@ -1070,14 +1070,9 @@ object rptOrderList: TrptOrderList
end
object ucKG: TUniConnection
ProviderName = 'MySQL'
Database = 'kg_order_entry'
Username = 'root'
Server = '192.168.159.132'
Connected = True
LoginPrompt = False
Left = 289
Top = 99
EncryptedPassword = '9AFF92FF8CFF86FF8CFFCFFFCEFF'
end
object uqOrders: TUniQuery
Connection = ucKG
......@@ -1286,126 +1281,6 @@ object rptOrderList: TrptOrderList
DataSetOptions = []
Left = 444
Top = 232
FieldDefs = <
item
FieldName = 'ORDER_ID'
end
item
FieldName = 'Loc'
FieldType = fftString
Size = 16
end
item
FieldName = 'COMPANY_NAME'
FieldType = fftString
Size = 90
end
item
FieldName = 'JOB_NAME'
FieldType = fftString
Size = 128
end
item
FieldName = 'ORDER_DATE'
FieldType = fftDateTime
end
item
FieldName = 'ORDER_TYPE'
FieldType = fftString
Size = 45
end
item
FieldName = 'PROOF_DUE'
FieldType = fftDateTime
end
item
FieldName = 'PROOF_DONE'
FieldType = fftDateTime
end
item
FieldName = 'ART_DUE'
FieldType = fftDateTime
end
item
FieldName = 'ART_DONE'
FieldType = fftDateTime
end
item
FieldName = 'PLATE_DUE'
FieldType = fftDateTime
end
item
FieldName = 'PLATE_DONE'
FieldType = fftDateTime
end
item
FieldName = 'MOUNT_DUE'
FieldType = fftDateTime
end
item
FieldName = 'MOUNT_DONE'
FieldType = fftDateTime
end
item
FieldName = 'SHIP_DUE'
FieldType = fftDateTime
end
item
FieldName = 'SHIP_DONE'
FieldType = fftDateTime
end
item
FieldName = 'PRICE'
end
item
FieldName = 'QB_REF_NUM'
FieldType = fftString
Size = 24
end
item
FieldName = 'COLORS'
FieldType = fftString
end
item
FieldName = 'po_number'
FieldType = fftString
Size = 16
end
item
FieldName = 'quickbooks_item'
FieldType = fftString
Size = 45
end
item
FieldName = 'NEW_ORDER_DATE'
FieldType = fftString
Size = 20
end
item
FieldName = 'NEW_PROOF_DONE'
FieldType = fftString
Size = 20
end
item
FieldName = 'NEW_ART_DONE'
FieldType = fftString
Size = 20
end
item
FieldName = 'NEW_PLATE_DONE'
FieldType = fftString
Size = 20
end
item
FieldName = 'NEW_MOUNT_DONE'
FieldType = fftString
Size = 20
end
item
FieldName = 'NEW_SHIP_DONE'
FieldType = fftString
Size = 20
end>
end
object uqColors: TUniQuery
Connection = ucKG
......
kgOrdersServer/Source/rOrderWeb.dfm
object rptOrderWeb: TrptOrderWeb
OnCreate = DataModuleCreate
Height = 480
Width = 640
object ucKG: TUniConnection
ProviderName = 'MySQL'
Database = 'kg_order_entry'
Username = 'root'
Server = '192.168.159.132'
Connected = True
LoginPrompt = False
Left = 289
Top = 119
EncryptedPassword = '9AFF92FF8CFF86FF8CFFCFFFCEFF'
end
object frxPDFExport1: TfrxPDFExport
UseFileCache = True
......@@ -49,426 +45,6 @@ object rptOrderWeb: TrptOrderWeb
DataSetOptions = []
Left = 444
Top = 206
FieldDefs = <
item
FieldName = 'ORDER_ID'
end
item
FieldName = 'COMPANY_ID'
end
item
FieldName = 'USER_ID'
end
item
FieldName = 'ORDER_DATE'
FieldType = fftDateTime
end
item
FieldName = 'START_DATE'
FieldType = fftDateTime
end
item
FieldName = 'END_DATE'
FieldType = fftDateTime
end
item
FieldName = 'ORDER_STATUS'
FieldType = fftString
end
item
FieldName = 'SCHED_JSON'
FieldType = fftString
Size = 4096
end
item
FieldName = 'staff_fields_order_date'
FieldType = fftDateTime
end
item
FieldName = 'staff_fields_proof_date'
FieldType = fftDateTime
end
item
FieldName = 'staff_fields_ship_date'
FieldType = fftDateTime
end
item
FieldName = 'staff_fields_ship_via'
FieldType = fftString
Size = 45
end
item
FieldName = 'staff_fields_price'
FieldType = fftString
end
item
FieldName = 'staff_fields_invoice_to'
FieldType = fftString
Size = 128
end
item
FieldName = 'staff_fields_invoice_attention'
FieldType = fftString
Size = 256
end
item
FieldName = 'staff_fields_ship_to'
FieldType = fftString
Size = 128
end
item
FieldName = 'staff_fields_ship_attention'
FieldType = fftString
Size = 256
end
item
FieldName = 'staff_fields_po_number'
FieldType = fftString
Size = 16
end
item
FieldName = 'staff_fields_job_name'
FieldType = fftString
Size = 45
end
item
FieldName = 'staff_fields_art_due'
FieldType = fftDateTime
end
item
FieldName = 'staff_fields_plate_due'
FieldType = fftDateTime
end
item
FieldName = 'plates_job_number'
FieldType = fftString
Size = 16
end
item
FieldName = 'supplied_by_customer_b_w_or_co'
FieldType = fftString
end
item
FieldName = 'supplied_by_customer_plates'
FieldType = fftString
end
item
FieldName = 'supplied_by_customer_sample'
FieldType = fftString
Size = 45
end
item
FieldName = 'supplied_by_customer_dimension'
FieldType = fftString
end
item
FieldName = 'supplied_by_customer_other'
FieldType = fftString
Size = 45
end
item
FieldName = 'supplied_by_customer_disk'
FieldType = fftString
end
item
FieldName = 'supplied_by_customer_e_mail'
FieldType = fftString
Size = 128
end
item
FieldName = 'supplied_by_customer_ftp'
FieldType = fftString
Size = 128
end
item
FieldName = 'plates_plate_material'
FieldType = fftString
Size = 16
end
item
FieldName = 'plates_thickness'
FieldType = fftString
end
item
FieldName = 'supplied_by_customer_total_inc'
FieldType = fftString
Size = 32
end
item
FieldName = 'supplied_by_customer_sheets_us'
FieldType = fftString
Size = 32
end
item
FieldName = 'supplied_by_customer_initials'
FieldType = fftString
Size = 16
end
item
FieldName = 'proofing_pdf'
FieldType = fftString
end
item
FieldName = 'proofing_pdf_to'
FieldType = fftString
Size = 256
end
item
FieldName = 'proofing_pdf_date_1'
FieldType = fftDateTime
end
item
FieldName = 'proofing_pdf_date_2'
FieldType = fftDateTime
end
item
FieldName = 'proofing_pdf_date_3'
FieldType = fftDateTime
end
item
FieldName = 'proofing_full_size_ink_jet_for'
FieldType = fftString
end
item
FieldName = 'proofing_ink_jet_to'
FieldType = fftString
Size = 256
end
item
FieldName = 'proofing_ink_jet_to_2'
FieldType = fftString
Size = 256
end
item
FieldName = 'proofing_ink_jet_date_1'
FieldType = fftDateTime
end
item
FieldName = 'proofing_ink_jet_date_2'
FieldType = fftDateTime
end
item
FieldName = 'proofing_ink_jet_date_3'
FieldType = fftDateTime
end
item
FieldName = 'proofing_color_contract'
FieldType = fftString
Size = 17
end
item
FieldName = 'proofing_color_contrac_to'
FieldType = fftString
Size = 256
end
item
FieldName = 'proofing_color_contrac_date_1'
FieldType = fftDateTime
end
item
FieldName = 'proofing_color_contrac_date_2'
FieldType = fftDateTime
end
item
FieldName = 'proofing_digital_color_key'
FieldType = fftString
end
item
FieldName = 'proofing_digital_color_to'
FieldType = fftString
Size = 256
end
item
FieldName = 'proofing_digital_color_date_1'
FieldType = fftDateTime
end
item
FieldName = 'quantity_and_colors_press_name'
FieldType = fftString
Size = 64
end
item
FieldName = 'quantity_and_colors_anilox_info'
FieldType = fftString
Size = 64
end
item
FieldName = 'plate_marks_microdots'
FieldType = fftString
end
item
FieldName = 'plate_marks_microdots_comments'
FieldType = fftString
Size = 128
end
item
FieldName = 'plate_marks_crosshairs'
FieldType = fftString
end
item
FieldName = 'plate_marks_crosshairs_comments'
FieldType = fftString
Size = 128
end
item
FieldName = 'plate_marks_color_bars'
FieldType = fftString
end
item
FieldName = 'plate_marks_color_bars_comments'
FieldType = fftString
Size = 128
end
item
FieldName = 'plate_marks_other'
FieldType = fftString
Size = 16
end
item
FieldName = 'plate_marks_other_comments'
FieldType = fftString
Size = 128
end
item
FieldName = 'print_orientation_print_orient'
FieldType = fftString
end
item
FieldName = 'layout_around'
FieldType = fftString
end
item
FieldName = 'layout_accross'
FieldType = fftString
end
item
FieldName = 'layout_surface_print'
FieldType = fftString
end
item
FieldName = 'layout_reverse_print'
FieldType = fftString
end
item
FieldName = 'layout_cylinder_repeat'
FieldType = fftString
Size = 16
end
item
FieldName = 'layout_cutoff_dimension'
FieldType = fftString
Size = 16
end
item
FieldName = 'layout_pitch'
FieldType = fftString
Size = 16
end
item
FieldName = 'layout_teeth'
FieldType = fftString
Size = 16
end
item
FieldName = 'layout_bleed'
FieldType = fftString
Size = 16
end
item
FieldName = 'layout_cutback'
FieldType = fftString
Size = 16
end
item
FieldName = 'layout_minimum_trap_dim'
FieldType = fftString
end
item
FieldName = 'layout_maximum_trap_dim'
FieldType = fftString
end
item
FieldName = 'upc_size'
FieldType = fftString
Size = 16
end
item
FieldName = 'upc_bar_width_reduction'
FieldType = fftString
Size = 16
end
item
FieldName = 'quantity_and_colors_qty_colors'
FieldType = fftString
Size = 4096
end
item
FieldName = 'general_comments'
FieldType = fftString
Size = 4096
end
item
FieldName = 'staff_fields_quickbooks_item'
FieldType = fftString
Size = 45
end
item
FieldName = 'staff_fields_quantity'
FieldType = fftString
end
item
FieldName = 'upc_distortion_percent'
FieldType = fftString
Size = 16
end
item
FieldName = 'upc_distortion_amount'
FieldType = fftString
Size = 16
end
item
FieldName = 'staff_fields_art_location'
FieldType = fftString
Size = 16
end
item
FieldName = 'qb_sales_orders_id'
end
item
FieldName = 'ORDER_ID_1'
end
item
FieldName = 'ORDER_REVISION_ID'
end
item
FieldName = 'QB_TXN_NUM'
FieldType = fftString
Size = 24
end
item
FieldName = 'QB_EDIT_SEQ'
FieldType = fftString
Size = 24
end
item
FieldName = 'ORDER_TYPE'
FieldType = fftString
Size = 30
end
item
FieldName = 'CREATE_TIME'
FieldType = fftDateTime
end
item
FieldName = 'QB_TXN_ID'
FieldType = fftString
Size = 24
end
item
FieldName = 'QB_REF_NUM'
FieldType = fftString
Size = 24
end>
end
object frxOrderWeb: TfrxReport
Version = '2025.1.4'
......@@ -3968,7 +3544,6 @@ object rptOrderWeb: TrptOrderWeb
'SELECT * FROM web_plate_orders w JOIN qb_sales_orders q ON w.ORD' +
'ER_ID = q.ORDER_ID WHERE w.ORDER_ID = 5512')
Active = True
Left = 457
Top = 106
object uqOrderWebORDER_ID: TIntegerField
......
kgOrdersServer/Source/rOrderWeb.pas
......@@ -100,6 +100,7 @@ type
uqOrderWebupc_distortion_amount: TStringField;
uqOrderWebstaff_fields_art_location: TStringField;
uqOrderWebQB_REF_NUM: TStringField;
procedure DataModuleCreate(Sender: TObject);
private
{ Private declarations }
public
......@@ -121,6 +122,21 @@ implementation
uses
uLibrary, Common.Config;
procedure TrptOrderWeb.DataModuleCreate(Sender: TObject);
begin
Logger.Log( 3, 'TAuthDatabase.DataModuleCreate' );
LoadDatabaseSettings( ucKG, 'kgOrdersServer.ini' );
try
ucKG.Connect;
except
on E: Exception do
begin
Logger.Log(3, '--TrptOrderList.DataModuleCreate -Error connecting to database: ' + E.Message);
end;
end;
end;
procedure TrptOrderWeb.PopulateColorTable;
var
row: TfrxCustomTableRow;
......@@ -183,6 +199,7 @@ begin
Logger.Log(3, 'Report preparation complete.');
end;
function TrptOrderWeb.GeneratePDF: string;
var
ReportDir, ReportFileName: string;
......
kgOrdersServer/kgOrdersServer.ini
[Settings]
MemoLogLevel=4
FileLogLevel=5
LogFileNum=303
LogFileNum=310
webClientVersion=1.0.0
[Database]
Server=192.168.159.132
--Server=192.168.102.130
--Server=192.168.159.132
Server=192.168.102.130
--Server=192.168.75.133
--Database=
--Username=
Database=kg_order_entry
Username=root
Password=emsys01
--Password=emsys!012
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment