TdvARAging object TppReport AutoStop = False DataPipeline = Main NoDataBehaviors = [ndBlankReport] PassSetting = psTwoPass PrinterSetup.BinName = 'Default' PrinterSetup.DocumentName = 'SQL Financial Accounting: 0 Sumitech 6 Months Detail Aging' 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-Customer-6-Months-Detail-Aging' 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.SinglePageOnly = True 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.03' mmColumnWidth = 0 DataPipelineName = 'Main' object ppTitleBand1: TppTitleBand Visible = False Background.Brush.Style = bsClear Border.mmPadding = 0 PrintHeight = phDynamic mmBottomOffset = 0 mmHeight = 8202 mmPrintPosition = 0 object ppDBText63: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText63' HyperlinkEnabled = False AutoSize = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Company' DataPipeline = Parameter Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Parameter' mmHeight = 3429 mmLeft = 20902 mmTop = 3175 mmWidth = 2963 BandType = 1 LayerName = Foreground end object ppLabel4: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label4' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Company' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3387 mmLeft = 794 mmTop = 3175 mmWidth = 11712 BandType = 1 LayerName = Foreground end object ppLabel26: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label26' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = ':' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taCentered Transparent = True mmHeight = 3440 mmLeft = 19050 mmTop = 3175 mmWidth = 1058 BandType = 1 LayerName = Foreground end end object ppHeaderBand2: TppHeaderBand Background.Brush.Style = bsClear Border.mmPadding = 0 PrintHeight = phDynamic mmBottomOffset = 0 mmHeight = 30956 mmPrintPosition = 0 object ppShape2: TppShape DesignLayer = ppDesignLayer1 UserName = 'Header1' Brush.Style = bsClear ParentWidth = True mmHeight = 5292 mmLeft = 0 mmTop = 25400 mmWidth = 196850 BandType = 0 LayerName = Foreground end object ppLabel2: TppLabel DesignLayer = ppDesignLayer1 UserName = 'lbTTitle' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Customer 6 Months Detail Aging' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 14 Font.Style = [fsBold] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taCentered Transparent = True mmHeight = 5969 mmLeft = 58246 mmTop = 5556 mmWidth = 80264 BandType = 0 LayerName = Foreground end object ppDBText50: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText202' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'C1' DataPipeline = AgingHeader Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [] ParentDataPipeline = False TextAlignment = taRightJustified Transparent = True DataPipelineName = 'AgingHeader' mmHeight = 3440 mmLeft = 161396 mmTop = 25929 mmWidth = 14288 BandType = 0 LayerName = Foreground end object ppDBText51: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText51' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'C2' DataPipeline = AgingHeader Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'AgingHeader' mmHeight = 3440 mmLeft = 146050 mmTop = 25929 mmWidth = 11906 BandType = 0 LayerName = Foreground end object ppDBText52: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText52' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'C3' DataPipeline = AgingHeader Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'AgingHeader' mmHeight = 3440 mmLeft = 129646 mmTop = 25929 mmWidth = 11906 BandType = 0 LayerName = Foreground end object ppDBText53: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText53' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'C4' DataPipeline = AgingHeader Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'AgingHeader' mmHeight = 3440 mmLeft = 113506 mmTop = 25929 mmWidth = 11906 BandType = 0 LayerName = Foreground end object ppSystemVariable3: TppSystemVariable DesignLayer = ppDesignLayer1 UserName = 'SystemVariable3' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 VarType = vtPrintDateTime DisplayFormat = 'dd/mm/yy h:nn AM/PM' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] TextAlignment = taRightJustified Transparent = True mmHeight = 3440 mmLeft = 168275 mmTop = 3175 mmWidth = 22754 BandType = 0 LayerName = Foreground end object ppSystemVariable4: TppSystemVariable DesignLayer = ppDesignLayer1 UserName = 'SystemVariable4' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 VarType = vtPageSetDesc Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] TextAlignment = taRightJustified Transparent = True mmHeight = 3704 mmLeft = 175155 mmTop = 20902 mmWidth = 15875 BandType = 0 LayerName = Foreground end object ppDBText61: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText61' HyperlinkEnabled = False AutoSize = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Code' DataPipeline = User Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] ParentDataPipeline = False TextAlignment = taRightJustified Transparent = True DataPipelineName = 'User' mmHeight = 3429 mmLeft = 182266 mmTop = 6350 mmWidth = 8763 BandType = 0 LayerName = Foreground end object ppLabel52: TppLabel DesignLayer = ppDesignLayer1 UserName = 'lbCoNameT' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'lbCoNameT' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3810 mmLeft = 794 mmTop = 20902 mmWidth = 16044 BandType = 0 LayerName = Foreground end object ppLabel53: TppLabel DesignLayer = ppDesignLayer1 UserName = 'lbTitleTDate' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'lbTitleTDate' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 12 Font.Style = [fsBold] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taCentered Transparent = True mmHeight = 5027 mmLeft = 85461 mmTop = 11377 mmWidth = 25929 BandType = 0 LayerName = Foreground end object ppLabel12: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label10' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'BALANCE' 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 = 3429 mmLeft = 182568 mmTop = 25929 mmWidth = 11642 BandType = 0 LayerName = Foreground end object ppDBText13: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText13' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'C5' DataPipeline = AgingHeader Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'AgingHeader' mmHeight = 3440 mmLeft = 95515 mmTop = 25929 mmWidth = 11906 BandType = 0 LayerName = Foreground end object ppDBText14: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText14' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'C6' DataPipeline = AgingHeader Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'AgingHeader' mmHeight = 3440 mmLeft = 77523 mmTop = 25929 mmWidth = 11906 BandType = 0 LayerName = Foreground end object ppLabel1: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label2' Border.mmPadding = 0 Caption = 'TERMS' 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 = 2911 mmLeft = 56886 mmTop = 25929 mmWidth = 8466 BandType = 0 LayerName = Foreground end end object ppDetailBand2: TppDetailBand Background1.Brush.Style = bsClear Background2.Brush.Style = bsClear Border.mmPadding = 0 PrintHeight = phDynamic mmBottomOffset = 1270 mmHeight = 10054 mmPrintPosition = 0 object ppSubReport1: TppSubReport DesignLayer = ppDesignLayer1 UserName = 'SubReport1' ExpandAll = False NewPrintJob = False OutlineSettings.CreateNode = True ShiftRelativeTo = ppRegion3 TraverseAllData = False DataPipelineName = 'Document' mmHeight = 5027 mmLeft = 0 mmTop = 5027 mmWidth = 196850 BandType = 4 LayerName = Foreground mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 object ppChildReport1: TppChildReport AutoStop = False DataPipeline = Document PrinterSetup.BinName = 'Default' PrinterSetup.DocumentName = 'SQL Financial Accounting: 0 Sumitech 6 Months Detail Aging' 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 = 'Name' Template.DatabaseSettings.TemplateField = 'Template' Template.SaveTo = stDatabase Template.Format = ftASCII Version = '19.03' mmColumnWidth = 0 DataPipelineName = 'Document' object ppDetailBand3: TppDetailBand Background1.Brush.Style = bsClear Background2.Brush.Style = bsClear Border.mmPadding = 0 PrintHeight = phDynamic mmBottomOffset = 0 mmHeight = 10583 mmPrintPosition = 0 object ppVariable9: TppVariable DesignLayer = ppDesignLayer2 UserName = 'VarC6' HyperlinkEnabled = False AutoSize = False Border.mmPadding = 0 BlankWhenZero = True CalcOrder = 5 DataType = dtCurrency DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = 5592405 Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] TextAlignment = taRightJustified Transparent = True mmHeight = 3429 mmLeft = 71173 mmTop = 794 mmWidth = 16404 BandType = 4 LayerName = Foreground1 end object ppVariable8: TppVariable DesignLayer = ppDesignLayer2 UserName = 'VarC5' HyperlinkEnabled = False AutoSize = False Border.mmPadding = 0 BlankWhenZero = True CalcOrder = 4 DataType = dtCurrency DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = 5592405 Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] TextAlignment = taRightJustified Transparent = True mmHeight = 3429 mmLeft = 88106 mmTop = 794 mmWidth = 16404 BandType = 4 LayerName = Foreground1 end object ppVariable6: TppVariable DesignLayer = ppDesignLayer2 UserName = 'VarC4' HyperlinkEnabled = False AutoSize = False Border.mmPadding = 0 BlankWhenZero = True CalcOrder = 3 DataType = dtCurrency DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = 5592405 Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] TextAlignment = taRightJustified Transparent = True mmHeight = 3429 mmLeft = 105040 mmTop = 794 mmWidth = 16404 BandType = 4 LayerName = Foreground1 end object ppVariable5: TppVariable DesignLayer = ppDesignLayer2 UserName = 'VarC3' HyperlinkEnabled = False AutoSize = False Border.mmPadding = 0 BlankWhenZero = True CalcOrder = 2 DataType = dtCurrency DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = 5592405 Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] TextAlignment = taRightJustified Transparent = True mmHeight = 3429 mmLeft = 123296 mmTop = 794 mmWidth = 16404 BandType = 4 LayerName = Foreground1 end object ppVariable4: TppVariable DesignLayer = ppDesignLayer2 UserName = 'VarC2' HyperlinkEnabled = False AutoSize = False Border.mmPadding = 0 BlankWhenZero = True CalcOrder = 1 DataType = dtCurrency DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = 5592405 Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] TextAlignment = taRightJustified Transparent = True mmHeight = 3429 mmLeft = 140759 mmTop = 794 mmWidth = 16404 BandType = 4 LayerName = Foreground1 end object ppVariable3: TppVariable DesignLayer = ppDesignLayer2 UserName = 'VarC1' HyperlinkEnabled = False AutoSize = False Border.mmPadding = 0 BlankWhenZero = True CalcOrder = 0 DataType = dtCurrency DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = 5592405 Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] TextAlignment = taRightJustified Transparent = True mmHeight = 3429 mmLeft = 156634 mmTop = 794 mmWidth = 16404 BandType = 4 LayerName = Foreground1 end object ppDBText15: TppDBText DesignLayer = ppDesignLayer2 UserName = 'DBText15' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'C7' DataPipeline = Document DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = 5592405 Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Document' mmHeight = 3429 mmLeft = 179920 mmTop = 794 mmWidth = 12965 BandType = 4 LayerName = Foreground1 end object ppDBText12: TppDBText DesignLayer = ppDesignLayer2 UserName = 'DBText12' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'DocDate' DataPipeline = Document DisplayFormat = 'dd/mm/yy' Font.Charset = DEFAULT_CHARSET Font.Color = 5592405 Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] Transparent = True DataPipelineName = 'Document' mmHeight = 3429 mmLeft = 1058 mmTop = 794 mmWidth = 12700 BandType = 4 LayerName = Foreground1 end object ppSubReport3: TppSubReport DesignLayer = ppDesignLayer2 UserName = 'SubReport3' ExpandAll = False NewPrintJob = False OutlineSettings.CreateNode = True TraverseAllData = False DataPipelineName = 'Document_KnockedOffDetail' mmHeight = 5027 mmLeft = 0 mmTop = 5556 mmWidth = 196850 BandType = 4 LayerName = Foreground1 mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 object ppChildReport3: TppChildReport AutoStop = False DataPipeline = Document_KnockedOffDetail PrinterSetup.BinName = 'Default' PrinterSetup.DocumentName = 'SQL Financial Accounting: 0 Sumitech 6 Months Detail Aging' 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 = 'Name' Template.DatabaseSettings.TemplateField = 'Template' Template.SaveTo = stDatabase Template.Format = ftASCII Version = '19.03' mmColumnWidth = 0 DataPipelineName = 'Document_KnockedOffDetail' object ppDetailBand1: TppDetailBand Background1.Brush.Style = bsClear Background2.Brush.Style = bsClear Border.mmPadding = 0 mmBottomOffset = 0 mmHeight = 3440 mmPrintPosition = 0 object ppDBText7: TppDBText DesignLayer = ppDesignLayer3 UserName = 'DBText7' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'DocNo' DataPipeline = Document_KnockedOffDetail Font.Charset = DEFAULT_CHARSET Font.Color = 5592405 Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [] Transparent = True DataPipelineName = 'Document_KnockedOffDetail' mmHeight = 2910 mmLeft = 8996 mmTop = 529 mmWidth = 16404 BandType = 4 LayerName = Foreground2 end object ppDBText17: TppDBText DesignLayer = ppDesignLayer3 UserName = 'DBText17' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'DocDate' DataPipeline = Document_KnockedOffDetail DisplayFormat = 'dd/mm/yy' Font.Charset = DEFAULT_CHARSET Font.Color = 5592405 Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [] Transparent = True DataPipelineName = 'Document_KnockedOffDetail' mmHeight = 2910 mmLeft = 26194 mmTop = 529 mmWidth = 12171 BandType = 4 LayerName = Foreground2 end object ppDBText18: TppDBText DesignLayer = ppDesignLayer3 UserName = 'DBTxtC4' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'KOAmt' DataPipeline = Document_KnockedOffDetail DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = 5592405 Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [] TextAlignment = taRightJustified Visible = False DataPipelineName = 'Document_KnockedOffDetail' mmHeight = 2910 mmLeft = 89429 mmTop = 529 mmWidth = 16404 BandType = 4 LayerName = Foreground2 end object ppDBText20: TppDBText DesignLayer = ppDesignLayer3 UserName = 'DBTxtC3' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'KOAmt' DataPipeline = Document_KnockedOffDetail DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = 5592405 Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [] TextAlignment = taRightJustified Transparent = True Visible = False DataPipelineName = 'Document_KnockedOffDetail' mmHeight = 2910 mmLeft = 72761 mmTop = 529 mmWidth = 16404 BandType = 4 LayerName = Foreground2 end object ppDBText21: TppDBText DesignLayer = ppDesignLayer3 UserName = 'DBTxtC2' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'KOAmt' DataPipeline = Document_KnockedOffDetail DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = 5592405 Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [] TextAlignment = taRightJustified Visible = False DataPipelineName = 'Document_KnockedOffDetail' mmHeight = 2910 mmLeft = 55827 mmTop = 529 mmWidth = 16404 BandType = 4 LayerName = Foreground2 end object ppDBText22: TppDBText DesignLayer = ppDesignLayer3 UserName = 'DBTxtC1' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'KOAmt' DataPipeline = Document_KnockedOffDetail DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = 5592405 Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [] TextAlignment = taRightJustified Transparent = True Visible = False DataPipelineName = 'Document_KnockedOffDetail' mmHeight = 2910 mmLeft = 39158 mmTop = 529 mmWidth = 16404 BandType = 4 LayerName = Foreground2 end object ppDBText23: TppDBText DesignLayer = ppDesignLayer3 UserName = 'DBTxtC6' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'KOAmt' DataPipeline = Document_KnockedOffDetail DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = 5592405 Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [] TextAlignment = taRightJustified DataPipelineName = 'Document_KnockedOffDetail' mmHeight = 2910 mmLeft = 123561 mmTop = 529 mmWidth = 16404 BandType = 4 LayerName = Foreground2 end object ppDBText24: TppDBText DesignLayer = ppDesignLayer3 UserName = 'DBTxtC5' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'KOAmt' DataPipeline = Document_KnockedOffDetail DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = 5592405 Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [] TextAlignment = taRightJustified Transparent = True Visible = False DataPipelineName = 'Document_KnockedOffDetail' mmHeight = 2910 mmLeft = 106363 mmTop = 529 mmWidth = 16404 BandType = 4 LayerName = Foreground2 end end object raCodeModule4: TraCodeModule object raProgramInfo19: TraProgramInfo raClassName = 'TraVarProgram' raProgram.ChildType = 17 raProgram.ProgramName = 'Variables' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure Variables;'#13#10'var'#13#10' d1 : string;'#13#10#13#10'begin'#13#10#13#10'end;'#13#10 end object raProgramInfo20: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'DetailBeforePrint' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure DetailBeforePrint;'#13#10'var s : string;'#13#10'begin'#13#10' s := Opt' + 'ion.GetFieldValue('#39'AccountingValueDisplayFormat'#39');'#13#10' d1 := Valu' + 'eOfSemiColonStr(s, 1)+'#39';'#39'+ ValueOfSemiColonStr(s, 0);'#13#10'end;'#13#10 raProgram.ComponentName = 'Detail' raProgram.EventName = 'BeforePrint' raProgram.EventID = 24 end object raProgramInfo21: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'DBTxtC1OnPrint' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure DBTxtC1OnPrint;'#13#10'begin'#13#10' DBTxtC1.DisplayFormat := d1;' + #13#10' DBTxtC1.Visible := Trim(Document.GetFieldValue('#39'C1'#39')) <> '#39#39 + ';'#13#10'end;'#13#10 raProgram.ComponentName = 'DBTxtC1' raProgram.EventName = 'OnPrint' raProgram.EventID = 32 end object raProgramInfo22: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'DBTxtC2OnPrint' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure DBTxtC2OnPrint;'#13#10'begin'#13#10' DBTxtC2.DisplayFormat := d1;' + #13#10' DBTxtC2.Visible := Trim(Document.GetFieldValue('#39'C2'#39')) <> '#39#39 + ';'#13#10'end;'#13#10 raProgram.ComponentName = 'DBTxtC2' raProgram.EventName = 'OnPrint' raProgram.EventID = 32 end object raProgramInfo23: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'DBTxtC3OnPrint' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure DBTxtC3OnPrint;'#13#10'begin'#13#10' DBTxtC3.DisplayFormat := d1;' + #13#10' DBTxtC3.Visible := Trim(Document.GetFieldValue('#39'C3'#39')) <> '#39#39 + ';'#13#10'end;'#13#10 raProgram.ComponentName = 'DBTxtC3' raProgram.EventName = 'OnPrint' raProgram.EventID = 32 end object raProgramInfo24: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'DBTxtC4OnPrint' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure DBTxtC4OnPrint;'#13#10'begin'#13#10' DBTxtC4.DisplayFormat := d1;' + #13#10' DBTxtC4.Visible := Trim(Document.GetFieldValue('#39'C4'#39')) <> '#39#39 + ';'#13#10'end;'#13#10 raProgram.ComponentName = 'DBTxtC4' raProgram.EventName = 'OnPrint' raProgram.EventID = 32 end object raProgramInfo25: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'DBTxtC5OnPrint' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure DBTxtC5OnPrint;'#13#10'begin'#13#10' DBTxtC5.DisplayFormat := d1;' + #13#10' DBTxtC5.Visible := Trim(Document.GetFieldValue('#39'C5'#39')) <> '#39#39 + ';'#13#10'end;'#13#10 raProgram.ComponentName = 'DBTxtC5' raProgram.EventName = 'OnPrint' raProgram.EventID = 32 end object raProgramInfo26: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'DBTxtC6OnPrint' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure DBTxtC6OnPrint;'#13#10'begin'#13#10' DBTxtC6.DisplayFormat := d1;' + #13#10' DBTxtC6.Visible := Trim(Document.GetFieldValue('#39'C6'#39')) <> '#39#39 + ';'#13#10'end;'#13#10 raProgram.ComponentName = 'DBTxtC6' raProgram.EventName = 'OnPrint' raProgram.EventID = 32 end end object ppDesignLayers3: TppDesignLayers object ppDesignLayer3: TppDesignLayer UserName = 'Foreground2' LayerType = ltBanded Index = 0 end end end end object ppDBText4: TppDBText DesignLayer = ppDesignLayer2 UserName = 'DBText4' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'DocNo' DataPipeline = Document Font.Charset = DEFAULT_CHARSET Font.Color = 5592405 Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] Transparent = True DataPipelineName = 'Document' mmHeight = 3429 mmLeft = 16140 mmTop = 794 mmWidth = 16140 BandType = 4 LayerName = Foreground1 end object ppDBText5: TppDBText DesignLayer = ppDesignLayer2 UserName = 'DBText5' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Terms' DataPipeline = Document Font.Charset = DEFAULT_CHARSET Font.Color = 5592405 Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] Transparent = True DataPipelineName = 'Document' mmHeight = 3429 mmLeft = 57150 mmTop = 794 mmWidth = 12171 BandType = 4 LayerName = Foreground1 end object ppDBRichText1: TppDBRichText DesignLayer = ppDesignLayer2 UserName = 'DBRichText1' Font.Charset = DEFAULT_CHARSET Font.Color = 5592405 Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] Border.mmPadding = 0 ExportRTFAsBitmap = False DataField = 'Description' DataPipeline = Document RemoveEmptyLines = False Transparent = True DataPipelineName = 'Document' mmHeight = 3440 mmLeft = 32808 mmTop = 265 mmWidth = 23548 BandType = 4 LayerName = Foreground1 mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 end end object ppSummaryBand1: TppSummaryBand Background.Brush.Style = bsClear Border.mmPadding = 0 PrintHeight = phDynamic mmBottomOffset = 0 mmHeight = 0 mmPrintPosition = 0 end object ppGroup1: TppGroup BreakName = 'Code' DataPipeline = Document GroupFileSettings.NewFile = False GroupFileSettings.EmailFile = False OutlineSettings.CreateNode = True ReprintOnSubsequentPage = False StartOnOddPage = False UserName = 'Group1' mmNewColumnThreshold = 0 mmNewPageThreshold = 0 DataPipelineName = 'Document' 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 PrintHeight = phDynamic HideWhenOneDetail = False mmBottomOffset = 0 mmHeight = 25400 mmPrintPosition = 0 object ppLabel3: TppLabel DesignLayer = ppDesignLayer2 UserName = 'Label3' Border.mmPadding = 0 Caption = 'MTD COLLECTION' 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 = 3175 mmTop = 2381 mmWidth = 23019 BandType = 5 GroupNo = 0 LayerName = Foreground1 end object ppLabel5: TppLabel DesignLayer = ppDesignLayer2 UserName = 'Label5' Border.mmPadding = 0 Caption = 'LAST DATE RECEIPT' 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 = 3429 mmLeft = 41804 mmTop = 2381 mmWidth = 25908 BandType = 5 GroupNo = 0 LayerName = Foreground1 end object ppLabel6: TppLabel DesignLayer = ppDesignLayer2 UserName = 'Label6' Border.mmPadding = 0 Caption = 'TERMS' 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 = 87313 mmTop = 2381 mmWidth = 8731 BandType = 5 GroupNo = 0 LayerName = Foreground1 end object ppLabel7: TppLabel DesignLayer = ppDesignLayer2 UserName = 'Label7' Border.mmPadding = 0 Caption = 'CREDIT LIMIT' 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 = 114300 mmTop = 2381 mmWidth = 17992 BandType = 5 GroupNo = 0 LayerName = Foreground1 end object ppLabel8: TppLabel DesignLayer = ppDesignLayer2 UserName = 'Label8' Border.mmPadding = 0 Caption = 'TELEPHONE' 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 = 3429 mmLeft = 148167 mmTop = 2381 mmWidth = 15240 BandType = 5 GroupNo = 0 LayerName = Foreground1 end object ppLabel9: TppLabel DesignLayer = ppDesignLayer2 UserName = 'Label9' Border.mmPadding = 0 Caption = 'PDC' 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 = 183621 mmTop = 2381 mmWidth = 5292 BandType = 5 GroupNo = 0 LayerName = Foreground1 end object ppLine4: TppLine DesignLayer = ppDesignLayer2 UserName = 'Line4' Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Pen.Color = clGray ParentWidth = True Position = lpBottom Weight = 0.750000000000000000 mmHeight = 2117 mmLeft = 0 mmTop = 14288 mmWidth = 196850 BandType = 5 GroupNo = 0 LayerName = Foreground1 end object ppDBText1: TppDBText DesignLayer = ppDesignLayer2 UserName = 'DBText1' Border.mmPadding = 0 DataField = 'M1' DataPipeline = Main DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] ParentDataPipeline = False TextAlignment = taCentered DataPipelineName = 'Main' mmHeight = 3429 mmLeft = 3175 mmTop = 6615 mmWidth = 21960 BandType = 5 GroupNo = 0 LayerName = Foreground1 end object ppDBText3: TppDBText DesignLayer = ppDesignLayer2 UserName = 'DBText3' Border.mmPadding = 0 DataField = 'CreditTerm' DataPipeline = Company Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] ParentDataPipeline = False TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Company' mmHeight = 3429 mmLeft = 85196 mmTop = 6615 mmWidth = 10848 BandType = 5 GroupNo = 0 LayerName = Foreground1 end object ppDBText6: TppDBText DesignLayer = ppDesignLayer2 UserName = 'DBText6' Border.mmPadding = 0 DataField = 'CreditLimit' DataPipeline = Company DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] ParentDataPipeline = False TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Company' mmHeight = 3429 mmLeft = 114300 mmTop = 6615 mmWidth = 17198 BandType = 5 GroupNo = 0 LayerName = Foreground1 end object ppDBText8: TppDBText DesignLayer = ppDesignLayer2 UserName = 'DBText8' AutoSize = True Border.mmPadding = 0 DataField = 'Phone1' DataPipeline = Company Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] ParentDataPipeline = False TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Company' mmHeight = 3429 mmLeft = 148516 mmTop = 6615 mmWidth = 15113 BandType = 5 GroupNo = 0 LayerName = Foreground1 end object ppLine2: TppLine DesignLayer = ppDesignLayer2 UserName = 'Line2' Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Pen.Color = clGray ParentWidth = True Position = lpBottom Weight = 0.750000000000000000 mmHeight = 2117 mmLeft = 0 mmTop = 21431 mmWidth = 196850 BandType = 5 GroupNo = 0 LayerName = Foreground1 end object ppVariable1: TppVariable DesignLayer = ppDesignLayer2 UserName = 'Variable1' Border.mmPadding = 0 BlankWhenZero = False CalcOrder = 0 DataType = dtDate Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] TextAlignment = taRightJustified Transparent = True mmHeight = 3429 mmLeft = 51678 mmTop = 6615 mmWidth = 11557 BandType = 5 GroupNo = 0 LayerName = Foreground1 end object ppDBCalc1: TppDBCalc DesignLayer = ppDesignLayer2 UserName = 'DBCalc1' Border.mmPadding = 0 DataField = 'C6' DataPipeline = Document DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] ResetGroup = ppGroup1 TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Document' mmHeight = 3429 mmLeft = 74877 mmTop = 18521 mmWidth = 12700 BandType = 5 GroupNo = 0 LayerName = Foreground1 end object ppDBCalc2: TppDBCalc DesignLayer = ppDesignLayer2 UserName = 'DBCalc2' Border.mmPadding = 0 DataField = 'C5' DataPipeline = Document DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] ResetGroup = ppGroup1 TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Document' mmHeight = 3429 mmLeft = 91811 mmTop = 18521 mmWidth = 12700 BandType = 5 GroupNo = 0 LayerName = Foreground1 end object ppDBCalc3: TppDBCalc DesignLayer = ppDesignLayer2 UserName = 'DBCalc3' Border.mmPadding = 0 DataField = 'C4' DataPipeline = Document DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] ResetGroup = ppGroup1 TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Document' mmHeight = 3429 mmLeft = 108744 mmTop = 18521 mmWidth = 12700 BandType = 5 GroupNo = 0 LayerName = Foreground1 end object ppDBCalc6: TppDBCalc DesignLayer = ppDesignLayer2 UserName = 'DBCalc6' Border.mmPadding = 0 DataField = 'C3' DataPipeline = Document DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] ResetGroup = ppGroup1 TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Document' mmHeight = 3429 mmLeft = 128059 mmTop = 18521 mmWidth = 12700 BandType = 5 GroupNo = 0 LayerName = Foreground1 end object ppDBCalc7: TppDBCalc DesignLayer = ppDesignLayer2 UserName = 'DBCalc7' Border.mmPadding = 0 DataField = 'C2' DataPipeline = Document DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] ResetGroup = ppGroup1 TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Document' mmHeight = 3429 mmLeft = 144463 mmTop = 18521 mmWidth = 12700 BandType = 5 GroupNo = 0 LayerName = Foreground1 end object ppDBCalc8: TppDBCalc DesignLayer = ppDesignLayer2 UserName = 'DBCalc8' Border.mmPadding = 0 DataField = 'C1' DataPipeline = Document DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] ResetGroup = ppGroup1 TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Document' mmHeight = 3429 mmLeft = 159809 mmTop = 18521 mmWidth = 12700 BandType = 5 GroupNo = 0 LayerName = Foreground1 end object ppDBCalc9: TppDBCalc DesignLayer = ppDesignLayer2 UserName = 'DBCalc9' Border.mmPadding = 0 DataField = 'C7' DataPipeline = Document DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] ResetGroup = ppGroup1 TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Document' mmHeight = 3429 mmLeft = 177804 mmTop = 18521 mmWidth = 15081 BandType = 5 GroupNo = 0 LayerName = Foreground1 end object ppLine1: TppLine DesignLayer = ppDesignLayer2 UserName = 'Line1' Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Pen.Color = clGray ParentWidth = True Position = lpBottom Weight = 0.750000000000000000 mmHeight = 1058 mmLeft = 0 mmTop = 0 mmWidth = 196850 BandType = 5 GroupNo = 0 LayerName = Foreground1 end object ppDBText10: TppDBText DesignLayer = ppDesignLayer2 UserName = 'DBText10' AutoSize = True Border.mmPadding = 0 DataField = 'Phone2' DataPipeline = Company Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] ParentDataPipeline = False TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Company' mmHeight = 3429 mmLeft = 148516 mmTop = 9790 mmWidth = 15113 BandType = 5 GroupNo = 0 LayerName = Foreground1 end object ppDBText9: TppDBText DesignLayer = ppDesignLayer2 UserName = 'DBText9' Border.mmPadding = 0 DataField = 'TotalKOAmt' DataPipeline = plSQL_2 DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] ParentDataPipeline = False TextAlignment = taRightJustified Transparent = True DataPipelineName = 'plSQL_2' mmHeight = 4498 mmLeft = 171588 mmTop = 6615 mmWidth = 17198 BandType = 5 GroupNo = 0 LayerName = Foreground1 end end end object raCodeModule1: TraCodeModule object raProgramInfo27: TraProgramInfo raClassName = 'TraVarProgram' raProgram.ChildType = 17 raProgram.ProgramName = 'Variables' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure Variables;'#13#10'var'#13#10' totalPDC, sumPDC :tppVariable;'#13#10'be' + 'gin'#13#10#13#10'end;'#13#10 end object raProgramInfo28: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'DetailBeforePrint' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure DetailBeforePrint;'#13#10'begin'#13#10' { DBTxtPDC.DisplayFormat :' + '= d;'#13#10' VarBal.DisplayFormat := d; }'#13#10'end;'#13#10 raProgram.ComponentName = 'Detail' raProgram.EventName = 'BeforePrint' raProgram.EventID = 24 raProgram.CaretPos = ( 3 3) end object raProgramInfo29: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'VarC1OnCalc' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure VarC1OnCalc(var Value: Variant);'#13#10'begin'#13#10' VarC1.Displ' + 'ayFormat := d;'#13#10' if Trim(Document.GetFieldValue('#39'C1'#39')) <> '#39#39' th' + 'en'#13#10' Value := Document.GetFieldValue('#39'C1'#39') + plSQL_1.GetFiel' + 'dValue('#39'KOAmt'#39') else'#13#10' Value := 0;'#13#10'end;'#13#10 raProgram.ComponentName = 'VarC1' raProgram.EventName = 'OnCalc' raProgram.EventID = 33 end object raProgramInfo30: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'VarC2OnCalc' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure VarC2OnCalc(var Value: Variant);'#13#10'begin'#13#10' VarC2.Displ' + 'ayFormat := d;'#13#10' if Trim(Document.GetFieldValue('#39'C2'#39')) <> '#39#39' th' + 'en'#13#10' Value := Document.GetFieldValue('#39'C2'#39') + plSQL_1.GetFiel' + 'dValue('#39'KOAmt'#39') else'#13#10' Value := 0;'#13#10'end;'#13#10 raProgram.ComponentName = 'VarC2' raProgram.EventName = 'OnCalc' raProgram.EventID = 33 end object raProgramInfo31: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'VarC3OnCalc' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure VarC3OnCalc(var Value: Variant);'#13#10'begin'#13#10' VarC3.Displ' + 'ayFormat := d;'#13#10' if Trim(Document.GetFieldValue('#39'C3'#39')) <> '#39#39' th' + 'en'#13#10' Value := Document.GetFieldValue('#39'C3'#39') + plSQL_1.GetFiel' + 'dValue('#39'KOAmt'#39') else'#13#10' Value := 0;'#13#10'end;'#13#10 raProgram.ComponentName = 'VarC3' raProgram.EventName = 'OnCalc' raProgram.EventID = 33 end object raProgramInfo32: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'VarC4OnCalc' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure VarC4OnCalc(var Value: Variant);'#13#10'begin'#13#10' VarC4.Displ' + 'ayFormat := d;'#13#10' if Trim(Document.GetFieldValue('#39'C4'#39')) <> '#39#39' th' + 'en'#13#10' Value := Document.GetFieldValue('#39'C4'#39') + plSQL_1.GetFiel' + 'dValue('#39'KOAmt'#39') else'#13#10' Value := 0;'#13#10'end;'#13#10 raProgram.ComponentName = 'VarC4' raProgram.EventName = 'OnCalc' raProgram.EventID = 33 end object raProgramInfo33: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'VarC5OnCalc' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure VarC5OnCalc(var Value: Variant);'#13#10'begin'#13#10' VarC5.Displ' + 'ayFormat := d;'#13#10' if Trim(Document.GetFieldValue('#39'C5'#39')) <> '#39#39' th' + 'en'#13#10' Value := Document.GetFieldValue('#39'C5'#39') + plSQL_1.GetFiel' + 'dValue('#39'KOAmt'#39') else'#13#10' Value := 0;'#13#10'end;'#13#10 raProgram.ComponentName = 'VarC5' raProgram.EventName = 'OnCalc' raProgram.EventID = 33 end object raProgramInfo34: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'VarC6OnCalc' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure VarC6OnCalc(var Value: Variant);'#13#10'begin'#13#10' VarC6.Displ' + 'ayFormat := d;'#13#10' if Trim(Document.GetFieldValue('#39'C6'#39')) <> '#39#39' th' + 'en'#13#10' Value := Document.GetFieldValue('#39'C6'#39') + plSQL_1.GetFiel' + 'dValue('#39'KOAmt'#39') else'#13#10' Value := 0;'#13#10'end;'#13#10 raProgram.ComponentName = 'VarC6' raProgram.EventName = 'OnCalc' raProgram.EventID = 33 end object raProgramInfo35: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'Variable1OnCalc' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure Variable1OnCalc(var Value: Variant);'#13#10#13#10'var s : string' + ';'#13#10'begin'#13#10' s := '#39'SELECT Max(DocDate) FROM AR_PM '#39' +'#13#10' ' + #39'WHERE CODE='#39' + QuotedStr(Main.GetFieldValue('#39'Code'#39'));'#13#10' Value ' + ':= DBSQL_GetFieldValue(s);'#13#10'end;'#13#10#13#10#13#10'end;'#13#10 raProgram.ComponentName = 'Variable1' raProgram.EventName = 'OnCalc' raProgram.EventID = 33 end object raProgramInfo36: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'DBText1OnGetText' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure DBText1OnGetText(var Text: String);'#13#10'begin'#13#10' if (Trim' + '(Main.GetFieldValue('#39'M1'#39')) = '#39#39') or (Main.GetFieldValue('#39'M1'#39') = ' + '0) then'#13#10' Text := '#39'0.00'#39';'#13#10'end;'#13#10 raProgram.ComponentName = 'DBText1' raProgram.EventName = 'OnGetText' raProgram.EventID = 53 raProgram.CaretPos = ( 3 3) end end object ppDesignLayers2: TppDesignLayers object ppDesignLayer2: TppDesignLayer UserName = 'Foreground1' LayerType = ltBanded Index = 0 end end end end object ppRegion3: TppRegion DesignLayer = ppDesignLayer1 UserName = 'Region3' KeepTogether = True Brush.Style = bsClear Caption = 'Region3' ParentWidth = True Pen.Color = clYellow Pen.Style = psClear Stretch = True Transparent = True mmHeight = 4763 mmLeft = 0 mmTop = 0 mmWidth = 196850 BandType = 4 LayerName = Foreground mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 object ppDBMemo1: TppDBMemo DesignLayer = ppDesignLayer1 UserName = 'DBMemo1' Border.Weight = 1.000000000000000000 Border.mmPadding = 0 CharWrap = False DataField = 'CompanyName' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [fsBold] RemoveEmptyLines = False Transparent = True DataPipelineName = 'Main' mmHeight = 3704 mmLeft = 22225 mmTop = 1058 mmWidth = 109538 BandType = 4 LayerName = Foreground mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 mmLeading = 0 end object ppDBText2: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText2' Border.mmPadding = 0 DataField = 'Code' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [fsBold] Transparent = True DataPipelineName = 'Main' mmHeight = 2963 mmLeft = 529 mmTop = 1058 mmWidth = 17198 BandType = 4 LayerName = Foreground end end end object ppFooterBand2: TppFooterBand Background.Brush.Style = bsClear Border.mmPadding = 0 mmBottomOffset = 0 mmHeight = 0 mmPrintPosition = 0 end object ppSummaryBand2: TppSummaryBand Background.Brush.Style = bsClear Border.mmPadding = 0 PrintHeight = phDynamic mmBottomOffset = 0 mmHeight = 8731 mmPrintPosition = 0 object ppRegion1: TppRegion DesignLayer = ppDesignLayer1 UserName = 'Region2' KeepTogether = True Brush.Style = bsClear Caption = 'Region2' ParentWidth = True Pen.Style = psClear Stretch = True Transparent = True mmHeight = 8731 mmLeft = 0 mmTop = 0 mmWidth = 196850 BandType = 7 LayerName = Foreground mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 object ppLine3: TppLine DesignLayer = ppDesignLayer1 UserName = 'Line3' Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Position = lpBottom Style = lsDouble Weight = 1.000000000000000000 mmHeight = 794 mmLeft = 0 mmTop = 6615 mmWidth = 195792 BandType = 7 LayerName = Foreground end object ppLabel11: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label1' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Grand Total ' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [fsBold] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3429 mmLeft = 794 mmTop = 2116 mmWidth = 17526 BandType = 7 LayerName = Foreground end object ppVariable7: TppVariable DesignLayer = ppDesignLayer1 UserName = 'VarTotalBal' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 BlankWhenZero = False CalcOrder = 0 DataType = dtCurrency DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [fsBold] TextAlignment = taRightJustified Transparent = True Visible = False mmHeight = 2910 mmLeft = 42598 mmTop = 2117 mmWidth = 14552 BandType = 7 LayerName = Foreground end object ppDBCalc35: TppDBCalc DesignLayer = ppDesignLayer1 UserName = 'DBCalc35' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'C4' DataPipeline = Main DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [fsBold] TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Main' mmHeight = 2910 mmLeft = 109802 mmTop = 2117 mmWidth = 16404 BandType = 7 LayerName = Foreground end object ppDBCalc4: TppDBCalc DesignLayer = ppDesignLayer1 UserName = 'DBCalc4' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'C5' DataPipeline = Main DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [fsBold] TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Main' mmHeight = 2910 mmLeft = 92075 mmTop = 2117 mmWidth = 16404 BandType = 7 LayerName = Foreground end object ppDBCalc30: TppDBCalc DesignLayer = ppDesignLayer1 UserName = 'DBCalc30' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'C1' DataPipeline = Main DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [fsBold] TextAlignment = taRightJustified DataPipelineName = 'Main' mmHeight = 2910 mmLeft = 161396 mmTop = 2117 mmWidth = 14288 BandType = 7 LayerName = Foreground end object ppDBCalc31: TppDBCalc DesignLayer = ppDesignLayer1 UserName = 'DBCalc31' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'C2' DataPipeline = Main DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [fsBold] TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Main' mmHeight = 2910 mmLeft = 142082 mmTop = 2117 mmWidth = 16404 BandType = 7 LayerName = Foreground end object ppDBCalc33: TppDBCalc DesignLayer = ppDesignLayer1 UserName = 'DBCalc33' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'C3' DataPipeline = Main DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [fsBold] TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Main' mmHeight = 2910 mmLeft = 125942 mmTop = 2117 mmWidth = 16404 BandType = 7 LayerName = Foreground end object ppDBCalc5: TppDBCalc DesignLayer = ppDesignLayer1 UserName = 'DBCalc5' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'C6' DataPipeline = Main DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [fsBold] TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Main' mmHeight = 2910 mmLeft = 74083 mmTop = 2117 mmWidth = 16404 BandType = 7 LayerName = Foreground end object ppDBCalc11: TppDBCalc DesignLayer = ppDesignLayer1 UserName = 'DBCalc301' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'C7' DataPipeline = Main DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 7 Font.Style = [fsBold] TextAlignment = taRightJustified DataPipelineName = 'Main' mmHeight = 2910 mmLeft = 179918 mmTop = 2117 mmWidth = 14288 BandType = 7 LayerName = Foreground end end end object raCodeModule2: TraCodeModule object raProgramInfo37: 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, d, SQL_2: string;'#13#10#13 + #10'begin'#13#10#13#10'end;'#13#10 raProgram.CaretPos = ( 26 2) end object raProgramInfo38: TraProgramInfo raClassName = 'TraProgram' raProgram.ChildType = 19 raProgram.ProgramName = 'GlobalOnCreate' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure GlobalOnCreate;'#13#10'begin'#13#10' d := Option.GetFieldValue('#39'Ac' + 'countingValueDisplayFormat'#39');'#13#10' SQL_0 := '#39'SELECT A.Code, Sum(B.K' + 'OAmt) TotalKOAmt FROM Document A '#39' +'#13#10' '#9#9#39'INNER JOIN Document_P' + 'DC B ON (A.DocKey=B.ToDocKey) '#39' +'#13#10' '#9#9#39'AND (A.DocType=B.ToDocTy' + 'pe) '#39' +'#13#10' '#39'GROUP BY A.Code'#39';'#13#10' SQL_1 := '#39'SELECT ToDockey, ' + 'Sum(KOAmt) KOAmt FROM Document_KnockedOffDetail '#39' +'#13#10' '#39 + 'GROUP BY ToDockey'#39';'#13#10' SQL_2 := '#39'SELECT A.Code, Sum(B.KOAmt) Tot' + 'alKOAmt FROM Document A '#39' +'#13#10' '#9#9#39'INNER JOIN Document_PDC B ON (' + 'A.DocKey=B.ToDocKey) '#39' +'#13#10' '#9#9#39'AND (A.DocType=B.ToDocType) '#39' +'#13#10 + ' '#39'GROUP BY A.Code'#39';'#13#10'end;'#13#10 raProgram.CaretPos = ( 29 7) end object raProgramInfo39: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'ReportBeforePrint' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure ReportBeforePrint;'#13#10'begin'#13#10' LocalSQL_SELECT(plSQL_0, ' + 'SQL_0, '#39'Code'#39');'#13#10' LocalSQL_SELECT(plSQL_1, SQL_1, '#39#39');'#13#10' SetDa' + 'taPipelineFieldLink(Main, plSQL_0, '#39'Code'#39', '#39'Code'#39');'#13#10' SetDataPi' + 'pelineFieldLink(Document, plSQL_1, '#39'Dockey'#39', '#39'ToDockey'#39');'#13#10' '#13#10' ' + ' LocalSQL_SELECT(plSQL_2, SQL_2, '#39'Code'#39');'#13#10' SetDataPipelineFiel' + 'dLink(Document, plSQL_2, '#39'Code'#39', '#39'Code'#39'); '#13#10' '#13#10' {DBCalcSPDC.Di' + 'splayFormat := d;'#13#10' varTotalBal.DisplayFormat := d; }'#13#10'end;'#13#10#13 + #10 raProgram.ComponentName = 'Report' raProgram.EventName = 'BeforePrint' raProgram.EventID = 1 raProgram.CaretPos = ( 58 9) end object raProgramInfo40: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'lbTitleTDateOnGetText' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure lbTitleTDateOnGetText(var Text: String);'#13#10'begin'#13#10' Tex' + 't := '#39'As At '#39' + Parameter.GetFieldValue('#39'AgingDate'#39');'#13#10'end;'#13#10 raProgram.ComponentName = 'lbTitleTDate' raProgram.EventName = 'OnGetText' raProgram.EventID = 53 end object raProgramInfo41: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'lbCoNameTOnGetText' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure lbCoNameTOnGetText(var Text: String);'#13#10'begin'#13#10'Text := ' + 'Profile.GetFieldValue('#39'CompanyName'#39') +'#13#10' '#39' ('#39' + Profile.GetField' + 'Value('#39'RegisterNo'#39') + '#39')'#39';'#13#10'end;'#13#10 raProgram.ComponentName = 'lbCoNameT' raProgram.EventName = 'OnGetText' raProgram.EventID = 53 raProgram.CaretPos = ( 3 3) end object raProgramInfo42: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'VarTotalBalOnCalc' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure VarTotalBalOnCalc(var Value: Variant);'#13#10'begin'#13#10#13#10' { Va' + 'lue := DBCalcSC7.Value - DBCalcSPDC.Value; }'#13#10#13#10'end;'#13#10 raProgram.ComponentName = 'VarTotalBal' raProgram.EventName = 'OnCalc' raProgram.EventID = 33 end end object ppDesignLayers1: TppDesignLayers object ppDesignLayer1: TppDesignLayer UserName = 'Foreground' LayerType = ltBanded Index = 0 end end object ppParameterList1: TppParameterList end end