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.
370 lines
9.0 KiB
370 lines
9.0 KiB
object relDados: TrelDados
|
|
Left = 0
|
|
Top = 0
|
|
BorderStyle = bsNone
|
|
Caption = 'relDados'
|
|
ClientHeight = 1151
|
|
ClientWidth = 822
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
OldCreateOrder = False
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object RLReport1: TRLReport
|
|
Left = 0
|
|
Top = 0
|
|
Width = 794
|
|
Height = 1123
|
|
DataSource = dtsRel
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Height = -13
|
|
Font.Name = 'Arial'
|
|
Font.Style = []
|
|
BeforePrint = RLReport1BeforePrint
|
|
object frbnd_header: TRLBand
|
|
Left = 38
|
|
Top = 38
|
|
Width = 718
|
|
Height = 144
|
|
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 = 0
|
|
Width = 160
|
|
Height = 143
|
|
Align = faLeftOnly
|
|
Borders.Sides = sdCustom
|
|
Borders.DrawLeft = False
|
|
Borders.DrawTop = True
|
|
Borders.DrawRight = True
|
|
Borders.DrawBottom = False
|
|
object frdbimg_logo: TRLDBImage
|
|
Left = 0
|
|
Top = 1
|
|
Width = 159
|
|
Height = 142
|
|
Align = faClient
|
|
AutoSize = True
|
|
Borders.Sides = sdCustom
|
|
Borders.DrawLeft = False
|
|
Borders.DrawTop = False
|
|
Borders.DrawRight = False
|
|
Borders.DrawBottom = False
|
|
DataField = 'IMG_LOGO'
|
|
DataSource = dtsEmpresa
|
|
Stretch = True
|
|
end
|
|
end
|
|
object frlbl_titulorel: TRLLabel
|
|
Left = 167
|
|
Top = 52
|
|
Width = 197
|
|
Height = 24
|
|
Caption = 'Amostra de T'#237'tulos'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Height = -21
|
|
Font.Name = 'Arial'
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
end
|
|
object RLDBText11: TRLDBText
|
|
Left = 167
|
|
Top = 82
|
|
Width = 106
|
|
Height = 24
|
|
DataField = 'TX_NOME'
|
|
DataSource = dtmSystem.dtsDevedores
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Height = -21
|
|
Font.Name = 'Arial'
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
Text = ''
|
|
end
|
|
end
|
|
object frbnd_dados: TRLBand
|
|
Left = 38
|
|
Top = 182
|
|
Width = 718
|
|
Height = 51
|
|
BandType = btHeader
|
|
Borders.Sides = sdCustom
|
|
Borders.DrawLeft = True
|
|
Borders.DrawTop = False
|
|
Borders.DrawRight = True
|
|
Borders.DrawBottom = True
|
|
object RLDBText1: TRLDBText
|
|
Left = 3
|
|
Top = 6
|
|
Width = 106
|
|
Height = 16
|
|
DataField = 'TX_NOME'
|
|
DataSource = dtmSystem.dtsDevedores
|
|
Text = 'Nome: '
|
|
end
|
|
object RLDBText2: TRLDBText
|
|
Left = 568
|
|
Top = 6
|
|
Width = 89
|
|
Height = 16
|
|
DataField = 'CD_CPF'
|
|
DataSource = dtmSystem.dtsDevedores
|
|
Text = 'CPF: '
|
|
end
|
|
object RLDBText3: TRLDBText
|
|
Left = 3
|
|
Top = 28
|
|
Width = 110
|
|
Height = 16
|
|
DataField = 'TX_NOME'
|
|
DataSource = dtmSystem.dtsCHGEmpresa
|
|
Text = 'Credor: '
|
|
end
|
|
end
|
|
object RLGroup1: TRLGroup
|
|
Left = 38
|
|
Top = 233
|
|
Width = 718
|
|
Height = 21
|
|
Borders.Sides = sdCustom
|
|
Borders.DrawLeft = True
|
|
Borders.DrawTop = False
|
|
Borders.DrawRight = True
|
|
Borders.DrawBottom = True
|
|
DataFields = 'ID_TITULO'
|
|
object RLBand1: TRLBand
|
|
Left = 1
|
|
Top = 0
|
|
Width = 716
|
|
Height = 18
|
|
Borders.Sides = sdCustom
|
|
Borders.DrawLeft = False
|
|
Borders.DrawTop = False
|
|
Borders.DrawRight = False
|
|
Borders.DrawBottom = False
|
|
object RLDBText4: TRLDBText
|
|
Left = 0
|
|
Top = 2
|
|
Width = 189
|
|
Height = 16
|
|
Align = faLeftBottom
|
|
AutoSize = False
|
|
DataField = 'TX_PRODUTO'
|
|
DataSource = dtsRel
|
|
Text = 'Produto: '
|
|
end
|
|
object RLDBText5: TRLDBText
|
|
Left = 341
|
|
Top = 2
|
|
Width = 159
|
|
Height = 16
|
|
Align = faBottomOnly
|
|
DataField = 'VL_TITULO'
|
|
DataSource = dtsRel
|
|
Text = 'Valor Nominal: '
|
|
end
|
|
object RLDBText6: TRLDBText
|
|
Left = 524
|
|
Top = 2
|
|
Width = 189
|
|
Height = 16
|
|
Align = faBottomOnly
|
|
DataField = 'DT_VENCIMENTO'
|
|
DataSource = dtsRel
|
|
Text = 'Vencimento: '
|
|
end
|
|
object RLLabel1: TRLLabel
|
|
Left = 190
|
|
Top = 2
|
|
Width = 58
|
|
Height = 16
|
|
BeforePrint = RLLabel1BeforePrint
|
|
end
|
|
end
|
|
end
|
|
object frbnd_footerrel: TRLBand
|
|
Left = 38
|
|
Top = 254
|
|
Width = 718
|
|
Height = 20
|
|
BandType = btFooter
|
|
object RLSystemInfo2: TRLSystemInfo
|
|
Left = 503
|
|
Top = 7
|
|
Width = 49
|
|
Height = 13
|
|
Align = faBottomOnly
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Height = -13
|
|
Font.Name = 'unifont'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
Text = ''
|
|
end
|
|
object RLSystemInfo1: TRLSystemInfo
|
|
Left = 605
|
|
Top = 7
|
|
Width = 49
|
|
Height = 13
|
|
Align = faBottomOnly
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Height = -13
|
|
Font.Name = 'unifont'
|
|
Font.Style = []
|
|
Info = itHour
|
|
ParentFont = False
|
|
Text = ''
|
|
end
|
|
object frdblbl_usuario: TRLDBText
|
|
Left = 79
|
|
Top = 4
|
|
Width = 64
|
|
Height = 16
|
|
Align = faBottomOnly
|
|
DataField = 'TX_NOME'
|
|
DataSource = dtmSystem.dtsUsuarios
|
|
Text = ''
|
|
end
|
|
object frlbl_usuario: TRLLabel
|
|
Left = 3
|
|
Top = 4
|
|
Width = 77
|
|
Height = 16
|
|
Align = faBottomOnly
|
|
Caption = 'Atendente: '
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Height = -13
|
|
Font.Name = 'Arial'
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
end
|
|
end
|
|
end
|
|
object frfilterpdf: TRLPDFFilter
|
|
DocumentInfo.Creator =
|
|
'FortesReport Community Edition v4.0 \251 Copyright '#169' 1999-2015 F' +
|
|
'ortes Inform'#225'tica'
|
|
DisplayName = 'Documento PDF'
|
|
Left = 736
|
|
Top = 8
|
|
end
|
|
object dtsRel: TDataSource
|
|
DataSet = zROqry
|
|
Left = 680
|
|
Top = 8
|
|
end
|
|
object zROqry: TZReadOnlyQuery
|
|
Connection = dtmSystem.ZConnection
|
|
OnCalcFields = zROqryCalcFields
|
|
SQL.Strings = (
|
|
'select first 0 * '
|
|
'from chg_titulos'
|
|
'order by dt_vencimento, vl_titulo')
|
|
Params = <>
|
|
Left = 678
|
|
Top = 62
|
|
object zROqryID_TITULO: TIntegerField
|
|
FieldName = 'ID_TITULO'
|
|
Required = True
|
|
end
|
|
object zROqryID_DEVEDOR: TIntegerField
|
|
FieldName = 'ID_DEVEDOR'
|
|
Required = True
|
|
end
|
|
object zROqryID_EMPRESA: TIntegerField
|
|
FieldName = 'ID_EMPRESA'
|
|
Required = True
|
|
end
|
|
object zROqryTX_PRODUTO: TWideStringField
|
|
FieldName = 'TX_PRODUTO'
|
|
Size = 100
|
|
end
|
|
object zROqryVL_TITULO: TFloatField
|
|
FieldName = 'VL_TITULO'
|
|
currency = True
|
|
end
|
|
object zROqryDT_ENTRADA: TDateTimeField
|
|
FieldName = 'DT_ENTRADA'
|
|
end
|
|
object zROqryDT_VENCIMENTO: TDateTimeField
|
|
FieldName = 'DT_VENCIMENTO'
|
|
Required = True
|
|
end
|
|
object zROqryTP_SITUACAO: TWideStringField
|
|
FieldName = 'TP_SITUACAO'
|
|
Size = 2
|
|
end
|
|
object zROqryCD_DEVEDOR: TWideStringField
|
|
FieldName = 'CD_DEVEDOR'
|
|
Size = 100
|
|
end
|
|
object zROqryTP_CHEQUE: TWideStringField
|
|
FieldName = 'TP_CHEQUE'
|
|
Required = True
|
|
Size = 1
|
|
end
|
|
object zROqryID_BANCO: TIntegerField
|
|
FieldName = 'ID_BANCO'
|
|
end
|
|
object zROqryTX_NRCHEQUE: TWideStringField
|
|
FieldName = 'TX_NRCHEQUE'
|
|
end
|
|
object zROqryTP_MOTIVO: TWideStringField
|
|
FieldName = 'TP_MOTIVO'
|
|
Size = 2
|
|
end
|
|
object zROqryVL_DESPESA: TFloatField
|
|
FieldName = 'VL_DESPESA'
|
|
end
|
|
object zROqryTP_DESPESA: TWideStringField
|
|
FieldName = 'TP_DESPESA'
|
|
Size = 1
|
|
end
|
|
object zROqryVL_MULTA: TFloatField
|
|
FieldName = 'VL_MULTA'
|
|
end
|
|
object zROqryVL_JUROS: TFloatField
|
|
FieldName = 'VL_JUROS'
|
|
end
|
|
object zROqryVL_ENCARGOS: TFloatField
|
|
FieldName = 'VL_ENCARGOS'
|
|
end
|
|
object zROqryVL_CORRIGIDO: TFloatField
|
|
FieldName = 'VL_CORRIGIDO'
|
|
end
|
|
object zROqryDT_PAGAMENTO: TDateTimeField
|
|
FieldName = 'DT_PAGAMENTO'
|
|
end
|
|
object zROqryTX_OBS: TWideMemoField
|
|
FieldName = 'TX_OBS'
|
|
BlobType = ftWideMemo
|
|
end
|
|
object zROqryID_ULTIMO_USUARIO: TIntegerField
|
|
FieldName = 'ID_ULTIMO_USUARIO'
|
|
end
|
|
object zROqryDT_HORA_ULTIMA_ATT: TDateTimeField
|
|
FieldName = 'DT_HORA_ULTIMA_ATT'
|
|
end
|
|
end
|
|
object dtsEmpresa: TDataSource
|
|
DataSet = dtmSystem.tblEmpresa
|
|
Left = 568
|
|
Top = 8
|
|
end
|
|
end
|