Fixed issue where dataset was still able to be editted outside of edit mode

43b62c06 · Cameron Hayes · 4a70910b · 43b62c06 · 43b62c06 · 43b62c06
Commit 43b62c06 authored Aug 04, 2025 by Cameron Hayes
5 changed files
--- a/kgOrdersClient/View.OrderEntryCorrugated.pas
+++ b/kgOrdersClient/View.OrderEntryCorrugated.pas
@@ -773,7 +773,6 @@ begin
    xdwdsOrder.Close;
    xdwdsOrder.SetJsonData(order);
    xdwdsOrder.Open;
-    xdwdsOrder.Edit;
    container := TJSHTMLElement(document.getElementById('additionalFields'));
    if Assigned(container) then

--- a/kgOrdersServer/Source/Lookup.ServiceImpl.pas
+++ b/kgOrdersServer/Source/Lookup.ServiceImpl.pas
@@ -162,12 +162,9 @@ begin
      else
        table := 'cutting_die_orders';
      SQL := 'select * from ' + table + ' cpo join customers c on cpo.COMPANY_ID = c.CUSTOMER_ID join customers_ship cs on cpo.staff_fields_ship_to = cs.ship_block JOIN qb_items ON cpo.staff_fields_quickbooks_item = qb_items.qb_item_name where cpo.ORDER_ID = ' + ORDER_ID;
      doQuery(ordersDB.UniQuery1, SQL);
      estimateJSON.AddPair('TxnDate', ordersDB.UniQuery1.FieldByName('staff_fields_order_date').AsString);
      CustomerRefJSON := TJSONObject.Create;

--- a/kgOrdersServer/Source/qbAPI.dfm
+++ b/kgOrdersServer/Source/qbAPI.dfm
@@ -15,116 +15,72 @@ object fQB: TfQB
  TextHeight = 15
  object Splitter1: TSplitter
    Left = 0
-    Top = 472
+    Top = 261
    Width = 982
-    Height = 6
+    Height = 3
    Cursor = crVSplit
-    Align = alBottom
+    Align = alTop
+    ExplicitTop = 225
  end
  object Splitter2: TSplitter
    Left = 0
-    Top = 281
+    Top = 487
    Width = 982
    Height = 3
    Cursor = crVSplit
-    Align = alBottom
+    Align = alTop
    ExplicitTop = 0
    ExplicitWidth = 284
  end
-  object Button2: TButton
+  object AdvPanel1: TAdvPanel
-    Left = 4
-    Top = 32
-    Width = 111
-    Height = 25
-    Caption = 'Get QB Customers'
-    TabOrder = 0
-    OnClick = Button2Click
-  end
-  object Button3: TButton
-    Left = 121
-    Top = 5
-    Width = 139
-    Height = 25
-    Caption = 'Get Customer By ID'
-    TabOrder = 1
-    OnClick = Button3Click
-  end
-  object Button4: TButton
-    Left = 266
-    Top = 5
-    Width = 95
-    Height = 25
-    Caption = 'Add Estimate'
-    TabOrder = 2
-    OnClick = Button4Click
-  end
-  object Button5: TButton
-    Left = 367
-    Top = 5
-    Width = 169
-    Height = 25
-    Caption = 'Show Customers with Orders'
-    TabOrder = 3
-    OnClick = Button5Click
-  end
-  object Memo1: TMemo
    Left = 0
-    Top = 63
+    Top = 264
    Width = 982
-    Height = 218
+    Height = 223
-    Align = alBottom
+    Align = alTop
-    Lines.Strings = (
+    TabOrder = 0
-      '')
+    UseDockManager = True
-    ScrollBars = ssVertical
+    Version = '2.7.0.2'
-    TabOrder = 4
+    Caption.Color = clWhite
-  end
+    Caption.ColorTo = clNone
-  object Button6: TButton
+    Caption.Font.Charset = DEFAULT_CHARSET
-    Left = 538
+    Caption.Font.Color = clNone
-    Top = 5
+    Caption.Font.Height = -11
-    Width = 108
+    Caption.Font.Name = 'Segoe UI'
-    Height = 25
+    Caption.Font.Style = []
-    Caption = 'Match Customers'
+    Caption.GradientDirection = gdVertical
-    TabOrder = 5
+    Caption.Indent = 0
-    OnClick = Button6Click
+    Caption.ShadeLight = 255
-  end
+    Caption.Text = 'QuickBooks Data'
-  object Button7: TButton
+    Caption.Visible = True
-    Left = 652
+    CollapsColor = clNone
-    Top = 5
+    CollapsDelay = 0
-    Width = 186
+    DoubleBuffered = True
-    Height = 25
+    ShadowColor = clBlack
-    Caption = 'Show Customers without Orders'
+    ShadowOffset = 0
-    TabOrder = 6
+    StatusBar.BorderColor = clNone
-    OnClick = Button7Click
+    StatusBar.BorderStyle = bsSingle
-  end
+    StatusBar.Font.Charset = DEFAULT_CHARSET
-  object Button1: TButton
+    StatusBar.Font.Color = 4473924
-    Left = 4
+    StatusBar.Font.Height = -11
-    Top = 5
+    StatusBar.Font.Name = 'Segoe UI'
-    Width = 111
+    StatusBar.Font.Style = []
-    Height = 25
+    StatusBar.Color = clWhite
-    Caption = 'Get KG Customers'
+    StatusBar.GradientDirection = gdVertical
-    TabOrder = 7
+    Text = ''
-    OnClick = Button1Click
+    FullHeight = 200
-  end
+    object asgData: TAdvStringGrid
-  object Panel1: TPanel
-    Left = 0
-    Top = 478
-    Width = 982
-    Height = 183
-    Align = alBottom
-    Caption = 'Panel1'
-    TabOrder = 8
-    OnResize = Panel1Resize
-    object asgData2: TAdvStringGrid
      Left = 0
