You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
1134 lines
30 KiB
1134 lines
30 KiB
object relPrestacaoAnaSin2: TrelPrestacaoAnaSin2
|
|
Left = 0
|
|
Top = 0
|
|
BorderStyle = bsNone
|
|
Caption = 'relPrestacaoAnaSin2'
|
|
ClientHeight = 817
|
|
ClientWidth = 1139
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
OldCreateOrder = False
|
|
OnCreate = FormCreate
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object relPrestacao2: TRLReport
|
|
Left = 8
|
|
Top = 8
|
|
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 = relPrestacao2AfterPrint
|
|
BeforePrint = relPrestacao2BeforePrint
|
|
object RLBand1: 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 RLPanel1: TRLPanel
|
|
Left = 1
|
|
Top = 1
|
|
Width = 112
|
|
Height = 97
|
|
Align = faLeftMost
|
|
AutoExpand = True
|
|
AutoSize = True
|
|
object RLDBImage1: 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
|
|
end
|
|
end
|
|
object RLPanel2: 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 RLLabel14: 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 RLMemo2: TRLMemo
|
|
Left = 346
|
|
Top = 64
|
|
Width = 466
|
|
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 = (
|
|
'PRESTA'#199#195'O DE CONTAS - DT1 AT'#201' DT2')
|
|
ParentFont = False
|
|
end
|
|
object frlbl_dep: TRLLabel
|
|
Left = 114
|
|
Top = 82
|
|
Width = 6
|
|
Height = 14
|
|
Caption = ' '
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Height = -11
|
|
Font.Name = 'Arial'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
end
|
|
end
|
|
object RLBand4: 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 RLLabel27: TRLLabel
|
|
Left = 572
|
|
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 RLLabel28: TRLLabel
|
|
Left = 638
|
|
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 RLLabel29: TRLLabel
|
|
Left = 690
|
|
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 RLLabel30: TRLLabel
|
|
Left = 747
|
|
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 RLLabel31: TRLLabel
|
|
Left = 870
|
|
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 RLLabel32: TRLLabel
|
|
Left = 922
|
|
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 RLLabel33: 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 RLLabel34: TRLLabel
|
|
Left = 822
|
|
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 RLBand5: 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 RLDBText22: TRLDBText
|
|
Left = 570
|
|
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 RLDBText24: TRLDBText
|
|
Left = 622
|
|
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 RLDBText25: TRLDBText
|
|
Left = 677
|
|
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 RLDBText26: TRLDBText
|
|
Left = 731
|
|
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 RLDBText27: TRLDBText
|
|
Left = 834
|
|
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 RLDBText28: TRLDBText
|
|
Left = 907
|
|
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 RLDBText29: TRLDBText
|
|
Left = 959
|
|
Top = 1
|
|
Width = 87
|
|
Height = 14
|
|
Align = faRightBottom
|
|
Alignment = taRightJustify
|
|
DataField = 'VL_REPASSADO'
|
|
DataSource = dtsTitulos
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Height = -11
|
|
Font.Name = 'Arial'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
Text = ''
|
|
end
|
|
object RLDBText32: TRLDBText
|
|
Left = 749
|
|
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
|
|
object RLDBText1: TRLDBText
|
|
Left = 4
|
|
Top = 1
|
|
Width = 88
|
|
Height = 14
|
|
DataField = 'TX_FANTASIA'
|
|
DataSource = dtsTitulos
|
|
Text = ''
|
|
end
|
|
end
|
|
object RLBand6: TRLBand
|
|
Left = 38
|
|
Top = 170
|
|
Width = 1047
|
|
Height = 31
|
|
BandType = btColumnFooter
|
|
Borders.Sides = sdCustom
|
|
Borders.DrawLeft = True
|
|
Borders.DrawTop = False
|
|
Borders.DrawRight = True
|
|
Borders.DrawBottom = True
|
|
object RLDBResult9: TRLDBResult
|
|
Left = 546
|
|
Top = 19
|
|
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 RLDBResult10: TRLDBResult
|
|
Left = 598
|
|
Top = 19
|
|
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 RLDBResult11: TRLDBResult
|
|
Left = 656
|
|
Top = 19
|
|
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 RLDBResult12: TRLDBResult
|
|
Left = 711
|
|
Top = 19
|
|
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 RLDBResult13: TRLDBResult
|
|
Left = 809
|
|
Top = 19
|
|
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 RLDBResult14: TRLDBResult
|
|
Left = 882
|
|
Top = 19
|
|
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 RLDBResult15: TRLDBResult
|
|
Left = 942
|
|
Top = 19
|
|
Width = 104
|
|
Height = 11
|
|
Align = faRightBottom
|
|
Alignment = taRightJustify
|
|
DataField = 'VL_REPASSADO'
|
|
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 RLLabel35: TRLLabel
|
|
Left = 462
|
|
Top = 16
|
|
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 RLLabel36: TRLLabel
|
|
Left = 572
|
|
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 RLLabel37: TRLLabel
|
|
Left = 638
|
|
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 RLLabel38: TRLLabel
|
|
Left = 690
|
|
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 RLLabel39: TRLLabel
|
|
Left = 747
|
|
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 RLLabel40: TRLLabel
|
|
Left = 870
|
|
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 RLLabel41: TRLLabel
|
|
Left = 922
|
|
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 RLLabel42: TRLLabel
|
|
Left = 974
|
|
Top = 0
|
|
Width = 71
|
|
Height = 14
|
|
Align = faTopOnly
|
|
Caption = 'REPASSADO:'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Height = -11
|
|
Font.Name = 'Arial'
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
end
|
|
object RLLabel43: TRLLabel
|
|
Left = 822
|
|
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 RLDBResult16: TRLDBResult
|
|
Left = 726
|
|
Top = 19
|
|
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
|
|
object RLSystemInfo1: TRLSystemInfo
|
|
Left = 4
|
|
Top = 17
|
|
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
|
|
object fr_date: TRLSystemInfo
|
|
Left = 188
|
|
Top = 17
|
|
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
|
|
end
|
|
end
|
|
object dtsTitulos: TDataSource
|
|
DataSet = cdsSintetico
|
|
Left = 939
|
|
Top = 23
|
|
end
|
|
object zroqryTitulos: TZReadOnlyQuery
|
|
Connection = dtmSystem.ZConnection
|
|
OnCalcFields = zroqryTitulosCalcFields
|
|
SQL.Strings = (
|
|
'select first 0'
|
|
'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.id_devedor,'
|
|
'e.tx_fantasia,'
|
|
'e.tx_cnpj,'
|
|
'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)'
|
|
'inner join chg_empresas e on (B.id_empresa = e.id_empresa)'
|
|
'order by A.tx_nome')
|
|
Params = <>
|
|
MasterFields = 'ID_EMPRESA'
|
|
LinkedFields = 'ID_EMPRESA'
|
|
Left = 1003
|
|
Top = 22
|
|
object zroqryTitulosTX_PRODUTO: TWideStringField
|
|
FieldName = 'TX_PRODUTO'
|
|
Size = 100
|
|
end
|
|
object zroqryTitulosDT_VENCIMENTO: TDateTimeField
|
|
FieldName = 'DT_VENCIMENTO'
|
|
Required = True
|
|
end
|
|
object zroqryTitulosDT_PAGAMENTO: TDateTimeField
|
|
FieldName = 'DT_PAGAMENTO'
|
|
end
|
|
object zroqryTitulosVL_JUROS: TFloatField
|
|
FieldName = 'VL_JUROS'
|
|
end
|
|
object zroqryTitulosVL_MULTA: TFloatField
|
|
FieldName = 'VL_MULTA'
|
|
end
|
|
object zroqryTitulosVL_ENCARGOS: TFloatField
|
|
FieldName = 'VL_ENCARGOS'
|
|
end
|
|
object zroqryTitulosVL_CORRIGIDO: TFloatField
|
|
FieldName = 'VL_CORRIGIDO'
|
|
end
|
|
object zroqryTitulosVL_DESC_PRINCIPAL: TFloatField
|
|
FieldName = 'VL_DESC_PRINCIPAL'
|
|
currency = True
|
|
end
|
|
object zroqryTitulosID_TITULO: TIntegerField
|
|
FieldName = 'ID_TITULO'
|
|
Required = True
|
|
end
|
|
object zroqryTitulosID_EMPRESA: TIntegerField
|
|
FieldName = 'ID_EMPRESA'
|
|
Required = True
|
|
end
|
|
object zroqryTitulosATRASO: TIntegerField
|
|
FieldName = 'ATRASO'
|
|
ReadOnly = True
|
|
end
|
|
object zroqryTitulosVL_RETIDO: TCurrencyField
|
|
FieldKind = fkCalculated
|
|
FieldName = 'VL_RETIDO'
|
|
Calculated = True
|
|
end
|
|
object zroqryTitulosVL_REPASSE: TCurrencyField
|
|
FieldKind = fkCalculated
|
|
FieldName = 'VL_REPASSE'
|
|
Calculated = True
|
|
end
|
|
object zroqryTitulosTX_FANTASIA: TWideStringField
|
|
FieldName = 'TX_FANTASIA'
|
|
Size = 100
|
|
end
|
|
object zroqryTitulosTX_CNPJ: TWideStringField
|
|
FieldName = 'TX_CNPJ'
|
|
Size = 18
|
|
end
|
|
object zroqryTitulosVL_TITULO: TCurrencyField
|
|
FieldName = 'VL_TITULO'
|
|
ReadOnly = True
|
|
end
|
|
object zroqryTitulosID_DEVEDOR: TIntegerField
|
|
FieldName = 'ID_DEVEDOR'
|
|
Required = True
|
|
end
|
|
object zroqryTitulosVL_REPASSE_PRIN: TFloatField
|
|
FieldName = 'VL_REPASSE_PRIN'
|
|
end
|
|
object zroqryTitulosVL_DESC_JUROS: TFloatField
|
|
FieldName = 'VL_DESC_JUROS'
|
|
end
|
|
object zroqryTitulosVL_REPASSE_JUROS: TFloatField
|
|
FieldName = 'VL_REPASSE_JUROS'
|
|
end
|
|
object zroqryTitulosVL_DESC_MULTA: TFloatField
|
|
FieldName = 'VL_DESC_MULTA'
|
|
end
|
|
object zroqryTitulosVL_REPASSE_MULTA: TFloatField
|
|
FieldName = 'VL_REPASSE_MULTA'
|
|
end
|
|
object zroqryTitulosVL_INDICADOR: TFloatField
|
|
FieldName = 'VL_INDICADOR'
|
|
end
|
|
object zroqryTitulosVL_DESC_INDICADOR: TFloatField
|
|
FieldName = 'VL_DESC_INDICADOR'
|
|
end
|
|
object zroqryTitulosVL_REPASSE_CORRIGIDO: TFloatField
|
|
FieldName = 'VL_REPASSE_CORRIGIDO'
|
|
end
|
|
object zroqryTitulosTP_PRESTACAO: TWideStringField
|
|
FieldName = 'TP_PRESTACAO'
|
|
Size = 1
|
|
end
|
|
object zroqryTitulosVL_REPASSE_ENCARGOS: TFloatField
|
|
FieldName = 'VL_REPASSE_ENCARGOS'
|
|
end
|
|
end
|
|
object cdsSintetico: TClientDataSet
|
|
Aggregates = <>
|
|
PacketRecords = 0
|
|
Params = <>
|
|
Left = 1007
|
|
Top = 71
|
|
object cdsSinteticoVL_TITULO: TCurrencyField
|
|
FieldName = 'VL_TITULO'
|
|
end
|
|
object cdsSinteticoVL_JUROS: TCurrencyField
|
|
FieldName = 'VL_JUROS'
|
|
end
|
|
object cdsSinteticoVL_MULTA: TCurrencyField
|
|
FieldName = 'VL_MULTA'
|
|
end
|
|
object cdsSinteticoVL_ENCARGOS: TCurrencyField
|
|
FieldName = 'VL_ENCARGOS'
|
|
end
|
|
object cdsSinteticoVL_DESC_PRINCIPAL: TCurrencyField
|
|
FieldName = 'VL_DESC_PRINCIPAL'
|
|
end
|
|
object cdsSinteticoVL_CORRIGIDO: TCurrencyField
|
|
FieldName = 'VL_CORRIGIDO'
|
|
end
|
|
object cdsSinteticoVL_RETIDO: TCurrencyField
|
|
FieldName = 'VL_RETIDO'
|
|
end
|
|
object cdsSinteticoVL_REPASSADO: TCurrencyField
|
|
FieldName = 'VL_REPASSADO'
|
|
end
|
|
object cdsSinteticoID_EMPRESA: TIntegerField
|
|
FieldName = 'ID_EMPRESA'
|
|
end
|
|
object cdsSinteticoTX_FANTASIA: TStringField
|
|
FieldName = 'TX_FANTASIA'
|
|
Size = 60
|
|
end
|
|
object cdsSinteticoTX_CNPJ: TStringField
|
|
FieldName = 'TX_CNPJ'
|
|
Size = 18
|
|
end
|
|
end
|
|
object zroqryCredores: TZReadOnlyQuery
|
|
Connection = dtmSystem.ZConnection
|
|
SQL.Strings = (
|
|
'select first 0'
|
|
'e.*'
|
|
'from chg_devedores A'
|
|
'inner join chg_titulos B on (A.id_devedor = B.id_devedor)'
|
|
'inner join chg_empresas e on (E.id_empresa = B.id_empresa)'
|
|
'where (B.tp_situacao = '#39'QC'#39' or B.tp_situacao = '#39'B'#39')'
|
|
'order by e.tx_fantasia')
|
|
Params = <>
|
|
Left = 847
|
|
Top = 23
|
|
object zroqryCredoresID_EMPRESA: TIntegerField
|
|
FieldName = 'ID_EMPRESA'
|
|
Required = True
|
|
end
|
|
object zroqryCredoresTX_NOME: TWideStringField
|
|
FieldName = 'TX_NOME'
|
|
Size = 100
|
|
end
|
|
object zroqryCredoresTX_FANTASIA: TWideStringField
|
|
FieldName = 'TX_FANTASIA'
|
|
Size = 100
|
|
end
|
|
object zroqryCredoresTX_CNPJ: TWideStringField
|
|
FieldName = 'TX_CNPJ'
|
|
Size = 18
|
|
end
|
|
object zroqryCredoresTX_IE: TWideStringField
|
|
FieldName = 'TX_IE'
|
|
end
|
|
object zroqryCredoresTX_ENDERECO: TWideStringField
|
|
FieldName = 'TX_ENDERECO'
|
|
Size = 100
|
|
end
|
|
object zroqryCredoresTX_COMPLEMENTO: TWideStringField
|
|
FieldName = 'TX_COMPLEMENTO'
|
|
end
|
|
object zroqryCredoresID_CIDADE: TIntegerField
|
|
FieldName = 'ID_CIDADE'
|
|
end
|
|
object zroqryCredoresTX_BAIRRO: TWideStringField
|
|
FieldName = 'TX_BAIRRO'
|
|
Size = 60
|
|
end
|
|
object zroqryCredoresID_ESTADO: TIntegerField
|
|
FieldName = 'ID_ESTADO'
|
|
end
|
|
object zroqryCredoresTX_CEP: TWideStringField
|
|
FieldName = 'TX_CEP'
|
|
Size = 9
|
|
end
|
|
object zroqryCredoresTX_TELEFONE: TWideStringField
|
|
FieldName = 'TX_TELEFONE'
|
|
Size = 40
|
|
end
|
|
object zroqryCredoresTX_EMAIL: TWideStringField
|
|
FieldName = 'TX_EMAIL'
|
|
Size = 60
|
|
end
|
|
object zroqryCredoresTX_WEBSITE: TWideStringField
|
|
FieldName = 'TX_WEBSITE'
|
|
Size = 60
|
|
end
|
|
object zroqryCredoresNR_NUMERO: TIntegerField
|
|
FieldName = 'NR_NUMERO'
|
|
end
|
|
object zroqryCredoresTX_IM: TWideStringField
|
|
FieldName = 'TX_IM'
|
|
end
|
|
object zroqryCredoresTL_OBSERVACOES: TWideMemoField
|
|
FieldName = 'TL_OBSERVACOES'
|
|
BlobType = ftWideMemo
|
|
end
|
|
object zroqryCredoresID_REPASSE: TIntegerField
|
|
FieldName = 'ID_REPASSE'
|
|
end
|
|
object zroqryCredoresTP_ENTRADA: TWideStringField
|
|
FieldName = 'TP_ENTRADA'
|
|
Required = True
|
|
Size = 2
|
|
end
|
|
object zroqryCredoresPR_MULTA: TFloatField
|
|
FieldName = 'PR_MULTA'
|
|
Required = True
|
|
end
|
|
object zroqryCredoresPR_JUROS: TFloatField
|
|
FieldName = 'PR_JUROS'
|
|
Required = True
|
|
end
|
|
object zroqryCredoresNR_PARCELAS: TIntegerField
|
|
FieldName = 'NR_PARCELAS'
|
|
end
|
|
object zroqryCredoresPR_DESC_QUIT_PRIN: TFloatField
|
|
FieldName = 'PR_DESC_QUIT_PRIN'
|
|
Required = True
|
|
end
|
|
object zroqryCredoresPR_DESC_QUIT_JUROS: TFloatField
|
|
FieldName = 'PR_DESC_QUIT_JUROS'
|
|
Required = True
|
|
end
|
|
object zroqryCredoresPR_DESC_QUIT_MULTA: TFloatField
|
|
FieldName = 'PR_DESC_QUIT_MULTA'
|
|
Required = True
|
|
end
|
|
object zroqryCredoresPR_DESC_QUIT_IND_FIN: TFloatField
|
|
FieldName = 'PR_DESC_QUIT_IND_FIN'
|
|
Required = True
|
|
end
|
|
object zroqryCredoresPR_DESC_QUIT_COR: TFloatField
|
|
FieldName = 'PR_DESC_QUIT_COR'
|
|
end
|
|
object zroqryCredoresPR_DESC_FINAN_PRIN: TFloatField
|
|
FieldName = 'PR_DESC_FINAN_PRIN'
|
|
Required = True
|
|
end
|
|
object zroqryCredoresPR_DESC_FINAN_JUROS: TFloatField
|
|
FieldName = 'PR_DESC_FINAN_JUROS'
|
|
Required = True
|
|
end
|
|
object zroqryCredoresPR_DESC_FINAN_MULTA: TFloatField
|
|
FieldName = 'PR_DESC_FINAN_MULTA'
|
|
Required = True
|
|
end
|
|
object zroqryCredoresPR_DESC_FINAN_IND_FIN: TFloatField
|
|
FieldName = 'PR_DESC_FINAN_IND_FIN'
|
|
Required = True
|
|
end
|
|
object zroqryCredoresPR_DESC_FINAN_COR: TFloatField
|
|
FieldName = 'PR_DESC_FINAN_COR'
|
|
end
|
|
object zroqryCredoresPR_INDICADOR_FINANCEIRO: TFloatField
|
|
FieldName = 'PR_INDICADOR_FINANCEIRO'
|
|
Required = True
|
|
end
|
|
object zroqryCredoresPR_JUROS_PARCELAR: TFloatField
|
|
FieldName = 'PR_JUROS_PARCELAR'
|
|
end
|
|
object zroqryCredoresPR_ENTRADA_MIN: TFloatField
|
|
FieldName = 'PR_ENTRADA_MIN'
|
|
end
|
|
object zroqryCredoresPR_ENTRADA_MAX: TFloatField
|
|
FieldName = 'PR_ENTRADA_MAX'
|
|
end
|
|
object zroqryCredoresTP_CHEQUE: TWideStringField
|
|
FieldName = 'TP_CHEQUE'
|
|
Required = True
|
|
Size = 1
|
|
end
|
|
object zroqryCredoresTP_CRED: TWideStringField
|
|
FieldName = 'TP_CRED'
|
|
Size = 1
|
|
end
|
|
object zroqryCredoresTP_DIN: TWideStringField
|
|
FieldName = 'TP_DIN'
|
|
Size = 1
|
|
end
|
|
object zroqryCredoresID_ULTIMO_USUARIO: TIntegerField
|
|
FieldName = 'ID_ULTIMO_USUARIO'
|
|
end
|
|
object zroqryCredoresDT_HORA_ULTIMA_ATT: TDateTimeField
|
|
FieldName = 'DT_HORA_ULTIMA_ATT'
|
|
end
|
|
object zroqryCredoresID_DEPARTAMENTO: TIntegerField
|
|
FieldName = 'ID_DEPARTAMENTO'
|
|
end
|
|
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 = 752
|
|
Top = 32
|
|
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
|