TdvARIV
object TppReport
  AutoStop = False
  DataPipeline = Main
  NoDataBehaviors = [ndBlankReport]
  PassSetting = psTwoPass
  PrinterSetup.BinName = 'Default'
  PrinterSetup.DocumentName = 'Report'
  PrinterSetup.Duplex = dpNone
  PrinterSetup.PaperName = 'Letter'
  PrinterSetup.PrinterName = 'Default'
  PrinterSetup.SaveDeviceSettings = False
  PrinterSetup.mmMarginBottom = 6350
  PrinterSetup.mmMarginLeft = 12700
  PrinterSetup.mmMarginRight = 6350
  PrinterSetup.mmMarginTop = 6350
  PrinterSetup.mmPaperHeight = 279401
  PrinterSetup.mmPaperWidth = 215900
  PrinterSetup.PaperSize = 1
  SaveAsTemplate = True
  Template.DatabaseSettings.Name = '01-CustInvoice-SST'
  Template.DatabaseSettings.NameField = 'Name'
  Template.DatabaseSettings.TemplateField = 'Template'
  Template.SaveTo = stDatabase
  Template.Format = ftASCII
  ArchiveFileName = '($MyDocuments)\ReportArchive.raf'
  DeviceType = 'Screen'
  DefaultFileDeviceType = 'PDF'
  EmailSettings.ReportFormat = 'PDF'
  LanguageID = 'Default'
  OpenFile = False
  OutlineSettings.CreateNode = True
  OutlineSettings.CreatePageNodes = True
  OutlineSettings.Enabled = False
  OutlineSettings.Visible = False
  ThumbnailSettings.Enabled = True
  ThumbnailSettings.Visible = True
  ThumbnailSettings.DeadSpace = 30
  ThumbnailSettings.PageHighlight.Width = 3
  PDFSettings.EmbedFontOptions = [efUseSubset]
  PDFSettings.EncryptSettings.AllowCopy = True
  PDFSettings.EncryptSettings.AllowInteract = True
  PDFSettings.EncryptSettings.AllowModify = True
  PDFSettings.EncryptSettings.AllowPrint = True
  PDFSettings.EncryptSettings.AllowExtract = True
  PDFSettings.EncryptSettings.AllowAssemble = True
  PDFSettings.EncryptSettings.AllowQualityPrint = True
  PDFSettings.EncryptSettings.Enabled = False
  PDFSettings.EncryptSettings.KeyLength = kl40Bit
  PDFSettings.EncryptSettings.EncryptionType = etRC4
  PDFSettings.FontEncoding = feUnicode
  PDFSettings.ImageCompressionLevel = 25
  PDFSettings.PDFAFormat = pafNone
  PreviewFormSettings.PageBorder.mmPadding = 0
  PreviewFormSettings.WindowState = wsMaximized
  PreviewFormSettings.ZoomSetting = zsPageWidth
  RTFSettings.DefaultFont.Charset = DEFAULT_CHARSET
  RTFSettings.DefaultFont.Color = clWindowText
  RTFSettings.DefaultFont.Height = -13
  RTFSettings.DefaultFont.Name = 'Arial'
  RTFSettings.DefaultFont.Style = []
  TextFileName = '($MyDocuments)\Report.pdf'
  TextSearchSettings.DefaultString = '<FindText>'
  TextSearchSettings.Enabled = True
  XLSSettings.AppName = 'ReportBuilder'
  XLSSettings.Author = 'ReportBuilder'
  XLSSettings.ExportComponents = [ecText, ecLine, ecImage, ecRichText, ecBarCode, ecOther]
  XLSSettings.Subject = 'Report'
  XLSSettings.Title = 'Report'
  XLSSettings.WorksheetName = 'Report'
  Version = '19.02'
  mmColumnWidth = 0
  DataPipelineName = 'Main'
  object ppHeaderBand2: TppHeaderBand
    Background.Brush.Style = bsClear
    Border.mmPadding = 0
    PrintHeight = phDynamic
    mmBottomOffset = 0
    mmHeight = 72761
    mmPrintPosition = 0
    object DBRichText1: TppDBRichText
      DesignLayer = ppDesignLayer1
      UserName = 'DBRichText1'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Tahoma'
      Font.Size = 8
      Font.Style = []
      Border.Weight = 1.000000000000000000
      Border.mmPadding = 0
      ExportRTFAsBitmap = False
      DataField = 'Note'
      DataPipeline = Profile
      ParentDataPipeline = False
      RemoveEmptyLines = False
      DataPipelineName = 'Profile'
      mmHeight = 24870
      mmLeft = 27780
      mmTop = 1320
      mmWidth = 144780
      BandType = 0
      LayerName = Foreground
      mmBottomOffset = 0
      mmOverFlowOffset = 0
      mmStopPosition = 0
      mmMinHeight = 0
      mmLeftMargin = 794
    end
    object DBImage1: TppDBImage
      DesignLayer = ppDesignLayer1
      UserName = 'DBImage1'
      AlignHorizontal = ahCenter
      AlignVertical = avCenter
      MaintainAspectRatio = False
      Stretch = True
      Border.Weight = 1.000000000000000000
      Border.mmPadding = 0
      DataField = 'Logo'
      DataPipeline = Profile
      GraphicType = 'JPEG'
      ParentDataPipeline = False
      DataPipelineName = 'Profile'
      mmHeight = 24870
      mmLeft = 2117
      mmTop = 1320
      mmWidth = 25400
      BandType = 0
      LayerName = Foreground
    end
    object Label2: TppLabel
      DesignLayer = ppDesignLayer1
      UserName = 'Label2'
      HyperlinkEnabled = False
      Border.Weight = 1.000000000000000000
      Border.mmPadding = 0
      Caption = 'Invoice No. :'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Tahoma'
      Font.Size = 10
      Font.Style = [fsBold]
      FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost
      FormFieldSettings.FormFieldType = fftNone
      TextAlignment = taRightJustified
      Transparent = True
      mmHeight = 4233
      mmLeft = 135580
      mmTop = 32279
      mmWidth = 22394
      BandType = 0
      LayerName = Foreground
    end
    object DBText1: TppDBText
      DesignLayer = ppDesignLayer1
      UserName = 'DBText1'
      HyperlinkEnabled = False
      AutoSize = True
      Border.Weight = 1.000000000000000000
      Border.mmPadding = 0
      DataField = 'DocNo'
      DataPipeline = Main
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Tahoma'
      Font.Size = 10
      Font.Style = [fsBold]
      Transparent = True
      DataPipelineName = 'Main'
      mmHeight = 4233
      mmLeft = 159279
      mmTop = 32279
      mmWidth = 23918
      BandType = 0
      LayerName = Foreground
    end
    object Label3: TppLabel
      DesignLayer = ppDesignLayer1
      UserName = 'Label3'
      HyperlinkEnabled = False
      Border.Weight = 1.000000000000000000
      Border.mmPadding = 0
      Caption = 'Date :'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Tahoma'
      Font.Size = 10
      Font.Style = []
      FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost
      FormFieldSettings.FormFieldType = fftNone
      TextAlignment = taRightJustified
      Transparent = True
      mmHeight = 4233
      mmLeft = 148347
      mmTop = 38365
      mmWidth = 9610
      BandType = 0
      LayerName = Foreground
    end
    object DBText2: TppDBText
      DesignLayer = ppDesignLayer1
      UserName = 'DBText2'
      HyperlinkEnabled = False
      AutoSize = True
      Border.Weight = 1.000000000000000000
      Border.mmPadding = 0
      DataField = 'DocDate'
      DataPipeline = Main
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Tahoma'
      Font.Size = 10
      Font.Style = []
      Transparent = True
      DataPipelineName = 'Main'
      mmHeight = 4233
      mmLeft = 159279
      mmTop = 38365
      mmWidth = 24172
      BandType = 0
      LayerName = Foreground
    end
    object Label10: TppLabel
      DesignLayer = ppDesignLayer1
      UserName = 'Label10'
      HyperlinkEnabled = False
      Border.Weight = 1.000000000000000000
      Border.mmPadding = 0
      Caption = 'To :'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Tahoma'
      Font.Size = 10
      Font.Style = []
      FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost
      FormFieldSettings.FormFieldType = fftNone
      Transparent = True
      mmHeight = 4233
      mmLeft = 794
      mmTop = 33867
      mmWidth = 6350
      BandType = 0
      LayerName = Foreground
    end
    object DBText3: TppDBText
      DesignLayer = ppDesignLayer1
      UserName = 'DBText3'
      HyperlinkEnabled = False
      Border.Weight = 1.000000000000000000
      Border.mmPadding = 0
      DataField = 'CompanyName'
      DataPipeline = Main
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Tahoma'
      Font.Size = 10
      Font.Style = []
      Transparent = True
      DataPipelineName = 'Main'
      mmHeight = 4233
      mmLeft = 8202
      mmTop = 33867
      mmWidth = 95250
      BandType = 0
      LayerName = Foreground
    end
    object Region1: TppRegion
      DesignLayer = ppDesignLayer1
      UserName = 'Region1'
      Brush.Style = bsClear
      Caption = 'Region1'
      ParentWidth = True
      Pen.Style = psClear
      Transparent = True
      mmHeight = 7408
      mmLeft = 0
      mmTop = 65348
      mmWidth = 196850
      BandType = 0
      LayerName = Foreground
      mmBottomOffset = 0
      mmOverFlowOffset = 0
      mmStopPosition = 0
      mmMinHeight = 0
      object Line1: TppLine
        DesignLayer = ppDesignLayer1
        UserName = 'Line1'
        Border.Weight = 1.000000000000000000
        Border.mmPadding = 0
        ParentWidth = True
        Weight = 0.750000000000000000
        mmHeight = 1588
        mmLeft = 0
        mmTop = 66671
        mmWidth = 196850
        BandType = 0
        LayerName = Foreground
      end
      object Line3: TppLine
        DesignLayer = ppDesignLayer1
        UserName = 'Line3'
        Border.Weight = 1.000000000000000000
        Border.mmPadding = 0
        Position = lpLeft
        Weight = 0.750000000000000000
        mmHeight = 5027
        mmLeft = 25665
        mmTop = 66671
        mmWidth = 2117
        BandType = 0
        LayerName = Foreground
      end
      object Line4: TppLine
        DesignLayer = ppDesignLayer1
        UserName = 'Line4'
        Border.Weight = 1.000000000000000000
        Border.mmPadding = 0
        Position = lpLeft
        Weight = 0.750000000000000000
        mmHeight = 5027
        mmLeft = 157427
        mmTop = 66671
        mmWidth = 2117
        BandType = 0
        LayerName = Foreground
      end
      object Label14: TppLabel
        DesignLayer = ppDesignLayer1
        UserName = 'lbAmt'
        HyperlinkEnabled = False
        AutoSize = False
        Border.Weight = 1.000000000000000000
        Border.mmPadding = 0
        Caption = 'Amount'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Tahoma'
        Font.Size = 8
        Font.Style = []
        FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost
        FormFieldSettings.FormFieldType = fftNone
        TextAlignment = taRightJustified
        Transparent = True
        mmHeight = 3440
        mmLeft = 164836
        mmTop = 67571
        mmWidth = 25400
        BandType = 0
        LayerName = Foreground
      end
      object Label15: TppLabel
        DesignLayer = ppDesignLayer1
        UserName = 'Label15'
        HyperlinkEnabled = False
        Border.Weight = 1.000000000000000000
        Border.mmPadding = 0
        Caption = 'Description'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Tahoma'
        Font.Size = 8
        Font.Style = []
        FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost
        FormFieldSettings.FormFieldType = fftNone
        Transparent = True
        mmHeight = 3387
        mmLeft = 83609
        mmTop = 67465
        mmWidth = 14111
        BandType = 0
        LayerName = Foreground
      end
      object Label16: TppLabel
        DesignLayer = ppDesignLayer1
        UserName = 'Label16'
        HyperlinkEnabled = False
        Border.Weight = 1.000000000000000000
        Border.mmPadding = 0
        Caption = 'A/C'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Tahoma'
        Font.Size = 8
        Font.Style = []
        FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost
        FormFieldSettings.FormFieldType = fftNone
        Transparent = True
        mmHeight = 3440
        mmLeft = 10584
        mmTop = 67465
        mmWidth = 4763
        BandType = 0
        LayerName = Foreground
      end
      object ppLine1: TppLine
        DesignLayer = ppDesignLayer1
        UserName = 'Line6'
        Border.Weight = 1.000000000000000000
        Border.mmPadding = 0
        ParentWidth = True
        Position = lpBottom
        Weight = 0.750000000000000000
        mmHeight = 1852
        mmLeft = 0
        mmTop = 70111
        mmWidth = 196850
        BandType = 0
        LayerName = Foreground
      end
    end
    object ppSystemVariable1: TppSystemVariable
      DesignLayer = ppDesignLayer1
      UserName = 'SysVarPgNo'
      HyperlinkEnabled = False
      Border.Weight = 1.000000000000000000
      Border.mmPadding = 0
      VarType = vtPageSetDesc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Tahoma'
      Font.Size = 10
      Font.Style = []
      Transparent = True
      mmHeight = 4233
      mmLeft = 150813
      mmTop = 52388
      mmWidth = 17738
      BandType = 0
      LayerName = Foreground
    end
    object ppLabel1: TppLabel
      DesignLayer = ppDesignLayer1
      UserName = 'lbAdd1'
      HyperlinkEnabled = False
      AutoSize = False
      Border.Weight = 1.000000000000000000
      Border.mmPadding = 0
      Caption = 'lbAdd1'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Tahoma'
      Font.Size = 10
      Font.Style = []
      FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost
      FormFieldSettings.FormFieldType = fftNone
      Transparent = True
      mmHeight = 4233
      mmLeft = 8202
      mmTop = 38365
      mmWidth = 95250
      BandType = 0
      LayerName = Foreground
    end
    object ppLabel2: TppLabel
      DesignLayer = ppDesignLayer1
      UserName = 'lbAddr2'
      HyperlinkEnabled = False
      AutoSize = False
      Border.Weight = 1.000000000000000000
      Border.mmPadding = 0
      Caption = 'lbAdd2'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Tahoma'
      Font.Size = 10
      Font.Style = []
      FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost
      FormFieldSettings.FormFieldType = fftNone
      Transparent = True
      mmHeight = 4233
      mmLeft = 8202
      mmTop = 43127
      mmWidth = 95250
      BandType = 0
      LayerName = Foreground
    end
    object ppLabel3: TppLabel
      DesignLayer = ppDesignLayer1
      UserName = 'lbAddr3'
      HyperlinkEnabled = False
      AutoSize = False
      Border.Weight = 1.000000000000000000
      Border.mmPadding = 0
      Caption = 'lbAdd3'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Tahoma'
      Font.Size = 10
      Font.Style = []
      FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost
      FormFieldSettings.FormFieldType = fftNone
      Transparent = True
      mmHeight = 4233
      mmLeft = 8202
      mmTop = 47890
      mmWidth = 95250
      BandType = 0
      LayerName = Foreground
    end
    object ppLabel4: TppLabel
      DesignLayer = ppDesignLayer1
      UserName = 'lbAddr4'
      HyperlinkEnabled = False
      AutoSize = False
      Border.Weight = 1.000000000000000000
      Border.mmPadding = 0
      Caption = 'lbAdd4'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Tahoma'
      Font.Size = 10
      Font.Style = []
      FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost
      FormFieldSettings.FormFieldType = fftNone
      Transparent = True
      mmHeight = 4233
      mmLeft = 8202
      mmTop = 52388
      mmWidth = 95250
      BandType = 0
      LayerName = Foreground
    end
    object ppLabel5: TppLabel
      DesignLayer = ppDesignLayer1
      UserName = 'lbPhone1nFax1'
      HyperlinkEnabled = False
      Border.Weight = 1.000000000000000000
      Border.mmPadding = 0
      Caption = 'lbPhone1nFax1'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Tahoma'
      Font.Size = 10
      Font.Style = []
      FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost
      FormFieldSettings.FormFieldType = fftNone
      Transparent = True
      mmHeight = 4233
      mmLeft = 8202
      mmTop = 60854
      mmWidth = 23537
      BandType = 0
      LayerName = Foreground
    end
    object ppLabel6: TppLabel
      DesignLayer = ppDesignLayer1
      UserName = 'Label6'
      HyperlinkEnabled = False
      Border.Weight = 1.000000000000000000
      Border.mmPadding = 0
      Caption = 'Account :'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Tahoma'
      Font.Size = 10
      Font.Style = []
      FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost
      FormFieldSettings.FormFieldType = fftNone
      TextAlignment = taRightJustified
      Transparent = True
      mmHeight = 4233
      mmLeft = 143309
      mmTop = 43127
      mmWidth = 14647
      BandType = 0
      LayerName = Foreground
    end
    object ppDBText1: TppDBText
      DesignLayer = ppDesignLayer1
      UserName = 'DBText4'
      HyperlinkEnabled = False
      AutoSize = True
      Border.Weight = 1.000000000000000000
      Border.mmPadding = 0
      DataField = 'Code'
      DataPipeline = Main
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Tahoma'
      Font.Size = 10
      Font.Style = []
      Transparent = True
      DataPipelineName = 'Main'
      mmHeight = 4233
      mmLeft = 159279
      mmTop = 43127
      mmWidth = 7832
      BandType = 0
      LayerName = Foreground
    end
    object ppLabel7: TppLabel
      DesignLayer = ppDesignLayer1
      UserName = 'Label7'
      HyperlinkEnabled = False
      Border.Weight = 1.000000000000000000
      Border.mmPadding = 0
      Caption = 'Terms :'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Tahoma'
      Font.Size = 10
      Font.Style = []
      FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost
      FormFieldSettings.FormFieldType = fftNone
      TextAlignment = taRightJustified
      Transparent = True
      mmHeight = 4233
      mmLeft = 145934
      mmTop = 47890
      mmWidth = 12023
      BandType = 0
      LayerName = Foreground
    end
    object ppDBText2: TppDBText
      DesignLayer = ppDesignLayer1
      UserName = 'DBText5'
      HyperlinkEnabled = False
      AutoSize = True
      Border.Weight = 1.000000000000000000
      Border.mmPadding = 0
      DataField = 'Terms'
      DataPipeline = Main
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Tahoma'
      Font.Size = 10
      Font.Style = []
      ParentDataPipeline = False
      Transparent = True
      DataPipelineName = 'Main'
      mmHeight = 4233
      mmLeft = 159279
      mmTop = 47890
      mmWidth = 9694
      BandType = 0
      LayerName = Foreground
    end
    object ppLabel8: TppLabel
      DesignLayer = ppDesignLayer1
      UserName = 'lbAttn'
      HyperlinkEnabled = False
      Border.Weight = 1.000000000000000000
      Border.mmPadding = 0
      Caption = 'lbAttn'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Tahoma'
      Font.Size = 10
      Font.Style = []
      FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost
      FormFieldSettings.FormFieldType = fftNone
      Transparent = True
      mmHeight = 4233
      mmLeft = 8202
      mmTop = 56886
      mmWidth = 9186
      BandType = 0
      LayerName = Foreground
    end
    object ppLabel11: TppLabel
      DesignLayer = ppDesignLayer1
      UserName = 'Label4'
      Border.mmPadding = 0
      Caption = 'Invoice'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Name = 'Tahoma'
      Font.Size = 16
      Font.Style = [fsBold]
      FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost
      FormFieldSettings.FormFieldType = fftNone
      Transparent = True
      mmHeight = 6614
      mmLeft = 82286
      mmTop = 27517
      mmWidth = 20373
      BandType = 0
      LayerName = Foreground
    end
  end
  object ppDetailBand2: TppDetailBand
    Background1.Brush.Style = bsClear
    Background2.Brush.Style = bsClear
    Border.mmPadding = 0
    PrintHeight = phDynamic
    mmBottomOffset = 0
    mmHeight = 5027
    mmPrintPosition = 0
    object ppSubReport2: TppSubReport
      DesignLayer = ppDesignLayer1
      UserName = 'SubReport2'
      ExpandAll = False
      NewPrintJob = False
      OutlineSettings.CreateNode = True
      TraverseAllData = False
      DataPipelineName = 'Document_Detail'
      mmHeight = 5027
      mmLeft = 0
      mmTop = 0
      mmWidth = 196850
      BandType = 4
      LayerName = Foreground
      mmBottomOffset = 0
      mmOverFlowOffset = 0
      mmStopPosition = 0
      mmMinHeight = 0
      object ppChildReport2: TppChildReport
        AutoStop = False
        DataPipeline = Document_Detail
        PrinterSetup.BinName = 'Default'
        PrinterSetup.DocumentName = 'Report'
        PrinterSetup.Duplex = dpNone
        PrinterSetup.PaperName = 'Letter'
        PrinterSetup.PrinterName = 'Default'
        PrinterSetup.SaveDeviceSettings = False
        PrinterSetup.mmMarginBottom = 6350
        PrinterSetup.mmMarginLeft = 12700
        PrinterSetup.mmMarginRight = 6350
        PrinterSetup.mmMarginTop = 6350
        PrinterSetup.mmPaperHeight = 279401
        PrinterSetup.mmPaperWidth = 215900
        PrinterSetup.PaperSize = 1
        Template.DatabaseSettings.NameField = 'ReportName'
        Template.DatabaseSettings.TemplateField = 'Template'
        Template.Offset = 9
        Template.SaveTo = stDatabase
        Template.Format = ftASCII
        Version = '19.02'
        mmColumnWidth = 0
        DataPipelineName = 'Document_Detail'
        object ppDetailBand4: TppDetailBand
          Background1.Brush.Style = bsClear
          Background2.Brush.Style = bsClear
          Border.mmPadding = 0
          PrintHeight = phDynamic
          mmBottomOffset = 0
          mmHeight = 3969
          mmPrintPosition = 0
          object DBText7: TppDBText
            DesignLayer = ppDesignLayer2
            UserName = 'DBText7'
            HyperlinkEnabled = False
            AutoSize = True
            Border.Weight = 1.000000000000000000
            Border.mmPadding = 0
            DataField = 'Account'
            DataPipeline = Document_Detail
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Name = 'Tahoma'
            Font.Size = 9
            Font.Style = []
            ParentDataPipeline = False
            TextAlignment = taCentered
            Transparent = True
            DataPipelineName = 'Document_Detail'
            mmHeight = 3704
            mmLeft = 9869
            mmTop = 0
            mmWidth = 11218
            BandType = 4
            LayerName = Foreground1
          end
          object DBText9: TppDBText
            DesignLayer = ppDesignLayer2
            UserName = 'DBText9'
            HyperlinkEnabled = False
            Border.Weight = 1.000000000000000000
            Border.mmPadding = 0
            DataField = 'Amount'
            DataPipeline = Document_Detail
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Name = 'Tahoma'
            Font.Size = 9
            Font.Style = []
            ParentDataPipeline = False
            TextAlignment = taRightJustified
            Transparent = True
            DataPipelineName = 'Document_Detail'
            mmHeight = 3810
            mmLeft = 164571
            mmTop = 0
            mmWidth = 25400
            BandType = 4
            LayerName = Foreground1
          end
          object DBMemo1: TppDBMemo
            DesignLayer = ppDesignLayer2
            UserName = 'DBMemo1'
            Border.Weight = 1.000000000000000000
            Border.mmPadding = 0
            CharWrap = False
            DataField = 'Description'
            DataPipeline = Document_Detail
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Name = 'Tahoma'
            Font.Size = 9
            Font.Style = []
            RemoveEmptyLines = False
            Stretch = True
            Transparent = True
            DataPipelineName = 'Document_Detail'
            mmHeight = 3969
            mmLeft = 27781
            mmTop = 0
            mmWidth = 130704
            BandType = 4
            LayerName = Foreground1
            mmBottomOffset = 0
            mmOverFlowOffset = 0
            mmStopPosition = 0
            mmMinHeight = 0
            mmLeading = 0
          end
        end
        object raCodeModule2: TraCodeModule
        end
        object ppDesignLayers2: TppDesignLayers
          object ppDesignLayer2: TppDesignLayer
            UserName = 'Foreground1'
            LayerType = ltBanded
            Index = 0
          end
        end
      end
    end
  end
  object ppFooterBand2: TppFooterBand
    Background.Brush.Style = bsClear
    Border.mmPadding = 0
    mmBottomOffset = 0
    mmHeight = 6350
    mmPrintPosition = 0
  end
  object ppGroup1: TppGroup
    BreakName = 'DocNo'
    DataPipeline = Main
    GroupFileSettings.NewFile = False
    GroupFileSettings.EmailFile = False
    OutlineSettings.CreateNode = True
    NewPage = True
    ResetPageNo = True
    StartOnOddPage = False
    UserName = 'Group1'
    mmNewColumnThreshold = 0
    mmNewPageThreshold = 0
    DataPipelineName = 'Main'
    NewFile = False
    object ppGroupHeaderBand1: TppGroupHeaderBand
      Background.Brush.Style = bsClear
      Border.mmPadding = 0
      PrintHeight = phDynamic
      mmBottomOffset = 0
      mmHeight = 0
      mmPrintPosition = 0
    end
    object ppGroupFooterBand1: TppGroupFooterBand
      Background.Brush.Style = bsClear
      Border.mmPadding = 0
      PrintHeight = phDynamic
      HideWhenOneDetail = False
      mmBottomOffset = 0
      mmHeight = 48419
      mmPrintPosition = 215900
      object Line5: TppLine
        DesignLayer = ppDesignLayer1
        UserName = 'Line5'
        Border.Weight = 1.000000000000000000
        Border.mmPadding = 0
        ParentWidth = True
        Weight = 0.750000000000000000
        mmHeight = 1852
        mmLeft = 0
        mmTop = 1058
        mmWidth = 196850
        BandType = 5
        GroupNo = 0
        LayerName = Foreground
      end
      object Line7: TppLine
        DesignLayer = ppDesignLayer1
        UserName = 'Line7'
        Border.Weight = 1.000000000000000000
        Border.mmPadding = 0
        Pen.Width = 2
        Weight = 1.500000000000000000
        mmHeight = 529
        mmLeft = 3175
        mmTop = 43392
        mmWidth = 65617
        BandType = 5
        GroupNo = 0
        LayerName = Foreground
      end
      object ppVariable2: TppVariable
        DesignLayer = ppDesignLayer1
        UserName = 'Variable2'
        HyperlinkEnabled = False
        Border.Weight = 1.000000000000000000
        Border.mmPadding = 0
        BlankWhenZero = False
        CalcOrder = 0
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Tahoma'
        Font.Size = 10
        Font.Style = []
        Transparent = True
        mmHeight = 4233
        mmLeft = 3175
        mmTop = 44186
        mmWidth = 14436
        BandType = 5
        GroupNo = 0
        LayerName = Foreground
      end
      object ppVariable1: TppVariable
        DesignLayer = ppDesignLayer1
        UserName = 'Variable1'
        HyperlinkEnabled = False
        AutoSize = False
        Border.Weight = 1.000000000000000000
        Border.mmPadding = 0
        BlankWhenZero = False
        CalcOrder = 1
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Tahoma'
        Font.Size = 10
        Font.Style = []
        Transparent = True
        WordWrap = True
        mmHeight = 8731
        mmLeft = 3175
        mmTop = 1852
        mmWidth = 134938
        BandType = 5
        GroupNo = 0
        LayerName = Foreground
      end
      object Memo2: TppMemo
        DesignLayer = ppDesignLayer1
        UserName = 'Memo2'
        Border.Weight = 1.000000000000000000
        Border.mmPadding = 0
        Caption = 'Memo2'
        CharWrap = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Tahoma'
        Font.Size = 10
        Font.Style = []
        Lines.Strings = (
          'All cheques should be crossed and made payable to ')
        RemoveEmptyLines = False
        Transparent = True
        mmHeight = 5027
        mmLeft = 3175
        mmTop = 11113
        mmWidth = 75142
        BandType = 5
        GroupNo = 0
        LayerName = Foreground
        mmBottomOffset = 0
        mmOverFlowOffset = 0
        mmStopPosition = 0
        mmMinHeight = 0
        mmLeading = 0
      end
      object DBText21: TppDBText
        DesignLayer = ppDesignLayer1
        UserName = 'DBText21'
        HyperlinkEnabled = False
        AutoSize = True
        Border.Weight = 1.000000000000000000
        Border.mmPadding = 0
        DataField = 'CompanyName'
        DataPipeline = Profile
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Tahoma'
        Font.Size = 10
        Font.Style = []
        ParentDataPipeline = False
        Transparent = True
        DataPipelineName = 'Profile'
        mmHeight = 4233
        mmLeft = 6615
        mmTop = 15875
        mmWidth = 24596
        BandType = 5
        GroupNo = 0
        LayerName = Foreground
      end
      object ppShape1: TppShape
        DesignLayer = ppDesignLayer1
        UserName = 'Shape1'
        mmHeight = 15875
        mmLeft = 158750
        mmTop = 1852
        mmWidth = 38100
        BandType = 5
        GroupNo = 0
        LayerName = Foreground
      end
      object Label17: TppLabel
        DesignLayer = ppDesignLayer1
        UserName = 'lbgross'
        HyperlinkEnabled = False
        Border.Weight = 1.000000000000000000
        Border.mmPadding = 0
        Caption = 'Gross'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Tahoma'
        Font.Size = 9
        Font.Style = []
        FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost
        FormFieldSettings.FormFieldType = fftNone
        Transparent = True
        mmHeight = 3951
        mmLeft = 139436
        mmTop = 2381
        mmWidth = 7761
        BandType = 5
        GroupNo = 0
        LayerName = Foreground
      end
      object DBText10: TppDBText
        DesignLayer = ppDesignLayer1
        UserName = 'DBText10'
        HyperlinkEnabled = False
        Border.Weight = 1.000000000000000000
        Border.mmPadding = 0
        DataField = 'DocAmt'
        DataPipeline = Main
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Tahoma'
        Font.Size = 9
        Font.Style = [fsBold]
        TextAlignment = taRightJustified
        Transparent = True
        DataPipelineName = 'Main'
        mmHeight = 3951
        mmLeft = 172244
        mmTop = 12700
        mmWidth = 19050
        BandType = 5
        GroupNo = 0
        LayerName = Foreground
      end
      object ppLabel9: TppLabel
        DesignLayer = ppDesignLayer1
        UserName = 'Label1'
        Border.mmPadding = 0
        Caption = 'Tax Amt'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Tahoma'
        Font.Size = 9
        Font.Style = []
        FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost
        FormFieldSettings.FormFieldType = fftNone
        Transparent = True
        mmHeight = 3704
        mmLeft = 139436
        mmTop = 6879
        mmWidth = 12435
        BandType = 5
        GroupNo = 0
        LayerName = Foreground
      end
      object ppVariable3: TppVariable
        DesignLayer = ppDesignLayer1
        UserName = 'VarTax'
        Border.mmPadding = 0
        BlankWhenZero = False
        CalcOrder = 2
        DataType = dtDouble
        DisplayFormat = '#,0.00;-#,0.00'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Tahoma'
        Font.Size = 9
        Font.Style = []
        TextAlignment = taRightJustified
        Transparent = True
        mmHeight = 3951
        mmLeft = 181505
        mmTop = 6879
        mmWidth = 9878
        BandType = 5
        GroupNo = 0
        LayerName = Foreground
      end
      object ppVariable4: TppVariable
        DesignLayer = ppDesignLayer1
        UserName = 'varGross'
        Border.mmPadding = 0
        BlankWhenZero = False
        CalcOrder = 3
        DataType = dtDouble
        DisplayFormat = '#,0.00;-#,0.00'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Tahoma'
        Font.Size = 9
        Font.Style = []
        TextAlignment = taRightJustified
        Transparent = True
        mmHeight = 3951
        mmLeft = 179123
        mmTop = 2381
        mmWidth = 12136
        BandType = 5
        GroupNo = 0
        LayerName = Foreground
      end
      object ppLabel10: TppLabel
        DesignLayer = ppDesignLayer1
        UserName = 'LbTotal'
        Border.mmPadding = 0
        Caption = 'Total'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Tahoma'
        Font.Size = 9
        Font.Style = [fsBold]
        FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost
        FormFieldSettings.FormFieldType = fftNone
        Transparent = True
        mmHeight = 3951
        mmLeft = 139436
        mmTop = 12700
        mmWidth = 8326
        BandType = 5
        GroupNo = 0
        LayerName = Foreground
      end
      object ppLine2: TppLine
        DesignLayer = ppDesignLayer1
        UserName = 'Line2'
        Border.mmPadding = 0
        Weight = 0.750000000000000000
        mmHeight = 1852
        mmLeft = 158750
        mmTop = 11906
        mmWidth = 38100
        BandType = 5
        GroupNo = 0
        LayerName = Foreground
      end
    end
  end
  object raCodeModule3: TraCodeModule
    object raProgramInfo1: TraProgramInfo
      raClassName = 'TraVarProgram'
      raProgram.ChildType = 17
      raProgram.ProgramName = 'Variables'
      raProgram.ProgramType = ttProcedure
      raProgram.Source = 'procedure Variables;'#13#10'var'#13#10'  s: String;  '#13#10'begin'#13#10#13#10'end;'#13#10
    end
    object raProgramInfo2: TraProgramInfo
      raClassName = 'TraEventHandler'
      raProgram.ProgramName = 'Variable1OnCalc'
      raProgram.ProgramType = ttProcedure
      raProgram.Source = 
        'procedure Variable1OnCalc(var Value: Variant);'#13#10'begin'#13#10#13#10'  Value' +
        ' := Document_Currency.GetFieldValue('#39'Description'#39');'#13#10'  Value := ' +
        'Value + '#39' : '#39' + CurrencyToEngWord(Main.GetFieldValue('#39'DocAmt'#39')) ' +
        '+ '#39' ONLY'#39';'#13#10'end;'#13#10
      raProgram.ComponentName = 'Variable1'
      raProgram.EventName = 'OnCalc'
      raProgram.EventID = 33
    end
    object raProgramInfo3: TraProgramInfo
      raClassName = 'TraEventHandler'
      raProgram.ProgramName = 'lbAmtOnGetText'
      raProgram.ProgramType = ttProcedure
      raProgram.Source = 
        'procedure lbAmtOnGetText(var Text: String);'#13#10'begin'#13#10#13#10'  Text := ' +
        ' '#39'Amount ('#39' + Document_Currency.GetFieldValue('#39'Symbol'#39') + '#39')'#39';'#13#10 +
        #13#10'end;'#13#10
      raProgram.ComponentName = 'lbAmt'
      raProgram.EventName = 'OnGetText'
      raProgram.EventID = 53
    end
    object raProgramInfo4: TraProgramInfo
      raClassName = 'TraEventHandler'
      raProgram.ProgramName = 'Variable2OnCalc'
      raProgram.ProgramType = ttProcedure
      raProgram.Source = 
        'procedure Variable2OnCalc(var Value: Variant);'#13#10'begin'#13#10#13#10'  Value' +
        ' := '#39'For '#39' + Profile.GetFieldValue('#39'CompanyName'#39');'#13#10'end;'#13#10
      raProgram.ComponentName = 'Variable2'
      raProgram.EventName = 'OnCalc'
      raProgram.EventID = 33
    end
    object raProgramInfo5: TraProgramInfo
      raClassName = 'TraEventHandler'
      raProgram.ProgramName = 'SysVarPgNoOnPrint'
      raProgram.ProgramType = ttProcedure
      raProgram.Source = 
        'procedure SysVarPgNoOnPrint;'#13#10'begin'#13#10'  SysVarPgNo.Visible:= SysV' +
        'arPgNo.Text <> '#39'Page 1 of 1'#39' ;'#13#10'end;'#13#10
      raProgram.ComponentName = 'SysVarPgNo'
      raProgram.EventName = 'OnPrint'
      raProgram.EventID = 32
    end
    object raProgramInfo6: TraProgramInfo
      raClassName = 'TraEventHandler'
      raProgram.ProgramName = 'lbAdd1OnGetText'
      raProgram.ProgramType = ttProcedure
      raProgram.Source = 
        'procedure lbAdd1OnGetText(var Text: String);'#13#10'begin'#13#10'  s := '#39'SEL' +
        'ECT Address1 FROM AR_CUSTOMERBRANCH '#39' +'#13#10'        '#39'WHERE BranchTy' +
        'pe='#39#39'B'#39#39' '#39' +'#13#10'          '#39'AND CODE='#39#39#39' + Main.GetFieldValue('#39'Code' +
        #39') +  '#39#39#39#39';'#13#10'  Text := DBSQL_GetFieldValue(s);'#13#10'end;'#13#10
      raProgram.ComponentName = 'lbAdd1'
      raProgram.EventName = 'OnGetText'
      raProgram.EventID = 53
    end
    object raProgramInfo7: TraProgramInfo
      raClassName = 'TraEventHandler'
      raProgram.ProgramName = 'lbAddr2OnGetText'
      raProgram.ProgramType = ttProcedure
      raProgram.Source = 
        'procedure lbAddr2OnGetText(var Text: String);'#13#10'begin'#13#10'  s := '#39'SE' +
        'LECT Address2 FROM AR_CUSTOMERBRANCH '#39' +'#13#10'        '#39'WHERE BranchT' +
        'ype='#39#39'B'#39#39' '#39' +'#13#10'          '#39'AND CODE='#39#39#39' + Main.GetFieldValue('#39'Cod' +
        'e'#39') +  '#39#39#39#39';'#13#10'  Text := DBSQL_GetFieldValue(s);'#13#10'end;'#13#10
      raProgram.ComponentName = 'lbAddr2'
      raProgram.EventName = 'OnGetText'
      raProgram.EventID = 53
    end
    object raProgramInfo8: TraProgramInfo
      raClassName = 'TraEventHandler'
      raProgram.ProgramName = 'lbAddr3OnGetText'
      raProgram.ProgramType = ttProcedure
      raProgram.Source = 
        'procedure lbAddr3OnGetText(var Text: String);'#13#10'begin'#13#10'  s := '#39'SE' +
        'LECT Address3 FROM AR_CUSTOMERBRANCH '#39' +'#13#10'        '#39'WHERE BranchT' +
        'ype='#39#39'B'#39#39' '#39' +'#13#10'          '#39'AND CODE='#39#39#39' + Main.GetFieldValue('#39'Cod' +
        'e'#39') +  '#39#39#39#39';'#13#10'  Text := DBSQL_GetFieldValue(s);'#13#10'end;'#13#10
      raProgram.ComponentName = 'lbAddr3'
      raProgram.EventName = 'OnGetText'
      raProgram.EventID = 53
    end
    object raProgramInfo9: TraProgramInfo
      raClassName = 'TraEventHandler'
      raProgram.ProgramName = 'lbAddr4OnGetText'
      raProgram.ProgramType = ttProcedure
      raProgram.Source = 
        'procedure lbAddr4OnGetText(var Text: String);'#13#10'begin'#13#10'  s := '#39'SE' +
        'LECT Address4 FROM AR_CUSTOMERBRANCH '#39' +'#13#10'        '#39'WHERE BranchT' +
        'ype='#39#39'B'#39#39' '#39' +'#13#10'          '#39'AND CODE='#39#39#39' + Main.GetFieldValue('#39'Cod' +
        'e'#39') +  '#39#39#39#39';'#13#10'  Text := DBSQL_GetFieldValue(s);'#13#10'end;'#13#10
      raProgram.ComponentName = 'lbAddr4'
      raProgram.EventName = 'OnGetText'
      raProgram.EventID = 53
    end
    object raProgramInfo10: TraProgramInfo
      raClassName = 'TraEventHandler'
      raProgram.ProgramName = 'lbPhone1nFax1OnGetText'
      raProgram.ProgramType = ttProcedure
      raProgram.Source = 
        'procedure lbPhone1nFax1OnGetText(var Text: String);'#13#10'var s1 : St' +
        'ring;'#13#10'begin'#13#10'  s := '#39'SELECT Phone1 FROM AR_CUSTOMERBRANCH '#39' +'#13#10 +
        '        '#39'WHERE BranchType='#39#39'B'#39#39' '#39' +'#13#10'          '#39'AND CODE='#39#39#39' + M' +
        'ain.GetFieldValue('#39'Code'#39') +  '#39#39#39#39';'#13#10'  s1 := '#39'SELECT Fax1 FROM AR' +
        '_CUSTOMERBRANCH '#39' +'#13#10'        '#39'WHERE BranchType='#39#39'B'#39#39' '#39' +'#13#10'      ' +
        '    '#39'AND CODE='#39#39#39' + Main.GetFieldValue('#39'Code'#39') +  '#39#39#39#39';'#13#10'       ' +
        '   '#13#10'  Text := '#39'Tel : '#39' + DBSQL_GetFieldValue(s) + '#39'    Fax : '#39' ' +
        '+'#13#10#9#9'DBSQL_GetFieldValue(s1);'#13#10'end;'#13#10
      raProgram.ComponentName = 'lbPhone1nFax1'
      raProgram.EventName = 'OnGetText'
      raProgram.EventID = 53
    end
    object raProgramInfo11: TraProgramInfo
      raClassName = 'TraEventHandler'
      raProgram.ProgramName = 'lbAttnOnGetText'
      raProgram.ProgramType = ttProcedure
      raProgram.Source = 
        'procedure lbAttnOnGetText(var Text: String);'#13#10'begin'#13#10'  s := '#39'SEL' +
        'ECT Attention FROM AR_CUSTOMERBRANCH '#39' +'#13#10'        '#39'WHERE BranchT' +
        'ype='#39#39'B'#39#39' '#39' +'#13#10'          '#39'AND CODE='#39#39#39' + Main.GetFieldValue('#39'Cod' +
        'e'#39') +  '#39#39#39#39';'#13#10'  Text := '#39'Attn : '#39' + DBSQL_GetFieldValue(s);'#13#10'end' +
        ';'#13#10
      raProgram.ComponentName = 'lbAttn'
      raProgram.EventName = 'OnGetText'
      raProgram.EventID = 53
    end
    object raProgramInfo12: TraProgramInfo
      raClassName = 'TraEventHandler'
      raProgram.ProgramName = 'varGrossOnCalc'
      raProgram.ProgramType = ttProcedure
      raProgram.Source = 
        'procedure varGrossOnCalc(var Value: Variant);'#13#10'begin'#13#10#13#10'  Value ' +
        ':= Main.GetFieldValue('#39'DocAmt'#39') - VarTax.Value; '#13#10#13#10'end;'#13#10
      raProgram.ComponentName = 'varGross'
      raProgram.EventName = 'OnCalc'
      raProgram.EventID = 33
    end
    object raProgramInfo13: TraProgramInfo
      raClassName = 'TraEventHandler'
      raProgram.ProgramName = 'VarTaxOnCalc'
      raProgram.ProgramType = ttProcedure
      raProgram.Source = 
        'procedure VarTaxOnCalc(var Value: Variant);'#13#10'begin'#13#10#13#10'  Value :=' +
        ' GetAggregateValue(agSUM, Document_Detail, '#39'DocKey'#39', '#39'TaxAmt'#39'); ' +
        #13#10#13#10'end;'#13#10
      raProgram.ComponentName = 'VarTax'
      raProgram.EventName = 'OnCalc'
      raProgram.EventID = 33
    end
    object raProgramInfo14: TraProgramInfo
      raClassName = 'TraEventHandler'
      raProgram.ProgramName = 'lbgrossOnGetText'
      raProgram.ProgramType = ttProcedure
      raProgram.Source = 
        'procedure lbgrossOnGetText(var Text: String);'#13#10'begin'#13#10#13#10'  Text :' +
        '= '#39'Gross ('#39' + Document_Currency.GetFieldValue('#39'Symbol'#39') + '#39')'#39'; '#13 +
        #10#13#10'end;'#13#10
      raProgram.ComponentName = 'lbgross'
      raProgram.EventName = 'OnGetText'
      raProgram.EventID = 53
    end
    object raProgramInfo15: TraProgramInfo
      raClassName = 'TraEventHandler'
      raProgram.ProgramName = 'LbTotalOnGetText'
      raProgram.ProgramType = ttProcedure
      raProgram.Source = 
        'procedure LbTotalOnGetText(var Text: String);'#13#10'begin'#13#10#13#10'  Text :' +
        '=  '#39'Total ('#39' + Document_Currency.GetFieldValue('#39'Symbol'#39') + '#39')'#39';'#13 +
        #10#13#10'end;'#13#10
      raProgram.ComponentName = 'LbTotal'
      raProgram.EventName = 'OnGetText'
      raProgram.EventID = 53
    end
  end
  object ppDesignLayers1: TppDesignLayers
    object ppDesignLayer1: TppDesignLayer
      UserName = 'Foreground'
      LayerType = ltBanded
      Index = 0
    end
  end
  object ppParameterList1: TppParameterList
  end
end