TdvSLDN object TppReport AutoStop = False DataPipeline = Main NoDataBehaviors = [ndBlankReport] PassSetting = psTwoPass PrinterSetup.BinName = 'Default' PrinterSetup.DocumentName = 'SQL Financial Accounting: Sales Invoice 3 (Sales Tax)' PrinterSetup.Duplex = dpNone PrinterSetup.PaperName = 'Letter' 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 = '02-Sales-Debit-Note-(WithGSTSummary)' Template.DatabaseSettings.NameField = 'Name' Template.DatabaseSettings.TemplateField = 'Template' Template.SaveTo = stDatabase Template.Format = ftASCII ArchiveFileName = '($MyDocuments)\ReportArchive.raf' DeviceType = 'Screen' DefaultFileDeviceType = 'PDF' EmailSettings.ReportFormat = 'PDF' LanguageID = 'Default' OpenFile = False OutlineSettings.CreateNode = True OutlineSettings.CreatePageNodes = True OutlineSettings.Enabled = False OutlineSettings.Visible = False ThumbnailSettings.Enabled = True ThumbnailSettings.Visible = True ThumbnailSettings.DeadSpace = 30 ThumbnailSettings.PageHighlight.Width = 3 PDFSettings.EmbedFontOptions = [efUseSubset] PDFSettings.EncryptSettings.AllowCopy = True PDFSettings.EncryptSettings.AllowInteract = True PDFSettings.EncryptSettings.AllowModify = True PDFSettings.EncryptSettings.AllowPrint = True PDFSettings.EncryptSettings.AllowExtract = True PDFSettings.EncryptSettings.AllowAssemble = True PDFSettings.EncryptSettings.AllowQualityPrint = True PDFSettings.EncryptSettings.Enabled = False PDFSettings.EncryptSettings.KeyLength = kl40Bit PDFSettings.EncryptSettings.EncryptionType = etRC4 PDFSettings.FontEncoding = feUnicode PDFSettings.ImageCompressionLevel = 25 PDFSettings.PDFAFormat = pafNone PreviewFormSettings.PageBorder.mmPadding = 0 PreviewFormSettings.WindowState = wsMaximized PreviewFormSettings.ZoomSetting = zsPageWidth RTFSettings.DefaultFont.Charset = DEFAULT_CHARSET RTFSettings.DefaultFont.Color = clWindowText RTFSettings.DefaultFont.Height = -13 RTFSettings.DefaultFont.Name = 'Arial' RTFSettings.DefaultFont.Style = [] TextFileName = '($MyDocuments)\Report.pdf' TextSearchSettings.DefaultString = '' TextSearchSettings.Enabled = True XLSSettings.AppName = 'ReportBuilder' XLSSettings.Author = 'ReportBuilder' XLSSettings.ExportComponents = [ecText, ecLine, ecImage, ecRichText, ecBarCode, ecOther] XLSSettings.Subject = 'Report' XLSSettings.Title = 'Report' XLSSettings.WorksheetName = 'Report' Version = '19.02' mmColumnWidth = 0 DataPipelineName = 'Main' object ppHeaderBand2: TppHeaderBand Background.Brush.Style = bsClear Border.mmPadding = 0 PrintHeight = phDynamic mmBottomOffset = 0 mmHeight = 84138 mmPrintPosition = 0 object Shape1: TppShape DesignLayer = ppDesignLayer1 UserName = 'Shape1' Visible = False mmHeight = 39255 mmLeft = 1905 mmTop = 37138 mmWidth = 129329 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 = 'Times New Roman' Font.Size = 12 Font.Style = [fsBold] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 4868 mmLeft = 175289 mmTop = 35560 mmWidth = 12065 BandType = 0 LayerName = Foreground end object Label1: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label1' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'NO' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 12 Font.Style = [fsBold] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 4868 mmLeft = 146387 mmTop = 35560 mmWidth = 6350 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 = 'Times New Roman' Font.Size = 8 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 4233 mmLeft = 2715 mmTop = 54187 mmWidth = 82197 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 = 'Times New Roman' Font.Size = 8 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 4233 mmLeft = 2715 mmTop = 58684 mmWidth = 82197 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 = 'Times New Roman' Font.Size = 10 Font.Style = [fsBold] ParentDataPipeline = False Transparent = True WordWrap = True DataPipelineName = 'Main' mmHeight = 12315 mmLeft = 2752 mmTop = 37138 mmWidth = 82127 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 = 'Times New Roman' Font.Size = 8 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 4233 mmLeft = 2715 mmTop = 63182 mmWidth = 82197 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 = 'Times New Roman' Font.Size = 8 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 4233 mmLeft = 11793 mmTop = 67679 mmWidth = 73025 BandType = 0 LayerName = Foreground end object Label3: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label3' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'DATE' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3598 mmLeft = 146387 mmTop = 41620 mmWidth = 8467 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 = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3598 mmLeft = 146387 mmTop = 59489 mmWidth = 10372 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 = 'Times New Roman' Font.Size = 9 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 3599 mmLeft = 175289 mmTop = 59508 mmWidth = 8044 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 = 'Times New Roman' Font.Size = 9 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 3598 mmLeft = 175289 mmTop = 41620 mmWidth = 11430 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 = 82283 mmWidth = 201930 BandType = 0 LayerName = Foreground 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 = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3598 mmLeft = 146459 mmTop = 73019 mmWidth = 8255 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 = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True mmHeight = 3598 mmLeft = 172961 mmTop = 72596 mmWidth = 635 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 = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True mmHeight = 3598 mmLeft = 172961 mmTop = 41620 mmWidth = 635 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 = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True mmHeight = 3599 mmLeft = 173173 mmTop = 54900 mmWidth = 635 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 = 'Times New Roman' Font.Size = 10 Font.Style = [fsBold] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True mmHeight = 4022 mmLeft = 172326 mmTop = 35560 mmWidth = 1270 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 = 'Times New Roman' Font.Size = 8 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 4233 mmLeft = 2715 mmTop = 49689 mmWidth = 82197 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 = 'Times New Roman' Font.Size = 8 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3175 mmLeft = 2665 mmTop = 72284 mmWidth = 5927 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 = 'Times New Roman' Font.Size = 8 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3175 mmLeft = 39689 mmTop = 72000 mmWidth = 6773 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 = 'Times New Roman' Font.Size = 8 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 4233 mmLeft = 11711 mmTop = 72177 mmWidth = 26988 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 = 'Times New Roman' Font.Size = 8 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 3175 mmLeft = 48791 mmTop = 72000 mmWidth = 5080 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 = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taCentered Transparent = True mmHeight = 3810 mmLeft = 1920 mmTop = 79374 mmWidth = 8991 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 = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3598 mmLeft = 19558 mmTop = 79567 mmWidth = 20744 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 = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3598 mmLeft = 128881 mmTop = 79375 mmWidth = 6561 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 = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True mmHeight = 3598 mmLeft = 149634 mmTop = 79375 mmWidth = 17568 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 = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True mmHeight = 3599 mmLeft = 178224 mmTop = 79163 mmWidth = 13970 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 = 2117 mmLeft = 0 mmTop = 77786 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 = 'Times New Roman' Font.Size = 9 Font.Style = [] Transparent = True mmHeight = 3599 mmLeft = 175289 mmTop = 73019 mmWidth = 7197 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 = 'Times New Roman' Font.Size = 8 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3175 mmLeft = 2752 mmTop = 67628 mmWidth = 8678 BandType = 0 LayerName = Foreground end object ppLabel5: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label9' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'TAX' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True mmHeight = 3599 mmLeft = 107541 mmTop = 79163 mmWidth = 6350 BandType = 0 LayerName = Foreground end object ppLabel6: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label2' Border.mmPadding = 0 Caption = 'DEBIT NOTE' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 20 Font.Style = [fsBold] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taCentered Transparent = True mmHeight = 7831 mmLeft = 79587 mmTop = 28625 mmWidth = 43392 BandType = 0 LayerName = Foreground end object ppLabel7: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label11' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'CURRENCY' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3598 mmLeft = 146387 mmTop = 45932 mmWidth = 17357 BandType = 0 LayerName = Foreground end object ppDBText6: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText101' HyperlinkEnabled = False AutoSize = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'Symbol' DataPipeline = Document_Currency Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Document_Currency' mmHeight = 3599 mmLeft = 175289 mmTop = 46143 mmWidth = 9102 BandType = 0 LayerName = Foreground end object ppLabel8: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label13' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = ':' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True mmHeight = 3599 mmLeft = 173173 mmTop = 46143 mmWidth = 635 BandType = 0 LayerName = Foreground end object ppLabel9: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label14' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'SHIPPING MODE' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3598 mmLeft = 146387 mmTop = 54985 mmWidth = 24553 BandType = 0 LayerName = Foreground end object ppDBText8: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText8' HyperlinkEnabled = False AutoSize = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'DocRef1' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 3598 mmLeft = 175289 mmTop = 55408 mmWidth = 22931 BandType = 0 LayerName = Foreground end object ppLabel10: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label15' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = ':' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True mmHeight = 3598 mmLeft = 173173 mmTop = 59440 mmWidth = 635 BandType = 0 LayerName = Foreground end object ppLabel4: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label6' Border.mmPadding = 0 Caption = 'EX RATE' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3599 mmLeft = 146463 mmTop = 50647 mmWidth = 13124 BandType = 0 LayerName = Foreground end object ppLabel11: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label10' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = ':' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True mmHeight = 3599 mmLeft = 173144 mmTop = 50559 mmWidth = 635 BandType = 0 LayerName = Foreground end object ppDBText13: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText14' Border.mmPadding = 0 DataField = 'CurrencyRate' DataPipeline = Main DisplayFormat = '#,0.0000;-#,0.0000' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 3598 mmLeft = 175329 mmTop = 50613 mmWidth = 13758 BandType = 0 LayerName = Foreground end object ppLabel12: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label18' Border.mmPadding = 0 Caption = 'INVOICE' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3599 mmLeft = 146262 mmTop = 63923 mmWidth = 13123 BandType = 0 LayerName = Foreground end object ppLabel15: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label19' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = ':' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True mmHeight = 3598 mmLeft = 172917 mmTop = 63919 mmWidth = 635 BandType = 0 LayerName = Foreground end object ppDBText14: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText15' Border.mmPadding = 0 DataField = 'DocNoEx' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 3598 mmLeft = 175289 mmTop = 63948 mmWidth = 22931 BandType = 0 LayerName = Foreground end object ppLabel16: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label16' Border.mmPadding = 0 Caption = 'INV DATE' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3599 mmLeft = 146474 mmTop = 68368 mmWidth = 15028 BandType = 0 LayerName = Foreground end object ppLabel17: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label25' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = ':' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True mmHeight = 3598 mmLeft = 172932 mmTop = 68339 mmWidth = 635 BandType = 0 LayerName = Foreground end object ppDBImage1: TppDBImage DesignLayer = ppDesignLayer1 UserName = 'DBImage1' AlignHorizontal = ahCenter AlignVertical = avCenter MaintainAspectRatio = False Stretch = True Border.mmPadding = 0 DataField = 'Logo' DataPipeline = Profile GraphicType = 'AutoDetect' ParentDataPipeline = False DataPipelineName = 'Profile' mmHeight = 26458 mmLeft = 1852 mmTop = 0 mmWidth = 35190 BandType = 0 LayerName = Foreground end object ppDBRichText4: TppDBRichText DesignLayer = ppDesignLayer1 UserName = 'DBRichText4' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 8 Font.Style = [] Border.mmPadding = 0 ExportRTFAsBitmap = False DataField = 'Note' DataPipeline = Profile ParentDataPipeline = False RemoveEmptyLines = False Stretch = True Transparent = True DataPipelineName = 'Profile' mmHeight = 26458 mmLeft = 37571 mmTop = 0 mmWidth = 160867 BandType = 0 LayerName = Foreground mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 end object ppDBText7: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText16' HyperlinkEnabled = False AutoSize = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'DocRef2' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'Main' mmHeight = 3968 mmLeft = 175289 mmTop = 68263 mmWidth = 11377 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 = 12277 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 (Sales Tax)' PrinterSetup.Duplex = dpNone PrinterSetup.PaperName = 'Letter' 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 = 37465 mmPrintPosition = 0 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 = 10537 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 (Sales Tax)' PrinterSetup.Duplex = dpNone PrinterSetup.PaperName = 'Letter' 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 = 'Times New Roman' Font.Size = 9 Font.Style = [] Transparent = True Visible = False mmHeight = 3599 mmLeft = 0 mmTop = 423 mmWidth = 12277 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 = 'Times New Roman' Font.Size = 9 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 ppDBRichText1: TppDBRichText DesignLayer = ppDesignLayer3 UserName = 'DBRichText1' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] Border.Weight = 1.000000000000000000 Border.mmPadding = 0 ExportRTFAsBitmap = False DataField = 'Description3' DataPipeline = Document_Detail RemoveEmptyLines = False Stretch = True Transparent = True DataPipelineName = 'Document_Detail' mmHeight = 1588 mmLeft = 19165 mmTop = 8939 mmWidth = 69465 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 = 'Times New Roman' Font.Size = 9 Font.Style = [] ParentDataPipeline = False TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Document_Detail' mmHeight = 3704 mmLeft = 148989 mmTop = 794 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 = 'Times New Roman' Font.Size = 9 Font.Style = [] ParentDataPipeline = False RemoveEmptyLines = False Stretch = True DataPipelineName = 'Document_Detail' mmHeight = 4233 mmLeft = 19165 mmTop = 794 mmWidth = 69465 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 DisplayFormat = '#,0;-#,0' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] ParentDataPipeline = False TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Document_Detail' mmHeight = 3704 mmLeft = 127496 mmTop = 794 mmWidth = 5468 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 = 'Times New Roman' Font.Size = 9 Font.Style = [] Transparent = True DataPipelineName = 'Document_Detail' mmHeight = 3704 mmLeft = 133063 mmTop = 794 mmWidth = 7761 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 = 'Times New Roman' Font.Size = 9 Font.Style = [] ParentDataPipeline = False TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Document_Detail' mmHeight = 3810 mmLeft = 173567 mmTop = 794 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 = 'Times New Roman' Font.Size = 9 Font.Style = [] TextAlignment = taCentered Transparent = True DBCalcType = dcCount DataPipelineName = 'Document_Detail' mmHeight = 3810 mmLeft = 1754 mmTop = 794 mmWidth = 7673 BandType = 4 LayerName = Foreground2 end object ppVariable4: TppVariable DesignLayer = ppDesignLayer3 UserName = 'VarRate' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 BlankWhenZero = False CalcOrder = 0 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] TextAlignment = taRightJustified Transparent = True Visible = False mmHeight = 3598 mmLeft = 189442 mmTop = 5292 mmWidth = 10795 BandType = 4 LayerName = Foreground2 end object ppDBText5: TppDBText DesignLayer = ppDesignLayer3 UserName = 'DBText1' AutoSize = True Border.mmPadding = 0 DataField = 'Tax' DataPipeline = Document_Detail Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Document_Detail' mmHeight = 3598 mmLeft = 109353 mmTop = 847 mmWidth = 4868 BandType = 4 LayerName = Foreground2 end object ppDBMemo2: TppDBMemo DesignLayer = ppDesignLayer3 UserName = 'DBMemo2' Border.mmPadding = 0 CharWrap = False DataField = 'Description2' DataPipeline = Document_Detail Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] RemoveEmptyLines = False Transparent = True DataPipelineName = 'Document_Detail' mmHeight = 3848 mmLeft = 19235 mmTop = 5181 mmWidth = 69465 BandType = 4 LayerName = Foreground2 mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 mmLeading = 0 end end object raCodeModule2: TraCodeModule object raProgramInfo2: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'VarRateOnCalc' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure VarRateOnCalc(var Value: Variant);'#13#10'var s : string;'#13#10'b' + 'egin'#13#10' s := '#39'SELECT TaxRate From Tax WHERE Code ='#39#39#39'+ Document_' + 'Detail.GetFieldValue('#39'Tax'#39')+'#39#39#39#39';'#13#10' if Trim(DBSQL_GetFieldValue' + '(s)) <> '#39#39' then'#13#10' Value := DBSQL_GetFieldValue(s) else'#13#10' v' + 'alue := '#39#39';'#13#10'end;'#13#10 raProgram.ComponentName = 'VarRate' raProgram.EventName = 'OnCalc' raProgram.EventID = 33 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 (Sales Tax)' PrinterSetup.Duplex = dpNone PrinterSetup.PaperName = 'Letter' PrinterSetup.PrinterName = 'Default' PrinterSetup.SaveDeviceSettings = False PrinterSetup.mmMarginBottom = 6350 PrinterSetup.mmMarginLeft = 7620 PrinterSetup.mmMarginRight = 6350 PrinterSetup.mmMarginTop = 3810 PrinterSetup.mmPaperHeight = 279401 PrinterSetup.mmPaperWidth = 215900 PrinterSetup.PaperSize = 1 Template.DatabaseSettings.NameField = 'Name' Template.DatabaseSettings.TemplateField = 'Template' Template.SaveTo = stDatabase Template.Format = ftASCII Version = '19.02' mmColumnWidth = 0 DataPipelineName = 'plSQL_2' object ppDetailBand1: TppDetailBand Background1.Brush.Style = bsClear Background2.Brush.Style = bsClear Border.mmPadding = 0 PrintHeight = phDynamic mmBottomOffset = 0 mmHeight = 28998 mmPrintPosition = 0 object ppDBRichText3: TppDBRichText DesignLayer = ppDesignLayer4 UserName = 'DBRichText1' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] Border.Weight = 1.000000000000000000 Border.mmPadding = 0 ExportRTFAsBitmap = False DataField = 'Description2' DataPipeline = plSQL_3 ParentDataPipeline = False RemoveEmptyLines = False Stretch = True Transparent = True DataPipelineName = 'plSQL_3' mmHeight = 4410 mmLeft = 39952 mmTop = 5291 mmWidth = 69056 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 = 'Times New Roman' Font.Size = 9 Font.Style = [] ParentDataPipeline = False TextAlignment = taRightJustified Transparent = True DataPipelineName = 'plSQL_2' mmHeight = 3704 mmLeft = 143934 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 = 'Times New Roman' Font.Size = 9 Font.Style = [] ParentDataPipeline = False RemoveEmptyLines = False Stretch = True DataPipelineName = 'plSQL_3' mmHeight = 4233 mmLeft = 39952 mmTop = 794 mmWidth = 68792 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 = 'Times New Roman' Font.Size = 9 Font.Style = [] ParentDataPipeline = False TextAlignment = taRightJustified Transparent = True DataPipelineName = 'plSQL_2' mmHeight = 3704 mmLeft = 108479 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 = 'Times New Roman' Font.Size = 9 Font.Style = [] ParentDataPipeline = False Transparent = True DataPipelineName = 'plSQL_2' mmHeight = 3704 mmLeft = 123561 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 = 'Times New Roman' 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 = 'Times New Roman' 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 AutoSize = True Border.Weight = 1.000000000000000000 Border.mmPadding = 0 DataField = 'DISC' DataPipeline = plSQL_2 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] ParentDataPipeline = False TextAlignment = taRightJustified DataPipelineName = 'plSQL_2' mmHeight = 3598 mmLeft = 167217 mmTop = 847 mmWidth = 7197 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 = 'Times New Roman' 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 object ppVariable5: TppVariable DesignLayer = ppDesignLayer4 UserName = 'VarRate1' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 BlankWhenZero = False CalcOrder = 0 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] TextAlignment = taRightJustified Transparent = True mmHeight = 3598 mmLeft = 130810 mmTop = 847 mmWidth = 12277 BandType = 4 LayerName = Foreground3 end object ppDBRichText2: TppDBRichText DesignLayer = ppDesignLayer4 UserName = 'DBRichText2' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] Border.Weight = 1.000000000000000000 Border.mmPadding = 0 ExportRTFAsBitmap = False DataField = 'Description3' DataPipeline = plSQL_3 ParentDataPipeline = False RemoveEmptyLines = False Stretch = True Transparent = True DataPipelineName = 'plSQL_3' mmHeight = 4410 mmLeft = 39918 mmTop = 10011 mmWidth = 68700 BandType = 4 LayerName = Foreground3 mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 mmLeftMargin = 794 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 object raProgramInfo4: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'VarRate1OnCalc' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure VarRate1OnCalc(var Value: Variant);'#13#10'var s : String;'#13#10 + 'begin'#13#10' s := '#39'SELECT TaxRate From Tax WHERE Code ='#39#39#39'+ plSQL_2.' + 'GetFieldValue('#39'Tax'#39')+'#39#39#39#39';'#13#10' if Trim(DBSQL_GetFieldValue(s)) <>' + ' '#39#39' then'#13#10' Value := DBSQL_GetFieldValue(s) else'#13#10' value := '#39#39';' + #13#10'end;'#13#10 raProgram.ComponentName = 'VarRate1' raProgram.EventName = 'OnCalc' raProgram.EventID = 33 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 = 63288 mmPrintPosition = 203200 object ppSubReport4: TppSubReport DesignLayer = ppDesignLayer1 UserName = 'SubReport2' ExpandAll = False NewPrintJob = False OutlineSettings.CreateNode = True TraverseAllData = False DataPipelineName = 'Document_Detail' mmHeight = 5027 mmLeft = 0 mmTop = 10502 mmWidth = 201930 BandType = 5 GroupNo = 0 LayerName = Foreground mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 object ppChildReport4: TppChildReport AutoStop = False DataPipeline = Document_Detail PrinterSetup.BinName = 'Default' PrinterSetup.DocumentName = 'SQL Financial Accounting: Sales Invoice 3 (Sales Tax)' PrinterSetup.Duplex = dpNone PrinterSetup.PaperName = 'Letter' 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 ppDetailBand5: TppDetailBand Visible = False Background1.Brush.Style = bsClear Background2.Brush.Style = bsClear Border.mmPadding = 0 mmBottomOffset = 0 mmHeight = 0 mmPrintPosition = 0 end object ppSummaryBand2: TppSummaryBand Background.Brush.Style = bsClear Border.mmPadding = 0 mmBottomOffset = 0 mmHeight = 31750 mmPrintPosition = 0 object ppLabel18: TppLabel DesignLayer = ppDesignLayer5 UserName = 'LabelGross1' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Total (Exclusive Tax):' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [fsBold] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3969 mmLeft = 125413 mmTop = 1323 mmWidth = 30427 BandType = 7 LayerName = Foreground4 end object ppLabel19: TppLabel DesignLayer = ppDesignLayer5 UserName = 'Label101' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Tax payable:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3969 mmLeft = 125413 mmTop = 6350 mmWidth = 16404 BandType = 7 LayerName = Foreground4 end object ppLabel20: TppLabel DesignLayer = ppDesignLayer5 UserName = 'lbTotalAmt1' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Total Amount Payable' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [fsBold] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3598 mmLeft = 125519 mmTop = 12700 mmWidth = 30480 BandType = 7 LayerName = Foreground4 end object ppLine7: TppLine DesignLayer = ppDesignLayer5 UserName = 'Line1' Border.mmPadding = 0 Weight = 0.750000000000000000 mmHeight = 2114 mmLeft = 125413 mmTop = 11378 mmWidth = 67733 BandType = 7 LayerName = Foreground4 end object ppLine8: TppLine DesignLayer = ppDesignLayer5 UserName = 'Line2' Border.mmPadding = 0 Style = lsDouble Weight = 0.750000000000000000 mmHeight = 2114 mmLeft = 159544 mmTop = 17473 mmWidth = 33602 BandType = 7 LayerName = Foreground4 end object ppLine5: TppLine DesignLayer = ppDesignLayer5 UserName = 'Line5' Border.mmPadding = 0 ParentWidth = True Weight = 0.750000000000000000 mmHeight = 1588 mmLeft = 0 mmTop = 0 mmWidth = 201930 BandType = 7 LayerName = Foreground4 end object ppVariable1: TppVariable DesignLayer = ppDesignLayer5 UserName = 'Variable1' AutoSize = False Border.mmPadding = 0 BlankWhenZero = False CalcOrder = 0 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 8 Font.Style = [] Transparent = True WordWrap = True mmHeight = 10319 mmLeft = 7144 mmTop = 1320 mmWidth = 108744 BandType = 7 LayerName = Foreground4 end object ppDBCalc4: TppDBCalc DesignLayer = ppDesignLayer5 UserName = 'DBCalc4' AutoSize = True Border.mmPadding = 0 DataField = 'Amount' DataPipeline = Document_Detail Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [fsBold] TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Document_Detail' mmHeight = 3969 mmLeft = 173038 mmTop = 2646 mmWidth = 19844 BandType = 7 LayerName = Foreground4 end object ppDBCalc5: TppDBCalc DesignLayer = ppDesignLayer5 UserName = 'DBCalc5' AutoSize = True Border.mmPadding = 0 DataField = 'TaxAmt' DataPipeline = Document_Detail Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Document_Detail' mmHeight = 3969 mmLeft = 174625 mmTop = 6350 mmWidth = 18257 BandType = 7 LayerName = Foreground4 end object ppDBCalc6: TppDBCalc DesignLayer = ppDesignLayer5 UserName = 'DBCalc6' AutoSize = True Border.mmPadding = 0 DataField = 'AmountWithTax' DataPipeline = Document_Detail Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [fsBold] TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Document_Detail' mmHeight = 3969 mmLeft = 160867 mmTop = 12435 mmWidth = 32015 BandType = 7 LayerName = Foreground4 end object ppDBCalc7: TppDBCalc DesignLayer = ppDesignLayer5 UserName = 'DBCalc7' Border.mmPadding = 0 DataField = 'LocalAmountWithTax' DataPipeline = Document_Detail Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [fsBold, fsItalic] TextAlignment = taRightJustified Transparent = True DataPipelineName = 'Document_Detail' mmHeight = 4763 mmLeft = 161925 mmTop = 19314 mmWidth = 30868 BandType = 7 LayerName = Foreground4 end object ppLabel24: TppLabel DesignLayer = ppDesignLayer5 UserName = 'Label1' Border.mmPadding = 0 Caption = 'Equivalent Amount (RM)' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [fsBold, fsItalic] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3810 mmLeft = 125413 mmTop = 19049 mmWidth = 33443 BandType = 7 LayerName = Foreground4 end end object raCodeModule5: TraCodeModule object raProgramInfo5: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'Variable1OnCalc' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure Variable1OnCalc(var Value: Variant);'#13#10'begin'#13#10#13#10' Value' + ' := Document_Currency.GetFieldValue('#39'Description'#39');'#13#10' Value := ' + 'Value + '#39' : '#39' + CurrencyToEngWord(DBCalc6.value) + '#39' ONLY'#39';'#13#10#13#10'e' + 'nd;'#13#10 raProgram.ComponentName = 'Variable1' raProgram.EventName = 'OnCalc' raProgram.EventID = 33 raProgram.CaretPos = ( 3 3) end object raProgramInfo6: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'DBCalc7OnPrint' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure DBCalc7OnPrint;'#13#10'begin'#13#10' DBCalc7.visible := Main.GetF' + 'ieldValue('#39'CurrencyCode'#39') <> '#39'----'#39';'#13#10'end;'#13#10 raProgram.ComponentName = 'DBCalc7' raProgram.EventName = 'OnPrint' raProgram.EventID = 32 raProgram.CaretPos = ( 3 3) end object raProgramInfo7: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'Label1OnPrint' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure Label1OnPrint;'#13#10'begin'#13#10' Label1.visible := Main.GetFie' + 'ldValue('#39'CurrencyCode'#39') <> '#39'----'#39';'#13#10'end;'#13#10 raProgram.ComponentName = 'Label1' raProgram.EventName = 'OnPrint' raProgram.EventID = 32 raProgram.CaretPos = ( 9 3) end end object ppDesignLayers5: TppDesignLayers object ppDesignLayer5: TppDesignLayer UserName = 'Foreground4' LayerType = ltBanded Index = 0 end end end end object Label16: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label27' HyperlinkEnabled = False Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Caption = 'Authorised Signature' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3598 mmLeft = 121074 mmTop = 53297 mmWidth = 26035 BandType = 5 GroupNo = 0 LayerName = Foreground end object Line12: TppLine DesignLayer = ppDesignLayer1 UserName = 'Line12' Border.Weight = 1.000000000000000000 Border.mmPadding = 0 Weight = 0.750000000000000000 mmHeight = 265 mmLeft = 121143 mmTop = 52228 mmWidth = 60590 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppLabel13: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label21' Border.mmPadding = 0 Caption = 'E. & O.E' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3599 mmLeft = 92287 mmTop = 58588 mmWidth = 12065 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppLabel14: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label22' Border.mmPadding = 0 Caption = 'for' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3598 mmLeft = 121285 mmTop = 35675 mmWidth = 3599 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppDBText9: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText13' AutoSize = True Border.mmPadding = 0 DataField = 'CompanyName' DataPipeline = Profile Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [fsBold] ParentDataPipeline = False Transparent = True DataPipelineName = 'Profile' mmHeight = 3598 mmLeft = 126365 mmTop = 35675 mmWidth = 20955 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppDBText11: TppDBText DesignLayer = ppDesignLayer1 UserName = 'DBText11' Border.mmPadding = 0 DataField = 'Description' DataPipeline = Main Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] Transparent = True WordWrap = True DataPipelineName = 'Main' mmHeight = 8290 mmLeft = 29138 mmTop = 1376 mmWidth = 122591 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppLabel3: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label4' Border.mmPadding = 0 Caption = 'DESCRIPTION:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3598 mmLeft = 3119 mmTop = 1376 mmWidth = 21378 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppSubReport5: TppSubReport DesignLayer = ppDesignLayer1 UserName = 'SubReport3' ExpandAll = False NewPrintJob = False OutlineSettings.CreateNode = True TraverseAllData = False DataPipelineName = 'plSQL_1' mmHeight = 5027 mmLeft = 0 mmTop = 20368 mmWidth = 201930 BandType = 5 GroupNo = 0 LayerName = Foreground mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 object ppChildReport5: TppChildReport AutoStop = False DataPipeline = plSQL_1 PrinterSetup.BinName = 'Default' PrinterSetup.DocumentName = 'SQL Financial Accounting: Sales Invoice 3 (Sales Tax)' PrinterSetup.Duplex = dpNone PrinterSetup.PaperName = 'Letter' PrinterSetup.PrinterName = 'Default' PrinterSetup.SaveDeviceSettings = False PrinterSetup.mmMarginBottom = 6350 PrinterSetup.mmMarginLeft = 7620 PrinterSetup.mmMarginRight = 6350 PrinterSetup.mmMarginTop = 3810 PrinterSetup.mmPaperHeight = 279401 PrinterSetup.mmPaperWidth = 215900 PrinterSetup.PaperSize = 1 Template.DatabaseSettings.NameField = 'Name' Template.DatabaseSettings.TemplateField = 'Template' Template.SaveTo = stDatabase Template.Format = ftASCII Version = '19.02' mmColumnWidth = 0 DataPipelineName = 'plSQL_1' object ppTitleBand1: TppTitleBand Background.Brush.Style = bsClear Border.mmPadding = 0 mmBottomOffset = 0 mmHeight = 5292 mmPrintPosition = 0 object ppLabel25: TppLabel DesignLayer = ppDesignLayer6 UserName = 'Label25' Border.mmPadding = 0 Caption = 'Tax summary' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 8 Font.Style = [fsUnderline] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3704 mmLeft = 7144 mmTop = 1323 mmWidth = 16933 BandType = 1 LayerName = Foreground5 end object ppLabel26: TppLabel DesignLayer = ppDesignLayer6 UserName = 'Label1' Border.mmPadding = 0 Caption = 'Amount (RM)' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 8 Font.Style = [fsUnderline] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True mmHeight = 3175 mmLeft = 37306 mmTop = 1323 mmWidth = 15875 BandType = 1 LayerName = Foreground5 end object ppLabel27: TppLabel DesignLayer = ppDesignLayer6 UserName = 'Label27' Border.mmPadding = 0 Caption = 'Tax (RM)' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 8 Font.Style = [fsUnderline] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone TextAlignment = taRightJustified Transparent = True mmHeight = 3175 mmLeft = 66411 mmTop = 1323 mmWidth = 10584 BandType = 1 LayerName = Foreground5 end end object ppDetailBand6: TppDetailBand Visible = False Background1.Brush.Style = bsClear Background2.Brush.Style = bsClear Border.mmPadding = 0 mmBottomOffset = 0 mmHeight = 6085 mmPrintPosition = 0 object ppDBText28: TppDBText DesignLayer = ppDesignLayer6 UserName = 'DBText28' AutoSize = True Border.mmPadding = 0 DataField = 'TaxAmt' DataPipeline = plSQL_1 DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 10 Font.Style = [] TextAlignment = taRightJustified Transparent = True DataPipelineName = 'plSQL_1' mmHeight = 4233 mmLeft = 17992 mmTop = 265 mmWidth = 11641 BandType = 4 LayerName = Foreground5 end object ppDBText29: TppDBText DesignLayer = ppDesignLayer6 UserName = 'DBText29' AutoSize = True Border.mmPadding = 0 DataField = 'LocalTaxAmt' DataPipeline = plSQL_1 DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 10 Font.Style = [] TextAlignment = taRightJustified Transparent = True DataPipelineName = 'plSQL_1' mmHeight = 4233 mmLeft = 35719 mmTop = 265 mmWidth = 19314 BandType = 4 LayerName = Foreground5 end object ppDBText30: TppDBText DesignLayer = ppDesignLayer6 UserName = 'DBText30' AutoSize = True Border.mmPadding = 0 DataField = 'Amount' DataPipeline = plSQL_1 DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 10 Font.Style = [] TextAlignment = taRightJustified Transparent = True DataPipelineName = 'plSQL_1' mmHeight = 4233 mmLeft = 68263 mmTop = 265 mmWidth = 11641 BandType = 4 LayerName = Foreground5 end object ppDBText31: TppDBText DesignLayer = ppDesignLayer6 UserName = 'DBText301' AutoSize = True Border.mmPadding = 0 DataField = 'LocalAmount' DataPipeline = plSQL_1 DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 10 Font.Style = [] TextAlignment = taRightJustified Transparent = True DataPipelineName = 'plSQL_1' mmHeight = 4233 mmLeft = 87048 mmTop = 265 mmWidth = 19315 BandType = 4 LayerName = Foreground5 end object ppDBText32: TppDBText DesignLayer = ppDesignLayer6 UserName = 'DBText32' AutoSize = True Border.mmPadding = 0 DataField = 'LocalAmountWithTax' DataPipeline = plSQL_1 DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 10 Font.Style = [] TextAlignment = taRightJustified Transparent = True DataPipelineName = 'plSQL_1' mmHeight = 4233 mmLeft = 157163 mmTop = 265 mmWidth = 31750 BandType = 4 LayerName = Foreground5 end object ppDBText33: TppDBText DesignLayer = ppDesignLayer6 UserName = 'DBText33' AutoSize = True Border.mmPadding = 0 DataField = 'AmountWithTax' DataPipeline = plSQL_1 DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 10 Font.Style = [] TextAlignment = taRightJustified Transparent = True DataPipelineName = 'plSQL_1' mmHeight = 4233 mmLeft = 123296 mmTop = 265 mmWidth = 24077 BandType = 4 LayerName = Foreground5 end end object ppGroup2: TppGroup BreakName = 'ppDBText27' BreakType = btCustomField GroupFileSettings.NewFile = False GroupFileSettings.EmailFile = False KeepTogether = True OutlineSettings.CreateNode = True StartOnOddPage = False UserName = 'Group2' mmNewColumnThreshold = 0 mmNewPageThreshold = 0 DataPipelineName = '' NewFile = False object ppGroupHeaderBand2: TppGroupHeaderBand Background.Brush.Style = bsClear Border.mmPadding = 0 mmBottomOffset = 0 mmHeight = 0 mmPrintPosition = 0 end object ppGroupFooterBand2: TppGroupFooterBand Background.Brush.Style = bsClear Border.mmPadding = 0 HideWhenOneDetail = False mmBottomOffset = 0 mmHeight = 4498 mmPrintPosition = 0 object ppVariable2: TppVariable DesignLayer = ppDesignLayer6 UserName = 'VarTax' Border.mmPadding = 0 BlankWhenZero = False CalcOrder = 0 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 8 Font.Style = [] Transparent = True mmHeight = 3440 mmLeft = 7144 mmTop = 0 mmWidth = 8996 BandType = 5 GroupNo = 0 LayerName = Foreground5 end object ppDBCalc8: TppDBCalc DesignLayer = ppDesignLayer6 UserName = 'DBCalc8' Border.mmPadding = 0 DataField = 'LocalAmount' DataPipeline = plSQL_1 DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 8 Font.Style = [] ResetGroup = ppGroup2 TextAlignment = taRightJustified Transparent = True DataPipelineName = 'plSQL_1' mmHeight = 4498 mmLeft = 35983 mmTop = 0 mmWidth = 17198 BandType = 5 GroupNo = 0 LayerName = Foreground5 end object ppDBCalc9: TppDBCalc DesignLayer = ppDesignLayer6 UserName = 'DBCalc9' Border.mmPadding = 0 DataField = 'LocalTaxAmt' DataPipeline = plSQL_1 DisplayFormat = '#,0.00;-#,0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 8 Font.Style = [] ResetGroup = ppGroup2 TextAlignment = taRightJustified Transparent = True DataPipelineName = 'plSQL_1' mmHeight = 4498 mmLeft = 59796 mmTop = 0 mmWidth = 17198 BandType = 5 GroupNo = 0 LayerName = Foreground5 end object ppDBText27: TppDBText DesignLayer = ppDesignLayer6 UserName = 'DBText27' AutoSize = True Border.mmPadding = 0 DataField = 'Tax' DataPipeline = plSQL_1 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Tahoma' Font.Size = 10 Font.Style = [] Transparent = True Visible = False DataPipelineName = 'plSQL_1' mmHeight = 4233 mmLeft = 88371 mmTop = 0 mmWidth = 5556 BandType = 5 GroupNo = 0 LayerName = Foreground5 end end end object raCodeModule6: TraCodeModule object raProgramInfo8: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'VarTaxOnCalc' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure VarTaxOnCalc(var Value: Variant);'#13#10'Var s: string;'#13#10#13#10'b' + 'egin'#13#10#13#10' s := '#39'SELECT TAXRATE FROM TAX '#39' + '#13#10' '#39'WHERE CODE' + ' ='#39' + QuotedStr(plSQL_1.GetFieldValue('#39'Tax'#39'));'#13#10#13#10' Value := plS' + 'QL_1.GetFieldValue('#39'Tax'#39') + '#39' @ '#39' + plSQL_1.GetFieldValue('#39'TaxRa' + 'te'#39');'#13#10#13#10'end;'#13#10 raProgram.ComponentName = 'VarTax' raProgram.EventName = 'OnCalc' raProgram.EventID = 33 raProgram.CaretPos = ( 5 11) end end object ppDesignLayers6: TppDesignLayers object ppDesignLayer6: TppDesignLayer UserName = 'Foreground5' LayerType = ltBanded Index = 0 end end end end object ppLabel21: TppLabel DesignLayer = ppDesignLayer1 UserName = 'Label29' Border.mmPadding = 0 Caption = 'Reason for Return : ' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] FormFieldSettings.FormSubmitInfo.SubmitMethod = fstPost FormFieldSettings.FormFieldType = fftNone Transparent = True mmHeight = 3968 mmLeft = 3119 mmTop = 35675 mmWidth = 25664 BandType = 5 GroupNo = 0 LayerName = Foreground end object ppDBRichText5: TppDBRichText DesignLayer = ppDesignLayer1 UserName = 'DBRichText5' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Name = 'Times New Roman' Font.Size = 9 Font.Style = [] Border.mmPadding = 0 ExportRTFAsBitmap = False DataField = 'Note' DataPipeline = Main RemoveEmptyLines = False Transparent = True DataPipelineName = 'Main' mmHeight = 10583 mmLeft = 29138 mmTop = 35675 mmWidth = 82021 BandType = 5 GroupNo = 0 LayerName = Foreground mmBottomOffset = 0 mmOverFlowOffset = 0 mmStopPosition = 0 mmMinHeight = 0 end end end object raCodeModule1: TraCodeModule object raProgramInfo17: TraProgramInfo raClassName = 'TraVarProgram' raProgram.ChildType = 17 raProgram.ProgramName = 'Variables' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure Variables;'#13#10'var'#13#10' SQL_1, SQL_2, SQL_3, d: String;'#13#10#13 + #10'begin'#13#10#13#10'end;'#13#10 raProgram.CaretPos = ( 11 2) end object raProgramInfo18: 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'A' + 'ccountingValueDisplayFormat'#39');'#13#10' SQL_1 := '#39'SELECT DocKey, Item' + 'Code, UOM, UnitPrice, Disc, MIN(Seq) Seq, TaxRate, Description, ' + #39' +'#13#10#9#9' '#39'Sum(Qty) Qty, Sum(Amount) Amount, Sum(AmountWith' + 'Tax) AmountWithTax , Sum(LocalAmount) LocalAmount, '#39' + '#13#10' ' + ' '#39'Sum(LocalAmountWithTax) LocalAmountWithTax, Sum(TaxAmt) Ta' + 'xAmt, Sum(LocalTaxAmt) LocalTaxAmt, Tax '#39' +'#13#10' '#39'FROM D' + 'ocument_Detail '#39' +'#13#10' '#39'GROUP BY Tax, TaxRate '#39';'#13#10' SQ' + 'L_2 := '#39'SELECT DocKey, ItemCode, UOM, UnitPrice, Disc, MIN(Seq) ' + 'Seq, Description, '#39' +'#13#10#9#9' '#39'SUM(Qty) Qty, SUM(Amount) Amou' + 'nt, SUM(AmountWithTax) AmountWithTax '#39' +'#13#10' '#39'FROM Docu' + 'ment_Detail '#39' +'#13#10' '#39'GROUP BY DocKey, ItemCode, UOM, Un' + 'itPrice, Disc '#39';'#13#10' SQL_3 := '#39'SELECT DocKey, ItemCode, Descript' + 'ion, Description2, Description3, Seq '#39'+ '#13#10#9#9' '#39'FROM Docume' + 'nt_Detail '#39' +'#13#10#9#9' '#39'ORDER BY Seq DESC'#39';'#13#10'end;'#13#10 raProgram.CaretPos = ( 32 8) end object raProgramInfo19: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'ReportBeforePrint' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure ReportBeforePrint;'#13#10'begin '#13#10' LocalSQL_SELECT(plSQ' + 'L_1, SQL_1, '#39'Tax;TaxRate'#39');'#13#10' LocalSQL_SELECT(plSQL_2, SQL_2,' + ' '#39'DocKey;Seq'#39');'#13#10' LocalSQL_SELECT(plSQL_3, SQL_3, '#39'DocKey;Ite' + 'mCode;Description'#39');'#13#10' SetDataPipelineFieldLink(Main, plSQL_2' + ', '#39'DocKey'#39', '#39'DocKey'#39');'#13#10' SetDataPipelineFieldLink(plSQL_2, pl' + 'SQL_3, '#39'DocKey;ItemCode;Description'#39', '#39'DocKey;ItemCode;Descripti' + 'on'#39');'#13#10#13#10'end;'#13#10 raProgram.ComponentName = 'Report' raProgram.EventName = 'BeforePrint' raProgram.EventID = 1 raProgram.CaretPos = ( 49 3) end object raProgramInfo20: 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 end object raProgramInfo21: 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 end object raProgramInfo22: TraProgramInfo raClassName = 'TraEventHandler' raProgram.ProgramName = 'DBText14OnPrint' raProgram.ProgramType = ttProcedure raProgram.Source = 'procedure DBText14OnPrint;'#13#10'begin'#13#10' DBText14.visible := Main.G' + 'etFieldValue('#39'CurrencyCode'#39') <> '#39'----'#39';'#13#10'end;'#13#10 raProgram.ComponentName = 'DBText14' raProgram.EventName = 'OnPrint' raProgram.EventID = 32 raProgram.CaretPos = ( 3 4) end end object ppDesignLayers1: TppDesignLayers object ppDesignLayer1: TppDesignLayer UserName = 'Foreground' LayerType = ltBanded Index = 0 end end object ppParameterList1: TppParameterList end end