TdvSLCS object TppReport AutoStop = False DataPipeline = Main NoDataBehaviors = [ndBlankReport] PassSetting = psTwoPass PrinterSetup.BinName = 'Default' PrinterSetup.DocumentName = 'SQL Financial Accounting: Sales Invoice 1' PrinterSetup.Duplex = dpNone PrinterSetup.PaperName = 'Letter 8.5"x11" 22x28cm' PrinterSetup.PrinterName = 'Default' PrinterSetup.SaveDeviceSettings = False PrinterSetup.mmMarginBottom = 6350 PrinterSetup.mmMarginLeft = 7620 PrinterSetup.mmMarginRight = 6350 PrinterSetup.mmMarginTop = 3810 PrinterSetup.mmPaperHeight = 279401 PrinterSetup.mmPaperWidth = 215900 PrinterSetup.PaperSize = 1 SaveAsTemplate = True Template.DatabaseSettings.Name = '12-Invoice-Full' 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 = '' 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 = 101336 mmPrintPosition = 0 object Shape1: TppShape DesignLayer = ppDesignLayer1 UserName = 'Shape1' Brush.Style = bsClear mmHeight = 10319 mmLeft = 149754 mmTop = 83079 mmWidth = 42598 BandType = 0 LayerName = Foreground end object Shape2: TppShape DesignLayer = ppDesignLayer1 UserName = 'Shape2' mmHeight = 10320 mmLeft = 150019 mmTop = 83079 mmWidth = 42334 BandType = 0 LayerName = Foreground end object Label1: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label1' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 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 = 794 mmTop = 33338 mmWidth = 20373 BandType = 0 LayerName = Foreground end object Line1: TppLine DesignLayer = ppDesignLayer1 UserName = 'Line1' Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Weight = 0.750000000000000000 mmHeight = 529 mmLeft = 794 mmTop = 41804 mmWidth = 187061 BandType = 0 LayerName = Foreground end object Label3: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label3' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Billing Address' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 2963 mmLeft = 794 mmTop = 43127 mmWidth = 15706 BandType = 0 LayerName = Foreground end object Label5: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label5' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Delivery Address' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 2963 mmLeft = 102394 mmTop = 43127 mmWidth = 18076 BandType = 0 LayerName = Foreground end object DBText2: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBTxtBrchName' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'BranchName' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 10 Font.Style = [fsBold] ParentDataPipeline = False Visible = False DataPipelineName = 'Main' mmHeight = 4233 mmLeft = 102394 mmTop = 46567 mmWidth = 89694 BandType = 0 LayerName = Foreground end object DBText3: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText3' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'DAddress1' 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 = 102394 mmTop = 51065 mmWidth = 89694 BandType = 0 LayerName = Foreground end object DBText4: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText4' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'DAddress2' 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 = 102394 mmTop = 55563 mmWidth = 89694 BandType = 0 LayerName = Foreground end object DBText5: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText5' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'DAddress3' 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 = 102394 mmTop = 60061 mmWidth = 89694 BandType = 0 LayerName = Foreground end object DBText6: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText6' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'DAddress4' 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 = 102394 mmTop = 64558 mmWidth = 89694 BandType = 0 LayerName = Foreground end object Label6: TppLabel DesignLayer = ppDesignLayer1 UserName = 'lbDOTel' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Tel: ' 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 = 102394 mmTop = 73290 mmWidth = 7144 BandType = 0 LayerName = Foreground end object Label7: TppLabel DesignLayer = ppDesignLayer1 UserName = 'lbDOFax' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Fax: ' 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 = 102394 mmTop = 77788 mmWidth = 7673 BandType = 0 LayerName = Foreground end object Line2: TppLine DesignLayer = ppDesignLayer1 UserName = 'Line2' Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Weight = 0.750000000000000000 mmHeight = 1058 mmLeft = 0 mmTop = 82815 mmWidth = 192352 BandType = 0 LayerName = Foreground end object DBText9: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText9' 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 = [fsBold] ParentDataPipeline = False DataPipelineName = 'Main' mmHeight = 4233 mmLeft = 794 mmTop = 46567 mmWidth = 95250 BandType = 0 LayerName = Foreground end object DBText10: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText10' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Address1' 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 = 794 mmTop = 51065 mmWidth = 95250 BandType = 0 LayerName = Foreground end object DBText11: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText11' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Address2' 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 = 794 mmTop = 55563 mmWidth = 95250 BandType = 0 LayerName = Foreground end object DBText12: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText12' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Address3' 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 = 794 mmTop = 60061 mmWidth = 95250 BandType = 0 LayerName = Foreground end object DBText13: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText13' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Address4' 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 = 794 mmTop = 64558 mmWidth = 95250 BandType = 0 LayerName = Foreground end object Label17: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label17' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Sales Executive' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 6 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 2540 mmLeft = 23283 mmTop = 84402 mmWidth = 14309 BandType = 0 LayerName = Foreground end object Label19: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label19' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Customer Account' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 6 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 2540 mmLeft = 794 mmTop = 84402 mmWidth = 17018 BandType = 0 LayerName = Foreground end object Label21: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label21' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Currency' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 6 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 2540 mmLeft = 47361 mmTop = 84402 mmWidth = 8297 BandType = 0 LayerName = Foreground end object Label23: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label23' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Name' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 6 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 2540 mmLeft = 113242 mmTop = 84402 mmWidth = 5376 BandType = 0 LayerName = Foreground end object Label25: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label25' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Invoice No.' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 6 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 2540 mmLeft = 150548 mmTop = 84402 mmWidth = 10583 BandType = 0 LayerName = Foreground end object Label27: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label27' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Date' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 6 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True mmHeight = 2540 mmLeft = 187061 mmTop = 84402 mmWidth = 4360 BandType = 0 LayerName = Foreground end object Line4: TppLine DesignLayer = ppDesignLayer1 UserName = 'Line4' Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Weight = 0.750000000000000000 mmHeight = 529 mmLeft = 0 mmTop = 93398 mmWidth = 192352 BandType = 0 LayerName = Foreground end object Label29: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label29' HyperlinkEnabled = False AutoSize = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'No' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 6 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taCentered Transparent = True mmHeight = 2540 mmLeft = 794 mmTop = 95779 mmWidth = 8992 BandType = 0 LayerName = Foreground end object Label31: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label31' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Description' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 6 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 2646 mmLeft = 10573 mmTop = 95779 mmWidth = 10319 BandType = 0 LayerName = Foreground end object Label33: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label33' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Qty' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 6 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 2540 mmLeft = 81148 mmTop = 95779 mmWidth = 3260 BandType = 0 LayerName = Foreground end object Label37: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label37' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Discount' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 6 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 2540 mmLeft = 112100 mmTop = 95779 mmWidth = 8043 BandType = 0 LayerName = Foreground end object Label39: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label39' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Price/Unit' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 6 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True mmHeight = 2540 mmLeft = 99406 mmTop = 95779 mmWidth = 9059 BandType = 0 LayerName = Foreground end object Label41: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label41' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Sub Total' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 6 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 2646 mmLeft = 128589 mmTop = 95779 mmWidth = 8732 BandType = 0 LayerName = Foreground end object DBText23: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText23' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Code' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [fsBold] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 3810 mmLeft = 794 mmTop = 88106 mmWidth = 19050 BandType = 0 LayerName = Foreground end object DBText24: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText24' 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 = 9 Font.Style = [fsBold] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 3810 mmLeft = 150548 mmTop = 88371 mmWidth = 21717 BandType = 0 LayerName = Foreground end object DBText27: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText27' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Symbol' DataPipeline = Document_Currency Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [fsBold] ParentDataPipeline = False Transparent = True DataPipelineName = 'Document_Currency' mmHeight = 3810 mmLeft = 47096 mmTop = 88106 mmWidth = 12700 BandType = 0 LayerName = Foreground end object DBText28: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText28' 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 = 9 Font.Style = [fsBold] ParentDataPipeline = False TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Main' mmHeight = 3810 mmLeft = 166762 mmTop = 88371 mmWidth = 24850 BandType = 0 LayerName = Foreground end object DBText34: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText34' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Code' DataPipeline = User Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [fsBold] ParentDataPipeline = False Transparent = True DataPipelineName = 'User' mmHeight = 3810 mmLeft = 113242 mmTop = 88371 mmWidth = 16933 BandType = 0 LayerName = Foreground end object DBText35: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText35' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Agent' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [fsBold] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 3810 mmLeft = 23283 mmTop = 88106 mmWidth = 17992 BandType = 0 LayerName = Foreground end object Label67: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label67' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Page No ' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 6 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 2540 mmLeft = 136261 mmTop = 84138 mmWidth = 8467 BandType = 0 LayerName = Foreground end object Label2: TppLabel DesignLayer = ppDesignLayer1 UserName = 'lbIVTel' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Tel: ' 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 = 73290 mmWidth = 7144 BandType = 0 LayerName = Foreground end object Label4: TppLabel DesignLayer = ppDesignLayer1 UserName = 'lbIVFax' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Fax: ' 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 = 77788 mmWidth = 7673 BandType = 0 LayerName = Foreground end object Label8: TppLabel DesignLayer = ppDesignLayer1 UserName = 'lbIVAttn' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Attn: ' 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 = 68792 mmWidth = 8466 BandType = 0 LayerName = Foreground end object DBText16: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText16' HyperlinkEnabled = False AutoSize = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Attention' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 10 Font.Style = [] Transparent = True DataPipelineName = 'Main' mmHeight = 4233 mmLeft = 14817 mmTop = 69056 mmWidth = 16298 BandType = 0 LayerName = Foreground end object ppLabel1: TppLabel DesignLayer = ppDesignLayer1 UserName = 'lbDOAttn' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Attn: ' 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 = 102394 mmTop = 68792 mmWidth = 8467 BandType = 0 LayerName = Foreground end object ppDBText4: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText1' HyperlinkEnabled = False AutoSize = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'DAttention' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 10 Font.Style = [] Transparent = True DataPipelineName = 'Main' mmHeight = 4233 mmLeft = 113242 mmTop = 68792 mmWidth = 27686 BandType = 0 LayerName = Foreground end object ppDBText5: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText7' HyperlinkEnabled = False AutoSize = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'DPhone1' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 10 Font.Style = [] Transparent = True DataPipelineName = 'Main' mmHeight = 4233 mmLeft = 113242 mmTop = 73290 mmWidth = 23156 BandType = 0 LayerName = Foreground end object ppDBText6: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText8' HyperlinkEnabled = False AutoSize = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'DFax1' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 10 Font.Style = [] Transparent = True DataPipelineName = 'Main' mmHeight = 4233 mmLeft = 113242 mmTop = 77788 mmWidth = 18965 BandType = 0 LayerName = Foreground end object DBImage3: TppDBImage DesignLayer = ppDesignLayer1 UserName = 'DBImage3' AlignHorizontal = ahCenter AlignVertical = avCenter MaintainAspectRatio = False Stretch = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Logo' DataPipeline = Profile GraphicType = 'Bitmap' ParentDataPipeline = False DataPipelineName = 'Profile' mmHeight = 25400 mmLeft = 794 mmTop = 3175 mmWidth = 25400 BandType = 0 LayerName = Foreground end object ppDBRichText2: TppDBRichText DesignLayer = ppDesignLayer1 UserName = 'DBRichText2' 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 = 30692 mmLeft = 28047 mmTop = 3175 mmWidth = 144780 BandType = 0 LayerName = Foreground mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 mmLeftMargin = 794 end object ppSystemVariable1: TppSystemVariable DesignLayer = ppDesignLayer1 UserName = 'SystemVariable1' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 VarType = vtPageSet Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [fsBold] Transparent = True mmHeight = 3810 mmLeft = 136261 mmTop = 88106 mmWidth = 9102 BandType = 0 LayerName = Foreground end object ppDBText8: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText15' HyperlinkEnabled = False AutoSize = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Phone1' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 10 Font.Style = [] Transparent = True DataPipelineName = 'Main' mmHeight = 4233 mmLeft = 14817 mmTop = 73290 mmWidth = 12615 BandType = 0 LayerName = Foreground end object ppDBText9: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText17' HyperlinkEnabled = False AutoSize = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Fax1' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 10 Font.Style = [] Transparent = True DataPipelineName = 'Main' mmHeight = 4233 mmLeft = 14817 mmTop = 77788 mmWidth = 8424 BandType = 0 LayerName = Foreground end object ppRegion2: TppRegion DesignLayer = ppDesignLayer1 UserName = 'RegFromDocNo' Brush.Style = bsClear Caption = 'RegFromDocNo' Pen.Style = psClear Transparent = True Visible = False mmHeight = 9789 mmLeft = 60853 mmTop = 83345 mmWidth = 52123 BandType = 0 LayerName = Foreground mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 object ppLabel17: TppLabel DesignLayer = ppDesignLayer1 UserName = 'lbDODate' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'From Doc Date' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 6 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 2540 mmLeft = 61646 mmTop = 84403 mmWidth = 14055 BandType = 0 LayerName = Foreground end object Label15: TppLabel DesignLayer = ppDesignLayer1 UserName = 'lbDoNo' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'From Doc No' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 6 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 2540 mmLeft = 89163 mmTop = 84403 mmWidth = 12234 BandType = 0 LayerName = Foreground end object ppDBText11: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBTxtSQL_1' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataPipeline = plSQL_1 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Arial' Font.Size = 10 Font.Style = [] ParentDataPipeline = False Transparent = True Visible = False DataPipelineName = 'plSQL_1' mmHeight = 3969 mmLeft = 76199 mmTop = 93135 mmWidth = 17198 BandType = 0 LayerName = Foreground end object ppVariable3: TppVariable DesignLayer = ppDesignLayer1 UserName = 'VarFromDocDate' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 BlankWhenZero = False CalcOrder = 1 DataType = dtDate Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [fsBold] Transparent = True mmHeight = 3704 mmLeft = 61648 mmTop = 88106 mmWidth = 27252 BandType = 0 LayerName = Foreground end object ppVariable2: TppVariable DesignLayer = ppDesignLayer1 UserName = 'VarFromDocNo' 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 = 9 Font.Style = [fsBold] Transparent = True mmHeight = 3704 mmLeft = 89165 mmTop = 88106 mmWidth = 24077 BandType = 0 LayerName = Foreground end end object ppLabel2: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label2' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Total Excl. Tax (RM)' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 6 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True WordWrap = True mmHeight = 5292 mmLeft = 145521 mmTop = 95779 mmWidth = 9525 BandType = 0 LayerName = Foreground end object ppLabel3: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label9' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Tax Amt (RM)' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 6 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True WordWrap = True mmHeight = 5512 mmLeft = 161837 mmTop = 95779 mmWidth = 10142 BandType = 0 LayerName = Foreground end object ppLabel4: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label4' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Total Incd. Tax (RM)' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 6 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True WordWrap = True mmHeight = 5292 mmLeft = 176742 mmTop = 95779 mmWidth = 13758 BandType = 0 LayerName = Foreground end object ppLabel5: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label6' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Tax' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 6 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True WordWrap = True mmHeight = 2903 mmLeft = 191557 mmTop = 95779 mmWidth = 4497 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 = 9790 mmPrintPosition = 0 object ppSubReport1: TppSubReport DesignLayer = ppDesignLayer1 UserName = 'SubRptNorm' ExpandAll = False NewPrintJob = False OutlineSettings.CreateNode = True TraverseAllData = False Visible = False DataPipelineName = 'Document_Detail' mmHeight = 5027 mmLeft = 0 mmTop = 0 mmWidth = 201930 BandType = 4 LayerName = Foreground mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 object ppChildReport1: TppChildReport AutoStop = False DataPipeline = Document_Detail PrinterSetup.BinName = 'Default' PrinterSetup.DocumentName = 'SQL Financial Accounting: Sales Invoice 1' PrinterSetup.Duplex = dpNone PrinterSetup.PaperName = 'Letter 8.5"x11" 22x28cm' PrinterSetup.PrinterName = 'Default' PrinterSetup.SaveDeviceSettings = False PrinterSetup.mmMarginBottom = 6350 PrinterSetup.mmMarginLeft = 7620 PrinterSetup.mmMarginRight = 6350 PrinterSetup.mmMarginTop = 3810 PrinterSetup.mmPaperHeight = 279401 PrinterSetup.mmPaperWidth = 215900 PrinterSetup.PaperSize = 1 Template.DatabaseSettings.NameField = 'Name' Template.DatabaseSettings.TemplateField = 'Template' Template.SaveTo = stDatabase Template.Format = ftASCII Version = '19.02' mmColumnWidth = 0 DataPipelineName = 'Document_Detail' object ppDetailBand3: TppDetailBand Background1.Brush.Style = bsClear Background2.Brush.Style = bsClear Border.mmPadding = 0 PrintHeight = phDynamic mmBottomOffset = 0 mmHeight = 13229 mmPrintPosition = 0 object ppDBRichText1: TppDBRichText DesignLayer = ppDesignLayer2 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 = 'Description3' DataPipeline = Document_Detail RemoveEmptyLines = False ShiftRelativeTo = DBMemo1 Stretch = True Transparent = True DataPipelineName = 'Document_Detail' mmHeight = 1588 mmLeft = 10537 mmTop = 5292 mmWidth = 60296 BandType = 4 LayerName = Foreground1 mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 mmLeftMargin = 794 end object ppDBText1: TppDBText DesignLayer = ppDesignLayer2 UserName = 'DBText6' HyperlinkEnabled = False BlankWhenZero = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'UnitPrice' 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 = 93850 mmTop = 794 mmWidth = 15611 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 = [] ParentDataPipeline = False RemoveEmptyLines = False Stretch = True DataPipelineName = 'Document_Detail' mmHeight = 4233 mmLeft = 10537 mmTop = 794 mmWidth = 60296 BandType = 4 LayerName = Foreground1 mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 mmLeading = 0 end object DBText7: TppDBText DesignLayer = ppDesignLayer2 UserName = 'DBText7' HyperlinkEnabled = False BlankWhenZero = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Qty' 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 = 71628 mmTop = 794 mmWidth = 11903 BandType = 4 LayerName = Foreground1 end object DBText8: TppDBText DesignLayer = ppDesignLayer2 UserName = 'DBText8' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'UOM' DataPipeline = Document_Detail Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] Transparent = True DataPipelineName = 'Document_Detail' mmHeight = 3810 mmLeft = 84324 mmTop = 794 mmWidth = 8996 BandType = 4 LayerName = Foreground1 end object ppDBText2: TppDBText DesignLayer = ppDesignLayer2 UserName = 'DBText9' HyperlinkEnabled = False BlankWhenZero = True 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 = 121179 mmTop = 794 mmWidth = 16933 BandType = 4 LayerName = Foreground1 end object DBCalc1: TppDBCalc DesignLayer = ppDesignLayer2 UserName = 'DBCalc1' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Number' DataPipeline = Document_Detail Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] TextAlignment = taCentered Transparent = True DBCalcType = dcCount DataPipelineName = 'Document_Detail' mmHeight = 3810 mmLeft = 794 mmTop = 794 mmWidth = 8726 BandType = 4 LayerName = Foreground1 end object ppDBText3: TppDBText DesignLayer = ppDesignLayer2 UserName = 'DBText3' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'DISC' DataPipeline = Document_Detail Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] TextAlignment = taRightJustified DataPipelineName = 'Document_Detail' mmHeight = 3810 mmLeft = 111121 mmTop = 794 mmWidth = 9260 BandType = 4 LayerName = Foreground1 end object ppSubReport3: TppSubReport DesignLayer = ppDesignLayer2 UserName = 'SubReport1' ExpandAll = False NewPrintJob = False OutlineSettings.CreateNode = True ShiftRelativeTo = ppDBRichText1 TraverseAllData = False DataPipelineName = 'Document_SerialNumber' mmHeight = 5027 mmLeft = 0 mmTop = 8202 mmWidth = 201930 BandType = 4 LayerName = Foreground1 mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 object ppChildReport3: TppChildReport AutoStop = False DataPipeline = Document_SerialNumber PrinterSetup.BinName = 'Default' PrinterSetup.DocumentName = 'SQL Financial Accounting: Sales Invoice 1' PrinterSetup.Duplex = dpNone PrinterSetup.PaperName = 'Letter 8.5"x11" 22x28cm' PrinterSetup.PrinterName = 'Default' PrinterSetup.SaveDeviceSettings = False PrinterSetup.mmMarginBottom = 6350 PrinterSetup.mmMarginLeft = 7620 PrinterSetup.mmMarginRight = 6350 PrinterSetup.mmMarginTop = 3810 PrinterSetup.mmPaperHeight = 279401 PrinterSetup.mmPaperWidth = 215900 PrinterSetup.PaperSize = 1 Template.DatabaseSettings.NameField = 'Name' Template.DatabaseSettings.TemplateField = 'Template' Template.SaveTo = stDatabase Template.Format = ftASCII Version = '19.02' mmColumnWidth = 0 DataPipelineName = 'Document_SerialNumber' object ppDetailBand4: TppDetailBand Background1.Brush.Style = bsClear Background2.Brush.Style = bsClear Border.mmPadding = 0 mmBottomOffset = 0 mmHeight = 0 mmPrintPosition = 0 end object ppSummaryBand1: TppSummaryBand Background.Brush.Style = bsClear Border.mmPadding = 0 PrintHeight = phDynamic mmBottomOffset = 0 mmHeight = 5027 mmPrintPosition = 0 object ppVariable8: TppVariable DesignLayer = ppDesignLayer3 UserName = 'vSerialNo' HyperlinkEnabled = False Border.mmPadding = 0 BlankWhenZero = False CalcOrder = 0 Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] Transparent = True Visible = False mmHeight = 3440 mmLeft = 0 mmTop = 529 mmWidth = 13229 BandType = 7 LayerName = Foreground2 end object ppMemo1: TppMemo DesignLayer = ppDesignLayer3 UserName = 'Memo1' Border.mmPadding = 0 Caption = 'Memo1' CharWrap = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] RemoveEmptyLines = False Stretch = True Transparent = True mmHeight = 5027 mmLeft = 39952 mmTop = 0 mmWidth = 113771 BandType = 7 LayerName = Foreground2 mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 mmLeading = 0 end end object raCodeModule4: TraCodeModule object raProgramInfo5: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'DetailBeforeGenerate' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure DetailBeforeGenerate;'#13#10'begin'#13#10' if Detail.Count = 1 the' + 'n'#13#10' vSerialNo.Value := Document_SerialNumber.GetFieldValue('#39'Se' + 'rialNumber'#39') else'#13#10' vSerialNo.Value := vSerialNo.Value + '#39', '#39' ' + '+ Document_SerialNumber.GetFieldValue('#39'SerialNumber'#39');'#13#10' Memo' + '1.Lines.Text := '#39'Serial No:- '#39' + vSerialNo.Value;'#13#10'end;'#13#10 raProgram.ComponentName = 'Detail' raProgram.EventName = 'BeforeGenerate' raProgram.EventID = 26 end end object ppDesignLayers3: TppDesignLayers object ppDesignLayer3: TppDesignLayer UserName = 'Foreground2' LayerType = ltBanded Index = 0 end end end end object ppDBText7: TppDBText DesignLayer = ppDesignLayer2 UserName = 'DBText1' HyperlinkEnabled = False BlankWhenZero = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'LocalAmount' 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 = 3704 mmLeft = 139965 mmTop = 794 mmWidth = 15346 BandType = 4 LayerName = Foreground1 end object ppDBText13: TppDBText DesignLayer = ppDesignLayer2 UserName = 'DBText2' HyperlinkEnabled = False BlankWhenZero = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'LocalTaxAmt' 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 = 3704 mmLeft = 157163 mmTop = 794 mmWidth = 15346 BandType = 4 LayerName = Foreground1 end object ppDBText14: TppDBText DesignLayer = ppDesignLayer2 UserName = 'DBText4' HyperlinkEnabled = False BlankWhenZero = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'LocalAmountWithTax' 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 = 3704 mmLeft = 173302 mmTop = 794 mmWidth = 17201 BandType = 4 LayerName = Foreground1 end object ppDBText24: TppDBText DesignLayer = ppDesignLayer2 UserName = 'DBText24' Border.mmPadding = 0 DataField = 'Tax' DataPipeline = Document_Detail Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] Transparent = True DataPipelineName = 'Document_Detail' mmHeight = 4498 mmLeft = 192882 mmTop = 794 mmWidth = 8204 BandType = 4 LayerName = Foreground1 end end object ppGroup2: TppGroup BreakName = 'FromDocNo' DataPipeline = Document_Detail GroupFileSettings.NewFile = False GroupFileSettings.EmailFile = False OutlineSettings.CreateNode = True StartOnOddPage = False UserName = 'Group2' mmNewColumnThreshold = 0 mmNewPageThreshold = 0 DataPipelineName = 'Document_Detail' NewFile = False object ppGroupHeaderBand2: TppGroupHeaderBand Background.Brush.Style = bsClear Border.mmPadding = 0 PrintHeight = phDynamic mmBottomOffset = 0 mmHeight = 5027 mmPrintPosition = 0 object ppVariable4: TppVariable DesignLayer = ppDesignLayer2 UserName = 'Variable4' 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 = 9 Font.Style = [fsUnderline] Transparent = True Visible = False mmHeight = 3810 mmLeft = 5556 mmTop = 794 mmWidth = 12912 BandType = 3 GroupNo = 0 LayerName = Foreground1 end end object ppGroupFooterBand2: TppGroupFooterBand Background.Brush.Style = bsClear Border.mmPadding = 0 HideWhenOneDetail = False mmBottomOffset = 0 mmHeight = 0 mmPrintPosition = 0 end end object raCodeModule2: TraCodeModule object raProgramInfo6: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'Variable4OnCalc' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure Variable4OnCalc(var Value: Variant);'#13#10' Var'#13#10' D, DD, F' + 'DN, FDD: String;'#13#10'begin'#13#10' FDN:= Document_Detail.GetfieldValue(' + #39'FromDocNo'#39');'#13#10' FDD:= Document_Detail.GetFieldValue('#39'FromDocDa' + 'te'#39');'#13#10' If Trim(FDN) <> '#39#39' then'#13#10' D := '#39'From Doc No. : '#39' ' + '+ FDN + '#39'; '#39' else'#13#10' D := '#39#39';'#13#10' If Trim(FDD) <> '#39#39' Then'#13 + #10' DD := '#39'From Doc Date : '#39' + FDD else'#13#10' DD := '#39#39';'#13#10' ' + 'Value:= D + DD;'#13#10'end;'#13#10 raProgram.ComponentName = 'Variable4' raProgram.EventName = 'OnCalc' raProgram.EventID = 33 raProgram.CaretPos = ( 1 1) end object raProgramInfo7: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'Variable4OnPrint' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure Variable4OnPrint;'#13#10'begin'#13#10' if (Variable4.Value = '#39#39')' + ' or (plSQL_1.GetFieldValue('#39'Nos'#39') = 1) then'#13#10' Variable4.Vis' + 'ible:= False else'#13#10' Variable4.Visible:= True;'#13#10'end;'#13#10 raProgram.ComponentName = 'Variable4' raProgram.EventName = 'OnPrint' raProgram.EventID = 32 raProgram.CaretPos = ( 28 6) end end object ppDesignLayers2: TppDesignLayers object ppDesignLayer2: TppDesignLayer UserName = 'Foreground1' LayerType = ltBanded Index = 0 end end end end object ppSubReport2: TppSubReport DesignLayer = ppDesignLayer1 UserName = 'SubRptMerge' ExpandAll = False NewPrintJob = False OutlineSettings.CreateNode = True ShiftRelativeTo = ppSubReport1 TraverseAllData = False DataPipelineName = 'plSQL_2' mmHeight = 5027 mmLeft = 0 mmTop = 4763 mmWidth = 201930 BandType = 4 LayerName = Foreground mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 object ppChildReport2: TppChildReport AutoStop = False DataPipeline = plSQL_2 PrinterSetup.BinName = 'Default' PrinterSetup.DocumentName = 'SQL Financial Accounting: Sales Invoice 1' PrinterSetup.Duplex = dpNone PrinterSetup.PaperName = 'Letter 8.5"x11" 22x28cm' PrinterSetup.PrinterName = 'Default' PrinterSetup.SaveDeviceSettings = False PrinterSetup.mmMarginBottom = 6350 PrinterSetup.mmMarginLeft = 7620 PrinterSetup.mmMarginRight = 6350 PrinterSetup.mmMarginTop = 3810 PrinterSetup.mmPaperHeight = 279401 PrinterSetup.mmPaperWidth = 215900 PrinterSetup.PaperSize = 1 Template.DatabaseSettings.NameField = 'Name' Template.DatabaseSettings.TemplateField = 'Template' Template.SaveTo = stDatabase Template.Format = ftASCII Version = '19.02' mmColumnWidth = 0 DataPipelineName = 'plSQL_2' object ppDetailBand1: TppDetailBand Background1.Brush.Style = bsClear Background2.Brush.Style = bsClear Border.mmPadding = 0 PrintHeight = phDynamic mmBottomOffset = 0 mmHeight = 6879 mmPrintPosition = 0 object ppDBRichText3: TppDBRichText DesignLayer = ppDesignLayer4 UserName = 'DBRichText3' 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 = 'Description3' DataPipeline = plSQL_3 ParentDataPipeline = False RemoveEmptyLines = False ShiftRelativeTo = ppDBMemo1 Stretch = True Transparent = True DataPipelineName = 'plSQL_3' mmHeight = 1588 mmLeft = 10583 mmTop = 5291 mmWidth = 60296 BandType = 4 LayerName = Foreground3 mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 mmLeftMargin = 794 end object ppDBText10: TppDBText DesignLayer = ppDesignLayer4 UserName = 'DBTxtUPrice' HyperlinkEnabled = False BlankWhenZero = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'UnitPrice' DataPipeline = plSQL_2 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] ParentDataPipeline = False TextAlignment = taRightJustified Transparent = True DataPipelineName = 'plSQL_2' mmHeight = 3810 mmLeft = 93927 mmTop = 794 mmWidth = 15611 BandType = 4 LayerName = Foreground3 end object ppDBMemo1: TppDBMemo DesignLayer = ppDesignLayer4 UserName = 'DBMemo2' Border.Weight = 1.000000000000000000 Border.mmPadding = 0 CharWrap = False DataField = 'Description' DataPipeline = plSQL_3 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] ParentDataPipeline = False RemoveEmptyLines = False Stretch = True DataPipelineName = 'plSQL_3' mmHeight = 4233 mmLeft = 10583 mmTop = 794 mmWidth = 60296 BandType = 4 LayerName = Foreground3 mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 mmLeading = 0 end object ppDBText12: TppDBText DesignLayer = ppDesignLayer4 UserName = 'DBTxtQty' HyperlinkEnabled = False BlankWhenZero = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Qty' DataPipeline = plSQL_2 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] ParentDataPipeline = False TextAlignment = taRightJustified Transparent = True DataPipelineName = 'plSQL_2' mmHeight = 3810 mmLeft = 71702 mmTop = 794 mmWidth = 11903 BandType = 4 LayerName = Foreground3 end object ppDBText18: TppDBText DesignLayer = ppDesignLayer4 UserName = 'DBText18' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'UOM' DataPipeline = plSQL_2 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] Transparent = True DataPipelineName = 'plSQL_2' mmHeight = 3810 mmLeft = 84402 mmTop = 794 mmWidth = 8996 BandType = 4 LayerName = Foreground3 end object ppDBText19: TppDBText DesignLayer = ppDesignLayer4 UserName = 'DBTxtAmt' HyperlinkEnabled = False BlankWhenZero = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Amount' DataPipeline = plSQL_2 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] ParentDataPipeline = False TextAlignment = taRightJustified Transparent = True DataPipelineName = 'plSQL_2' mmHeight = 3810 mmLeft = 121179 mmTop = 794 mmWidth = 16933 BandType = 4 LayerName = Foreground3 end object ppDBCalc1: TppDBCalc DesignLayer = ppDesignLayer4 UserName = 'DBCalc2' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Number' DataPipeline = plSQL_2 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] TextAlignment = taCentered Transparent = True DBCalcType = dcCount DataPipelineName = 'plSQL_2' mmHeight = 3810 mmLeft = 794 mmTop = 794 mmWidth = 8726 BandType = 4 LayerName = Foreground3 end object ppDBText20: TppDBText DesignLayer = ppDesignLayer4 UserName = 'DBText20' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'DISC' DataPipeline = plSQL_2 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] TextAlignment = taRightJustified DataPipelineName = 'plSQL_2' mmHeight = 3810 mmLeft = 111125 mmTop = 794 mmWidth = 9260 BandType = 4 LayerName = Foreground3 end object ppDBText21: TppDBText DesignLayer = ppDesignLayer4 UserName = 'DBTxtLocalAmt' HyperlinkEnabled = False BlankWhenZero = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'LocalAmount' DataPipeline = plSQL_2 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] ParentDataPipeline = False TextAlignment = taRightJustified Transparent = True DataPipelineName = 'plSQL_2' mmHeight = 3704 mmLeft = 139965 mmTop = 794 mmWidth = 15346 BandType = 4 LayerName = Foreground3 end object ppDBText22: TppDBText DesignLayer = ppDesignLayer4 UserName = 'DBTxtLocalTaxAmt' HyperlinkEnabled = False BlankWhenZero = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'LocalTaxAmt' DataPipeline = plSQL_2 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] ParentDataPipeline = False TextAlignment = taRightJustified Transparent = True DataPipelineName = 'plSQL_2' mmHeight = 3704 mmLeft = 157163 mmTop = 794 mmWidth = 15346 BandType = 4 LayerName = Foreground3 end object ppDBText23: TppDBText DesignLayer = ppDesignLayer4 UserName = 'DBTxtLocalAmtWithTax' HyperlinkEnabled = False BlankWhenZero = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'LocalAmountWithTax' DataPipeline = plSQL_2 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] ParentDataPipeline = False TextAlignment = taRightJustified Transparent = True DataPipelineName = 'plSQL_2' mmHeight = 3704 mmLeft = 173302 mmTop = 794 mmWidth = 17201 BandType = 4 LayerName = Foreground3 end object ppDBText25: TppDBText DesignLayer = ppDesignLayer4 UserName = 'DBText25' Border.mmPadding = 0 DataField = 'Tax' DataPipeline = plSQL_2 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'plSQL_2' mmHeight = 4498 mmLeft = 192882 mmTop = 794 mmWidth = 8204 BandType = 4 LayerName = Foreground3 end end object raCodeModule3: TraCodeModule object raProgramInfo8: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'DetailBeforePrint' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure DetailBeforePrint;'#13#10'begin'#13#10' DBTxtQty.DisplayFormat ' + ' := Option.GetFieldValue('#39'StockQuantityDisplayFormat'#39');' + #13#10' DBTxtUPrice.DisplayFormat := Option.GetFieldValue('#39 + 'StockPriceDisplayFormat'#39');'#13#10' DBTxtAmt.DisplayFormat ' + ' := Option.GetFieldValue('#39'AccountingValueDisplayFormat'#39');'#13#10' DBT' + 'xtLocalAmt.DisplayFormat := Option.GetFieldValue('#39'Account' + 'ingValueDisplayFormat'#39');'#13#10' DBtxtLocalTaxAmt.DisplayFormat :' + '= Option.GetFieldValue('#39'AccountingValueDisplayFormat'#39');'#13#10' DBTxt' + 'LocalAmtWithTax.DisplayFormat := Option.GetFieldValue('#39'Accountin' + 'gValueDisplayFormat'#39');'#13#10'end;'#13#10 raProgram.ComponentName = 'Detail' raProgram.EventName = 'BeforePrint' raProgram.EventID = 24 raProgram.CaretPos = ( 1 1) end end object ppDesignLayers4: TppDesignLayers object ppDesignLayer4: TppDesignLayer UserName = 'Foreground3' LayerType = ltBanded Index = 0 end end end end end object ppFooterBand3: TppFooterBand Background.Brush.Style = bsClear Border.mmPadding = 0 mmBottomOffset = 0 mmHeight = 6350 mmPrintPosition = 0 end object ppGroup1: TppGroup BreakName = 'DocKey' 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 mmBottomOffset = 0 mmHeight = 0 mmPrintPosition = 0 end object ppGroupFooterBand1: TppGroupFooterBand Background.Brush.Style = bsClear Border.mmPadding = 0 HideWhenOneDetail = False mmBottomOffset = 0 mmHeight = 50272 mmPrintPosition = 203200 object ppLine3: TppLine DesignLayer = ppDesignLayer1 UserName = 'Line5' Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Weight = 0.750000000000000000 mmHeight = 1588 mmLeft = 32544 mmTop = 11385 mmWidth = 163519 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppLine1: TppLine DesignLayer = ppDesignLayer1 UserName = 'Line6' Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Weight = 0.750000000000000000 mmHeight = 2117 mmLeft = 0 mmTop = 26993 mmWidth = 196062 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppLabel8: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label61' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Authorised Signature' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 6 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True mmHeight = 2646 mmLeft = 171715 mmTop = 28316 mmWidth = 19579 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppLine2: TppLine DesignLayer = ppDesignLayer1 UserName = 'Line7' Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Position = lpBottom Weight = 0.750000000000000000 mmHeight = 1852 mmLeft = 0 mmTop = 48156 mmWidth = 196062 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppVariable5: TppVariable DesignLayer = ppDesignLayer1 UserName = 'Variable3' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 BlankWhenZero = False CalcOrder = 1 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 6 Font.Style = [] TextAlignment = taRightJustified Transparent = True mmHeight = 2646 mmLeft = 182827 mmTop = 31756 mmWidth = 8467 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppVariable1: TppVariable DesignLayer = ppDesignLayer1 UserName = 'Variable4' HyperlinkEnabled = False AutoSize = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 BlankWhenZero = False CalcOrder = 2 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] Transparent = True WordWrap = True mmHeight = 10583 mmLeft = 793 mmTop = 265 mmWidth = 125148 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppLabel11: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label43' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Payment Terms : ' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 6 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 2646 mmLeft = 794 mmTop = 19067 mmWidth = 17198 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppDBText15: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText29' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Terms' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 3704 mmLeft = 794 mmTop = 21977 mmWidth = 26194 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppLabel13: TppLabel DesignLayer = ppDesignLayer1 UserName = 'lbRef1' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Ref 1 : ' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 6 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 2646 mmLeft = 32544 mmTop = 19067 mmWidth = 7408 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppDBText17: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText14' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'DocRef1' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] DataPipelineName = 'Main' mmHeight = 3704 mmLeft = 32544 mmTop = 21977 mmWidth = 47096 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppLabel14: TppLabel DesignLayer = ppDesignLayer1 UserName = 'lbRef2' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Ref 2 : ' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 6 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 2646 mmLeft = 83873 mmTop = 19067 mmWidth = 7408 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppDBText16: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText101' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'DocRef2' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] DataPipelineName = 'Main' mmHeight = 3704 mmLeft = 83873 mmTop = 21977 mmWidth = 47096 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppLabel12: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label51' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Total Payable' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 6 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True mmHeight = 2646 mmLeft = 178859 mmTop = 19067 mmWidth = 12435 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppVariable6: TppVariable DesignLayer = ppDesignLayer1 UserName = 'VarPayAmt' HyperlinkEnabled = False AutoSize = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 BlankWhenZero = False CalcOrder = 0 DataType = dtCurrency Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 11 Font.Style = [fsBold] TextAlignment = taRightJustified Transparent = True mmHeight = 4763 mmLeft = 142875 mmTop = 21977 mmWidth = 48419 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppLine4: TppLine DesignLayer = ppDesignLayer1 UserName = 'Line3' Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Weight = 0.750000000000000000 mmHeight = 1588 mmLeft = 0 mmTop = 18534 mmWidth = 196062 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppLabel6: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label7' Border.mmPadding = 0 Caption = 'Total Amount Due' 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 = 32544 mmTop = 11907 mmWidth = 26987 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppVariable7: TppVariable DesignLayer = ppDesignLayer1 UserName = 'VarAmt' Border.mmPadding = 0 BlankWhenZero = False CalcOrder = 3 DataType = dtDouble Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] TextAlignment = taRightJustified Transparent = True mmHeight = 3704 mmLeft = 126474 mmTop = 11907 mmWidth = 10847 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppVariable9: TppVariable DesignLayer = ppDesignLayer1 UserName = 'VarLocalAmt' Border.mmPadding = 0 BlankWhenZero = False CalcOrder = 4 DataType = dtDouble Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] TextAlignment = taRightJustified Transparent = True mmHeight = 3704 mmLeft = 139436 mmTop = 11907 mmWidth = 15610 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppVariable10: TppVariable DesignLayer = ppDesignLayer1 UserName = 'VarLocalTaxAmt' Border.mmPadding = 0 BlankWhenZero = False CalcOrder = 5 DataType = dtDouble Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] TextAlignment = taRightJustified Transparent = True mmHeight = 3705 mmLeft = 158750 mmTop = 11907 mmWidth = 13494 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppVariable11: TppVariable DesignLayer = ppDesignLayer1 UserName = 'VarLocalAmtWithTax' Border.mmPadding = 0 BlankWhenZero = False CalcOrder = 6 DataType = dtDouble Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] TextAlignment = taRightJustified Transparent = True mmHeight = 3704 mmLeft = 175684 mmTop = 11907 mmWidth = 13494 BandType = 5 GroupNo = 0 LayerName = Foreground end end end object raCodeModule1: TraCodeModule object raProgramInfo9: TraProgramInfo raClassName = 'TraVarProgram' raProgram.ChildType = 17 raProgram.ProgramName = 'Variables' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure Variables;'#13#10'var'#13#10' SQL_0, SQL_1, SQL_2, SQL_3 : Strin' + 'g;'#13#10#13#10'begin'#13#10#13#10'end;'#13#10 raProgram.CaretPos = ( 30 2) end object raProgramInfo10: TraProgramInfo raClassName = 'TraProgram' raProgram.ChildType = 19 raProgram.ProgramName = 'GlobalOnCreate' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure GlobalOnCreate;'#13#10'begin'#13#10' SQL_0 := '#39'SELECT DISTINCT D' + 'ocKey, FromDocNo '#39' +'#13#10' '#39'FROM Document_Detail'#39';'#13#10' SQ' + 'L_1 := '#39'SELECT DocKey, COUNT(*) Nos '#39' +'#13#10' '#39'FROM plSQL' + '_0 '#39' +'#13#10' '#39'GROUP BY DocKey'#39';'#13#10' SQL_2 := '#39'SELECT DocK' + 'ey, ItemCode, UOM, UnitPrice, Disc, MIN(Seq) Seq, Description,'#39' ' + '+'#13#10#9#9' '#39'SUM(Qty) Qty, SUM(Amount) Amount, SUM(AmountWithTa' + 'x) AmountWithTax, '#39' +'#13#10#9#9' '#39'SUM(LocalAmount) LocalAmount, ' + 'SUM(LocalAmountWithTax) LocalAmountWithTax, '#39'+ '#13#10' ' + ' '#39'Tax, Sum(TaxAmt) TaxAmt, Sum(LocalTaxAmt) LocalTaxAmt '#39' +'#13#10' ' + ' '#39'FROM Document_Detail '#39' +'#13#10' '#39'GROUP BY DocK' + 'ey, ItemCode, Description, UOM, UnitPrice, Disc, Tax '#39';'#13#10' SQL_' + '3 := '#39'SELECT DocKey, ItemCode, Description, Description2, Descri' + 'ption3, Seq '#39'+ '#13#10#9#9' '#39'FROM Document_Detail '#39' +'#13#10#9#9' ' + #39'ORDER BY Seq DESC'#39';'#13#10'end;'#13#10 raProgram.CaretPos = ( 1 1) end object raProgramInfo11: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'Variable3OnCalc' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure Variable3OnCalc(var Value: Variant);'#13#10'begin'#13#10#13#10' Value' + ' := Profile.GetFieldValue('#39'CompanyName'#39') +'#13#10' '#39' ('#39' + Profile.GetF' + 'ieldValue('#39'RegisterNo'#39') + '#39')'#39';'#13#10#13#10#13#10'end;'#13#10 raProgram.ComponentName = 'Variable3' raProgram.EventName = 'OnCalc' raProgram.EventID = 33 raProgram.CaretPos = ( 1 1) end object raProgramInfo12: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'VarPayAmtOnCalc' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure VarPayAmtOnCalc(var Value: Variant);'#13#10'begin'#13#10#13#10' Value' + ' := Main.GetFieldValue('#39'DocAmt'#39');'#13#10#13#10'end;'#13#10 raProgram.ComponentName = 'VarPayAmt' raProgram.EventName = 'OnCalc' raProgram.EventID = 33 raProgram.CaretPos = ( 40 4) end object raProgramInfo13: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'ReportBeforePrint' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure ReportBeforePrint;'#13#10'Var D: String;'#13#10'begin'#13#10' D:= Opt' + 'ion.GetFieldValue('#39'AccountingValueDisplayFormat'#39');'#13#10' LocalSQL' + '_SELECT(plSQL_0, SQL_0, '#39'DocKey'#39');'#13#10' LocalSQL_SELECT(plSQL_1,' + ' SQL_1, '#39'DocKey'#39'); '#13#10' LocalSQL_SELECT(plSQL_2, SQL_2, '#39'DocK' + 'ey;Seq'#39');'#13#10' LocalSQL_SELECT(plSQL_3, SQL_3, '#39'DocKey;ItemCode;' + 'Description'#39');'#13#10' SetDataPipelineFieldLink(Main, plSQL_0, '#39'Doc' + 'Key'#39', '#39'DocKey'#39');'#13#10' SetDataPipelineFieldLink(Main, plSQL_1, '#39'D' + 'ocKey'#39', '#39'DocKey'#39');'#13#10' SetDataPipelineFieldLink(Main, plSQL_2, ' + #39'DocKey'#39', '#39'DocKey'#39');'#13#10' SetDataPipelineFieldLink(plSQL_2, plSQ' + 'L_3, '#39'DocKey;ItemCode;Description'#39', '#39'DocKey;ItemCode;Description' + #39');'#13#10#13#10' VarPayAmt.DisplayFormat:= D;'#13#10' '#13#10'end;'#13#10 raProgram.ComponentName = 'Report' raProgram.EventName = 'BeforePrint' raProgram.EventID = 1 raProgram.CaretPos = ( 68 8) end object raProgramInfo14: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'Variable4OnCalc' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure Variable4OnCalc(var Value: Variant);'#13#10'begin'#13#10' Value :' + '= Document_Currency.GetFieldValue('#39'Description'#39');'#13#10' Value := Va' + 'lue + '#39' : '#39' + CurrencyToEngWord(Main.GetFieldValue('#39'DocAmt'#39')) + ' + #39' ONLY'#39';'#13#10#13#10'end;'#13#10 raProgram.ComponentName = 'Variable4' raProgram.EventName = 'OnCalc' raProgram.EventID = 33 raProgram.CaretPos = ( 1 1) end object raProgramInfo15: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'HeaderBeforePrint' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure HeaderBeforePrint;'#13#10'begin'#13#10' //lbDONo.Visible:= Trim(V' + 'arFromDocNo.Value) <> '#39#39';'#13#10' //lbDODate.Visible:= Trim(VarFromDo' + 'cNo.Value) <>'#39#39';'#13#10' VarFromDocDate.Visible:= Trim(VarFromDocNo.V' + 'alue) <>'#39#39';'#13#10'end;'#13#10 raProgram.ComponentName = 'Header' raProgram.EventName = 'BeforePrint' raProgram.EventID = 24 raProgram.CaretPos = ( 1 1) end object raProgramInfo16: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'DBTxtBrchNameOnPrint' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure DBTxtBrchNameOnPrint;'#13#10'begin'#13#10' DBTxtBrchName.visible:' + '= Main.GetFieldValue('#39'BranchName'#39') <> '#39'BILLING'#39';'#13#10'end;'#13#10 raProgram.ComponentName = 'DBTxtBrchName' raProgram.EventName = 'OnPrint' raProgram.EventID = 32 raProgram.CaretPos = ( 1 1) end object raProgramInfo17: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'SubRptNormOnPrint' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure SubRptNormOnPrint;'#13#10'begin'#13#10' SubRptNorm.Visible:= Opti' + 'on.GetFieldValue('#39'MergeSameItemCode'#39')= False;'#13#10'end;'#13#10 raProgram.ComponentName = 'SubRptNorm' raProgram.EventName = 'OnPrint' raProgram.EventID = 32 raProgram.CaretPos = ( 1 1) end object raProgramInfo18: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'SubRptMergeOnPrint' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure SubRptMergeOnPrint;'#13#10'begin'#13#10' SubRptMerge.Visible:= Op' + 'tion.GetFieldValue('#39'MergeSameItemCode'#39')= True;'#13#10'end;'#13#10 raProgram.ComponentName = 'SubRptMerge' raProgram.EventName = 'OnPrint' raProgram.EventID = 32 raProgram.CaretPos = ( 1 1) end object raProgramInfo19: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'VarFromDocDateOnCalc' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure VarFromDocDateOnCalc(var Value: Variant);'#13#10'begin'#13#10' Va' + 'lue := null;'#13#10' Value := Document_Detail.GetFieldValue('#39'FromDocD' + 'ate'#39');'#13#10'end;'#13#10 raProgram.ComponentName = 'VarFromDocDate' raProgram.EventName = 'OnCalc' raProgram.EventID = 33 raProgram.CaretPos = ( 1 1) end object raProgramInfo20: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'VarFromDocNoOnCalc' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure VarFromDocNoOnCalc(var Value: Variant);'#13#10'begin'#13#10' Valu' + 'e := '#39#39';'#13#10' Value := value + Document_Detail.GetFieldValue('#39'From' + 'DocNo'#39');'#13#10'end;'#13#10 raProgram.ComponentName = 'VarFromDocNo' raProgram.EventName = 'OnCalc' raProgram.EventID = 33 raProgram.CaretPos = ( 1 1) end object raProgramInfo21: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'VarLocalAmtWithTaxOnCalc' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure VarLocalAmtWithTaxOnCalc(var Value: Variant);'#13#10'begin'#13#10 + ' VarLocalAmtWithTax.DisplayFormat := Option.GetFieldValue('#39'Acco' + 'untingValueDisplayFormat'#39');'#13#10' Value := GetAggregateValue(agSUM,' + ' Document_Detail, '#39'DocKey'#39', '#39'LocalAmountWithTax'#39');'#13#10#13#10'end;'#13#10 raProgram.ComponentName = 'VarLocalAmtWithTax' raProgram.EventName = 'OnCalc' raProgram.EventID = 33 end object raProgramInfo22: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'VarLocalTaxAmtOnCalc' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure VarLocalTaxAmtOnCalc(var Value: Variant);'#13#10'begin'#13#10' Va' + 'rLocalTaxAmt.DisplayFormat := Option.GetFieldValue('#39'AccountingVa' + 'lueDisplayFormat'#39');'#13#10' Value := GetAggregateValue(agSUM, Documen' + 't_Detail, '#39'DocKey'#39', '#39'LocalTaxAmt'#39'); '#13#10#13#10'end;'#13#10 raProgram.ComponentName = 'VarLocalTaxAmt' raProgram.EventName = 'OnCalc' raProgram.EventID = 33 end object raProgramInfo23: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'VarLocalAmtOnCalc' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure VarLocalAmtOnCalc(var Value: Variant);'#13#10'begin'#13#10' VarLo' + 'calAmt.DisplayFormat := Option.GetFieldValue('#39'AccountingValueDis' + 'playFormat'#39');'#13#10' Value := GetAggregateValue(agSUM, Document_Deta' + 'il, '#39'DocKey'#39', '#39'LocalAmount'#39'); '#13#10#13#10'end;'#13#10 raProgram.ComponentName = 'VarLocalAmt' raProgram.EventName = 'OnCalc' raProgram.EventID = 33 end object raProgramInfo24: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'VarAmtOnCalc' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure VarAmtOnCalc(var Value: Variant);'#13#10'begin'#13#10' VarAmt.Dis' + 'playFormat := Option.GetFieldValue('#39'AccountingValueDisplayFormat' + #39');'#13#10' Value := GetAggregateValue(agSUM, Document_Detail, '#39'DocKe' + 'y'#39', '#39'Amount'#39'); '#13#10#13#10'end;'#13#10 raProgram.ComponentName = 'VarAmt' raProgram.EventName = 'OnCalc' raProgram.EventID = 33 end object raProgramInfo25: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'lbRef2OnPrint' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure lbRef2OnPrint;'#13#10'begin'#13#10' lbRef2.Visible:= Trim(Main.Ge' + 'tFieldValue('#39'DocRef2'#39')) <> '#39#39' ;'#13#10'end;'#13#10 raProgram.ComponentName = 'lbRef2' raProgram.EventName = 'OnPrint' raProgram.EventID = 32 raProgram.CaretPos = ( 5 4) end object raProgramInfo26: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'lbRef1OnPrint' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure lbRef1OnPrint;'#13#10'begin'#13#10' lbRef1.Visible:= Trim(Main.Ge' + 'tFieldValue('#39'DocRef1'#39')) <> '#39#39' ;'#13#10'end;'#13#10 raProgram.ComponentName = 'lbRef1' raProgram.EventName = 'OnPrint' raProgram.EventID = 32 end end object ppDesignLayers1: TppDesignLayers object ppDesignLayer1: TppDesignLayer UserName = 'Foreground' LayerType = ltBanded Index = 0 end end object ppParameterList1: TppParameterList end end