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.
300 lines
7.8 KiB
300 lines
7.8 KiB
inherited frmRemessa: TfrmRemessa
|
|
Caption = 'Gera'#231#227'o de Arquivos de Remessa'
|
|
ClientHeight = 418
|
|
ClientWidth = 703
|
|
ExplicitWidth = 709
|
|
ExplicitHeight = 447
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
inherited stbStatus: TStatusBar
|
|
Top = 399
|
|
Width = 703
|
|
ExplicitTop = 399
|
|
ExplicitWidth = 703
|
|
end
|
|
object gb_devedores: TGroupBox
|
|
Left = 8
|
|
Top = 8
|
|
Width = 456
|
|
Height = 210
|
|
Caption = 'Devedores:'
|
|
TabOrder = 1
|
|
object cbx_todosdevedores: TCheckBox
|
|
Left = 16
|
|
Top = 24
|
|
Width = 57
|
|
Height = 17
|
|
Caption = 'Todos'
|
|
Checked = True
|
|
State = cbChecked
|
|
TabOrder = 0
|
|
OnClick = cbx_todosdevedoresClick
|
|
end
|
|
object gb_pesquisa: TGroupBox
|
|
Left = 16
|
|
Top = 47
|
|
Width = 426
|
|
Height = 154
|
|
Enabled = False
|
|
TabOrder = 1
|
|
object SpeedButton1: TSpeedButton
|
|
Left = 391
|
|
Top = 16
|
|
Width = 23
|
|
Height = 21
|
|
Glyph.Data = {
|
|
36030000424D3603000000000000360000002800000010000000100000000100
|
|
18000000000000030000120B0000120B00000000000000000000FF00FF314B62
|
|
AC7D7EFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
|
|
FFFF00FFFF00FFFF00FF5084B20F6FE1325F8CB87E7AFF00FFFF00FFFF00FFFF
|
|
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF32A0FE37A1FF
|
|
106FE2325F8BB67D79FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
|
|
FFFF00FFFF00FFFF00FFFF00FF37A4FE379FFF0E6DDE355F89BB7F79FF00FFFF
|
|
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
|
|
37A4FE359EFF0F6FDE35608BA67B7FFF00FFFF00FFFF00FFFF00FFFF00FFFF00
|
|
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF38A5FE329DFF156DCE444F5BFF
|
|
00FF9C6B65AF887BAF887EAA8075FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
|
|
FF00FFFF00FF3BABFFA1CAE7AD8679A98373E0CFB1FFFFDAFFFFDDFCF8CFCCB2
|
|
9FA1746BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFC0917DFC
|
|
E9ACFFFFCCFFFFCFFFFFD0FFFFDEFFFFFAE3D3D1996965FF00FFFF00FFFF00FF
|
|
FF00FFFF00FFFF00FFFF00FFB08978FAD192FEF4C2FFFFD0FFFFDAFFFFF6FFFF
|
|
FCFFFFFCB69384FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFB08978FEDA97ED
|
|
B478FBEEBBFFFFD3FFFFDCFFFFF4FFFFF4FFFFE2E9DDBCA67B73FF00FFFF00FF
|
|
FF00FFFF00FFFF00FFB18A78FFDE99E9A167F4D199FEFCCCFFFFD5FFFFDAFFFF
|
|
DCFFFFD7EFE6C5A97E75FF00FFFF00FFFF00FFFF00FFFF00FFAA7F73FAE0A4F0
|
|
B778EEBA7BF6DDA6FEFBCCFFFFD3FFFFD1FFFFD7D9C5A7A3756CFF00FFFF00FF
|
|
FF00FFFF00FFFF00FFFF00FFCEB293FFFEDDF4D1A5EEBA7BF2C78FF8E1ABFCF0
|
|
BAFCFACAA3776FFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFA1746BE1
|
|
D4D3FFFEEEF7CC8CF0B473F7C788FCE3A5C2A088A5776CFF00FFFF00FFFF00FF
|
|
FF00FFFF00FFFF00FFFF00FFFF00FF986865BA9587EAD7A4EAD59EE0C097A577
|
|
6CA5776CFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
|
|
00FFFF00FFA77E70A98073A4786EFF00FFFF00FFFF00FFFF00FF}
|
|
OnClick = SpeedButton1Click
|
|
end
|
|
object edt_pesquisa: TEdit
|
|
Left = 16
|
|
Top = 16
|
|
Width = 369
|
|
Height = 21
|
|
TabOrder = 0
|
|
end
|
|
object dbgrd_pesquisa: TDBGrid
|
|
Left = 16
|
|
Top = 43
|
|
Width = 398
|
|
Height = 100
|
|
DataSource = dtsDevedores
|
|
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgTitleClick, dgTitleHotTrack]
|
|
TabOrder = 1
|
|
TitleFont.Charset = DEFAULT_CHARSET
|
|
TitleFont.Color = clWindowText
|
|
TitleFont.Height = -11
|
|
TitleFont.Name = 'MS Sans Serif'
|
|
TitleFont.Style = []
|
|
Columns = <
|
|
item
|
|
Expanded = False
|
|
FieldName = 'TX_NOME'
|
|
Title.Caption = 'Nome'
|
|
Width = 250
|
|
Visible = True
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'TX_DOCUMENTO'
|
|
Title.Caption = 'Documento'
|
|
Visible = True
|
|
end>
|
|
end
|
|
end
|
|
end
|
|
object gb_dtvenc: TGroupBox
|
|
Left = 470
|
|
Top = 8
|
|
Width = 225
|
|
Height = 66
|
|
Caption = 'Vencimento:'
|
|
TabOrder = 2
|
|
object Label14: TLabel
|
|
Left = 105
|
|
Top = 29
|
|
Width = 19
|
|
Height = 13
|
|
Caption = 'At'#233':'
|
|
end
|
|
object dtp_vencini: TDateTimePicker
|
|
Left = 16
|
|
Top = 25
|
|
Width = 81
|
|
Height = 21
|
|
Date = 43042.451453472230000000
|
|
Time = 43042.451453472230000000
|
|
TabOrder = 0
|
|
end
|
|
object dtp_vencfim: TDateTimePicker
|
|
Left = 130
|
|
Top = 25
|
|
Width = 81
|
|
Height = 21
|
|
Date = 43042.451453472230000000
|
|
Time = 43042.451453472230000000
|
|
TabOrder = 1
|
|
end
|
|
object cb_venc: TCheckBox
|
|
Left = 70
|
|
Top = -1
|
|
Width = 97
|
|
Height = 17
|
|
TabOrder = 2
|
|
end
|
|
end
|
|
object gb_emissao: TGroupBox
|
|
Left = 470
|
|
Top = 80
|
|
Width = 225
|
|
Height = 66
|
|
Caption = 'Emiss'#227'o:'
|
|
TabOrder = 3
|
|
object Label1: TLabel
|
|
Left = 105
|
|
Top = 29
|
|
Width = 19
|
|
Height = 13
|
|
Caption = 'At'#233':'
|
|
end
|
|
object dtp_emissaoini: TDateTimePicker
|
|
Left = 16
|
|
Top = 25
|
|
Width = 81
|
|
Height = 21
|
|
Date = 43042.451453472230000000
|
|
Time = 43042.451453472230000000
|
|
TabOrder = 0
|
|
end
|
|
object dtp_emissaofim: TDateTimePicker
|
|
Left = 130
|
|
Top = 25
|
|
Width = 81
|
|
Height = 21
|
|
Date = 43042.451453472230000000
|
|
Time = 43042.451453472230000000
|
|
TabOrder = 1
|
|
end
|
|
object cb_emissao: TCheckBox
|
|
Left = 53
|
|
Top = -1
|
|
Width = 97
|
|
Height = 17
|
|
TabOrder = 2
|
|
end
|
|
end
|
|
object gb_progress: TGroupBox
|
|
Left = 8
|
|
Top = 296
|
|
Width = 687
|
|
Height = 66
|
|
Caption = 'Progresso:'
|
|
TabOrder = 4
|
|
object lbl_progresso: TLabel
|
|
Left = 16
|
|
Top = 21
|
|
Width = 3
|
|
Height = 13
|
|
end
|
|
object pb_remessa: TProgressBar
|
|
Left = 16
|
|
Top = 40
|
|
Width = 657
|
|
Height = 17
|
|
MarqueeInterval = 1
|
|
Step = 1
|
|
TabOrder = 0
|
|
end
|
|
end
|
|
object Button1: TButton
|
|
Left = 608
|
|
Top = 368
|
|
Width = 87
|
|
Height = 25
|
|
Caption = 'Salvar Arquivo'
|
|
TabOrder = 5
|
|
OnClick = Button1Click
|
|
end
|
|
object gb_conta: TGroupBox
|
|
Left = 470
|
|
Top = 152
|
|
Width = 225
|
|
Height = 66
|
|
Caption = 'Conta:'
|
|
TabOrder = 6
|
|
object dblcb_conta: TDBLookupComboBox
|
|
Left = 16
|
|
Top = 25
|
|
Width = 195
|
|
Height = 21
|
|
KeyField = 'ID_CONTA'
|
|
ListField = 'TX_DESCRICAO'
|
|
ListSource = dtmSystem.dtsContas
|
|
TabOrder = 0
|
|
end
|
|
end
|
|
object gb_credor: TGroupBox
|
|
Left = 8
|
|
Top = 224
|
|
Width = 687
|
|
Height = 66
|
|
Caption = 'Credor:'
|
|
TabOrder = 7
|
|
object dblcb_credor: TDBLookupComboBox
|
|
Left = 16
|
|
Top = 24
|
|
Width = 657
|
|
Height = 21
|
|
KeyField = 'ID_EMPRESA'
|
|
ListField = 'TX_FANTASIA'
|
|
ListSource = dtmSystem.dtsCHGEmpresa
|
|
TabOrder = 0
|
|
end
|
|
end
|
|
object dtsDevedores: TDataSource
|
|
DataSet = roqryDevedores
|
|
Left = 384
|
|
Top = 24
|
|
end
|
|
object roqryDevedores: TZReadOnlyQuery
|
|
Connection = dtmSystem.ZConnection
|
|
SQL.Strings = (
|
|
'select first 0'
|
|
'id_devedor,'
|
|
'tx_nome,'
|
|
'case when TP_CLIENTE = '#39'F'#39' then CD_CPF'
|
|
'when TP_CLIENTE = '#39'J'#39' then CD_CNPJ end as TX_DOCUMENTO'
|
|
'from chg_devedores')
|
|
Params = <>
|
|
Left = 296
|
|
Top = 24
|
|
object roqryDevedoresID_DEVEDOR: TIntegerField
|
|
FieldName = 'ID_DEVEDOR'
|
|
Required = True
|
|
end
|
|
object roqryDevedoresTX_NOME: TWideStringField
|
|
FieldName = 'TX_NOME'
|
|
Size = 60
|
|
end
|
|
object roqryDevedoresTX_DOCUMENTO: TWideStringField
|
|
FieldName = 'TX_DOCUMENTO'
|
|
ReadOnly = True
|
|
Size = 18
|
|
end
|
|
end
|
|
object sv_dlg: TSaveDialog
|
|
Left = 544
|
|
Top = 216
|
|
end
|
|
object roqryRemessa: TZReadOnlyQuery
|
|
Connection = dtmSystem.ZConnection
|
|
Params = <>
|
|
Left = 296
|
|
Top = 87
|
|
end
|
|
end
|