-      Top = 0
+      Top = 18
      Width = 982
-      Height = 183
+      Height = 205
+      Align = alClient
      DrawingStyle = gdsClassic
      FixedColor = clWhite
      TabOrder = 0
      GridLineColor = 13948116
      GridFixedLineColor = 11250603
-      OnClickCell = asgData2ClickCell
+      OnClickCell = asgDataClickCell
      ActiveCellFont.Charset = DEFAULT_CHARSET
      ActiveCellFont.Color = 4474440
      ActiveCellFont.Height = -12
@@ -240,6 +196,7 @@ object fQB: TfQB
      SortSettings.HeaderMirrorColor = clWhite
      SortSettings.HeaderMirrorColorTo = clWhite
      Version = '9.1.4.5'
+      ExplicitHeight = 182
      ColWidths = (
        64
        64
@@ -259,27 +216,176 @@ object fQB: TfQB
        22)
    end
  end
-  object Panel2: TPanel
+  object Panel1: TPanel
    Left = 0
-    Top = 284
+    Top = 0
    Width = 982
-    Height = 188
+    Height = 63
-    Align = alBottom
+    Align = alTop
-    Caption = 'Panel2'
+    TabOrder = 1
-    TabOrder = 9
+    ExplicitLeft = 4
-    OnResize = Panel2Resize
+    ExplicitTop = 72
-    object asgData: TAdvStringGrid
+    ExplicitWidth = 978
-      Left = 1
+    object Button2: TButton
-      Top = 1
+      Left = 4
-      Width = 980
+      Top = 32
-      Height = 186
+      Width = 111
-      Align = alBottom
+      Height = 25
+      Caption = 'Get QB Customers'
+      TabOrder = 0
+      OnClick = Button2Click
+    end
+    object Button3: TButton
+      Left = 121
+      Top = 5
+      Width = 139
+      Height = 25
+      Caption = 'Get Customer By ID'
+      TabOrder = 1
+      OnClick = Button3Click
+    end
+    object Button4: TButton
+      Left = 266
+      Top = 5
+      Width = 95
+      Height = 25
+      Caption = 'Add Estimate'
+      TabOrder = 2
+      OnClick = Button4Click
+    end
+    object Button5: TButton
+      Left = 367
+      Top = 5
+      Width = 169
+      Height = 25
+      Caption = 'Show Customers with Orders'
+      TabOrder = 3
+      OnClick = Button5Click
+    end
+    object Button6: TButton
+      Left = 538
+      Top = 5
+      Width = 108
+      Height = 25
+      Caption = 'Match Customers'
+      TabOrder = 4
+      OnClick = Button6Click
+    end
+    object Button7: TButton
+      Left = 652
+      Top = 5
+      Width = 186
+      Height = 25
+      Caption = 'Show Customers without Orders'
+      TabOrder = 5
+      OnClick = Button7Click
+    end
+    object Button1: TButton
+      Left = 4
+      Top = 5
+      Width = 111
+      Height = 25
+      Caption = 'Get KG Customers'
+      TabOrder = 6
+      OnClick = Button1Click
+    end
+    object Button8: TButton
+      Left = 844
+      Top = 5
+      Width = 75
+      Height = 25
+      Caption = 'Get Items'
+      TabOrder = 7
+      OnClick = Button8Click
+    end
+    object Button9: TButton
+      Left = 121
+      Top = 32
+      Width = 95
+      Height = 25
+      Caption = 'Get Estimate'
+      TabOrder = 8
+      OnClick = Button9Click
+    end
+    object Button10: TButton
+      Left = 222
+      Top = 32
+      Width = 88
+      Height = 25
+      Caption = 'Update QB ID'
+      TabOrder = 9
+      OnClick = Button10Click
+    end
+    object Button11: TButton
+      Left = 316
+      Top = 32
+      Width = 113
+      Height = 25
+      Caption = 'update QB Items'
+      TabOrder = 10
+      OnClick = Button11Click
+    end
+    object Button12: TButton
+      Left = 435
+      Top = 32
+      Width = 190
+      Height = 25
+      Caption = 'Delete Customers without orders'
+      TabOrder = 11
+      OnClick = Button12Click
+    end
+  end
+  object AdvPanel2: TAdvPanel
+    Left = 0
+    Top = 490
+    Width = 982
+    Height = 171
+    Align = alClient
+    TabOrder = 2
+    UseDockManager = True
+    Version = '2.7.0.2'
+    Caption.Color = clWhite
+    Caption.ColorTo = clNone
+    Caption.Font.Charset = DEFAULT_CHARSET
+    Caption.Font.Color = clNone
+    Caption.Font.Height = -11
+    Caption.Font.Name = 'Segoe UI'
+    Caption.Font.Style = []
+    Caption.GradientDirection = gdVertical
+    Caption.Indent = 0
+    Caption.ShadeLight = 255
+    Caption.Text = 'kgOrders Data'
+    Caption.Visible = True
+    CollapsColor = clNone
+    CollapsDelay = 0
+    DoubleBuffered = True
+    ShadowColor = clBlack
+    ShadowOffset = 0
+    StatusBar.BorderColor = clNone
+    StatusBar.BorderStyle = bsSingle
+    StatusBar.Font.Charset = DEFAULT_CHARSET
+    StatusBar.Font.Color = 4473924
+    StatusBar.Font.Height = -11
+    StatusBar.Font.Name = 'Segoe UI'
+    StatusBar.Font.Style = []
+    StatusBar.Color = clWhite
+    StatusBar.GradientDirection = gdVertical
+    Text = ''
+    ExplicitTop = 428
+    ExplicitHeight = 230
+    FullHeight = 200
+    object asgData2: TAdvStringGrid
+      Left = 0
+      Top = 18
+      Width = 982
+      Height = 153
+      Align = alClient
      DrawingStyle = gdsClassic
      FixedColor = clWhite
      TabOrder = 0
      GridLineColor = 13948116
      GridFixedLineColor = 11250603
