Skip to content

K
KGOrders
Commit f2c46524 by cam
Options

All Edits are now dbEdits and html was changed to look more like reports

parent 7b720317
Showing with 47 additions and 49 deletions
kgOrdersClient/View.ReportRequirements.pas
...@@ -6,81 +6,38 @@ uses ...@@ -6,81 +6,38 @@ uses
System.SysUtils, System.Classes, JS, Web, WEBLib.Graphics, WEBLib.Controls, System.SysUtils, System.Classes, JS, Web, WEBLib.Graphics, WEBLib.Controls,
WEBLib.Forms, WEBLib.Dialogs, WEBLib.Menus, WEBLib.ExtCtrls, WEBLib.StdCtrls, WEBLib.Forms, WEBLib.Dialogs, WEBLib.Menus, WEBLib.ExtCtrls, WEBLib.StdCtrls,
WEBLib.JSON, Auth.Service, XData.Web.Client, WebLib.Storage, WEBLib.JSON, Auth.Service, XData.Web.Client, WebLib.Storage,
ConnectionModule, App.Types, Vcl.StdCtrls, Vcl.Controls; ConnectionModule, App.Types, Vcl.StdCtrls, Vcl.Controls, WEBLib.DBCtrls;
type type
TFReportRequirements = class(TWebForm) TFReportRequirements = class(TWebForm)
tmrScrollTop: TWebTimer;
clntReportRequirements: TXDataWebClient; clntReportRequirements: TXDataWebClient;
pnlMessage: TWebPanel; pnlMessage: TWebPanel;
lblMessage: TWebLabel; lblMessage: TWebLabel;
btnCloseNotification: TWebButton; btnCloseNotification: TWebButton;
edtCompanyAccountName: TWebEdit;
edtInQuickBooks: TWebEdit;
edtCompanyName: TWebEdit;
dtpOrderDate: TWebDateTimePicker; dtpOrderDate: TWebDateTimePicker;
dtpProofDate: TWebDateTimePicker; dtpProofDate: TWebDateTimePicker;
dtpShipDate: TWebDateTimePicker; dtpShipDate: TWebDateTimePicker;
WebLabel1: TWebLabel; WebLabel1: TWebLabel;
WebLabel2: TWebLabel; WebLabel2: TWebLabel;
edtShipVia: TWebEdit;
edtQuantity: TWebEdit;
edtPrice: TWebEdit;
edtInvoiceTo: TWebEdit;
edtShipTo: TWebEdit;
edtPONumber: TWebEdit;
edtJobName: TWebEdit;
edtQuickbooksItem: TWebEdit;
dtpArtDue: TWebDateTimePicker; dtpArtDue: TWebDateTimePicker;
dtpPlateDue: TWebDateTimePicker; dtpPlateDue: TWebDateTimePicker;
dtpMountDue: TWebDateTimePicker; dtpMountDue: TWebDateTimePicker;
edtArtLocation: TWebEdit;
WebLabel3: TWebLabel; WebLabel3: TWebLabel;
cbBWCopy: TWebCheckBox; cbBWCopy: TWebCheckBox;
cbColorCopy: TWebCheckBox; cbColorCopy: TWebCheckBox;
cbPlates: TWebCheckBox; cbPlates: TWebCheckBox;
cbDiskOrCD: TWebCheckBox; cbDiskOrCD: TWebCheckBox;
cbSampleCarton: TWebCheckBox; cbSampleCarton: TWebCheckBox;
edtDimensionalLayout: TWebEdit;
edtEmail: TWebEdit;
edtFTP: TWebEdit;
edtExistingCuttingDie: TWebEdit;
edtOther: TWebEdit;
edtRefArtPrintCard: TWebEdit;
edtRefArtAPDF: TWebEdit;
WebLabel4: TWebLabel; WebLabel4: TWebLabel;
edtRSCL: TWebEdit;
edtRSCW: TWebEdit;
edtRSCD: TWebEdit;
edtDieCutNo: TWebEdit;
edtAcrossNo: TWebEdit;
edtAroundNo: TWebEdit;
edtCADFile: TWebEdit;
edtRSCStyle: TWebEdit;
cbExcaliburDie: TWebCheckBox; cbExcaliburDie: TWebCheckBox;
WebLabel5: TWebLabel; WebLabel5: TWebLabel;
cbLoose: TWebCheckBox; cbLoose: TWebCheckBox;
cbStickyBak: TWebCheckBox; cbStickyBak: TWebCheckBox;
cbFullMount: TWebCheckBox; cbFullMount: TWebCheckBox;
cbStripMount: TWebCheckBox; cbStripMount: TWebCheckBox;
edtLoose: TWebEdit;
edtStripMount: TWebEdit;
edtStantdardSetup: TWebEdit;
edtCustomBacking: TWebEdit;
edtCustomAdhesive: TWebEdit;
WebLabel6: TWebLabel; WebLabel6: TWebLabel;
edtCylinderSize: TWebEdit;
edtMachineIndent: TWebEdit;
edtClemson: TWebEdit;
edtCrossHairs: TWebEdit;
WebButton1: TWebButton; WebButton1: TWebButton;
WebLabel7: TWebLabel; WebLabel7: TWebLabel;
edtFax: TWebEdit;
edtProofOther: TWebEdit;
edtProofShipTo: TWebEdit;
edtProofEmail: TWebEdit;
edtEmailAttn: TWebEdit;
edtFaxAttn: TWebEdit;
cbFullSizePanel: TWebCheckBox; cbFullSizePanel: TWebCheckBox;
cbPrintCard: TWebCheckBox; cbPrintCard: TWebCheckBox;
cbWideFormat: TWebCheckBox; cbWideFormat: TWebCheckBox;
...@@ -89,10 +46,51 @@ type ...@@ -89,10 +46,51 @@ type
dtpApprovedDate: TWebDateTimePicker; dtpApprovedDate: TWebDateTimePicker;
WebLabel8: TWebLabel; WebLabel8: TWebLabel;
WebLabel9: TWebLabel; WebLabel9: TWebLabel;
edtThickness: TWebEdit; edtCompanyName: TWebDBEdit;
edtPlateMaterial: TWebEdit; edtCompanyAccountName: TWebDBEdit;
edtJobNumber: TWebEdit; edtInQuickBooks: TWebDBEdit;
edtSpecialInstructions: TWebEdit; edtShipVia: TWebDBEdit;
edtQuantity: TWebDBEdit;
edtPrice: TWebDBEdit;
edtInvoiceTo: TWebDBEdit;
edtShipTo: TWebDBEdit;
edtPONumber: TWebDBEdit;
edtJobName: TWebDBEdit;
edtQuickBooksItem: TWebDBEdit;
edtArtLocation: TWebDBEdit;
edtDimensionalLayout: TWebDBEdit;
edtEmail: TWebDBEdit;
edtFTP: TWebDBEdit;
edtOther: TWebDBEdit;
edtExistingCuttingDie: TWebDBEdit;
edtRefArtPrintCard: TWebDBEdit;
edtRefArtAPDF: TWebDBEdit;
edtCADFile: TWebDBEdit;
edtAroundNo: TWebDBEdit;
edtAcrossNo: TWebDBEdit;
edtDieCutNo: TWebDBEdit;
edtRSCD: TWebDBEdit;
edtRSCW: TWebDBEdit;
edtRSCL: TWebDBEdit;
edtCustomAdhesive: TWebDBEdit;
edtCustomBacking: TWebDBEdit;
edtStandardSetup: TWebDBEdit;
edtStripMount: TWebDBEdit;
edtLoose: TWebDBEdit;
edtRSCStyle: TWebDBEdit;
edtProofOther: TWebDBEdit;
edtProofShipTo: TWebDBEdit;
edtEmailAttn: TWebDBEdit;
edtProofEmail: TWebDBEdit;
edtFaxAttn: TWebDBEdit;
edtFax: TWebDBEdit;
edtClemson: TWebDBEdit;
edtCrossHairs: TWebDBEdit;
edtMachineIndent: TWebDBEdit;
edtCylinderSize: TWebDBEdit;
edtJobNumber: TWebDBEdit;
edtPlateMaterial: TWebDBEdit;
edtThickness: TWebDBEdit;
procedure WebFormCreate(Sender: TObject); procedure WebFormCreate(Sender: TObject);
procedure HideNotification(); procedure HideNotification();
procedure ShowNotification(Notification: string); procedure ShowNotification(Notification: string);
......
kgOrdersServer/kgOrdersServer.ini
[Options] [Options]
LogFileNum=100 LogFileNum=101
UpdateTimerLength=0 UpdateTimerLength=0
......
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