object relPrestacaoContas: TrelPrestacaoContas Left = 0 Top = 0 Caption = 'relPrestacaoContas' ClientHeight = 750 ClientWidth = 1126 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] OldCreateOrder = False PixelsPerInch = 96 TextHeight = 13 object frPrestacao: TRLReport Left = 0 Top = 0 Width = 1123 Height = 794 DataSource = dtsTitulos Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [] PageSetup.Orientation = poLandscape AfterPrint = frPrestacaoAfterPrint BeforePrint = frPrestacaoBeforePrint object frbnd_header: TRLBand Left = 38 Top = 38 Width = 1047 Height = 99 AutoExpand = False BandType = btHeader Borders.Sides = sdCustom Borders.DrawLeft = True Borders.DrawTop = True Borders.DrawRight = True Borders.DrawBottom = True object frpnl_logo: TRLPanel Left = 1 Top = 1 Width = 112 Height = 97 Align = faLeftMost AutoExpand = True AutoSize = True object frdbimg_logo: TRLDBImage Left = 0 Top = 0 Width = 112 Height = 97 Align = faClient Borders.Sides = sdCustom Borders.DrawLeft = False Borders.DrawTop = False Borders.DrawRight = True Borders.DrawBottom = False DataField = 'IMG_LOGO' DataSource = dtmSystem.dtsEmpresa Stretch = True BeforePrint = frdbimg_logoBeforePrint end end object frpnl_headertop: TRLPanel Left = 113 Top = 1 Width = 933 Height = 48 Align = faTop Borders.Sides = sdCustom Borders.DrawLeft = False Borders.DrawTop = False Borders.DrawRight = False Borders.DrawBottom = False object frlbl_headertop: TRLLabel Left = 0 Top = 0 Width = 425 Height = 16 Align = faLeftTop Caption = 'ASSESSORIA DE SERVI'#199'OS LTDA - EPP CNPJ : 36.058.162/0001-28' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end end object RLMemo1: TRLMemo Left = 252 Top = 64 Width = 654 Height = 19 Align = faCenter Alignment = taCenter Behavior = [beSiteExpander] Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = 'Arial' Font.Style = [fsBold] Lines.Strings = ( 'BENEF - PRESTA'#199#195'O DE CONTAS - DT1 AT'#201' DT2') ParentFont = False BeforePrint = RLMemo1BeforePrint end end object frbnd_clmheader: TRLBand Left = 38 Top = 137 Width = 1047 Height = 17 BandType = btColumnHeader Borders.Sides = sdCustom Borders.DrawLeft = True Borders.DrawTop = False Borders.DrawRight = True Borders.DrawBottom = True object RLLabel2: TRLLabel Left = 1 Top = 2 Width = 57 Height = 14 Align = faLeftBottom Caption = 'PRODUTO:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object RLLabel3: TRLLabel Left = 158 Top = 2 Width = 55 Height = 14 Align = faBottomOnly Caption = 'DEVEDOR:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object RLLabel4: TRLLabel Left = 325 Top = 2 Width = 76 Height = 14 Align = faBottomOnly Caption = 'VENCIMENTO:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object RLLabel5: TRLLabel Left = 412 Top = 2 Width = 85 Height = 14 Align = faBottomOnly Caption = 'DATA DE PGTO:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object RLLabel6: TRLLabel Left = 522 Top = 2 Width = 56 Height = 14 Align = faBottomOnly Caption = 'NOMINAL:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object RLLabel7: TRLLabel Left = 595 Top = 2 Width = 41 Height = 14 Align = faBottomOnly Caption = 'JUROS:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object RLLabel8: TRLLabel Left = 645 Top = 2 Width = 45 Height = 14 Align = faBottomOnly Caption = 'MULTA:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object RLLabel9: TRLLabel Left = 694 Top = 2 Width = 65 Height = 14 Align = faBottomOnly Caption = 'ENCARGOS:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object RLLabel10: TRLLabel Left = 849 Top = 2 Width = 43 Height = 14 Align = faBottomOnly Caption = 'TOTAL:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object RLLabel11: TRLLabel Left = 918 Top = 2 Width = 44 Height = 14 Align = faBottomOnly Caption = 'RETIDO:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object RLLabel12: TRLLabel Left = 975 Top = 2 Width = 71 Height = 14 Align = faRightBottom Caption = 'REPASSADO:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object RLLabel1: TRLLabel Left = 794 Top = 2 Width = 34 Height = 14 Align = faBottomOnly Caption = 'DESC:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end end object frbnd_detail: TRLBand Left = 38 Top = 154 Width = 1047 Height = 16 Borders.Sides = sdCustom Borders.DrawLeft = True Borders.DrawTop = False Borders.DrawRight = True Borders.DrawBottom = True object RLDBText3: TRLDBText Left = 325 Top = 1 Width = 87 Height = 14 Align = faBottomOnly DataField = 'DT_VENCIMENTO' DataSource = dtsTitulos Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False Text = '' end object RLDBText4: TRLDBText Left = 520 Top = 1 Width = 58 Height = 14 Align = faBottomOnly Alignment = taRightJustify DataField = 'VL_TITULO' DataSource = dtsTitulos Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False Text = '' end object RLDBText5: TRLDBText Left = 412 Top = 1 Width = 87 Height = 14 Align = faBottomOnly DataField = 'DT_PAGAMENTO' DataSource = dtsTitulos Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False Text = '' end object RLDBText6: TRLDBText Left = 579 Top = 1 Width = 57 Height = 14 Align = faBottomOnly Alignment = taRightJustify DataField = 'VL_JUROS' DataSource = dtsTitulos Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False Text = '' end object RLDBText7: TRLDBText Left = 632 Top = 1 Width = 58 Height = 14 Align = faBottomOnly Alignment = taRightJustify DataField = 'VL_MULTA' DataSource = dtsTitulos Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False Text = '' end object RLDBText8: TRLDBText Left = 678 Top = 1 Width = 81 Height = 14 Align = faBottomOnly Alignment = taRightJustify DataField = 'VL_ENCARGOS' DataSource = dtsTitulos Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False Text = '' end object RLDBText9: TRLDBText Left = 813 Top = 1 Width = 79 Height = 14 Align = faBottomOnly Alignment = taRightJustify DataField = 'VL_CORRIGIDO' DataSource = dtsTitulos Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False Text = '' end object RLDBText10: TRLDBText Left = 903 Top = 1 Width = 59 Height = 14 Align = faBottomOnly Alignment = taRightJustify DataField = 'VL_RETIDO' DataSource = dtsTitulos Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False Text = '' end object RLDBText11: TRLDBText Left = 976 Top = 1 Width = 70 Height = 14 Align = faRightBottom Alignment = taRightJustify DataField = 'VL_REPASSE' DataSource = dtsTitulos Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False Text = '' end object RLDBText1: TRLDBText Left = 1 Top = 1 Width = 144 Height = 14 Align = faLeftBottom AutoSize = False DataField = 'TX_PRODUTO' DataSource = dtsTitulos Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False Text = '' end object RLDBText2: TRLDBText Left = 158 Top = 1 Width = 156 Height = 14 Align = faBottomOnly AutoSize = False DataField = 'TX_NOME' DataSource = dtsTitulos Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False Text = '' end object RLDBText18: TRLDBText Left = 721 Top = 1 Width = 107 Height = 14 Align = faBottomOnly Alignment = taRightJustify DataField = 'VL_DESC_PRINCIPAL' DataSource = dtsTitulos Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False Text = '' end end object frbnd_clmfooter: TRLBand Left = 38 Top = 170 Width = 1047 Height = 30 BandType = btColumnFooter Borders.Sides = sdCustom Borders.DrawLeft = True Borders.DrawTop = False Borders.DrawRight = True Borders.DrawBottom = True object RLDBResult1: TRLDBResult Left = 496 Top = 18 Width = 82 Height = 11 Align = faBottomOnly Alignment = taRightJustify DataField = 'VL_TITULO' DataSource = dtsTitulos DisplayMask = '###,###,##0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -9 Font.Name = 'Arial' Font.Style = [fsBold] Info = riSum ParentFont = False Text = '' end object RLDBResult2: TRLDBResult Left = 555 Top = 18 Width = 81 Height = 11 Align = faBottomOnly Alignment = taRightJustify DataField = 'VL_JUROS' DataSource = dtsTitulos DisplayMask = '###,###,##0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -9 Font.Name = 'Arial' Font.Style = [fsBold] Info = riSum ParentFont = False Text = '' end object RLDBResult3: TRLDBResult Left = 611 Top = 18 Width = 79 Height = 11 Align = faBottomOnly Alignment = taRightJustify DataField = 'VL_MULTA' DataSource = dtsTitulos DisplayMask = '###,###,##0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -9 Font.Name = 'Arial' Font.Style = [fsBold] Info = riSum ParentFont = False Text = '' end object RLDBResult4: TRLDBResult Left = 658 Top = 18 Width = 101 Height = 11 Align = faBottomOnly Alignment = taRightJustify DataField = 'VL_ENCARGOS' DataSource = dtsTitulos DisplayMask = '###,###,##0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -9 Font.Name = 'Arial' Font.Style = [fsBold] Info = riSum ParentFont = False Text = '' end object RLDBResult5: TRLDBResult Left = 788 Top = 18 Width = 104 Height = 11 Align = faBottomOnly Alignment = taRightJustify DataField = 'VL_CORRIGIDO' DataSource = dtsTitulos DisplayMask = '###,###,##0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -9 Font.Name = 'Arial' Font.Style = [fsBold] Info = riSum ParentFont = False Text = '' end object RLDBResult6: TRLDBResult Left = 878 Top = 18 Width = 84 Height = 11 Align = faBottomOnly Alignment = taRightJustify DataField = 'VL_RETIDO' DataSource = dtsTitulos DisplayMask = '###,###,##0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -9 Font.Name = 'Arial' Font.Style = [fsBold] Info = riSum ParentFont = False Text = '' end object RLDBResult7: TRLDBResult Left = 955 Top = 18 Width = 91 Height = 11 Align = faRightBottom Alignment = taRightJustify DataField = 'VL_REPASSE' DataSource = dtsTitulos DisplayMask = '###,###,##0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -9 Font.Name = 'Arial' Font.Style = [fsBold] Info = riSum ParentFont = False Text = '' end object RLLabel13: TRLLabel Left = 462 Top = 15 Width = 40 Height = 14 Align = faBottomOnly Caption = 'Totais:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object RLLabel15: TRLLabel Left = 522 Top = 0 Width = 56 Height = 14 Align = faTopOnly Caption = 'NOMINAL:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object RLLabel16: TRLLabel Left = 595 Top = 0 Width = 41 Height = 14 Align = faTopOnly Caption = 'JUROS:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object RLLabel17: TRLLabel Left = 645 Top = 0 Width = 45 Height = 14 Align = faTopOnly Caption = 'MULTA:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object RLLabel18: TRLLabel Left = 694 Top = 0 Width = 65 Height = 14 Align = faTopOnly Caption = 'ENCARGOS:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object RLLabel19: TRLLabel Left = 849 Top = 0 Width = 43 Height = 14 Align = faTopOnly Caption = 'TOTAL:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object RLLabel20: TRLLabel Left = 918 Top = 0 Width = 44 Height = 14 Align = faTopOnly Caption = 'RETIDO:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object RLLabel21: TRLLabel Left = 975 Top = 0 Width = 71 Height = 14 Align = faRightTop Caption = 'REPASSADO:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object RLLabel22: TRLLabel Left = 794 Top = 0 Width = 34 Height = 14 Align = faTopOnly Caption = 'DESC:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object RLDBResult8: TRLDBResult Left = 698 Top = 18 Width = 130 Height = 11 Align = faBottomOnly Alignment = taRightJustify DataField = 'VL_DESC_PRINCIPAL' DataSource = dtsTitulos DisplayMask = '###,###,##0.00' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -9 Font.Name = 'Arial' Font.Style = [fsBold] Info = riSum ParentFont = False Text = '' end end object frbnd_footer: TRLBand Left = 38 Top = 200 Width = 1047 Height = 69 BandType = btFooter object fr_date: TRLSystemInfo Left = 843 Top = 56 Width = 161 Height = 13 Align = faBottomOnly Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'unifont' Font.Style = [] ParentFont = False Text = 'Data de emiss'#227'o:' end object RLLabel14: TRLLabel Left = 636 Top = 6 Width = 408 Height = 16 Caption = 'Data: ____/____/________ ASS: ____________________________' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object RLDBText12: TRLDBText Left = 3 Top = 36 Width = 189 Height = 13 DataField = 'TX_NOME' DataSource = dtmSystem.dtsRepasse Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'unifont' Font.Style = [] ParentFont = False Text = 'Modelo de Repasse: ' Visible = False end object RLDBText13: TRLDBText Left = 3 Top = 55 Width = 154 Height = 13 DataField = 'PR_PRINCIPAL' DataSource = dtmSystem.dtsRepasse DisplayMask = '0.00%' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'unifont' Font.Style = [] ParentFont = False Text = 'Nominal: ' Visible = False end object RLDBText14: TRLDBText Left = 132 Top = 55 Width = 112 Height = 13 DataField = 'PR_JUROS' DataSource = dtmSystem.dtsRepasse DisplayMask = '0.00%' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'unifont' Font.Style = [] ParentFont = False Text = 'Juros: ' Visible = False end object RLDBText15: TRLDBText Left = 246 Top = 55 Width = 112 Height = 13 DataField = 'PR_MULTA' DataSource = dtmSystem.dtsRepasse DisplayMask = '0.00%' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'unifont' Font.Style = [] ParentFont = False Text = 'Multa: ' Visible = False end object RLDBText16: TRLDBText Left = 359 Top = 55 Width = 154 Height = 13 DataField = 'PR_ENCARGOS' DataSource = dtmSystem.dtsRepasse DisplayMask = '0.00%' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'unifont' Font.Style = [] ParentFont = False Text = 'Encargos: ' Visible = False end object RLDBText17: TRLDBText Left = 491 Top = 55 Width = 140 Height = 13 DataField = 'PR_CORRIGIDO' DataSource = dtmSystem.dtsRepasse DisplayMask = '0.00%' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'unifont' Font.Style = [] ParentFont = False Text = 'Total: ' Visible = False end object RLSystemInfo1: TRLSystemInfo Left = 659 Top = 56 Width = 161 Height = 13 Align = faBottomOnly Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'unifont' Font.Style = [] Info = itHour ParentFont = False Text = 'Hora da Emiss'#227'o:' end end end object zqryTitulos: TZQuery Connection = dtmSystem.ZConnection OnCalcFields = zqryTitulosCalcFields SQL.Strings = ( 'select first 0' 'A.tx_nome,' 'A.id_devedor,' 'B.tx_produto,' 'B.dt_vencimento,' 'B.dt_pagamento,' 'case when B.id_titulo in (select id_parcela from sys_acordos) th' + 'en (B.vl_titulo - B.vl_juros - B.vl_multa - B.vl_encargos)' 'when B.id_titulo not in (select id_parcela from sys_acordos) the' + 'n (B.vl_titulo)' 'end as vl_titulo,' 'B.vl_repasse_prin,' 'B.vl_juros,' 'B.vl_desc_juros,' 'B.vl_repasse_juros,' 'B.vl_multa,' 'B.vl_desc_multa,' 'B.vl_repasse_multa,' 'B.vl_encargos,' 'B.vl_indicador,' 'B.vl_desc_indicador,' 'B.vl_repasse_encargos,' 'B.vl_corrigido,' 'B.vl_repasse_corrigido,' 'B.vl_desc_principal,' 'B.id_titulo,' 'B.id_empresa,' 'B.tp_prestacao,' '(cast(B.dt_pagamento as date)-cast(B.dt_vencimento as date)) as ' + 'atraso' 'from chg_devedores A' 'inner join chg_titulos B on (A.id_devedor = B.id_devedor)') Params = <> Left = 656 Top = 8 object zqryTitulosTX_NOME: TWideStringField FieldName = 'TX_NOME' Size = 60 end object zqryTitulosTX_PRODUTO: TWideStringField FieldName = 'TX_PRODUTO' Size = 100 end object zqryTitulosDT_VENCIMENTO: TDateTimeField FieldName = 'DT_VENCIMENTO' end object zqryTitulosDT_PAGAMENTO: TDateTimeField FieldName = 'DT_PAGAMENTO' end object zqryTitulosVL_MULTA: TFloatField FieldName = 'VL_MULTA' currency = True end object zqryTitulosVL_ENCARGOS: TFloatField FieldName = 'VL_ENCARGOS' currency = True end object zqryTitulosVL_CORRIGIDO: TFloatField FieldName = 'VL_CORRIGIDO' currency = True end object zqryTitulosVL_RETIDO: TCurrencyField FieldKind = fkCalculated FieldName = 'VL_RETIDO' Calculated = True end object zqryTitulosVL_REPASSE: TCurrencyField FieldKind = fkCalculated FieldName = 'VL_REPASSE' Calculated = True end object zqryTitulosVL_DESC_PRINCIPAL: TFloatField FieldName = 'VL_DESC_PRINCIPAL' currency = True end object zqryTitulosATRASO: TIntegerField FieldName = 'ATRASO' ReadOnly = True end object zqryTitulosID_TITULO: TIntegerField FieldName = 'ID_TITULO' Required = True end object zqryTitulosVL_TITULO: TCurrencyField FieldName = 'VL_TITULO' ReadOnly = True end object zqryTitulosVL_JUROS: TFloatField FieldName = 'VL_JUROS' currency = True end object zqryTitulosID_DEVEDOR: TIntegerField FieldName = 'ID_DEVEDOR' Required = True end object zqryTitulosID_EMPRESA: TIntegerField FieldName = 'ID_EMPRESA' Required = True end object zqryTitulosVL_REPASSE_PRIN: TFloatField FieldName = 'VL_REPASSE_PRIN' end object zqryTitulosVL_DESC_JUROS: TFloatField FieldName = 'VL_DESC_JUROS' end object zqryTitulosVL_REPASSE_JUROS: TFloatField FieldName = 'VL_REPASSE_JUROS' end object zqryTitulosVL_DESC_MULTA: TFloatField FieldName = 'VL_DESC_MULTA' end object zqryTitulosVL_REPASSE_MULTA: TFloatField FieldName = 'VL_REPASSE_MULTA' end object zqryTitulosVL_INDICADOR: TFloatField FieldName = 'VL_INDICADOR' end object zqryTitulosVL_DESC_INDICADOR: TFloatField FieldName = 'VL_DESC_INDICADOR' end object zqryTitulosVL_REPASSE_CORRIGIDO: TFloatField FieldName = 'VL_REPASSE_CORRIGIDO' end object zqryTitulosTP_PRESTACAO: TWideStringField FieldName = 'TP_PRESTACAO' Size = 1 end object zqryTitulosVL_REPASSE_ENCARGOS: TFloatField FieldName = 'VL_REPASSE_ENCARGOS' end end object dtsTitulos: TDataSource DataSet = zqryTitulos Left = 744 Top = 8 end object fr_filterpdf: TRLPDFFilter DocumentInfo.Creator = 'FortesReport Community Edition v4.0 \251 Copyright '#169' 1999-2015 F' + 'ortes Inform'#225'tica' DisplayName = 'Documento PDF' Left = 808 Top = 8 end object rotblRepasseFase: TZReadOnlyQuery Connection = dtmSystem.ZConnection SQL.Strings = ( 'select * from sys_repasses_fases') Params = <> Left = 896 Top = 8 object rotblRepasseFaseID_FASE: TIntegerField FieldName = 'ID_FASE' Required = True end object rotblRepasseFasePR_PRINCIPAL: TFloatField FieldName = 'PR_PRINCIPAL' end object rotblRepasseFasePR_JUROS: TFloatField FieldName = 'PR_JUROS' end object rotblRepasseFasePR_MULTA: TFloatField FieldName = 'PR_MULTA' end object rotblRepasseFasePR_ENCARGOS: TFloatField FieldName = 'PR_ENCARGOS' end object rotblRepasseFasePR_CORRIGIDO: TFloatField FieldName = 'PR_CORRIGIDO' end object rotblRepasseFaseMIN_ATRASO: TIntegerField FieldName = 'MIN_ATRASO' end object rotblRepasseFaseMAX_ATRASO: TIntegerField FieldName = 'MAX_ATRASO' end object rotblRepasseFaseID_REPASSE: TIntegerField FieldName = 'ID_REPASSE' end object rotblRepasseFaseID_ULTIMO_USUARIO: TIntegerField FieldName = 'ID_ULTIMO_USUARIO' end object rotblRepasseFaseDT_HORA_ULTIMA_ATT: TDateTimeField FieldName = 'DT_HORA_ULTIMA_ATT' end end end