-      OnClickCell = asgDataClickCell
+      OnClickCell = asgData2ClickCell
      ActiveCellFont.Charset = DEFAULT_CHARSET
      ActiveCellFont.Color = 4474440
      ActiveCellFont.Height = -12
@@ -395,6 +501,9 @@ object fQB: TfQB
      SortSettings.HeaderMirrorColor = clWhite
      SortSettings.HeaderMirrorColorTo = clWhite
      Version = '9.1.4.5'
+      ExplicitLeft = -682
+      ExplicitTop = 0
+      ExplicitHeight = 183
      ColWidths = (
        64
        64
@@ -414,50 +523,565 @@ object fQB: TfQB
        22)
    end
  end
-  object Button8: TButton
+  object AdvOfficePager1: TAdvOfficePager
-    Left = 844
+    Left = 0
-    Top = 5
+    Top = 63
-    Width = 75
+    Width = 982
-    Height = 25
+    Height = 198
-    Caption = 'Get Items'
+    Align = alTop
-    TabOrder = 10
+    ActivePage = AdvOfficePager11
-    OnClick = Button8Click
+    ButtonSettings.CloseButtonPicture.Data = {
-  end
+      424DA20400000000000036040000280000000900000009000000010008000000
-  object Button9: TButton
+      00006C000000C30E0000C30E00000001000000010000427B8400DEEFEF00FFFF
-    Left = 121
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-    Top = 32
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-    Width = 95
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-    Height = 25
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-    Caption = 'Get Estimate'
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-    TabOrder = 11
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-    OnClick = Button9Click
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-  end
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-  object Button10: TButton
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-    Left = 222
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-    Top = 32
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-    Width = 75
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-    Height = 25
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-    Caption = 'Update QB ID'
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-    TabOrder = 12
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-    OnClick = Button10Click
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-  end
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-  object Button11: TButton
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-    Left = 316
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-    Top = 32
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-    Width = 113
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-    Height = 25
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-    Caption = 'update QB Items'
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-    TabOrder = 13
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-    OnClick = Button11Click
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-  end
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-  object Button12: TButton
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-    Left = 435
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-    Top = 32
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-    Width = 190
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-    Height = 25
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
-    Caption = 'Delete Customers without orders'
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0001000001010100000100
-    TabOrder = 14
+      0000000202000100020200000000000202020002020200000000010002020202
-    OnClick = Button12Click
+      0200010000000101000202020001010000000100020202020200010000000002
+      0202000202020000000000020200010002020000000001000001010100000100
+      0000}
+    ButtonSettings.PageListButtonPicture.Data = {
+      424DA20400000000000036040000280000000900000009000000010008000000
+      00006C000000C30E0000C30E00000001000000010000427B8400DEEFEF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0001010101000101010100
+      0000010101000200010101000000010100020202000101000000010002020202
+      0200010000000002020200020202000000000002020001000202000000000100
+      0001010100000100000001010101010101010100000001010101010101010100
+      0000}
+    ButtonSettings.ScrollButtonPrevPicture.Data = {
+      424DA20400000000000036040000280000000900000009000000010008000000
+      00006C000000C30E0000C30E00000001000000010000427B8400DEEFEF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0001010101000001010100
+      0000010101000202000101000000010100020202000101000000010002020200
+      0101010000000002020200010101010000000100020202000101010000000101
+      0002020200010100000001010100020200010100000001010101000001010100
+      0000}
+    ButtonSettings.ScrollButtonNextPicture.Data = {
+      424DA20400000000000036040000280000000900000009000000010008000000
+      00006C000000C30E0000C30E00000001000000010000427B8400DEEFEF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0001010000010101010100
+      0000010002020001010101000000010002020200010101000000010100020202
+      0001010000000101010002020200010000000101000202020001010000000100
+      0202020001010100000001000202000101010100000001010000010101010100
+      0000}
+    ButtonSettings.ScrollButtonFirstPicture.Data = {
+      424DC60400000000000036040000280000001000000009000000010008000000
+      000000000000C40E0000C40E00000001000000010000427B84FFDEEFEFFFFFFF
+      FFFF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF01010101010000010101
+      0101000001010101010100020200010101000202000101010100020202000101
+      0002020200010101000202020001010002020200010101000202020001010002
+      0202000101010101000202020001010002020200010101010100020202000101
+      0002020200010101010100020200010101000202000101010101010000010101
+      010100000101}
+    ButtonSettings.ScrollButtonLastPicture.Data = {
+      424DC60400000000000036040000280000001000000009000000010008000000
+      000000000000C40E0000C40E00000001000000010000427B84FFDEEFEFFFFFFF
+      FFFF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
+      00FF000000FF000000FF000000FF000000FF000000FF01010000010101010100
+      0001010101010100020200010101000202000101010101000202020001010002
+      0202000101010101000202020001010002020200010101010100020202000101
+      0002020200010101000202020001010002020200010101000202020001010002
+      0202000101010100020200010101000202000101010101010000010101010100
+      000101010101}
+    ButtonSettings.ClosedListButtonPicture.Data = {
+      424DA20400000000000036040000280000000900000009000000010008000000
+      00006C000000C30E0000C30E00000001000000010000427B8400DEEFEF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0001010101000101010100
+      0000010101000200010101000000010100020202000101000000010002020202
+      0200010000000002020200020202000000000002020001000202000000000100
+      0001010100000100000001010101010101010100000001010101010101010100
+      0000}
+    ButtonSettings.CloseButtonHint = 'Close'
+    ButtonSettings.InsertButtonHint = 'Insert new page'
+    ButtonSettings.PageListButtonHint = 'Page List'
+    ButtonSettings.ScrollButtonNextHint = 'Next'
+    ButtonSettings.ScrollButtonPrevHint = 'Previous'
+    ButtonSettings.ScrollButtonFirstHint = 'First'
+    ButtonSettings.ScrollButtonLastHint = 'Last'
+    ButtonSettings.ClosedListButtonHint = 'Closed Pages'
+    ButtonSettings.ButtonSize = 13
+    ButtonSettings.FullHeight = True
+    DoubleBuffered = True
+    TabSettings.ButtonBorder = False
+    TabSettings.Rounding = 0
+    Text = ''
+    ShowShortCutHints = False
+    TabOrder = 3
+    UIStyle = tsOffice2019White
+    NextPictureChanged = False
+    PrevPictureChanged = False
+    TabFontHeight = -11
+    object AdvOfficePager11: TAdvOfficePage
+      Left = 1
+      Top = 26
+      Width = 980
+      Height = 170
+      Caption = 'Memo1'
+      DoubleBuffered = False
+      PageAppearance.BorderColor = clNone
+      PageAppearance.Color = clWhite
+      PageAppearance.ColorTo = clWhite
+      PageAppearance.ColorMirror = clWhite
+      PageAppearance.ColorMirrorTo = clWhite
+      PageAppearance.Gradient = ggVertical
+      PageAppearance.GradientMirror = ggVertical
+      Text = ''
+      TabAppearance.BorderColor = clWhite
+      TabAppearance.BorderColorHot = clNone
+      TabAppearance.BorderColorSelected = clNone
+      TabAppearance.BorderColorSelectedHot = clNone
+      TabAppearance.BorderColorDisabled = clNone
+      TabAppearance.BorderColorDown = clNone
+      TabAppearance.Color = clWhite
+      TabAppearance.ColorTo = clWhite
+      TabAppearance.ColorSelected = clWhite
+      TabAppearance.ColorSelectedTo = clWhite
+      TabAppearance.ColorDisabled = 15658734
+      TabAppearance.ColorDisabledTo = clNone
+      TabAppearance.ColorHot = 16316922
+      TabAppearance.ColorHotTo = 16316922
+      TabAppearance.ColorMirror = clWhite
+      TabAppearance.ColorMirrorTo = clWhite
+      TabAppearance.ColorMirrorHot = 16316922
+      TabAppearance.ColorMirrorHotTo = 16316922
+      TabAppearance.ColorMirrorSelected = clWhite
+      TabAppearance.ColorMirrorSelectedTo = clWhite
+      TabAppearance.ColorMirrorDisabled = 15658734
+      TabAppearance.ColorMirrorDisabledTo = clNone
+      TabAppearance.Font.Charset = DEFAULT_CHARSET
+      TabAppearance.Font.Color = clWindowText
+      TabAppearance.Font.Height = -11
+      TabAppearance.Font.Name = 'Segoe UI'
+      TabAppearance.Font.Style = []
+      TabAppearance.Gradient = ggVertical
+      TabAppearance.GradientMirror = ggVertical
+      TabAppearance.GradientHot = ggVertical
+      TabAppearance.GradientMirrorHot = ggVertical
+      TabAppearance.GradientSelected = ggVertical
+      TabAppearance.GradientMirrorSelected = ggVertical
+      TabAppearance.GradientDisabled = ggVertical
+      TabAppearance.GradientMirrorDisabled = ggVertical
+      TabAppearance.TextColor = 4474440
+      TabAppearance.TextColorHot = 14916384
+      TabAppearance.TextColorSelected = 4474440
+      TabAppearance.TextColorDisabled = 7303023
+      TabAppearance.ShadowColor = clNone
+      TabAppearance.HighLightColor = clNone
+      TabAppearance.HighLightColorHot = clNone
+      TabAppearance.HighLightColorSelected = clNone
+      TabAppearance.HighLightColorSelectedHot = clNone
+      TabAppearance.HighLightColorDown = clNone
+      TabAppearance.DrawLine = True
+      TabAppearance.TextSelectedBold = True
+      TabAppearance.BackGround.Color = clWhite
+      TabAppearance.BackGround.ColorTo = clWhite
+      TabAppearance.BackGround.Direction = gdHorizontal
+      object Memo1: TMemo
+        Left = 2
+        Top = 35
+        Width = 976
+        Height = 133
+        Align = alClient
+        Lines.Strings = (
+          '')
+        ScrollBars = ssVertical
+        TabOrder = 0
+        ExplicitTop = 54
+        ExplicitHeight = 72
+      end
+      object Panel2: TPanel
+        Left = 2
+        Top = 2
+        Width = 976
+        Height = 33
+        Align = alTop
+        TabOrder = 1
+        object Button13: TButton
+          Left = 46
+          Top = 4
+          Width = 87
+          Height = 25
+          Caption = 'Clear Memo'
+          TabOrder = 0
+        end
+      end
+    end
+    object AdvOfficePager12: TAdvOfficePage
+      Left = 1
+      Top = 26
+      Width = 980
+      Height = 170
+      Caption = 'QB API Memo'
+      DoubleBuffered = False
+      PageAppearance.BorderColor = clNone
+      PageAppearance.Color = clWhite
+      PageAppearance.ColorTo = clWhite
+      PageAppearance.ColorMirror = clWhite
+      PageAppearance.ColorMirrorTo = clWhite
+      PageAppearance.Gradient = ggVertical
+      PageAppearance.GradientMirror = ggVertical
+      Text = ''
+      TabAppearance.BorderColor = clWhite
+      TabAppearance.BorderColorHot = clNone
+      TabAppearance.BorderColorSelected = clNone
+      TabAppearance.BorderColorSelectedHot = clNone
+      TabAppearance.BorderColorDisabled = clNone
+      TabAppearance.BorderColorDown = clNone
+      TabAppearance.Color = clWhite
+      TabAppearance.ColorTo = clWhite
+      TabAppearance.ColorSelected = clWhite
+      TabAppearance.ColorSelectedTo = clWhite
+      TabAppearance.ColorDisabled = 15658734
+      TabAppearance.ColorDisabledTo = clNone
+      TabAppearance.ColorHot = 16316922
+      TabAppearance.ColorHotTo = 16316922
+      TabAppearance.ColorMirror = clWhite
+      TabAppearance.ColorMirrorTo = clWhite
+      TabAppearance.ColorMirrorHot = 16316922
+      TabAppearance.ColorMirrorHotTo = 16316922
+      TabAppearance.ColorMirrorSelected = clWhite
+      TabAppearance.ColorMirrorSelectedTo = clWhite
+      TabAppearance.ColorMirrorDisabled = 15658734
+      TabAppearance.ColorMirrorDisabledTo = clNone
+      TabAppearance.Font.Charset = DEFAULT_CHARSET
+      TabAppearance.Font.Color = clWindowText
+      TabAppearance.Font.Height = -11
+      TabAppearance.Font.Name = 'Segoe UI'
+      TabAppearance.Font.Style = []
+      TabAppearance.Gradient = ggVertical
+      TabAppearance.GradientMirror = ggVertical
+      TabAppearance.GradientHot = ggVertical
+      TabAppearance.GradientMirrorHot = ggVertical
+      TabAppearance.GradientSelected = ggVertical
+      TabAppearance.GradientMirrorSelected = ggVertical
+      TabAppearance.GradientDisabled = ggVertical
+      TabAppearance.GradientMirrorDisabled = ggVertical
+      TabAppearance.TextColor = 4474440
+      TabAppearance.TextColorHot = 14916384
+      TabAppearance.TextColorSelected = 4474440
+      TabAppearance.TextColorDisabled = 7303023
+      TabAppearance.ShadowColor = clNone
+      TabAppearance.HighLightColor = clNone
+      TabAppearance.HighLightColorHot = clNone
+      TabAppearance.HighLightColorSelected = clNone
+      TabAppearance.HighLightColorSelectedHot = clNone
+      TabAppearance.HighLightColorDown = clNone
+      TabAppearance.DrawLine = True
+      TabAppearance.TextSelectedBold = True
+      TabAppearance.BackGround.Color = clWhite
+      TabAppearance.BackGround.ColorTo = clWhite
+      TabAppearance.BackGround.Direction = gdHorizontal
+      object Memo2: TMemo
+        Left = 2
+        Top = 35
+        Width = 976
+        Height = 133
+        Align = alClient
+        Lines.Strings = (
+          'Memo2')
+        ScrollBars = ssVertical
+        TabOrder = 0
+        WordWrap = False
+      end
+      object Panel3: TPanel
+        Left = 2
+        Top = 2
+        Width = 976
+        Height = 33
+        Align = alTop
+        TabOrder = 1
+        ExplicitLeft = 4
+        ExplicitTop = 4
+        object Button14: TButton
+          Left = 46
+          Top = 4
+          Width = 87
+          Height = 25
+          Caption = 'Clear Memo'
+          TabOrder = 0
+        end
+      end
+    end
+    object AdvOfficePager13: TAdvOfficePage
+      Left = 1
+      Top = 26
+      Width = 980
+      Height = 170
+      Caption = 'AdvOfficePager13'
+      DoubleBuffered = False
+      PageAppearance.BorderColor = clNone
+      PageAppearance.Color = clWhite
+      PageAppearance.ColorTo = clWhite
+      PageAppearance.ColorMirror = clWhite
+      PageAppearance.ColorMirrorTo = clWhite
+      PageAppearance.Gradient = ggVertical
+      PageAppearance.GradientMirror = ggVertical
+      Text = ''
+      TabAppearance.BorderColor = clWhite
+      TabAppearance.BorderColorHot = clNone
+      TabAppearance.BorderColorSelected = clNone
+      TabAppearance.BorderColorSelectedHot = clNone
+      TabAppearance.BorderColorDisabled = clNone
+      TabAppearance.BorderColorDown = clNone
+      TabAppearance.Color = clWhite
+      TabAppearance.ColorTo = clWhite
+      TabAppearance.ColorSelected = clWhite
+      TabAppearance.ColorSelectedTo = clWhite
+      TabAppearance.ColorDisabled = 15658734
+      TabAppearance.ColorDisabledTo = clNone
+      TabAppearance.ColorHot = 16316922
+      TabAppearance.ColorHotTo = 16316922
+      TabAppearance.ColorMirror = clWhite
+      TabAppearance.ColorMirrorTo = clWhite
+      TabAppearance.ColorMirrorHot = 16316922
+      TabAppearance.ColorMirrorHotTo = 16316922
+      TabAppearance.ColorMirrorSelected = clWhite
+      TabAppearance.ColorMirrorSelectedTo = clWhite
+      TabAppearance.ColorMirrorDisabled = 15658734
+      TabAppearance.ColorMirrorDisabledTo = clNone
+      TabAppearance.Font.Charset = DEFAULT_CHARSET
+      TabAppearance.Font.Color = clWindowText
+      TabAppearance.Font.Height = -11
+      TabAppearance.Font.Name = 'Segoe UI'
+      TabAppearance.Font.Style = []
+      TabAppearance.Gradient = ggVertical
+      TabAppearance.GradientMirror = ggVertical
+      TabAppearance.GradientHot = ggVertical
+      TabAppearance.GradientMirrorHot = ggVertical
+      TabAppearance.GradientSelected = ggVertical
+      TabAppearance.GradientMirrorSelected = ggVertical
+      TabAppearance.GradientDisabled = ggVertical
+      TabAppearance.GradientMirrorDisabled = ggVertical
+      TabAppearance.TextColor = 4474440
+      TabAppearance.TextColorHot = 14916384
+      TabAppearance.TextColorSelected = 4474440
+      TabAppearance.TextColorDisabled = 7303023
+      TabAppearance.ShadowColor = clNone
+      TabAppearance.HighLightColor = clNone
+      TabAppearance.HighLightColorHot = clNone
+      TabAppearance.HighLightColorSelected = clNone
+      TabAppearance.HighLightColorSelectedHot = clNone
+      TabAppearance.HighLightColorDown = clNone
+      TabAppearance.DrawLine = True
+      TabAppearance.TextSelectedBold = True
+      TabAppearance.BackGround.Color = clWhite
+      TabAppearance.BackGround.ColorTo = clWhite
+      TabAppearance.BackGround.Direction = gdHorizontal
+    end
  end
  object uq: TUniQuery
    Connection = ApiDatabase.ucKG

