TdvSLCS object TppReport AutoStop = False DataPipeline = Main NoDataBehaviors = [ndBlankReport] PassSetting = psTwoPass PrinterSetup.BinName = 'Default' PrinterSetup.DocumentName = 'SQL Financial Accounting: Sales Invoice 3 (Simple)' 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 = '16-Invoice-Full-(Rounding)' 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 = 196850 DataPipelineName = 'Main' object ppHeaderBand2: TppHeaderBand Background.Brush.Style = bsClear Border.mmPadding = 0 mmBottomOffset = 0 mmHeight = 65617 mmPrintPosition = 0 object DBImage1: TppDBImage DesignLayer = ppDesignLayer1 UserName = 'DBImage1' AlignHorizontal = ahCenter AlignVertical = avCenter MaintainAspectRatio = False Stretch = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Logo' DataPipeline = Profile GraphicType = 'Bitmap' ParentDataPipeline = False DataPipelineName = 'Profile' mmHeight = 25400 mmLeft = 794 mmTop = 0 mmWidth = 25400 BandType = 0 LayerName = Foreground end object Line1: TppLine DesignLayer = ppDesignLayer1 UserName = 'Line2' Border.Weight = 1.000000000000000000 Border.mmPadding = 0 ParentWidth = True Weight = 0.750000000000000000 mmHeight = 1323 mmLeft = 0 mmTop = 27776 mmWidth = 201930 BandType = 0 LayerName = Foreground end object DBText1: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText1' HyperlinkEnabled = False AutoSize = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'DocNo' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [fsBold] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 3439 mmLeft = 152929 mmTop = 28840 mmWidth = 9261 BandType = 0 LayerName = Foreground end object Label2: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label2' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'INVOICE' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 12 Font.Style = [fsBold] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 5027 mmLeft = 78846 mmTop = 28046 mmWidth = 18521 BandType = 0 LayerName = Foreground end object DBText2: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText2' 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 = 8 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 4233 mmLeft = 6085 mmTop = 40857 mmWidth = 101600 BandType = 0 LayerName = Foreground end object DBText3: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText3' 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 = 8 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 4233 mmLeft = 6085 mmTop = 44912 mmWidth = 101600 BandType = 0 LayerName = Foreground end object DBText4: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText4' 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 = 8 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 4233 mmLeft = 6085 mmTop = 33188 mmWidth = 101600 BandType = 0 LayerName = Foreground end object DBText5: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText5' 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 = 8 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 4233 mmLeft = 6085 mmTop = 48747 mmWidth = 101600 BandType = 0 LayerName = Foreground end object DBText6: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText6' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Attention' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 4233 mmLeft = 15875 mmTop = 52802 mmWidth = 91811 BandType = 0 LayerName = Foreground end object Label3: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label3' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Your Ref.' 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 = 127000 mmTop = 32497 mmWidth = 12171 BandType = 0 LayerName = Foreground end object Label4: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label4' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Our D/O No' 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 = 3439 mmLeft = 127000 mmTop = 35934 mmWidth = 14817 BandType = 0 LayerName = Foreground end object Label5: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label5' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 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 = 3439 mmLeft = 127000 mmTop = 39769 mmWidth = 7673 BandType = 0 LayerName = Foreground end object Label6: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label6' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Date ' 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 = 127000 mmTop = 43339 mmWidth = 6879 BandType = 0 LayerName = Foreground end object DBText8: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText8' HyperlinkEnabled = False AutoSize = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'FromDocNo' DataPipeline = Document_Detail Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Document_Detail' mmHeight = 3439 mmLeft = 152929 mmTop = 35934 mmWidth = 14553 BandType = 0 LayerName = Foreground end object DBText9: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText9' HyperlinkEnabled = False AutoSize = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Terms' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 3439 mmLeft = 152929 mmTop = 39769 mmWidth = 7673 BandType = 0 LayerName = Foreground end object DBText10: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText10' 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 = 8 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 3440 mmLeft = 152929 mmTop = 43339 mmWidth = 10848 BandType = 0 LayerName = Foreground end object Line11: TppLine DesignLayer = ppDesignLayer1 UserName = 'Line11' Border.Weight = 1.000000000000000000 Border.mmPadding = 0 ParentWidth = True Position = lpBottom Weight = 0.750000000000000000 mmHeight = 1852 mmLeft = 0 mmTop = 63492 mmWidth = 201930 BandType = 0 LayerName = Foreground end object DBRichText1: TppDBRichText DesignLayer = ppDesignLayer1 UserName = 'DBRichText1' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] Border.Weight = 1.000000000000000000 Border.mmPadding = 0 ExportRTFAsBitmap = False DataField = 'Note' DataPipeline = Profile ParentDataPipeline = False RemoveEmptyLines = False DataPipelineName = 'Profile' mmHeight = 26899 mmLeft = 26459 mmTop = 0 mmWidth = 144780 BandType = 0 LayerName = Foreground mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 mmLeftMargin = 794 end object Label20: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label20' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Page' 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 = 127000 mmTop = 46996 mmWidth = 6350 BandType = 0 LayerName = Foreground end object Label23: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label23' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = ':' 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 = 150284 mmTop = 46996 mmWidth = 1058 BandType = 0 LayerName = Foreground end object Label24: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label24' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = ':' 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 = 150284 mmTop = 32497 mmWidth = 1058 BandType = 0 LayerName = Foreground end object Label25: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label25' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = ':' 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 = 150284 mmTop = 43339 mmWidth = 1058 BandType = 0 LayerName = Foreground end object Label26: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label26' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = ':' 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 = 3439 mmLeft = 150284 mmTop = 39769 mmWidth = 1058 BandType = 0 LayerName = Foreground end object Label27: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label27' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = ':' 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 = 3439 mmLeft = 150284 mmTop = 35934 mmWidth = 1058 BandType = 0 LayerName = Foreground end object Label28: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label28' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = ':' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [fsBold] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True mmHeight = 3439 mmLeft = 150548 mmTop = 28840 mmWidth = 794 BandType = 0 LayerName = Foreground end object DBText12: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText12' 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 = 8 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 4233 mmLeft = 6085 mmTop = 36801 mmWidth = 101600 BandType = 0 LayerName = Foreground end object Label12: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label12' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'TEL :' 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 = 6085 mmTop = 56655 mmWidth = 6350 BandType = 0 LayerName = Foreground end object Label17: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label17' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'FAX :' 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 = 60590 mmTop = 56655 mmWidth = 6879 BandType = 0 LayerName = Foreground end object DBText17: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText7' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Phone1' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 4233 mmLeft = 15081 mmTop = 56637 mmWidth = 41275 BandType = 0 LayerName = Foreground end object DBText18: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText18' 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 = 8 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 3440 mmLeft = 70379 mmTop = 56655 mmWidth = 6350 BandType = 0 LayerName = Foreground end object DBText7: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText11' HyperlinkEnabled = False AutoSize = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'DocRef1' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 3440 mmLeft = 152929 mmTop = 32497 mmWidth = 10848 BandType = 0 LayerName = Foreground end object ppLabel1: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label7' 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 = 8 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taCentered Transparent = True mmHeight = 3704 mmLeft = 794 mmTop = 61599 mmWidth = 12171 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 = 8 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3219 mmLeft = 65617 mmTop = 61234 mmWidth = 14023 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 = 8 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3219 mmLeft = 130704 mmTop = 61234 mmWidth = 4763 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 = 8 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True mmHeight = 3219 mmLeft = 163248 mmTop = 61234 mmWidth = 10848 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 = 8 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taCentered Transparent = True WordWrap = True mmHeight = 3439 mmLeft = 141204 mmTop = 61119 mmWidth = 20058 BandType = 0 LayerName = Foreground end object Label41: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label41' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Amount' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taCentered Transparent = True WordWrap = True mmHeight = 3440 mmLeft = 176776 mmTop = 61648 mmWidth = 21961 BandType = 0 LayerName = Foreground end object ppLine4: TppLine DesignLayer = ppDesignLayer1 UserName = 'Line10' Border.Weight = 1.000000000000000000 Border.mmPadding = 0 ParentWidth = True Weight = 0.750000000000000000 mmHeight = 570 mmLeft = 0 mmTop = 61234 mmWidth = 201930 BandType = 0 LayerName = Foreground 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 = 8 Font.Style = [] Transparent = True mmHeight = 3440 mmLeft = 152929 mmTop = 46996 mmWidth = 7409 BandType = 0 LayerName = Foreground end object ppLabel2: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label8' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Attn :' 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 = 6085 mmTop = 52820 mmWidth = 7409 BandType = 0 LayerName = Foreground end object ppLabel3: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label1' Border.mmPadding = 0 Caption = 'Sales Person' 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 = 127000 mmTop = 50744 mmWidth = 16140 BandType = 0 LayerName = Foreground end object ppDBText6: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText13' HyperlinkEnabled = False AutoSize = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Agent' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 3440 mmLeft = 152929 mmTop = 50744 mmWidth = 7673 BandType = 0 LayerName = Foreground end object ppLabel4: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label9' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = ':' 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 = 150284 mmTop = 50744 mmWidth = 1058 BandType = 0 LayerName = Foreground end object ppLabel5: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label10' Border.mmPadding = 0 Caption = 'A/C No' 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 = 127000 mmTop = 54800 mmWidth = 8996 BandType = 0 LayerName = Foreground end object ppDBText8: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText14' HyperlinkEnabled = False AutoSize = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Code' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 3440 mmLeft = 152929 mmTop = 54800 mmWidth = 6615 BandType = 0 LayerName = Foreground end object ppLabel6: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label11' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = ':' 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 = 150284 mmTop = 54800 mmWidth = 1058 BandType = 0 LayerName = Foreground end object ppLabel7: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label13' Border.mmPadding = 0 Caption = 'No' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [fsBold] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3439 mmLeft = 127000 mmTop = 28840 mmWidth = 3704 BandType = 0 LayerName = Foreground end object ppLabel8: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label14' Border.mmPadding = 0 Caption = 'Item Code' 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 = 3219 mmLeft = 15875 mmTop = 61234 mmWidth = 13229 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 3 (Simple)' 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 = 10583 mmPrintPosition = 0 object ppDBRichText1: TppDBRichText DesignLayer = ppDesignLayer3 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 = 37835 mmTop = 3966 mmWidth = 78581 BandType = 4 LayerName = Foreground2 mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 mmLeftMargin = 794 end object ppDBText1: TppDBText DesignLayer = ppDesignLayer3 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 = 143140 mmTop = 0 mmWidth = 15081 BandType = 4 LayerName = Foreground2 end object DBMemo1: TppDBMemo DesignLayer = ppDesignLayer3 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 = 37835 mmTop = 0 mmWidth = 78581 BandType = 4 LayerName = Foreground2 mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 mmLeading = 0 end object ppDBText2: TppDBText DesignLayer = ppDesignLayer3 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 = 118798 mmTop = 0 mmWidth = 13758 BandType = 4 LayerName = Foreground2 end object ppDBText3: TppDBText DesignLayer = ppDesignLayer3 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 = 133879 mmTop = 0 mmWidth = 8996 BandType = 4 LayerName = Foreground2 end object ppDBText4: TppDBText DesignLayer = ppDesignLayer3 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 = 173567 mmTop = 0 mmWidth = 18521 BandType = 4 LayerName = Foreground2 end object DBCalc1: TppDBCalc DesignLayer = ppDesignLayer3 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 = 0 mmWidth = 12171 BandType = 4 LayerName = Foreground2 end object ppDBText5: TppDBText DesignLayer = ppDesignLayer3 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 = 158486 mmTop = 0 mmWidth = 15081 BandType = 4 LayerName = Foreground2 end object ppSubReport3: TppSubReport DesignLayer = ppDesignLayer3 UserName = 'SubReport1' ExpandAll = False NewPrintJob = False OutlineSettings.CreateNode = True ShiftRelativeTo = ppDBRichText1 TraverseAllData = False DataPipelineName = 'Document_SerialNumber' mmHeight = 5027 mmLeft = 0 mmTop = 5463 mmWidth = 201930 BandType = 4 LayerName = Foreground2 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 3 (Simple)' 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 = ppDesignLayer2 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 = Foreground1 end object ppMemo1: TppMemo DesignLayer = ppDesignLayer2 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 = Foreground1 mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 mmLeading = 0 end end object raCodeModule4: TraCodeModule object raProgramInfo1: 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 ppDesignLayers2: TppDesignLayers object ppDesignLayer2: TppDesignLayer UserName = 'Foreground1' LayerType = ltBanded Index = 0 end end end end object ppDBText7: TppDBText DesignLayer = ppDesignLayer3 UserName = 'DBText1' Border.mmPadding = 0 DataField = 'ItemCode' 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 = 15081 mmTop = 0 mmWidth = 21431 BandType = 4 LayerName = Foreground2 end end object raCodeModule2: TraCodeModule object raProgramInfo2: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'DetailBeforePrint' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure DetailBeforePrint;'#13#10'var v: boolean;'#13#10'begin'#13#10' v := Doc' + 'ument_Detail.GetFieldValue('#39'ItemCode'#39') <> '#39'RTN5Cents'#39'; '#13#10' DB' + 'Calc1.Visible := v;'#13#10' DBMemo1.Visible := v;'#13#10' DBRichText' + '1.Visible := v;'#13#10' DBText2.Visible := v;'#13#10' DBText1.Visibl' + 'e := v;'#13#10' DBText7.Visible := v;'#13#10' DBText8.Visible := v;'#13 + #10' DBText6.Visible := v;'#13#10' DBText3.Visible := v;'#13#10' DB' + 'Text9.Visible := v;'#13#10'end;'#13#10 raProgram.ComponentName = 'Detail' raProgram.EventName = 'BeforePrint' raProgram.EventID = 24 raProgram.CaretPos = ( 1 3) end end object ppDesignLayers3: TppDesignLayers object ppDesignLayer3: TppDesignLayer UserName = 'Foreground2' 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 3 (Simple)' 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 = 'ReportName' Template.DatabaseSettings.TemplateField = 'Template' Template.Offset = 9 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 = 7408 mmPrintPosition = 0 object ppDBRichText3: TppDBRichText DesignLayer = ppDesignLayer4 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 = plSQL_3 ParentDataPipeline = False RemoveEmptyLines = False ShiftRelativeTo = ppDBMemo1 Stretch = True Transparent = True DataPipelineName = 'plSQL_3' mmHeight = 1588 mmLeft = 39952 mmTop = 5292 mmWidth = 78846 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 = 143140 mmTop = 794 mmWidth = 15081 BandType = 4 LayerName = Foreground3 end object ppDBMemo1: TppDBMemo DesignLayer = ppDesignLayer4 UserName = 'DBMemo1' 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 = 39952 mmTop = 794 mmWidth = 78846 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 = 118798 mmTop = 794 mmWidth = 13758 BandType = 4 LayerName = Foreground3 end object ppDBText20: TppDBText DesignLayer = ppDesignLayer4 UserName = 'DBText8' 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 = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'plSQL_2' mmHeight = 3810 mmLeft = 133879 mmTop = 794 mmWidth = 8996 BandType = 4 LayerName = Foreground3 end object ppDBText21: TppDBText DesignLayer = ppDesignLayer4 UserName = 'DBTxtAmt' HyperlinkEnabled = False BlankWhenZero = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'AmountWithTax' 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 = 173567 mmTop = 794 mmWidth = 18521 BandType = 4 LayerName = Foreground3 end object ppDBCalc1: TppDBCalc DesignLayer = ppDesignLayer4 UserName = 'DBCalc1' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'ItemCode' DataPipeline = plSQL_2 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] ParentDataPipeline = False TextAlignment = taCentered Transparent = True DBCalcType = dcCount DataPipelineName = 'plSQL_2' mmHeight = 3810 mmLeft = 794 mmTop = 794 mmWidth = 12171 BandType = 4 LayerName = Foreground3 end object ppDBText22: TppDBText DesignLayer = ppDesignLayer4 UserName = 'DBText3' 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 = [] ParentDataPipeline = False TextAlignment = taRightJustified DataPipelineName = 'plSQL_2' mmHeight = 3810 mmLeft = 158486 mmTop = 794 mmWidth = 15081 BandType = 4 LayerName = Foreground3 end object ppDBText23: TppDBText DesignLayer = ppDesignLayer4 UserName = 'DBText5' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'ItemCode' 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 = 3810 mmLeft = 12965 mmTop = 794 mmWidth = 25400 BandType = 4 LayerName = Foreground3 end end object raCodeModule3: TraCodeModule object raProgramInfo3: 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' DBTxtUPri' + 'ce.DisplayFormat:= Option.GetFieldValue('#39'StockPriceDisplayFormat' + #39');'#13#10' DBTxtAmt.DisplayFormat:= Option.GetFieldValue('#39'Accounting' + 'ValueDisplayFormat'#39');'#13#10'end;'#13#10 raProgram.ComponentName = 'Detail' raProgram.EventName = 'BeforePrint' raProgram.EventID = 24 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 = 0 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 PrintHeight = phDynamic HideWhenOneDetail = False mmBottomOffset = 0 mmHeight = 52917 mmPrintPosition = 203200 object ppShape2: TppShape DesignLayer = ppDesignLayer1 UserName = 'Shape4' mmHeight = 5556 mmLeft = 161925 mmTop = 12353 mmWidth = 33073 BandType = 5 GroupNo = 0 LayerName = Foreground end object Shape3: TppShape DesignLayer = ppDesignLayer1 UserName = 'Shape3' mmHeight = 5556 mmLeft = 161925 mmTop = 1588 mmWidth = 33073 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppShape1: TppShape DesignLayer = ppDesignLayer1 UserName = 'Shape2' mmHeight = 5556 mmLeft = 161925 mmTop = 17811 mmWidth = 33073 BandType = 5 GroupNo = 0 LayerName = Foreground end object Label15: TppLabel DesignLayer = ppDesignLayer1 UserName = 'lbTotalAmt' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Net Total' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [fsBold] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True mmHeight = 3704 mmLeft = 146050 mmTop = 2381 mmWidth = 14817 BandType = 5 GroupNo = 0 LayerName = Foreground end object Line14: TppLine DesignLayer = ppDesignLayer1 UserName = 'Line14' Border.Weight = 1.000000000000000000 Border.mmPadding = 0 ParentWidth = True Weight = 0.750000000000000000 mmHeight = 1323 mmLeft = 0 mmTop = 529 mmWidth = 201930 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppVariable2: TppVariable DesignLayer = ppDesignLayer1 UserName = 'Variable1' HyperlinkEnabled = False AutoSize = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 BlankWhenZero = False CalcOrder = 1 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [] Transparent = True WordWrap = True mmHeight = 8463 mmLeft = 2646 mmTop = 2381 mmWidth = 131498 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppDBText11: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText15' Border.mmPadding = 0 DataField = 'Amount' DataPipeline = plSQL_5 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [fsBold] ParentDataPipeline = False TextAlignment = taRightJustified Transparent = True DataPipelineName = 'plSQL_5' mmHeight = 4498 mmLeft = 164307 mmTop = 12476 mmWidth = 29898 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppLabel10: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label18' Border.mmPadding = 0 Caption = 'Rounding Total' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [fsBold] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True WordWrap = True mmHeight = 3704 mmLeft = 136398 mmTop = 12476 mmWidth = 24469 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppLabel11: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label19' Border.mmPadding = 0 Caption = 'Final Total' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [fsBold] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3704 mmLeft = 144463 mmTop = 18297 mmWidth = 16404 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppDBText13: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText17' Border.mmPadding = 0 DataField = 'DocAmt' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [fsBold] TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Main' mmHeight = 4498 mmLeft = 165630 mmTop = 18297 mmWidth = 28575 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppShape4: TppShape DesignLayer = ppDesignLayer1 UserName = 'Shape6' mmHeight = 5556 mmLeft = 161925 mmTop = 7054 mmWidth = 33073 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppLabel9: TppLabel DesignLayer = ppDesignLayer1 UserName = 'lbTotalAmt1' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Tax Amt ' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [fsBold] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True mmHeight = 3704 mmLeft = 146315 mmTop = 7938 mmWidth = 14552 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppVariable3: TppVariable DesignLayer = ppDesignLayer1 UserName = 'Variable3' Border.mmPadding = 0 BlankWhenZero = False CalcOrder = 0 DataType = dtDouble DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [fsBold] TextAlignment = taRightJustified Transparent = True mmHeight = 3704 mmLeft = 179388 mmTop = 7847 mmWidth = 14817 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppVariable4: TppVariable DesignLayer = ppDesignLayer1 UserName = 'Variable4' Border.mmPadding = 0 BlankWhenZero = False CalcOrder = 2 DataType = dtDouble Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [fsBold] TextAlignment = taRightJustified Transparent = True mmHeight = 3704 mmLeft = 179123 mmTop = 2381 mmWidth = 14817 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppSubReport4: TppSubReport DesignLayer = ppDesignLayer1 UserName = 'SubReport4' ExpandAll = False NewPrintJob = False OutlineSettings.CreateNode = True ParentPrinterSetup = False ParentWidth = False TraverseAllData = False DataPipelineName = 'plSQL_6' mmHeight = 3704 mmLeft = 2646 mmTop = 30163 mmWidth = 63500 BandType = 5 GroupNo = 0 LayerName = Foreground mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 object ppChildReport4: TppChildReport AutoStop = False DataPipeline = plSQL_6 PrinterSetup.BinName = 'Report[Partial cut]' PrinterSetup.DocumentName = 'SQL Financial Accounting: Sales Cash Sales 6 - Receipt' PrinterSetup.Duplex = dpNone PrinterSetup.PaperName = 'Custom' PrinterSetup.PrinterName = 'Default' PrinterSetup.SaveDeviceSettings = False PrinterSetup.mmMarginBottom = 0 PrinterSetup.mmMarginLeft = 0 PrinterSetup.mmMarginRight = 0 PrinterSetup.mmMarginTop = 0 PrinterSetup.mmPaperHeight = 297127 PrinterSetup.mmPaperWidth = 63500 PrinterSetup.PaperSize = 140 Template.DatabaseSettings.NameField = 'Name' Template.DatabaseSettings.TemplateField = 'Template' Template.SaveTo = stDatabase Template.Format = ftASCII Version = '19.02' mmColumnWidth = 0 DataPipelineName = 'plSQL_6' object ppTitleBand3: TppTitleBand Background.Brush.Style = bsClear Border.mmPadding = 0 mmBottomOffset = 0 mmHeight = 6085 mmPrintPosition = 0 object ppShape3: TppShape DesignLayer = ppDesignLayer5 UserName = 'Shape1' Pen.Style = psDot mmHeight = 6339 mmLeft = 2646 mmTop = 0 mmWidth = 58206 BandType = 1 LayerName = PageLayer1 end object ppMemo3: TppMemo DesignLayer = ppDesignLayer5 UserName = 'Memo3' Border.mmPadding = 0 Caption = 'Memo3' CharWrap = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Microsoft Sans Serif' Font.Size = 7 Font.Style = [] Lines.Strings = ( 'AMOUNT' '(RM)') RemoveEmptyLines = False TextAlignment = taRightJustified Transparent = True mmHeight = 6082 mmLeft = 30689 mmTop = 0 mmWidth = 12965 BandType = 1 LayerName = PageLayer1 mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 mmLeading = 0 end object ppMemo4: TppMemo DesignLayer = ppDesignLayer5 UserName = 'Memo4' Border.mmPadding = 0 Caption = 'Memo4' CharWrap = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Microsoft Sans Serif' Font.Size = 7 Font.Style = [] Lines.Strings = ( 'TAX' '(RM)') RemoveEmptyLines = False TextAlignment = taRightJustified Transparent = True mmHeight = 6082 mmLeft = 51082 mmTop = 0 mmWidth = 8731 BandType = 1 LayerName = PageLayer1 mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 mmLeading = 0 end object ppMemo2: TppMemo DesignLayer = ppDesignLayer5 UserName = 'Memo1' Border.mmPadding = 0 Caption = 'Memo1' CharWrap = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Microsoft Sans Serif' Font.Size = 7 Font.Style = [] Lines.Strings = ( 'TAX' 'SUMMARY') RemoveEmptyLines = False Transparent = True mmHeight = 6082 mmLeft = 4237 mmTop = 0 mmWidth = 12965 BandType = 1 LayerName = PageLayer1 mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 mmLeading = 0 end end object ppDetailBand5: TppDetailBand Background1.Brush.Style = bsClear Background2.Brush.Style = bsClear Border.mmPadding = 0 mmBottomOffset = 0 mmHeight = 3440 mmPrintPosition = 0 object ppShape5: TppShape DesignLayer = ppDesignLayer5 UserName = 'Shape2' Pen.Style = psDot mmHeight = 3695 mmLeft = 2649 mmTop = 8 mmWidth = 58208 BandType = 4 LayerName = PageLayer1 end object ppDBText9: TppDBText DesignLayer = ppDesignLayer5 UserName = 'DBText20' Border.mmPadding = 0 DataField = 'LocalAmount' DataPipeline = plSQL_6 DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Microsoft Sans Serif' Font.Size = 7 Font.Style = [] TextAlignment = taRightJustified Transparent = True DataPipelineName = 'plSQL_6' mmHeight = 3173 mmLeft = 26456 mmTop = 265 mmWidth = 17198 BandType = 4 LayerName = PageLayer1 end object ppDBText15: TppDBText DesignLayer = ppDesignLayer5 UserName = 'DBText201' Border.mmPadding = 0 DataField = 'LocalTaxAmt' DataPipeline = plSQL_6 DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Microsoft Sans Serif' Font.Size = 7 Font.Style = [] TextAlignment = taRightJustified Transparent = True DataPipelineName = 'plSQL_6' mmHeight = 3173 mmLeft = 47378 mmTop = 265 mmWidth = 12435 BandType = 4 LayerName = PageLayer1 end object ppLabel12: TppLabel DesignLayer = ppDesignLayer5 UserName = 'lbRate' Border.mmPadding = 0 Caption = 'lbRate' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Microsoft Sans Serif' Font.Size = 7 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3175 mmLeft = 4233 mmTop = 265 mmWidth = 7144 BandType = 4 LayerName = PageLayer1 end end object ppSummaryBand4: TppSummaryBand Background.Brush.Style = bsClear Border.mmPadding = 0 mmBottomOffset = 0 mmHeight = 3440 mmPrintPosition = 0 object ppShape6: TppShape DesignLayer = ppDesignLayer5 UserName = 'Shape3' Pen.Style = psDot mmHeight = 3702 mmLeft = 2649 mmTop = 0 mmWidth = 58208 BandType = 7 LayerName = PageLayer1 end object ppDBCalc2: TppDBCalc DesignLayer = ppDesignLayer5 UserName = 'DBCalc1' Border.mmPadding = 0 DataField = 'LocalAmount' DataPipeline = plSQL_6 DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Microsoft Sans Serif' Font.Size = 7 Font.Style = [] TextAlignment = taRightJustified Transparent = True DataPipelineName = 'plSQL_6' mmHeight = 3440 mmLeft = 24869 mmTop = 265 mmWidth = 18785 BandType = 7 LayerName = PageLayer1 end object ppDBCalc3: TppDBCalc DesignLayer = ppDesignLayer5 UserName = 'DBCalc2' Border.mmPadding = 0 DataField = 'LocalTaxAmt' DataPipeline = plSQL_6 DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Microsoft Sans Serif' Font.Size = 7 Font.Style = [] TextAlignment = taRightJustified Transparent = True DataPipelineName = 'plSQL_6' mmHeight = 3440 mmLeft = 47378 mmTop = 265 mmWidth = 12435 BandType = 7 LayerName = PageLayer1 end object ppLabel13: TppLabel DesignLayer = ppDesignLayer5 UserName = 'Label14' Border.mmPadding = 0 Caption = 'TOTAL' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Microsoft Sans Serif' Font.Size = 7 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3175 mmLeft = 4233 mmTop = 265 mmWidth = 7673 BandType = 7 LayerName = PageLayer1 end end object raCodeModule5: TraCodeModule object raProgramInfo4: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'lbRateOnGetText' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure lbRateOnGetText(var Text: String);'#13#10'begin'#13#10#13#10' '#13#10' Text' + ' := plSQL_6.getfieldvalue('#39'Tax'#39') + '#39' @ '#39' + plSQL_6.getfieldval' + 'ue('#39'TaxRate'#39') ;'#13#10#13#10'end;'#13#10 raProgram.ComponentName = 'lbRate' raProgram.EventName = 'OnGetText' raProgram.EventID = 53 raProgram.CaretPos = ( 59 5) end end object ppDesignLayers5: TppDesignLayers object ppDesignLayer5: TppDesignLayer UserName = 'PageLayer1' LayerType = ltBanded Index = 0 end end end end object ppLabel14: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label15' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Authorised Signature' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 9 Font.Style = [fsBold] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3704 mmLeft = 150455 mmTop = 49213 mmWidth = 33867 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppLine1: TppLine DesignLayer = ppDesignLayer1 UserName = 'Line1' Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Weight = 0.750000000000000000 mmHeight = 265 mmLeft = 134408 mmTop = 47890 mmWidth = 60590 BandType = 5 GroupNo = 0 LayerName = Foreground end object Memo2: TppMemo DesignLayer = ppDesignLayer1 UserName = 'Memo2' Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Memo2' CharWrap = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] Lines.Strings = ( 'Notes :' '1. All cheques should be crossed and made payable to ') RemoveEmptyLines = False Transparent = True mmHeight = 7673 mmLeft = 2646 mmTop = 10319 mmWidth = 75142 BandType = 5 GroupNo = 0 LayerName = Foreground mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 mmLeading = 0 end object DBText21: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText21' HyperlinkEnabled = False AutoSize = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'CompanyName' DataPipeline = Profile Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Profile' mmHeight = 3429 mmLeft = 5556 mmTop = 17727 mmWidth = 19727 BandType = 5 GroupNo = 0 LayerName = Foreground end object Memo3: TppMemo DesignLayer = ppDesignLayer1 UserName = 'Memo1' Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Memo1' CharWrap = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] Lines.Strings = ( '2. Goods sold are neither returnable nor refundable.') RemoveEmptyLines = False Transparent = True mmHeight = 8467 mmLeft = 2646 mmTop = 21431 mmWidth = 85990 BandType = 5 GroupNo = 0 LayerName = Foreground mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 mmLeading = 0 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_2, SQL_3, SQL_5, SQL_6: String' + ';'#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_2 := '#39'SELECT DocKey, It' + 'emCode, UOM, UnitPrice, Disc, MIN(Seq) Seq, Description,'#39' +'#13#10#9#9' ' + ' '#39'SUM(Qty) Qty, SUM(Amount) Amount, SUM(AmountWithTax) Amo' + 'untWithTax '#39' +'#13#10' '#39'FROM Document_Detail '#39' +'#13#10' ' + ' '#39'GROUP BY DocKey, ItemCode, Description, UOM, UnitPrice, Disc' + ' '#39';'#13#10' SQL_3 := '#39'SELECT DocKey, ItemCode, Description, Descript' + 'ion2, Description3, Seq '#39'+ '#13#10#9#9' '#39'FROM Document_Detail '#39' +' + #13#10#9#9' '#39'ORDER BY Seq DESC'#39';'#13#10' SQL_5 := '#39'SELECT DocKey, Sum' + '(Amount) Amount, Description '#39'+ '#13#10#9#9' '#39'FROM Document_Detail' + ' '#39' +'#13#10#9#9' '#39'WHERE ItemCode='#39#39'RTN5Cents'#39#39' '#39'+'#13#10' '#39'GRO' + 'UP BY DocKey'#39';'#13#10' SQL_6 := '#39'SELECT DocKey, Tax, TaxRate, Sum(Lo' + 'calAmount) LocalAmount, Sum(Qty) Qty, Sum(LocalTaxAmt) localTaxA' + 'mt, Description '#39'+ '#13#10#9#9' '#39'FROM Document_Detail '#39' +'#13#10#9#9' ' + ' '#39'Where Tax <> '#39#39#39#39#39' +'#13#10#9#9' '#39'GROUP BY Dockey, Tax, TaxR' + 'ate '#39';'#13#10'end;'#13#10 raProgram.CaretPos = ( 34 17) end object raProgramInfo11: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'Variable1OnCalc' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure Variable1OnCalc(var Value: Variant);'#13#10'begin'#13#10'Value := ' + 'Document_Currency.GetFieldValue('#39'Description'#39');'#13#10'Value := Value ' + '+ '#39' : '#39' + CurrencyToEngWord(Main.GetFieldValue('#39'DocAmt'#39')) + '#39' ON' + 'LY'#39';'#13#10'end;'#13#10 raProgram.ComponentName = 'Variable1' raProgram.EventName = 'OnCalc' raProgram.EventID = 33 raProgram.CaretPos = ( 3 3) end object raProgramInfo12: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'lbTotalAmtOnGetText' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure lbTotalAmtOnGetText(var Text: String);'#13#10'begin'#13#10#13#10' Tex' + 't :='#39'Total ('#39' + Document_Currency.GetFieldValue('#39'Symbol'#39') + '#39')'#39';' + #13#10#13#10'end;'#13#10 raProgram.ComponentName = 'lbTotalAmt' raProgram.EventName = 'OnGetText' raProgram.EventID = 53 raProgram.CaretPos = ( 3 4) end object raProgramInfo13: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'ReportBeforePrint' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure ReportBeforePrint;'#13#10'begin '#13#10' LocalSQL_SELECT(plSQ' + 'L_2, SQL_2, '#39'DocKey;Seq'#39');'#13#10' LocalSQL_SELECT(plSQL_3, SQL_3, ' + #39'DocKey;ItemCode;Description'#39');'#13#10' LocalSQL_SELECT(plSQL_5, SQ' + 'L_5, '#39'DocKey'#39');'#13#10' LocalSQL_SELECT(plSQL_6, SQL_6, '#39'Dockey;Tax' + ';TaxRate'#39'); '#13#10' SetDataPipelineFieldLink(Main, plSQL_2, '#39'Doc' + 'Key'#39', '#39'DocKey'#39');'#13#10' SetDataPipelineFieldLink(plSQL_2, plSQL_3,' + ' '#39'DocKey;ItemCode;Description'#39', '#39'DocKey;ItemCode;Description'#39');'#13 + #10' SetDataPipelineFieldLink(Main, plSQL_6, '#39'DocKey'#39', '#39'DocKey'#39')' + ';'#13#10'end;'#13#10 raProgram.ComponentName = 'Report' raProgram.EventName = 'BeforePrint' raProgram.EventID = 1 raProgram.CaretPos = ( 56 6) end object raProgramInfo14: 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 2) end object raProgramInfo15: 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 = ( 3 4) end object raProgramInfo16: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'Variable3OnCalc' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure Variable3OnCalc(var Value: Variant);'#13#10'begin'#13#10' Variable' + '3.DisplayFormat := Option.GetFieldValue('#39'AccountingValueDisplayF' + 'ormat'#39');'#13#10' Value := GetAggregateValue(agSUM, Document_Detail, '#39'D' + 'ocKey'#39', '#39'LocalTaxAmt'#39'); '#13#10#13#10'end;'#13#10 raProgram.ComponentName = 'Variable3' raProgram.EventName = 'OnCalc' raProgram.EventID = 33 raProgram.CaretPos = ( 3 3) end object raProgramInfo17: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'Variable4OnCalc' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure Variable4OnCalc(var Value: Variant);'#13#10'begin'#13#10#13#10' Value' + ' :=Main.GetFieldValue('#39'DocAmt'#39')- plSQL_5.GetFieldValue('#39'Amount'#39')' + '- Variable3.value; '#13#10#13#10'end;'#13#10 raProgram.ComponentName = 'Variable4' 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