--- a/kgOrdersServer/Source/qbAPI.pas
+++ b/kgOrdersServer/Source/qbAPI.pas
@@ -11,15 +11,12 @@ uses
  System.Hash, Api.Database, Vcl.ExtCtrls, WEBLib.Forms, WEBLib.Controls, WEBLib.StdCtrls,
  WEBLib.ExtCtrls, WEBLib.REST, WEBLib.WebTools,System.Net.HttpClient,
  System.Net.URLClient, System.Net.HttpClientComponent, System.netencoding,
-  IdHTTP, IdSSLOpenSSL, IdSSLOpenSSLHeaders, System.DateUtils, System.IniFiles;
+  IdHTTP, IdSSLOpenSSL, IdSSLOpenSSLHeaders, System.DateUtils, System.IniFiles,
+  AdvPanel, AdvOfficePager;
 type
  TfQB = class(TForm)
-    Button2: TButton;
-    Button3: TButton;
-    Button4: TButton;
-    Button5: TButton;
    uq: TUniQuery;
    uqORDER_ID: TIntegerField;
    uqCOMPANY_ID: TIntegerField;
@@ -106,21 +103,35 @@ type
    uqupc_distortion_percent: TStringField;
    uqupc_distortion_amount: TStringField;
    uqstaff_fields_art_location: TStringField;
-    Memo1: TMemo;
+    Splitter1: TSplitter;
+    Splitter2: TSplitter;
+    AdvPanel1: TAdvPanel;
+    asgData: TAdvStringGrid;
+    Panel1: TPanel;
+    Button2: TButton;
+    Button3: TButton;
+    Button4: TButton;
+    Button5: TButton;
    Button6: TButton;
    Button7: TButton;
    Button1: TButton;
-    Panel1: TPanel;
-    asgData2: TAdvStringGrid;
-    Panel2: TPanel;
-    Splitter1: TSplitter;
-    asgData: TAdvStringGrid;
-    Splitter2: TSplitter;
    Button8: TButton;
    Button9: TButton;
    Button10: TButton;
    Button11: TButton;
    Button12: TButton;
+    AdvPanel2: TAdvPanel;
+    asgData2: TAdvStringGrid;
+    AdvOfficePager1: TAdvOfficePager;
+    AdvOfficePager11: TAdvOfficePage;
+    AdvOfficePager12: TAdvOfficePage;
+    AdvOfficePager13: TAdvOfficePage;
+    Memo1: TMemo;
+    Memo2: TMemo;
+    Panel2: TPanel;
+    Button13: TButton;
+    Panel3: TPanel;
+    Button14: TButton;
    procedure Button1Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);
    procedure Button2Click(Sender: TObject);
@@ -132,8 +143,6 @@ type
    procedure Button7Click(Sender: TObject);
    procedure asgData2ClickCell(Sender: TObject; ARow, ACol: Integer);
    procedure asgDataClickCell(Sender: TObject; ARow, ACol: Integer);
-    procedure Panel1Resize(Sender: TObject);
-    procedure Panel2Resize(Sender: TObject);
    procedure Button8Click(Sender: TObject);
    procedure Button9Click(Sender: TObject);
    procedure Button10Click(Sender: TObject);
@@ -1401,18 +1410,6 @@ begin
  asgData2.AutoSizeColumns(true);
 end;
-procedure TfQB.Panel1Resize(Sender: TObject);
-begin
-  AsgData2.Width := Panel1.ClientWidth;
-  AsgData2.Height := Panel1.ClientHeight;
-end;
-procedure TfQB.Panel2Resize(Sender: TObject);
-begin
-  AsgData.Width := Panel2.ClientWidth;
-  AsgData.Height := Panel2.ClientHeight;
-end;
 procedure tfQB.findMatches(CustomerList: TJSONArray; JSONfield, DBField: string);
 var
  I: integer;

--- a/kgOrdersServer/kgOrdersServer.ini
+++ b/kgOrdersServer/kgOrdersServer.ini
@@ -2,7 +2,7 @@
 MemoLogLevel=3
 FileLogLevel=5
 webClientVersion=0.9.7
-LogFileNum=946
+LogFileNum=950
 [Database]
 Server=192.168.159.155
@@ -14,11 +14,9 @@ Password=emsys01
 --Password=emsys!012
 [Quickbooks]
-CompanyID=9341454272655710 
+CompanyID=9341454336461805 
-ClientID=ABgO14uvjh8XqLud7spQ8lkb98AUpcdA7HbyMJfCAtl65sQ5yy
+ClientID=ABYqlDx1EsacZYXvHIJ7RDB7zmnQdwABU3fwQLIZPmBgU0VW1P
-ClientSecret=bQ06TRemHeAGFzVHRaTUvUoBU9jpU9itK6MOMgqN
+ClientSecret=PM7OnvQWsgOqjWfDpZAnyRttDN9446Am6d85pDxr
-RefreshToken=RT1-222-H0-17626191874vkaap374wzbpuk0lnvh
+RefreshToken=RT1-239-H0-1763040466igs14r2e4bjybwf86uzy
-AccessToken=eyJhbGciOiJkaXIiLCJlbmMiOiJBMTI4Q0JDLUhTMjU2IiwieC5vcmciOiJIMCJ9..0QjLsnLwqTISwro5qh9UsA.-GEQx2lb0_vw3h01Bx77UYf8bzTxuk4QH17BYInZMEm3lTzv5eovx96_AfoVwZdVwrDBQOT2j5aDOWml4-B_Hi3fIHZn95JrPHcx24cP7DXznGWQhW5TNs8mi3Ac5ygFTD8rm6JKWJ_IctpH1rBKfQQAtiBK-AtUoZ6kZK2R9yY_bn8qE-ocUC_G8pXy7l3qkGuQSaLSgxNVdCy3k0ElRE5FiDyakxY4Zye9ha2Z9DIzlDDWVe2N3oA6AN8dXV3oLPtUu0o4ZusoXRUet9Ghroazg0JRf3IfN9oAsUhIojiSDAQ_7XGsctBg1o7ms2YokPL4UIPHEIPfeJq6snS7YR-8UzSQngFCKJhscXmkokvUCLAB2r-xJArDwjJiv-NBaVntVSRhPG3_tjrwekJG3uVWKZeD3w_IwZJduGga1U-rYquswWLWDa04AXYx48eQxy1anNP0R2QMyrJZcNqQx_ivefEA-Z9JmWsDawDWXH4.XI7T7R4DQGJ9vWzyHn7KxQ
+AccessToken=eyJhbGciOiJkaXIiLCJlbmMiOiJBMTI4Q0JDLUhTMjU2IiwieC5vcmciOiJIMCJ9..lXW-FVFOPPAtm-tzjyrE3Q.vWV5cCaLiP03iXblbK5VbosURDrUNsJT5uaKPzzv2S3Nujulxp57ss--nKRVmFBYuwIXxz6VDwh6SqxaECJrR5yysauOcKuz7m22qjOOTPJyaeEhm0u2FLvAODSUpaHN5NDQSgHqBd6_-E-B8gEJeHqDpO3UqxDi9yxy6Px3kyZWXs7InUWYEHtROsPOR_HeJ2vFMhXA5fkifbxCb5bkJOEABoAzrBoLm2QSD6VbV5ydfdrSwfuV--oZ0nvabPS88JurJSbaJyDKCUSmOEt2bnZadhEq88dHMNcOPfqELYSU0dKrzMs-TPYgqeg5wOx_MO0cKkRnSaACCevj-LCYo2YKgxXyYoiNgFIf6Gf4TfLO5is0nh3I0IT14112DBUc7lFwaBCS5m3d_4SCv6sH41rkr01wIPs2o45vGStSgUCuzHQos1UtrEvX96S2NDFt1sYQcNXpFexiTB5Z9WCJgmEH3xuUrkW_d6wzVCD-Src.ZmSj6RCCiDipsvEli9fdLg
-LastRefresh=7/30/2025 12:28:34 PM
+LastRefresh=8/4/2025 9:27:46 AM
--RefreshToken=RT1-10-H0-1760618473k44t73jittvqlr4wynn6