marcus_nexverse
/
programa_cobranca
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity
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.
3 Commits
1 Branch
0 Tags
346 MiB
 
Branch: master
Branches Tags
${ item.name }
Create tag ${ searchTerm }
Create branch ${ searchTerm }
from 'master'
${ noResults }
programa_cobranca/udtmSystem.dfm

4211 lines
136 KiB
Raw Permalink Blame History

object dtmSystem: TdtmSystem
OldCreateOrder = False
OnCreate = DataModuleCreate
Height = 704
Width = 1215
object ZConnection: TZConnection
ControlsCodePage = cCP_UTF16
ClientCodepage = 'WIN1252'
Catalog = ''
Properties.Strings = (
'controls_cp=CP_UTF16'
'codepage=WIN1252'
'AutoEncodeStrings=ON'
'CLIENT_FOUND_ROWS=1'
'FirebirdAPI=legacy')
TransactIsolationLevel = tiReadCommitted
Connected = True
AfterDisconnect = ZConnectionAfterDisconnect
HostName = ''
Port = 0
Database = 'E:\Programa_Cobranca\Win32\Debug\CHARGE.GDB'
User = 'sysdba'
Password = 'masterkey'
Protocol = 'firebird-2.5'
Left = 40
Top = 24
end
object dtsUsuarios: TDataSource
DataSet = tblUsuarios
Left = 168
Top = 128
end
object dtsGrupos: TDataSource
DataSet = tblGrupos
OnDataChange = dtsGruposDataChange
Left = 168
Top = 184
end
object dtsPermissoes: TDataSource
DataSet = tblPermissoes
Left = 168
Top = 240
end
object dtsGruposPermissoes: TDataSource
DataSet = tblGruposPermissoes
Left = 168
Top = 296
end
object qryConsulta: TZQuery
Connection = ZConnection
Params = <>
Left = 168
Top = 24
end
object dtsEmpresa: TDataSource
DataSet = tblEmpresa
Left = 168
Top = 80
end
object dtsCidades: TDataSource
DataSet = tblCidades
Left = 400
Top = 81
end
object dtsEstados: TDataSource
DataSet = tblEstados
Left = 400
Top = 24
end
object dtsPermDisponiveis: TDataSource
DataSet = tblPermDisponiveis
Left = 168
Top = 352
end
object tblPermDisponiveis: TZReadOnlyQuery
Connection = ZConnection
SQL.Strings = (
'SELECT * FROM SYS_PERMISSOES WHERE ID_PERMISSAO NOT IN('
' SELECT ID_PERMISSAO FROM SYS_GRUPOS_PERMISSOES'
' WHERE ID_GRUPO=:ID_GRUPO'
')')
Params = <
item
DataType = ftUnknown
Name = 'ID_GRUPO'
ParamType = ptUnknown
end>
DataSource = dtsGrupos
Left = 40
Top = 352
ParamData = <
item
DataType = ftUnknown
Name = 'ID_GRUPO'
ParamType = ptUnknown
end>
object tblPermDisponiveisID_PERMISSAO: TIntegerField
FieldName = 'ID_PERMISSAO'
Required = True
end
object tblPermDisponiveisCD_PERMISSAO: TWideStringField
FieldName = 'CD_PERMISSAO'
end
object tblPermDisponiveisTX_DESCRICAO: TWideStringField
FieldName = 'TX_DESCRICAO'
LookupDataSet = tblPermissoes
Size = 40
end
end
object dtsLog: TDataSource
DataSet = tblLog
Left = 16
Top = 655
end
object dtsCHGEmpresa: TDataSource
DataSet = tblCHGEmpresa
OnDataChange = dtsCHGEmpresaDataChange
OnUpdateData = dtsCHGEmpresaUpdateData
Left = 400
Top = 144
end
object dtsPoliticas: TDataSource
DataSet = tblPoliticas
OnUpdateData = dtsPoliticasUpdateData
Left = 400
Top = 200
end
object dtsFaixas: TDataSource
DataSet = tblFaixas
OnUpdateData = dtsFaixasUpdateData
Left = 400
Top = 256
end
object dtsDevedores: TDataSource
DataSet = tblDevedores
OnDataChange = dtsDevedoresDataChange
OnUpdateData = dtsDevedoresUpdateData
Left = 472
Top = 656
end
object dtsCHGEnderecos: TDataSource
DataSet = tblEnderecos
OnUpdateData = dtsCHGEnderecosUpdateData
Left = 208
Top = 608
end
object dtsTelefones: TDataSource
DataSet = tblTelefones
OnUpdateData = dtsTelefonesUpdateData
Left = 472
Top = 608
end
object dtsTitulos: TDataSource
DataSet = tblTitulos
OnDataChange = dtsTitulosDataChange
Left = 656
Top = 24
end
object ZSQLProcessor1: TZSQLProcessor
Params = <>
Connection = ZConnection
Delimiter = ';'
Left = 40
Top = 416
end
object dtsProvidencias: TDataSource
DataSet = tblProvidencias
Left = 656
Top = 136
end
object tblInadimplencias: TZTable
Connection = ZConnection
SortedFields = 'ID_INADIMPLENCIA'
BeforePost = tblInadimplenciasBeforePost
OnDeleteError = tblInadimplenciasDeleteError
OnEditError = tblInadimplenciasEditError
OnPostError = tblInadimplenciasPostError
TableName = 'CHG_INADIMPLENCIAS'
IndexFieldNames = 'ID_INADIMPLENCIA Asc'
Left = 520
Top = 80
object tblInadimplenciasID_INADIMPLENCIA: TIntegerField
FieldName = 'ID_INADIMPLENCIA'
Required = True
end
object tblInadimplenciasTX_NOME: TWideStringField
FieldName = 'TX_NOME'
Size = 100
end
end
object dtsInadimplencias: TDataSource
DataSet = tblInadimplencias
Left = 656
Top = 80
end
object dtsCampanhaCob: TDataSource
DataSet = tblCampanhaCob
Left = 656
Top = 248
end
object dtsCampanhaDevedores: TDataSource
DataSet = tblCampanhaDevedores
Left = 656
Top = 304
end
object dtsCobCampanha: TDataSource
DataSet = tblCobCampanha
OnDataChange = dtsCobCampanhaDataChange
Left = 656
Top = 192
end
object dtsHistorico: TDataSource
DataSet = tblHistorico
Left = 208
Top = 656
end
object ROQueryFaixa: TZReadOnlyQuery
Connection = ZConnection
Params = <>
Left = 40
Top = 464
end
object dtsQueryFaixa: TDataSource
DataSet = ROQueryFaixa
Left = 168
Top = 464
end
object ROquerypesquisas: TZReadOnlyQuery
Connection = ZConnection
Params = <>
Left = 288
Top = 320
end
object dtsROquerypesquisas: TDataSource
DataSet = ROquerypesquisas
Left = 400
Top = 320
end
object dtsAgenda: TDataSource
DataSet = tblAgenda
Left = 832
Top = 24
end
object dtsLayout: TDataSource
DataSet = tblLayouts
Left = 832
Top = 80
end
object dtsProtocolo: TDataSource
DataSet = tblProtocolo
Left = 832
Top = 128
end
object dtsIndices: TDataSource
DataSet = tblIndices
Left = 832
Top = 184
end
object dtsRecibo: TDataSource
DataSet = tblRecibo
Left = 16
Top = 608
end
object dtsConteudo: TDataSource
DataSet = tblConteudoRecibo
Left = 832
Top = 248
end
object dtsDuplicados: TDataSource
Left = 832
Top = 304
end
object dtsRepasse: TDataSource
DataSet = tblRepasse
OnDataChange = dtsRepasseDataChange
Left = 832
Top = 360
end
object dtsLogins: TDataSource
DataSet = tblLogins
Left = 656
Top = 360
end
object dtsSessao: TDataSource
DataSet = tblSessao
Left = 832
Top = 416
end
object dtsDespesasTitulos: TDataSource
DataSet = tblDespesasTitulos
Left = 1028
Top = 24
end
object dtsIndicadorFinanceiro: TDataSource
DataSet = tblIndicadorFinanceiro
OnUpdateData = dtsIndicadorFinanceiroUpdateData
Left = 1028
Top = 80
end
object dtsFiltros: TDataSource
DataSet = tblFiltros
Left = 1024
Top = 184
end
object cdsHist: TClientDataSet
Aggregates = <>
AutoCalcFields = False
Params = <>
Left = 1022
Top = 240
object cdsHisttx_nome: TStringField
FieldName = 'tx_nome'
Size = 255
end
object cdsHistcd_documento: TStringField
FieldName = 'cd_documento'
end
object cdsHistid_devedor: TIntegerField
FieldName = 'id_devedor'
end
end
object tblProvidencias: TZQuery
Connection = ZConnection
SortedFields = 'TX_NOME'
BeforeEdit = tblProvidenciasBeforeEdit
BeforePost = tblProvidenciasBeforePost
BeforeDelete = tblProvidenciasBeforeDelete
SQL.Strings = (
'select * from chg_providencias;')
Params = <>
IndexFieldNames = 'TX_NOME Asc'
Left = 520
Top = 136
object tblProvidenciasID_PROVIDENCIA: TIntegerField
FieldName = 'ID_PROVIDENCIA'
Required = True
end
object tblProvidenciasTX_NOME: TWideStringField
FieldName = 'TX_NOME'
Size = 60
end
object tblProvidenciasTX_DESCRICAO: TWideStringField
FieldName = 'TX_DESCRICAO'
Size = 255
end
object tblProvidenciasTP_PROVIDENCIA: TWideStringField
FieldName = 'TP_PROVIDENCIA'
Size = 10
end
object tblProvidenciasTP_FORCAAGENDA: TWideStringField
FieldName = 'TP_FORCAAGENDA'
Size = 10
end
end
object tblTitulos: TZQuery
Connection = ZConnection
SortType = stIgnored
BeforeOpen = tblTitulosBeforeOpen
AfterOpen = tblTitulosAfterOpen
BeforeEdit = tblTitulosBeforeEdit
BeforePost = tblTitulosBeforePost
AfterPost = tblTitulosAfterPost
BeforeDelete = tblTitulosBeforeDelete
SQL.Strings = (
'select * from chg_titulos;')
Params = <
item
DataType = ftUnknown
Name = 'pIDdevedor'
ParamType = ptUnknown
end>
Left = 520
Top = 24
ParamData = <
item
DataType = ftUnknown
Name = 'pIDdevedor'
ParamType = ptUnknown
end>
object tblTitulosID_TITULO: TIntegerField
FieldName = 'ID_TITULO'
Required = True
end
object tblTitulosID_DEVEDOR: TIntegerField
FieldName = 'ID_DEVEDOR'
Required = True
end
object tblTitulosID_EMPRESA: TIntegerField
FieldName = 'ID_EMPRESA'
Required = True
end
object tblTitulosTX_PRODUTO: TWideStringField
FieldName = 'TX_PRODUTO'
Size = 100
end
object tblTitulosVL_TITULO: TFloatField
FieldName = 'VL_TITULO'
currency = True
end
object tblTitulosDT_ENTRADA: TDateTimeField
FieldName = 'DT_ENTRADA'
end
object tblTitulosDT_VENCIMENTO: TDateTimeField
FieldName = 'DT_VENCIMENTO'
Required = True
end
object tblTitulosTP_SITUACAO: TWideStringField
FieldName = 'TP_SITUACAO'
Size = 2
end
object tblTitulosCD_DEVEDOR: TWideStringField
FieldName = 'CD_DEVEDOR'
Size = 100
end
object tblTitulosTP_CHEQUE: TWideStringField
FieldName = 'TP_CHEQUE'
Required = True
Size = 1
end
object tblTitulosID_BANCO: TIntegerField
FieldName = 'ID_BANCO'
end
object tblTitulosTX_NRCHEQUE: TWideStringField
FieldName = 'TX_NRCHEQUE'
end
object tblTitulosTP_MOTIVO: TWideStringField
FieldName = 'TP_MOTIVO'
Size = 2
end
object tblTitulosVL_DESPESA: TFloatField
FieldName = 'VL_DESPESA'
end
object tblTitulosTP_DESPESA: TWideStringField
FieldName = 'TP_DESPESA'
Size = 1
end
object tblTitulosVL_MULTA: TFloatField
FieldName = 'VL_MULTA'
end
object tblTitulosVL_JUROS: TFloatField
FieldName = 'VL_JUROS'
end
object tblTitulosVL_ENCARGOS: TFloatField
FieldName = 'VL_ENCARGOS'
end
object tblTitulosVL_CORRIGIDO: TFloatField
FieldName = 'VL_CORRIGIDO'
end
object tblTitulosDT_PAGAMENTO: TDateTimeField
FieldName = 'DT_PAGAMENTO'
end
object tblTitulosTX_OBS: TWideMemoField
FieldName = 'TX_OBS'
BlobType = ftWideMemo
end
object tblTitulosID_ULTIMO_USUARIO: TIntegerField
FieldName = 'ID_ULTIMO_USUARIO'
end
object tblTitulosDT_HORA_ULTIMA_ATT: TDateTimeField
FieldName = 'DT_HORA_ULTIMA_ATT'
end
object tblTitulosTX_ULTIMO_USUARIO: TStringField
FieldKind = fkLookup
FieldName = 'TX_ULTIMO_USUARIO'
LookupDataSet = tblUsuariosConsulta
LookupKeyFields = 'ID_USUARIO'
LookupResultField = 'TX_NOME'
KeyFields = 'ID_ULTIMO_USUARIO'
Size = 60
Lookup = True
end
object tblTitulosID_IMPLANTACAO: TIntegerField
FieldName = 'ID_IMPLANTACAO'
end
object tblTitulosTX_IMPLANTADO: TStringField
FieldKind = fkLookup
FieldName = 'TX_IMPLANTADO'
LookupDataSet = tblUsuariosConsulta
LookupKeyFields = 'ID_USUARIO'
LookupResultField = 'TX_NOME'
KeyFields = 'ID_IMPLANTACAO'
Size = 30
Lookup = True
end
object tblTitulosDT_IMPLANTACAO: TDateTimeField
FieldName = 'DT_IMPLANTACAO'
end
object tblTitulosQTDE_PARCELAS: TIntegerField
FieldName = 'QTDE_PARCELAS'
end
object tblTitulosVL_DESC_PRINCIPAL: TFloatField
FieldName = 'VL_DESC_PRINCIPAL'
end
object tblTitulosDT_EMISSAO_RECIBO: TDateTimeField
FieldName = 'DT_EMISSAO_RECIBO'
end
object tblTitulosVL_DESC_MULTA: TFloatField
FieldName = 'VL_DESC_MULTA'
end
object tblTitulosVL_DESC_JUROS: TFloatField
FieldName = 'VL_DESC_JUROS'
end
object tblTitulosVL_INDICADOR: TFloatField
FieldName = 'VL_INDICADOR'
end
object tblTitulosVL_DESC_INDICADOR: TFloatField
FieldName = 'VL_DESC_INDICADOR'
end
object tblTitulosVL_REPASSE_MULTA: TFloatField
FieldName = 'VL_REPASSE_MULTA'
end
object tblTitulosVL_REPASSE_JUROS: TFloatField
FieldName = 'VL_REPASSE_JUROS'
end
object tblTitulosVL_REPASSE_CORRIGIDO: TFloatField
FieldName = 'VL_REPASSE_CORRIGIDO'
end
object tblTitulosVL_REPASSE_PRIN: TFloatField
FieldName = 'VL_REPASSE_PRIN'
end
object tblTitulosTP_PRESTACAO: TWideStringField
FieldName = 'TP_PRESTACAO'
Size = 1
end
object tblTitulosVL_REPASSE_ENCARGOS: TFloatField
FieldName = 'VL_REPASSE_ENCARGOS'
end
end
object tblFiltros: TZQuery
Connection = ZConnection
SortedFields = 'TX_NOME_FILTRO'
BeforeEdit = tblFiltrosBeforeEdit
BeforePost = tblFiltrosBeforePost
BeforeDelete = tblFiltrosBeforeDelete
SQL.Strings = (
'select * from chg_filtro')
Params = <>
IndexFieldNames = 'TX_NOME_FILTRO Asc'
Left = 912
Top = 184
object tblFiltrosID_FILTRO: TIntegerField
FieldName = 'ID_FILTRO'
Required = True
end
object tblFiltrosTX_NOME_FILTRO: TWideStringField
FieldName = 'TX_NOME_FILTRO'
Size = 255
end
object tblFiltrosTP_CREDOR: TWideStringField
FieldName = 'TP_CREDOR'
Size = 1
end
object tblFiltrosTX_CREDOR: TWideStringField
FieldName = 'TX_CREDOR'
Size = 255
end
object tblFiltrosTP_PROVIDENCIA: TWideStringField
FieldName = 'TP_PROVIDENCIA'
Size = 1
end
object tblFiltrosTX_PROVIDENCIA: TWideStringField
FieldName = 'TX_PROVIDENCIA'
Size = 255
end
object tblFiltrosCD_PROVIDENCIA: TWideStringField
FieldName = 'CD_PROVIDENCIA'
Size = 1
end
object tblFiltrosTP_VALOR: TWideStringField
FieldName = 'TP_VALOR'
Size = 1
end
object tblFiltrosVL_VALORIN: TFloatField
FieldName = 'VL_VALORIN'
end
object tblFiltrosVL_VALORFIM: TFloatField
FieldName = 'VL_VALORFIM'
end
object tblFiltrosTP_AGENDADO: TWideStringField
FieldName = 'TP_AGENDADO'
Size = 1
end
object tblFiltrosTX_AGENDADO: TWideStringField
FieldName = 'TX_AGENDADO'
Size = 1
end
object tblFiltrosTP_NOME: TWideStringField
FieldName = 'TP_NOME'
Size = 1
end
object tblFiltrosTX_NOME: TWideStringField
FieldName = 'TX_NOME'
Size = 10
end
object tblFiltrosTP_ATRASO: TWideStringField
FieldName = 'TP_ATRASO'
Size = 1
end
object tblFiltrosTX_ATRASOIN: TIntegerField
FieldName = 'TX_ATRASOIN'
end
object tblFiltrosTX_ATRASOFIM: TIntegerField
FieldName = 'TX_ATRASOFIM'
end
object tblFiltrosTP_PESSOA: TWideStringField
FieldName = 'TP_PESSOA'
Size = 1
end
object tblFiltrosCD_PESSOA: TWideStringField
FieldName = 'CD_PESSOA'
Size = 1
end
object tblFiltrosTP_TITULO: TWideStringField
FieldName = 'TP_TITULO'
Size = 1
end
object tblFiltrosCD_TITULO: TWideStringField
FieldName = 'CD_TITULO'
Size = 1
end
object tblFiltrosCD_ORDEM: TWideStringField
FieldName = 'CD_ORDEM'
Size = 1
end
object tblFiltrosTL_CREDOR: TWideMemoField
FieldName = 'TL_CREDOR'
BlobType = ftWideMemo
end
object tblFiltrosTL_PROV: TWideMemoField
FieldName = 'TL_PROV'
BlobType = ftWideMemo
end
end
object tblAgenda: TZQuery
Connection = ZConnection
BeforeEdit = tblAgendaBeforeEdit
BeforePost = tblAgendaBeforePost
BeforeDelete = tblAgendaBeforeDelete
SQL.Strings = (
'select * from chg_agenda'
'order by DT_AGENDADA, HR_AGENDADA')
Params = <>
Left = 760
Top = 24
object tblAgendaID_AGENDA: TIntegerField
FieldName = 'ID_AGENDA'
Required = True
end
object tblAgendaID_COBRADOR: TIntegerField
FieldName = 'ID_COBRADOR'
Required = True
end
object tblAgendaID_DEVEDOR: TIntegerField
FieldName = 'ID_DEVEDOR'
Required = True
end
object tblAgendaDT_AGENDADA: TDateField
FieldName = 'DT_AGENDADA'
end
object tblAgendaHR_AGENDADA: TTimeField
FieldName = 'HR_AGENDADA'
end
object tblAgendaTP_SITUACAO: TWideStringField
FieldName = 'TP_SITUACAO'
Size = 1
end
object tblAgendaTX_NOME: TStringField
FieldKind = fkLookup
FieldName = 'TX_NOME'
LookupDataSet = tblDevedores
LookupKeyFields = 'ID_DEVEDOR'
LookupResultField = 'TX_NOME'
KeyFields = 'ID_DEVEDOR'
Size = 255
Lookup = True
end
object tblAgendaNOME_COBRADOR: TStringField
FieldKind = fkLookup
FieldName = 'NOME_COBRADOR'
LookupDataSet = tblUsuariosConsulta
LookupKeyFields = 'ID_USUARIO'
LookupResultField = 'TX_NOME'
KeyFields = 'ID_COBRADOR'
Size = 60
Lookup = True
end
object tblAgendaDT_QUE_AGENDOU: TDateTimeField
FieldName = 'DT_QUE_AGENDOU'
end
object tblAgendaQUEM_AGENDOU: TIntegerField
FieldName = 'QUEM_AGENDOU'
end
object tblAgendaNOME_QUEM_AGENDOU: TStringField
FieldKind = fkLookup
FieldName = 'NOME_QUEM_AGENDOU'
LookupDataSet = tblUsuariosConsulta
LookupKeyFields = 'ID_USUARIO'
LookupResultField = 'TX_NOME'
KeyFields = 'QUEM_AGENDOU'
Size = 255
Lookup = True
end
end
object tblLayouts: TZQuery
Connection = ZConnection
SortedFields = 'ID_LAYOUT'
BeforeEdit = tblLayoutsBeforeEdit
BeforePost = tblLayoutsBeforePost
BeforeDelete = tblLayoutsBeforeDelete
SQL.Strings = (
'select * from sys_layouts')
Params = <>
IndexFieldNames = 'ID_LAYOUT Asc'
Left = 760
Top = 80
object tblLayoutsID_LAYOUT: TIntegerField
FieldName = 'ID_LAYOUT'
Required = True
end
object tblLayoutsTX_NOME: TWideStringField
FieldName = 'TX_NOME'
Size = 40
end
object tblLayoutsSTR_CAMPOS: TWideStringField
FieldName = 'STR_CAMPOS'
Size = 255
end
object tblLayoutsNR_QNTCAMPOS: TFloatField
FieldName = 'NR_QNTCAMPOS'
end
end
object tblIndices: TZQuery
Connection = ZConnection
SortedFields = 'ID_INDICE'
BeforeEdit = tblIndicesBeforeEdit
BeforePost = tblIndicesBeforePost
BeforeDelete = tblIndicesBeforeDelete
SQL.Strings = (
'select * from sys_indices')
Params = <>
IndexFieldNames = 'ID_INDICE Asc'
Left = 760
Top = 184
object tblIndicesID_INDICE: TIntegerField
FieldName = 'ID_INDICE'
Required = True
end
object tblIndicesTX_NOME: TWideStringField
FieldName = 'TX_NOME'
Size = 60
end
object tblIndicesPR_INDICE: TFloatField
FieldName = 'PR_INDICE'
Required = True
end
end
object tblRecibo: TZQuery
Connection = ZConnection
SortedFields = 'ID_RECIBO'
BeforeEdit = tblReciboBeforeEdit
BeforePost = tblReciboBeforePost
BeforeDelete = tblReciboBeforeDelete
SQL.Strings = (
'select * from sys_recibos')
Params = <>
IndexFieldNames = 'ID_RECIBO Asc'
Sequence = seqRecibos
SequenceField = 'ID_RECIBO'
Left = 72
Top = 608
object tblReciboID_RECIBO: TIntegerField
FieldName = 'ID_RECIBO'
Required = True
end
object tblReciboNR_RECIBO: TWideStringField
FieldName = 'NR_RECIBO'
Required = True
end
object tblReciboTX_NOME: TWideStringField
FieldName = 'TX_NOME'
Size = 255
end
object tblReciboTX_CPF: TWideStringField
FieldName = 'TX_CPF'
Size = 14
end
object tblReciboTX_CNPJ: TWideStringField
FieldName = 'TX_CNPJ'
Size = 18
end
object tblReciboID_DEVEDOR: TIntegerField
FieldName = 'ID_DEVEDOR'
end
object tblReciboVL_TOTAL: TFloatField
FieldName = 'VL_TOTAL'
end
object tblReciboVL_PRINCIPAL: TFloatField
FieldName = 'VL_PRINCIPAL'
end
object tblReciboVL_JUROS: TFloatField
FieldName = 'VL_JUROS'
end
object tblReciboVL_MULTA: TFloatField
FieldName = 'VL_MULTA'
end
object tblReciboVL_ENCARGOS: TFloatField
FieldName = 'VL_ENCARGOS'
end
object tblReciboVL_DESCONTOS: TFloatField
FieldName = 'VL_DESCONTOS'
end
object tblReciboVL_CORRIGIDO: TFloatField
FieldName = 'VL_CORRIGIDO'
end
object tblReciboTP_RECEBIMENTO: TWideStringField
FieldName = 'TP_RECEBIMENTO'
Size = 2
end
object tblReciboNR_CHEQUE: TWideStringField
FieldName = 'NR_CHEQUE'
end
object tblReciboID_BANCO: TIntegerField
FieldName = 'ID_BANCO'
end
object tblReciboTX_PRACA: TWideStringField
FieldName = 'TX_PRACA'
Size = 200
end
object tblReciboID_USUARIO: TIntegerField
FieldName = 'ID_USUARIO'
end
object tblReciboDT_IMPRESSAO: TDateTimeField
FieldName = 'DT_IMPRESSAO'
end
object tblReciboTX_CAMINHO: TWideStringField
FieldName = 'TX_CAMINHO'
Size = 255
end
object tblReciboTX_CAIXA: TStringField
FieldKind = fkLookup
FieldName = 'TX_CAIXA'
LookupDataSet = tblUsuariosConsulta
LookupKeyFields = 'ID_USUARIO'
LookupResultField = 'TX_NOME'
KeyFields = 'ID_USUARIO'
Size = 25
Lookup = True
end
object tblReciboTP_CANCELADO: TWideStringField
FieldName = 'TP_CANCELADO'
Size = 1
end
end
object tblConteudoRecibo: TZQuery
Connection = ZConnection
SortedFields = 'ID_RECIBO'
BeforePost = tblConteudoReciboBeforePost
SQL.Strings = (
'select * from SYS_CONTEUDO_RECIBO')
Params = <>
IndexFieldNames = 'ID_RECIBO Asc'
Left = 760
Top = 248
object tblConteudoReciboID_CONTEUDO: TIntegerField
FieldName = 'ID_CONTEUDO'
Required = True
end
object tblConteudoReciboTX_NOME: TWideStringField
FieldName = 'TX_NOME'
Size = 255
end
object tblConteudoReciboDT_VENCIMENTO: TDateTimeField
FieldName = 'DT_VENCIMENTO'
end
object tblConteudoReciboVL_PRINCIPAL: TFloatField
FieldName = 'VL_PRINCIPAL'
currency = True
end
object tblConteudoReciboVL_JUROS: TFloatField
FieldName = 'VL_JUROS'
currency = True
end
object tblConteudoReciboVL_MULTA: TFloatField
FieldName = 'VL_MULTA'
currency = True
end
object tblConteudoReciboVL_ENCARGOS: TFloatField
FieldName = 'VL_ENCARGOS'
currency = True
end
object tblConteudoReciboVL_DESCONTOS: TFloatField
FieldName = 'VL_DESCONTOS'
currency = True
end
object tblConteudoReciboVL_CORRIGIDO: TFloatField
FieldName = 'VL_CORRIGIDO'
currency = True
end
object tblConteudoReciboID_RECIBO: TIntegerField
FieldName = 'ID_RECIBO'
end
object tblConteudoReciboVL_DESPESA: TFloatField
FieldName = 'VL_DESPESA'
currency = True
end
object tblConteudoReciboTX_DEPESA: TWideStringField
FieldName = 'TX_DEPESA'
Size = 255
end
object tblConteudoReciboVL_EXTRAS: TFloatField
FieldName = 'VL_EXTRAS'
currency = True
end
end
object tblDuplicados: TZQuery
Connection = ZConnection
SortedFields = 'ID_DUPLICADO'
BeforePost = tblDuplicadosBeforePost
SQL.Strings = (
'select * from SYS_DUPLICADOS')
Params = <>
IndexFieldNames = 'ID_DUPLICADO Asc'
Left = 760
Top = 304
object tblDuplicadosID_DUPLICADO: TIntegerField
FieldName = 'ID_DUPLICADO'
Required = True
end
object tblDuplicadosTX_NOMEDEVEDOR: TWideStringField
FieldName = 'TX_NOMEDEVEDOR'
Size = 60
end
object tblDuplicadosCD_CPF: TWideStringField
FieldName = 'CD_CPF'
Size = 14
end
object tblDuplicadosTX_NOMETITULO: TWideStringField
FieldName = 'TX_NOMETITULO'
Size = 100
end
object tblDuplicadosVL_TITULO: TFloatField
FieldName = 'VL_TITULO'
end
object tblDuplicadosDT_VENCIMENTO: TDateTimeField
FieldName = 'DT_VENCIMENTO'
end
object tblDuplicadosTP_ACAO: TWideStringField
FieldName = 'TP_ACAO'
Size = 1
end
object tblDuplicadosCD_CNPJ: TWideStringField
FieldName = 'CD_CNPJ'
Size = 18
end
end
object tblLogins: TZQuery
Connection = ZConnection
SortedFields = 'ID_LOGIN'
SortType = stDescending
BeforePost = tblLoginsBeforePost
SQL.Strings = (
'select * from SYS_LOGINS')
Params = <>
IndexFieldNames = 'ID_LOGIN Desc'
Left = 520
Top = 360
object tblLoginsID_LOGIN: TIntegerField
FieldName = 'ID_LOGIN'
Required = True
end
object tblLoginsID_USUARIO: TIntegerField
FieldName = 'ID_USUARIO'
end
object tblLoginsDT_LOGIN: TDateField
FieldName = 'DT_LOGIN'
end
object tblLoginsHR_LOGIN: TTimeField
FieldName = 'HR_LOGIN'
end
object tblLoginsDT_LOGOFF: TDateField
FieldName = 'DT_LOGOFF'
end
object tblLoginsHR_LOGOFF: TTimeField
FieldName = 'HR_LOGOFF'
end
end
object tblEmpresa: TZQuery
Connection = ZConnection
SortedFields = 'TX_NOME'
BeforeEdit = tblEmpresaBeforeEdit
BeforePost = tblEmpresaBeforePost
BeforeDelete = tblEmpresaBeforeDelete
SQL.Strings = (
'select * from SYS_EMPRESA')
Params = <>
IndexFieldNames = 'TX_NOME Asc'
Left = 40
Top = 80
object tblEmpresaID_EMPRESA: TIntegerField
FieldName = 'ID_EMPRESA'
Required = True
end
object tblEmpresaTX_NOME: TWideStringField
FieldName = 'TX_NOME'
Size = 100
end
object tblEmpresaTX_FANTASIA: TWideStringField
FieldName = 'TX_FANTASIA'
Size = 40
end
object tblEmpresaTX_ENDERECO: TWideStringField
FieldName = 'TX_ENDERECO'
Size = 100
end
object tblEmpresaNR_NUMERO: TIntegerField
FieldName = 'NR_NUMERO'
end
object tblEmpresaTX_COMPLEMENTO: TWideStringField
FieldName = 'TX_COMPLEMENTO'
end
object tblEmpresaTX_BAIRRO: TWideStringField
FieldName = 'TX_BAIRRO'
Size = 60
end
object tblEmpresaID_CIDADE: TIntegerField
FieldName = 'ID_CIDADE'
end
object tblEmpresaTX_CEP: TWideStringField
FieldName = 'TX_CEP'
Size = 9
end
object tblEmpresaTX_TELEFONE: TWideStringField
FieldName = 'TX_TELEFONE'
Size = 40
end
object tblEmpresaTX_WEBSITE: TWideStringField
FieldName = 'TX_WEBSITE'
Size = 60
end
object tblEmpresaTX_CNPJ: TWideStringField
FieldName = 'TX_CNPJ'
Size = 18
end
object tblEmpresaTX_IE: TWideStringField
FieldName = 'TX_IE'
end
object tblEmpresaTX_IM: TWideStringField
FieldName = 'TX_IM'
end
object tblEmpresaTL_OBSERVACOES: TWideMemoField
FieldName = 'TL_OBSERVACOES'
BlobType = ftWideMemo
end
object tblEmpresaTX_LOGOMARCA: TWideStringField
FieldName = 'TX_LOGOMARCA'
Size = 100
end
object tblEmpresaTX_HONORARIOS: TWideStringField
FieldName = 'TX_HONORARIOS'
end
object tblEmpresaPR_DEBITO: TFloatField
FieldName = 'PR_DEBITO'
end
object tblEmpresaPR_CREDVISTA: TFloatField
FieldName = 'PR_CREDVISTA'
end
object tblEmpresaPR_CRED3: TFloatField
FieldName = 'PR_CRED3'
end
object tblEmpresaPR_CRED6: TFloatField
FieldName = 'PR_CRED6'
end
object tblEmpresaPR_CRED12: TFloatField
FieldName = 'PR_CRED12'
end
object tblEmpresaIMG_LOGO: TBlobField
FieldName = 'IMG_LOGO'
end
object tblEmpresaPR_FINANCIAMENTO: TFloatField
FieldName = 'PR_FINANCIAMENTO'
end
object tblEmpresaTX_TITULO: TWideStringField
FieldName = 'TX_TITULO'
Size = 60
end
object tblEmpresaID_ESTADO: TIntegerField
FieldName = 'ID_ESTADO'
end
object tblEmpresaTX_EMAILNOME: TWideStringField
FieldName = 'TX_EMAILNOME'
Size = 100
end
object tblEmpresaTX_EMAIL: TWideStringField
FieldName = 'TX_EMAIL'
Size = 100
end
object tblEmpresaTX_SMTP: TWideStringField
FieldName = 'TX_SMTP'
Size = 100
end
object tblEmpresaTX_PORTA: TWideStringField
FieldName = 'TX_PORTA'
Size = 10
end
object tblEmpresaTX_USUARIO: TWideStringField
FieldName = 'TX_USUARIO'
Size = 100
end
object tblEmpresaTX_SENHA: TWideStringField
FieldName = 'TX_SENHA'
Size = 100
end
object tblEmpresaPR_BANCO_DEBITO: TFloatField
FieldName = 'PR_BANCO_DEBITO'
end
object tblEmpresaPR_BANCO_CREDVISTA: TFloatField
FieldName = 'PR_BANCO_CREDVISTA'
end
object tblEmpresaPR_BANCO_CRED3: TFloatField
FieldName = 'PR_BANCO_CRED3'
end
object tblEmpresaPR_BANCO_CRED6: TFloatField
FieldName = 'PR_BANCO_CRED6'
end
object tblEmpresaPR_BANCO_CRED12: TFloatField
FieldName = 'PR_BANCO_CRED12'
end
object tblEmpresaTP_TLS: TWideStringField
FieldName = 'TP_TLS'
Size = 1
end
object tblEmpresaTP_SSL: TWideStringField
FieldName = 'TP_SSL'
Size = 1
end
object tblEmpresaTX_CNPJ_BOLETO: TWideStringField
FieldName = 'TX_CNPJ_BOLETO'
Size = 18
end
object tblEmpresaCD_BENEFICIARIO: TWideStringField
FieldName = 'CD_BENEFICIARIO'
Size = 5
end
object tblEmpresaCLIENT_ID: TWideStringField
FieldName = 'CLIENT_ID'
Size = 60
end
object tblEmpresaCLIENT_SECRET: TWideStringField
FieldName = 'CLIENT_SECRET'
Size = 60
end
object tblEmpresaCONTA_CORRENTE: TWideStringField
FieldName = 'CONTA_CORRENTE'
Size = 60
end
object tblEmpresaTX_CIDADE: TStringField
FieldKind = fkLookup
FieldName = 'TX_CIDADE'
LookupDataSet = tblCidadesConsulta
LookupKeyFields = 'ID_CIDADE'
LookupResultField = 'TX_NOME'
KeyFields = 'ID_CIDADE'
Size = 60
Lookup = True
end
object tblEmpresaTX_UF: TStringField
FieldKind = fkLookup
FieldName = 'TX_UF'
LookupDataSet = tblEstados
LookupKeyFields = 'ID_ESTADO'
LookupResultField = 'TX_SIGLA'
KeyFields = 'ID_ESTADO'
Size = 2
Lookup = True
end
object tblEmpresaPATH_CERT: TWideStringField
FieldName = 'PATH_CERT'
Size = 255
end
object tblEmpresaPATH_KEY: TWideStringField
FieldName = 'PATH_KEY'
Size = 255
end
end
object tblPermissoes: TZQuery
Connection = ZConnection
SortedFields = 'ID_PERMISSAO'
BeforeEdit = tblPermissoesBeforeEdit
BeforePost = tblPermissoesBeforePost
BeforeDelete = tblPermissoesBeforeDelete
SQL.Strings = (
'select * from sys_permissoes')
Params = <>
IndexFieldNames = 'ID_PERMISSAO Asc'
Left = 40
Top = 240
object tblPermissoesID_PERMISSAO: TIntegerField
FieldName = 'ID_PERMISSAO'
Required = True
end
object tblPermissoesCD_PERMISSAO: TWideStringField
FieldName = 'CD_PERMISSAO'
end
object tblPermissoesTX_DESCRICAO: TWideStringField
FieldName = 'TX_DESCRICAO'
Size = 40
end
object tblPermissoesID_PARENT: TIntegerField
FieldName = 'ID_PARENT'
end
object tblPermissoesTP_ACESSO: TWideStringField
FieldName = 'TP_ACESSO'
Size = 1
end
end
object tblRepasse: TZQuery
Connection = ZConnection
SortedFields = 'TX_NOME'
AfterOpen = tblRepasseAfterOpen
BeforeEdit = tblRepasseBeforeEdit
BeforePost = tblRepasseBeforePost
BeforeDelete = tblRepasseBeforeDelete
SQL.Strings = (
'select * from SYS_REPASSES')
Params = <>
IndexFieldNames = 'TX_NOME Asc'
Left = 760
Top = 360
object tblRepasseID_REPASSE: TIntegerField
FieldName = 'ID_REPASSE'
Required = True
end
object tblRepassePR_PRINCIPAL: TFloatField
FieldName = 'PR_PRINCIPAL'
end
object tblRepassePR_JUROS: TFloatField
FieldName = 'PR_JUROS'
end
object tblRepassePR_MULTA: TFloatField
FieldName = 'PR_MULTA'
end
object tblRepassePR_ENCARGOS: TFloatField
FieldName = 'PR_ENCARGOS'
end
object tblRepassePR_CORRIGIDO: TFloatField
FieldName = 'PR_CORRIGIDO'
end
object tblRepasseTX_NOME: TWideStringField
FieldName = 'TX_NOME'
Size = 40
end
end
object tblSessao: TZQuery
Connection = ZConnection
BeforePost = tblSessaoBeforePost
SQL.Strings = (
'select * from SYS_SESSAO')
Params = <>
Left = 760
Top = 416
object tblSessaoID_SESSAO: TIntegerField
FieldName = 'ID_SESSAO'
Required = True
end
object tblSessaoID_USUARIO: TIntegerField
FieldName = 'ID_USUARIO'
end
object tblSessaoTP_ATIVA: TWideStringField
FieldName = 'TP_ATIVA'
Size = 1
end
end
object tblCobCampanha: TZQuery
Connection = ZConnection
SortedFields = 'ID_CAMPANHA'
AfterOpen = tblCobCampanhaAfterOpen
BeforeEdit = tblCobCampanhaBeforeEdit
BeforePost = tblCobCampanhaBeforePost
BeforeDelete = tblCobCampanhaBeforeDelete
SQL.Strings = (
'select * from CHG_CAMPANHAS')
Params = <>
IndexFieldNames = 'ID_CAMPANHA Asc'
Left = 520
Top = 192
object tblCobCampanhaID_CAMPANHA: TIntegerField
FieldName = 'ID_CAMPANHA'
Required = True
end
object tblCobCampanhaTX_NOME: TWideStringField
FieldName = 'TX_NOME'
Size = 40
end
object tblCobCampanhaTP_ATIVA: TWideStringField
FieldName = 'TP_ATIVA'
Size = 1
end
object tblCobCampanhaTP_CONCLUIDA: TWideStringField
FieldName = 'TP_CONCLUIDA'
Size = 1
end
object tblCobCampanhaTX_DESC: TWideStringField
FieldName = 'TX_DESC'
Size = 255
end
object tblCobCampanhaDT_CAD: TDateField
FieldName = 'DT_CAD'
end
object tblCobCampanhaQUEM_CAD: TIntegerField
FieldName = 'QUEM_CAD'
end
object tblCobCampanhaTL_DESC: TWideMemoField
FieldName = 'TL_DESC'
BlobType = ftWideMemo
end
end
object tblCHGEmpresa: TZQuery
Connection = ZConnection
SortedFields = 'TX_NOME'
AfterOpen = tblCHGEmpresaAfterOpen
BeforeEdit = tblCHGEmpresaBeforeEdit
BeforePost = tblCHGEmpresaBeforePost
BeforeDelete = tblCHGEmpresaBeforeDelete
AfterDelete = tblCHGEmpresaAfterDelete
SQL.Strings = (
'select * from CHG_EMPRESAS')
Params = <>
IndexFieldNames = 'TX_NOME Asc'
Left = 288
Top = 144
object tblCHGEmpresaID_EMPRESA: TIntegerField
FieldName = 'ID_EMPRESA'
Required = True
end
object tblCHGEmpresaTX_NOME: TWideStringField
FieldName = 'TX_NOME'
Size = 100
end
object tblCHGEmpresaTX_FANTASIA: TWideStringField
FieldName = 'TX_FANTASIA'
Size = 100
end
object tblCHGEmpresaTX_CNPJ: TWideStringField
FieldName = 'TX_CNPJ'
Size = 18
end
object tblCHGEmpresaTX_IE: TWideStringField
FieldName = 'TX_IE'
end
object tblCHGEmpresaTX_ENDERECO: TWideStringField
FieldName = 'TX_ENDERECO'
Size = 100
end
object tblCHGEmpresaTX_COMPLEMENTO: TWideStringField
FieldName = 'TX_COMPLEMENTO'
end
object tblCHGEmpresaID_CIDADE: TIntegerField
FieldName = 'ID_CIDADE'
end
object tblCHGEmpresaTX_BAIRRO: TWideStringField
FieldName = 'TX_BAIRRO'
Size = 60
end
object tblCHGEmpresaID_ESTADO: TIntegerField
FieldName = 'ID_ESTADO'
end
object tblCHGEmpresaTX_CEP: TWideStringField
FieldName = 'TX_CEP'
Size = 9
end
object tblCHGEmpresaTX_TELEFONE: TWideStringField
FieldName = 'TX_TELEFONE'
Size = 40
end
object tblCHGEmpresaTX_EMAIL: TWideStringField
FieldName = 'TX_EMAIL'
Size = 60
end
object tblCHGEmpresaTX_WEBSITE: TWideStringField
FieldName = 'TX_WEBSITE'
Size = 60
end
object tblCHGEmpresaNR_NUMERO: TIntegerField
FieldName = 'NR_NUMERO'
end
object tblCHGEmpresaTX_IM: TWideStringField
FieldName = 'TX_IM'
end
object tblCHGEmpresaTL_OBSERVACOES: TWideMemoField
FieldName = 'TL_OBSERVACOES'
BlobType = ftWideMemo
end
object tblCHGEmpresaID_REPASSE: TIntegerField
FieldName = 'ID_REPASSE'
end
object tblCHGEmpresaTP_ENTRADA: TWideStringField
FieldName = 'TP_ENTRADA'
Size = 2
end
object tblCHGEmpresaPR_MULTA: TFloatField
FieldName = 'PR_MULTA'
Required = True
end
object tblCHGEmpresaTP_JUROS: TWideStringField
FieldName = 'TP_JUROS'
Required = True
Size = 1
end
object tblCHGEmpresaPR_JUROS: TFloatField
FieldName = 'PR_JUROS'
Required = True
end
object tblCHGEmpresaNR_JUROS: TFloatField
FieldName = 'NR_JUROS'
Required = True
end
object tblCHGEmpresaNR_PARCELAS: TIntegerField
FieldName = 'NR_PARCELAS'
end
object tblCHGEmpresaPR_DESC_QUIT_PRIN: TFloatField
FieldName = 'PR_DESC_QUIT_PRIN'
Required = True
end
object tblCHGEmpresaPR_DESC_QUIT_JUROS: TFloatField
FieldName = 'PR_DESC_QUIT_JUROS'
Required = True
end
object tblCHGEmpresaPR_DESC_QUIT_IND_FIN: TFloatField
FieldName = 'PR_DESC_QUIT_IND_FIN'
Required = True
end
object tblCHGEmpresaPR_DESC_QUIT_COR: TFloatField
FieldName = 'PR_DESC_QUIT_COR'
end
object tblCHGEmpresaPR_DESC_FINAN_PRIN: TFloatField
FieldName = 'PR_DESC_FINAN_PRIN'
Required = True
end
object tblCHGEmpresaPR_DESC_FINAN_JUROS: TFloatField
FieldName = 'PR_DESC_FINAN_JUROS'
Required = True
end
object tblCHGEmpresaPR_DESC_FINAN_MULTA: TFloatField
FieldName = 'PR_DESC_FINAN_MULTA'
Required = True
end
object tblCHGEmpresaPR_DESC_FINAN_IND_FIN: TFloatField
FieldName = 'PR_DESC_FINAN_IND_FIN'
Required = True
end
object tblCHGEmpresaPR_DESC_FINAN_COR: TFloatField
FieldName = 'PR_DESC_FINAN_COR'
end
object tblCHGEmpresaPR_INDICADOR_FINANCEIRO: TFloatField
FieldName = 'PR_INDICADOR_FINANCEIRO'
Required = True
end
object tblCHGEmpresaPR_JUROS_PARCELAR: TFloatField
FieldName = 'PR_JUROS_PARCELAR'
end
object tblCHGEmpresaPR_ENTRADA_MIN: TFloatField
FieldName = 'PR_ENTRADA_MIN'
Required = True
end
object tblCHGEmpresaPR_ENTRADA_MAX: TFloatField
FieldName = 'PR_ENTRADA_MAX'
end
object tblCHGEmpresaTP_CHEQUE: TWideStringField
FieldName = 'TP_CHEQUE'
Size = 1
end
object tblCHGEmpresaTP_CRED: TWideStringField
FieldName = 'TP_CRED'
Size = 1
end
object tblCHGEmpresaTP_DIN: TWideStringField
FieldName = 'TP_DIN'
Size = 1
end
object tblCHGEmpresaPR_DESC_QUIT_MULTA: TFloatField
FieldName = 'PR_DESC_QUIT_MULTA'
Required = True
end
object tblCHGEmpresaID_ULTIMO_USUARIO: TIntegerField
FieldName = 'ID_ULTIMO_USUARIO'
end
object tblCHGEmpresaDT_HORA_ULTIMA_ATT: TDateTimeField
FieldName = 'DT_HORA_ULTIMA_ATT'
end
object tblCHGEmpresaID_DEPARTAMENTO: TIntegerField
FieldName = 'ID_DEPARTAMENTO'
end
end
object tblEstados: TZQuery
Connection = ZConnection
SortedFields = 'TX_NOME'
AfterOpen = tblEstadosAfterOpen
SQL.Strings = (
'select * from SYS_ESTADOS')
Params = <>
IndexFieldNames = 'TX_NOME Asc'
Left = 288
Top = 24
object tblEstadosID_ESTADO: TIntegerField
FieldName = 'ID_ESTADO'
Required = True
end
object tblEstadosTX_NOME: TWideStringField
FieldName = 'TX_NOME'
Size = 40
end
object tblEstadosCD_ESTADO: TWideStringField
FieldName = 'CD_ESTADO'
Size = 2
end
object tblEstadosTX_SIGLA: TWideStringField
FieldName = 'TX_SIGLA'
Size = 2
end
end
object tblUsuariosConsulta: TZQuery
Connection = ZConnection
SortedFields = 'TX_NOME'
SQL.Strings = (
'select * from SYS_USUARIOS'
'where tp_ativo = '#39'S'#39)
Params = <>
IndexFieldNames = 'TX_NOME Asc'
Left = 168
Top = 408
object tblUsuariosConsultaID_USUARIO: TIntegerField
FieldName = 'ID_USUARIO'
Required = True
end
object tblUsuariosConsultaTX_NOME: TWideStringField
FieldName = 'TX_NOME'
Size = 60
end
object tblUsuariosConsultaTX_USUARIO: TWideStringField
FieldName = 'TX_USUARIO'
Size = 10
end
object tblUsuariosConsultaTX_SENHA: TWideStringField
FieldName = 'TX_SENHA'
Size = 40
end
object tblUsuariosConsultaID_GRUPO: TIntegerField
FieldName = 'ID_GRUPO'
end
object tblUsuariosConsultaTP_ATIVO: TWideStringField
FieldName = 'TP_ATIVO'
Size = 1
end
object tblUsuariosConsultaTP_TROCAPASS: TWideStringField
FieldName = 'TP_TROCAPASS'
Size = 1
end
object tblUsuariosConsultaTX_EMAILNOME: TWideStringField
FieldName = 'TX_EMAILNOME'
Size = 100
end
object tblUsuariosConsultaTX_EMAIL: TWideStringField
FieldName = 'TX_EMAIL'
Size = 100
end
object tblUsuariosConsultaTX_SMTP: TWideStringField
FieldName = 'TX_SMTP'
Size = 100
end
object tblUsuariosConsultaTX_PORTA: TWideStringField
FieldName = 'TX_PORTA'
Size = 10
end
object tblUsuariosConsultaTX_USUARIOEMAIL: TWideStringField
FieldName = 'TX_USUARIOEMAIL'
Size = 100
end
object tblUsuariosConsultaTX_SENHAEMAIL: TWideStringField
FieldName = 'TX_SENHAEMAIL'
Size = 100
end
object tblUsuariosConsultaTP_SSL: TWideStringField
FieldName = 'TP_SSL'
Size = 1
end
object tblUsuariosConsultaTP_TLS: TWideStringField
FieldName = 'TP_TLS'
Size = 1
end
end
object tblGrupos: TZQuery
Connection = ZConnection
SortedFields = 'TX_NOME'
AfterOpen = tblGruposAfterOpen
AfterInsert = tblGruposAfterInsert
BeforeEdit = tblGruposBeforeEdit
BeforePost = tblGruposBeforePost
BeforeDelete = tblGruposBeforeDelete
SQL.Strings = (
'select * from SYS_GRUPOS')
Params = <>
IndexFieldNames = 'TX_NOME Asc'
Left = 40
Top = 184
object tblGruposID_GRUPO: TIntegerField
FieldName = 'ID_GRUPO'
Required = True
end
object tblGruposTX_NOME: TWideStringField
FieldName = 'TX_NOME'
Size = 40
end
object tblGruposTP_SU: TWideStringField
FieldName = 'TP_SU'
Size = 1
end
end
object tblUsuarios: TZQuery
Connection = ZConnection
SortedFields = 'TX_NOME'
BeforeOpen = tblUsuariosBeforeOpen
AfterInsert = tblUsuariosAfterInsert
BeforeEdit = tblUsuariosBeforeEdit
BeforePost = tblUsuariosBeforePost
BeforeDelete = tblUsuariosBeforeDelete
SQL.Strings = (
'select * from SYS_USUARIOS')
Params = <>
IndexFieldNames = 'TX_NOME Asc'
Left = 40
Top = 128
object tblUsuariosID_USUARIO: TIntegerField
FieldName = 'ID_USUARIO'
Required = True
end
object tblUsuariosTX_NOME: TWideStringField
FieldName = 'TX_NOME'
Size = 60
end
object tblUsuariosTX_USUARIO: TWideStringField
FieldName = 'TX_USUARIO'
Size = 10
end
object tblUsuariosTX_SENHA: TWideStringField
FieldName = 'TX_SENHA'
Size = 40
end
object tblUsuariosID_GRUPO: TIntegerField
FieldName = 'ID_GRUPO'
end
object tblUsuariosTP_ATIVO: TWideStringField
FieldName = 'TP_ATIVO'
Size = 1
end
object tblUsuariosTP_TROCAPASS: TWideStringField
FieldName = 'TP_TROCAPASS'
Size = 1
end
object tblUsuariosTX_EMAILNOME: TWideStringField
FieldName = 'TX_EMAILNOME'
Size = 100
end
object tblUsuariosTX_EMAIL: TWideStringField
FieldName = 'TX_EMAIL'
Size = 100
end
object tblUsuariosTX_SMTP: TWideStringField
FieldName = 'TX_SMTP'
Size = 100
end
object tblUsuariosTX_PORTA: TWideStringField
FieldName = 'TX_PORTA'
Size = 10
end
object tblUsuariosTX_USUARIOEMAIL: TWideStringField
FieldName = 'TX_USUARIOEMAIL'
Size = 100
end
object tblUsuariosTX_SENHAEMAIL: TWideStringField
FieldName = 'TX_SENHAEMAIL'
Size = 100
end
object tblUsuariosTP_SSL: TWideStringField
FieldName = 'TP_SSL'
Size = 1
end
object tblUsuariosTP_TLS: TWideStringField
FieldName = 'TP_TLS'
Size = 1
end
end
object tblGruposPermissoes: TZQuery
Connection = ZConnection
SortedFields = 'ID_ITEM'
BeforeOpen = tblGruposPermissoesBeforeOpen
AfterInsert = tblGruposPermissoesAfterInsert
BeforeEdit = tblGruposPermissoesBeforeEdit
BeforePost = tblGruposPermissoesBeforePost
AfterPost = tblGruposPermissoesAfterPost
BeforeDelete = tblGruposPermissoesBeforeDelete
SQL.Strings = (
'select * from SYS_GRUPOS_PERMISSOES')
Params = <>
IndexFieldNames = 'ID_ITEM Asc'
Left = 40
Top = 296
object tblGruposPermissoesID_ITEM: TIntegerField
FieldName = 'ID_ITEM'
Required = True
end
object tblGruposPermissoesID_GRUPO: TIntegerField
FieldName = 'ID_GRUPO'
end
object tblGruposPermissoesID_PERMISSAO: TIntegerField
FieldName = 'ID_PERMISSAO'
end
object tblGruposPermissoesTP_ACESSO: TWideStringField
FieldName = 'TP_ACESSO'
Size = 1
end
end
object tblCampanhaCob: TZQuery
Connection = ZConnection
SortedFields = 'ID_ITEM'
BeforeOpen = tblCampanhaCobBeforeOpen
BeforeEdit = tblCampanhaCobBeforeEdit
BeforePost = tblCampanhaCobBeforePost
BeforeDelete = tblCampanhaCobBeforeDelete
SQL.Strings = (
'select * from CHG_CAMPANHAS_COBRADORES')
Params = <>
IndexFieldNames = 'ID_ITEM Asc'
Left = 520
Top = 248
object tblCampanhaCobID_ITEM: TIntegerField
FieldName = 'ID_ITEM'
Required = True
end
object tblCampanhaCobID_CAMPANHA: TIntegerField
FieldName = 'ID_CAMPANHA'
end
object tblCampanhaCobID_COBRADOR: TIntegerField
FieldName = 'ID_COBRADOR'
end
object tblCampanhaCobID_ULTIMO_USUARIO: TIntegerField
FieldName = 'ID_ULTIMO_USUARIO'
end
object tblCampanhaCobDT_HORA_ULTIMA_ATT: TDateTimeField
FieldName = 'DT_HORA_ULTIMA_ATT'
end
end
object tblCampanhaDevedores: TZQuery
Connection = ZConnection
SortedFields = 'ID_ITEM'
BeforeOpen = tblCampanhaDevedoresBeforeOpen
BeforeEdit = tblCampanhaDevedoresBeforeEdit
BeforePost = tblCampanhaDevedoresBeforePost
BeforeDelete = tblCampanhaDevedoresBeforeDelete
SQL.Strings = (
'select * from CHG_CAMPANHAS_DEVEDORES')
Params = <>
IndexFieldNames = 'ID_ITEM Asc'
Left = 520
Top = 304
object tblCampanhaDevedoresID_ITEM: TIntegerField
FieldName = 'ID_ITEM'
Required = True
end
object tblCampanhaDevedoresID_CAMPANHA: TIntegerField
FieldName = 'ID_CAMPANHA'
Required = True
end
object tblCampanhaDevedoresID_DEVEDOR: TIntegerField
FieldName = 'ID_DEVEDOR'
Required = True
end
object tblCampanhaDevedoresTX_DOCUMENTO: TWideStringField
FieldName = 'TX_DOCUMENTO'
end
object tblCampanhaDevedoresTP_ESTADO: TWideStringField
FieldName = 'TP_ESTADO'
Size = 1
end
object tblCampanhaDevedoresTX_NOME: TStringField
FieldKind = fkLookup
FieldName = 'TX_NOME'
LookupDataSet = tblDevedores
LookupKeyFields = 'ID_DEVEDOR'
LookupResultField = 'TX_NOME'
KeyFields = 'ID_DEVEDOR'
Size = 120
Lookup = True
end
object tblCampanhaDevedoresTP_COBRANDO: TIntegerField
FieldName = 'TP_COBRANDO'
end
object tblCampanhaDevedoresID_ULTIMO_USUARIO: TIntegerField
FieldName = 'ID_ULTIMO_USUARIO'
end
object tblCampanhaDevedoresDT_HORA_ULTIMA_ATT: TDateTimeField
FieldName = 'DT_HORA_ULTIMA_ATT'
end
end
object tblHistorico: TZQuery
Connection = ZConnection
SortType = stIgnored
BeforeOpen = tblHistoricoBeforeOpen
BeforeEdit = tblHistoricoBeforeEdit
BeforePost = tblHistoricoBeforePost
AfterPost = tblHistoricoAfterPost
BeforeDelete = tblHistoricoBeforeDelete
OnPostError = tblHistoricoPostError
SQL.Strings = (
'select * from CHG_HISTORICO'
'order by DT_CONTATO DESC')
Params = <>
Sequence = seqHistoricos
SequenceField = 'ID_HISTORICO'
Left = 304
Top = 656
object tblHistoricoID_HISTORICO: TIntegerField
FieldName = 'ID_HISTORICO'
Required = True
end
object tblHistoricoID_DEVEDOR: TIntegerField
FieldName = 'ID_DEVEDOR'
end
object tblHistoricoID_COBRADOR: TIntegerField
FieldName = 'ID_COBRADOR'
end
object tblHistoricoID_TITULO: TIntegerField
FieldName = 'ID_TITULO'
end
object tblHistoricoID_PROVIDENCIA: TIntegerField
FieldName = 'ID_PROVIDENCIA'
end
object tblHistoricoDT_CONTATO: TDateTimeField
FieldName = 'DT_CONTATO'
end
object tblHistoricoTP_AGENDAMENTO: TWideStringField
FieldName = 'TP_AGENDAMENTO'
Size = 1
end
object tblHistoricoCD_PROTOCOLO: TWideStringField
FieldName = 'CD_PROTOCOLO'
end
object tblHistoricoTL_MEMO: TWideMemoField
FieldName = 'TL_MEMO'
BlobType = ftWideMemo
end
object tblHistoricoID_ULTIMO_USUARIO: TIntegerField
FieldName = 'ID_ULTIMO_USUARIO'
end
object tblHistoricoDT_HORA_ULTIMA_ATT: TDateTimeField
FieldName = 'DT_HORA_ULTIMA_ATT'
end
object tblHistoricoID_TITULOS: TWideStringField
FieldName = 'ID_TITULOS'
Size = 255
end
object tblHistoricoTX_ULTIMO_USUARIO: TStringField
FieldKind = fkLookup
FieldName = 'TX_ULTIMO_USUARIO'
LookupDataSet = tblUsuariosConsulta
LookupKeyFields = 'ID_USUARIO'
LookupResultField = 'TX_NOME'
KeyFields = 'ID_ULTIMO_USUARIO'
Size = 60
Lookup = True
end
object tblHistoricoTX_MEMO: TStringField
FieldKind = fkCalculated
FieldName = 'TX_MEMO'
Size = 10
Calculated = True
end
object tblHistoricoTX_PROVIDENCIA: TStringField
FieldKind = fkLookup
FieldName = 'TX_PROVIDENCIA'
LookupDataSet = tblProvidencias
LookupKeyFields = 'ID_PROVIDENCIA'
LookupResultField = 'TX_NOME'
KeyFields = 'ID_PROVIDENCIA'
Size = 255
Lookup = True
end
end
object tblProtocolo: TZQuery
Connection = ZConnection
SortedFields = 'ID_PROTOCOLO'
SortType = stDescending
BeforeOpen = tblProtocoloBeforeOpen
BeforeEdit = tblProtocoloBeforeEdit
BeforePost = tblProtocoloBeforePost
BeforeDelete = tblProtocoloBeforeDelete
SQL.Strings = (
'select * from CHG_COBRANCA_TITULOS')
Params = <>
IndexFieldNames = 'ID_PROTOCOLO Desc'
Left = 760
Top = 128
object tblProtocoloID_PROTOCOLO: TIntegerField
FieldName = 'ID_PROTOCOLO'
Required = True
end
object tblProtocoloCD_PROTOCOLO: TWideStringField
FieldName = 'CD_PROTOCOLO'
Required = True
end
object tblProtocoloQNT_TITULOS: TIntegerField
FieldName = 'QNT_TITULOS'
Required = True
end
object tblProtocoloID_TITULOS: TWideMemoField
FieldName = 'ID_TITULOS'
Required = True
BlobType = ftWideMemo
end
object tblProtocoloID_DEVEDOR: TIntegerField
FieldName = 'ID_DEVEDOR'
Required = True
end
object tblProtocoloVL_ENTRADA: TFloatField
FieldName = 'VL_ENTRADA'
Required = True
end
object tblProtocoloVL_JUROS: TFloatField
FieldName = 'VL_JUROS'
Required = True
end
object tblProtocoloVL_MULTA: TFloatField
FieldName = 'VL_MULTA'
Required = True
end
object tblProtocoloVL_INDICADOR: TFloatField
FieldName = 'VL_INDICADOR'
Required = True
end
object tblProtocoloVL_ENCARGOS: TFloatField
FieldName = 'VL_ENCARGOS'
Required = True
end
object tblProtocoloVL_CORRIGIDO: TFloatField
FieldName = 'VL_CORRIGIDO'
Required = True
end
object tblProtocoloTP_DESC_QUIT: TWideStringField
FieldName = 'TP_DESC_QUIT'
Required = True
Size = 1
end
object tblProtocoloPR_QUIT_JUROS: TFloatField
FieldName = 'PR_QUIT_JUROS'
Required = True
end
object tblProtocoloPR_QUIT_MULTA: TFloatField
FieldName = 'PR_QUIT_MULTA'
Required = True
end
object tblProtocoloPR_QUIT_INDICADOR: TFloatField
FieldName = 'PR_QUIT_INDICADOR'
Required = True
end
object tblProtocoloPR_QUIT_PRINCIPAL: TFloatField
FieldName = 'PR_QUIT_PRINCIPAL'
Required = True
end
object tblProtocoloTP_DESC_PAR: TWideStringField
FieldName = 'TP_DESC_PAR'
Required = True
Size = 1
end
object tblProtocoloPR_PARCELAR_JUROS: TFloatField
FieldName = 'PR_PARCELAR_JUROS'
Required = True
end
object tblProtocoloPR_PARCELAR_MULTA: TFloatField
FieldName = 'PR_PARCELAR_MULTA'
Required = True
end
object tblProtocoloPR_PARCELAR_INDICADOR: TFloatField
FieldName = 'PR_PARCELAR_INDICADOR'
Required = True
end
object tblProtocoloPR_PARCELAR_PRINCIPAL: TFloatField
FieldName = 'PR_PARCELAR_PRINCIPAL'
Required = True
end
object tblProtocoloNR_PARCELAS: TIntegerField
FieldName = 'NR_PARCELAS'
Required = True
end
object tblProtocoloDT_PROTOCOLO: TDateTimeField
FieldName = 'DT_PROTOCOLO'
end
object tblProtocoloPR_QUIT_COR: TFloatField
FieldName = 'PR_QUIT_COR'
end
object tblProtocoloPR_PARCELAR_COR: TFloatField
FieldName = 'PR_PARCELAR_COR'
end
object tblProtocoloTP_DESC_QUIT_COR: TWideStringField
FieldName = 'TP_DESC_QUIT_COR'
Size = 1
end
object tblProtocoloTP_PAG: TWideStringField
FieldName = 'TP_PAG'
Size = 2
end
object tblProtocoloTP_DESC_PAR_COR: TWideStringField
FieldName = 'TP_DESC_PAR_COR'
Size = 1
end
object tblProtocoloID_EMPRESA: TIntegerField
FieldName = 'ID_EMPRESA'
end
object tblProtocoloPR_ENTRADA: TFloatField
FieldName = 'PR_ENTRADA'
end
end
object tblDespesasTitulos: TZQuery
Connection = ZConnection
SortedFields = 'ID_DESPESA'
BeforeOpen = tblDespesasTitulosBeforeOpen
BeforePost = tblDespesasTitulosBeforePost
SQL.Strings = (
'select * from CHG_DESPESAS_TITULOS')
Params = <>
IndexFieldNames = 'ID_DESPESA Asc'
Left = 912
Top = 24
object tblDespesasTitulosID_DESPESA: TIntegerField
FieldName = 'ID_DESPESA'
Required = True
end
object tblDespesasTitulosID_TITULO: TIntegerField
FieldName = 'ID_TITULO'
Required = True
end
object tblDespesasTitulosTX_DESCRICAO: TWideStringField
FieldName = 'TX_DESCRICAO'
Size = 60
end
object tblDespesasTitulosVL_DESPESA: TFloatField
FieldName = 'VL_DESPESA'
end
object tblDespesasTitulosTP_DESPESA: TWideStringField
FieldName = 'TP_DESPESA'
Size = 10
end
end
object tblIndicadorFinanceiro: TZQuery
Connection = ZConnection
SortedFields = 'ID_INDICADOR'
BeforeOpen = tblIndicadorFinanceiroBeforeOpen
BeforeEdit = tblIndicadorFinanceiroBeforeEdit
BeforePost = tblIndicadorFinanceiroBeforePost
BeforeDelete = tblIndicadorFinanceiroBeforeDelete
SQL.Strings = (
'select * from CHG_INDICADORES_FINANCEIROS')
Params = <>
IndexFieldNames = 'ID_INDICADOR Asc'
Left = 912
Top = 80
object tblIndicadorFinanceiroID_INDICADOR: TIntegerField
FieldName = 'ID_INDICADOR'
Required = True
end
object tblIndicadorFinanceiroID_CHG_EMPRESA: TIntegerField
FieldName = 'ID_CHG_EMPRESA'
Required = True
end
object tblIndicadorFinanceiroPR_INDICADOR: TFloatField
FieldName = 'PR_INDICADOR'
end
object tblIndicadorFinanceiroVL_INDICADOR: TFloatField
FieldName = 'VL_INDICADOR'
end
object tblIndicadorFinanceiroTP_INDICADOR: TWideStringField
FieldName = 'TP_INDICADOR'
Size = 1
end
object tblIndicadorFinanceiroATRASO_MIN: TIntegerField
FieldName = 'ATRASO_MIN'
end
object tblIndicadorFinanceiroATRASO_MAX: TIntegerField
FieldName = 'ATRASO_MAX'
end
end
object tblTelefones: TZQuery
Connection = ZConnection
SortedFields = 'ID_TELEFONE'
BeforeOpen = tblTelefonesBeforeOpen
OnCalcFields = tblTelefonesCalcFields
BeforeEdit = tblTelefonesBeforeEdit
BeforePost = tblTelefonesBeforePost
BeforeDelete = tblTelefonesBeforeDelete
SQL.Strings = (
'select * from CHG_TELEFONES')
Params = <>
IndexFieldNames = 'ID_TELEFONE Asc'
Sequence = seqTelefones
SequenceField = 'ID_TELEFONE'
Left = 544
Top = 608
object tblTelefonesID_TELEFONE: TIntegerField
FieldName = 'ID_TELEFONE'
Required = True
end
object tblTelefonesID_DEVEDOR: TIntegerField
FieldName = 'ID_DEVEDOR'
Required = True
end
object tblTelefonesNR_DDD: TWideStringField
FieldName = 'NR_DDD'
Size = 4
end
object tblTelefonesNR_NUMERO: TWideStringField
FieldName = 'NR_NUMERO'
end
object tblTelefonesTP_ATIVO: TWideStringField
FieldName = 'TP_ATIVO'
Size = 1
end
object tblTelefonesTP_TIPOTEL: TWideStringField
FieldName = 'TP_TIPOTEL'
Size = 1
end
object tblTelefonesTP_SMS: TWideStringField
FieldName = 'TP_SMS'
Size = 1
end
object tblTelefonesTX_DESC: TWideStringField
FieldName = 'TX_DESC'
Size = 100
end
object tblTelefonesTX_OBS: TWideMemoField
FieldName = 'TX_OBS'
BlobType = ftWideMemo
end
object tblTelefonesID_ULTIMO_USUARIO: TIntegerField
FieldName = 'ID_ULTIMO_USUARIO'
end
object tblTelefonesDT_HORA_ULTIMA_ATT: TDateTimeField
FieldName = 'DT_HORA_ULTIMA_ATT'
end
object tblTelefonesTX_ULTIMO_USUARIO: TStringField
FieldKind = fkLookup
FieldName = 'TX_ULTIMO_USUARIO'
LookupDataSet = tblUsuariosConsulta
LookupKeyFields = 'ID_USUARIO'
LookupResultField = 'TX_NOME'
KeyFields = 'ID_ULTIMO_USUARIO'
Size = 60
Lookup = True
end
object tblTelefonesTX_TELEFONE_COMPLETO: TWideStringField
FieldKind = fkCalculated
FieldName = 'TX_TELEFONE_COMPLETO'
Size = 15
Calculated = True
end
end
object tblEnderecos: TZQuery
Connection = ZConnection
SortedFields = 'ID_ENDERECO'
BeforeOpen = tblEnderecosBeforeOpen
OnCalcFields = tblEnderecosCalcFields
BeforeEdit = tblEnderecosBeforeEdit
BeforePost = tblEnderecosBeforePost
BeforeDelete = tblEnderecosBeforeDelete
SQL.Strings = (
'select * from CHG_ENDERECOS')
Params = <>
IndexFieldNames = 'ID_ENDERECO Asc'
Sequence = seqEnderecos
SequenceField = 'ID_ENDERECO'
Left = 304
Top = 608
object tblEnderecosID_ENDERECO: TIntegerField
FieldName = 'ID_ENDERECO'
Required = True
end
object tblEnderecosID_DEVEDOR: TIntegerField
FieldName = 'ID_DEVEDOR'
Required = True
end
object tblEnderecosTP_ENDERECO: TWideStringField
FieldName = 'TP_ENDERECO'
Size = 1
end
object tblEnderecosTP_ATIVO: TWideStringField
FieldName = 'TP_ATIVO'
Size = 1
end
object tblEnderecosTX_LOGRADOURO: TWideStringField
FieldName = 'TX_LOGRADOURO'
Size = 100
end
object tblEnderecosTX_BAIRRO: TWideStringField
FieldName = 'TX_BAIRRO'
Size = 100
end
object tblEnderecosID_CIDADE: TIntegerField
FieldName = 'ID_CIDADE'
end
object tblEnderecosID_ESTADO: TIntegerField
FieldName = 'ID_ESTADO'
end
object tblEnderecosTX_CEP: TWideStringField
FieldName = 'TX_CEP'
Size = 9
end
object tblEnderecosTX_COMPLEMENTO: TWideStringField
FieldName = 'TX_COMPLEMENTO'
Size = 100
end
object tblEnderecosNR_NUMERO: TFloatField
FieldName = 'NR_NUMERO'
end
object tblEnderecosTP_REFERENCIA: TWideStringField
FieldName = 'TP_REFERENCIA'
Size = 1
end
object tblEnderecosID_HIGIENIZADORA: TIntegerField
FieldName = 'ID_HIGIENIZADORA'
end
object tblEnderecosTP_CONFIRMADO: TWideStringField
FieldName = 'TP_CONFIRMADO'
Size = 1
end
object tblEnderecosID_ULTIMO_USUARIO: TIntegerField
FieldName = 'ID_ULTIMO_USUARIO'
end
object tblEnderecosDT_HORA_ULTIMA_ATT: TDateTimeField
FieldName = 'DT_HORA_ULTIMA_ATT'
end
object tblEnderecosTX_ULTIMO_USUARIO: TStringField
FieldKind = fkLookup
FieldName = 'TX_ULTIMO_USUARIO'
LookupDataSet = tblUsuariosConsulta
LookupKeyFields = 'ID_USUARIO'
LookupResultField = 'TX_NOME'
KeyFields = 'ID_ULTIMO_USUARIO'
Size = 60
Lookup = True
end
object tblEnderecosTX_ESTADO: TStringField
FieldKind = fkLookup
FieldName = 'TX_ESTADO'
LookupDataSet = tblEstados
LookupKeyFields = 'ID_ESTADO'
LookupResultField = 'TX_NOME'
KeyFields = 'ID_ESTADO'
Size = 60
Lookup = True
end
object tblEnderecosTX_CIDADE: TStringField
FieldKind = fkLookup
FieldName = 'TX_CIDADE'
LookupDataSet = tblCidadesConsulta
LookupKeyFields = 'ID_CIDADE'
LookupResultField = 'TX_NOME'
KeyFields = 'ID_CIDADE'
Size = 60
Lookup = True
end
object tblEnderecosTX_UF: TStringField
FieldKind = fkLookup
FieldName = 'TX_UF'
LookupDataSet = tblEstados
LookupKeyFields = 'ID_ESTADO'
LookupResultField = 'TX_SIGLA'
KeyFields = 'ID_ESTADO'
Size = 2
Lookup = True
end
object tblEnderecosTX_ENDERECO_COMPLETO: TWideStringField
FieldKind = fkCalculated
FieldName = 'TX_ENDERECO_COMPLETO'
Size = 255
Calculated = True
end
end
object tblFaixas: TZQuery
Connection = ZConnection
SortedFields = 'ID_FAIXA'
AfterInsert = tblFaixasAfterInsert
BeforeEdit = tblFaixasBeforeEdit
BeforePost = tblFaixasBeforePost
BeforeDelete = tblFaixasBeforeDelete
SQL.Strings = (
'select * from CHG_FAIXAS')
Params = <>
MasterFields = 'ID_POLITICA'
MasterSource = dtsPoliticas
LinkedFields = 'ID_POLITICA'
IndexFieldNames = 'ID_FAIXA Asc'
Left = 288
Top = 256
object tblFaixasID_FAIXA: TIntegerField
FieldName = 'ID_FAIXA'
Required = True
end
object tblFaixasID_POLITICA: TIntegerField
FieldName = 'ID_POLITICA'
end
object tblFaixasTX_DESCRICAO: TWideStringField
FieldName = 'TX_DESCRICAO'
Size = 40
end
object tblFaixasATRASO_MIN: TIntegerField
FieldName = 'ATRASO_MIN'
end
object tblFaixasATRASO_MAX: TIntegerField
FieldName = 'ATRASO_MAX'
end
object tblFaixasTP_JUROS: TWideStringField
FieldName = 'TP_JUROS'
Required = True
Size = 1
end
object tblFaixasPR_JUROS: TFloatField
FieldName = 'PR_JUROS'
Required = True
end
object tblFaixasNR_JUROS: TFloatField
FieldName = 'NR_JUROS'
Required = True
end
object tblFaixasPR_MULTA: TFloatField
FieldName = 'PR_MULTA'
Required = True
end
object tblFaixasPR_DESC_QUIT_PRIN: TFloatField
FieldName = 'PR_DESC_QUIT_PRIN'
Required = True
end
object tblFaixasPR_DESC_QUIT_JUROS: TFloatField
FieldName = 'PR_DESC_QUIT_JUROS'
Required = True
end
object tblFaixasPR_DESC_QUIT_MULTA: TFloatField
FieldName = 'PR_DESC_QUIT_MULTA'
Required = True
end
object tblFaixasPR_DESC_QUIT_IND_FIN: TFloatField
FieldName = 'PR_DESC_QUIT_IND_FIN'
Required = True
end
object tblFaixasPR_DESC_QUIT_COR: TFloatField
FieldName = 'PR_DESC_QUIT_COR'
end
object tblFaixasPR_DESC_FINAN_PRIN: TFloatField
FieldName = 'PR_DESC_FINAN_PRIN'
Required = True
end
object tblFaixasPR_DESC_FINAN_JUROS: TFloatField
FieldName = 'PR_DESC_FINAN_JUROS'
Required = True
end
object tblFaixasPR_DESC_FINAN_MULTA: TFloatField
FieldName = 'PR_DESC_FINAN_MULTA'
Required = True
end
object tblFaixasPR_DESC_FINAN_COR: TFloatField
FieldName = 'PR_DESC_FINAN_COR'
end
object tblFaixasPR_DESC_FINAN_IND_FIN: TFloatField
FieldName = 'PR_DESC_FINAN_IND_FIN'
Required = True
end
object tblFaixasID_ULTIMO_USUARIO: TIntegerField
FieldName = 'ID_ULTIMO_USUARIO'
end
object tblFaixasDT_HORA_ULTIMA_ATT: TDateTimeField
FieldName = 'DT_HORA_ULTIMA_ATT'
end
object tblFaixasDT_MIN: TDateTimeField
FieldName = 'DT_MIN'
end
object tblFaixasDT_MAX: TDateTimeField
FieldName = 'DT_MAX'
end
object tblFaixasTP_FAIXA: TWideStringField
FieldName = 'TP_FAIXA'
Size = 1
end
end
object tblPoliticas: TZQuery
Connection = ZConnection
SortedFields = 'ID_POLITICA'
AfterInsert = tblPoliticasAfterInsert
BeforeEdit = tblPoliticasBeforeEdit
BeforePost = tblPoliticasBeforePost
AfterPost = tblPoliticasAfterPost
BeforeDelete = tblPoliticasBeforeDelete
SQL.Strings = (
'select * from CHG_POLITICAS')
Params = <>
MasterFields = 'ID_EMPRESA'
MasterSource = dtsCHGEmpresa
LinkedFields = 'ID_EMPRESA'
IndexFieldNames = 'ID_POLITICA Asc'
Left = 288
Top = 200
object tblPoliticasID_POLITICA: TIntegerField
FieldName = 'ID_POLITICA'
Required = True
end
object tblPoliticasID_EMPRESA: TIntegerField
FieldName = 'ID_EMPRESA'
end
object tblPoliticasTX_DESCRICAO: TWideStringField
FieldName = 'TX_DESCRICAO'
Size = 40
end
object tblPoliticasDT_INICIO: TDateTimeField
FieldName = 'DT_INICIO'
end
object tblPoliticasDT_FIM: TDateTimeField
FieldName = 'DT_FIM'
end
object tblPoliticasID_ULTIMO_USUARIO: TIntegerField
FieldName = 'ID_ULTIMO_USUARIO'
end
object tblPoliticasDT_HORA_ULTIMA_ATT: TDateTimeField
FieldName = 'DT_HORA_ULTIMA_ATT'
end
end
object tblCidades: TZQuery
Connection = ZConnection
SortedFields = 'TX_NOME'
AfterOpen = tblCidadesAfterOpen
AfterInsert = tblCidadesAfterInsert
SQL.Strings = (
'select * from SYS_CIDADES')
Params = <>
MasterFields = 'ID_ESTADO'
MasterSource = dtsEstados
LinkedFields = 'ID_ESTADO'
IndexFieldNames = 'TX_NOME Asc'
Left = 288
Top = 80
object tblCidadesID_CIDADE: TIntegerField
FieldName = 'ID_CIDADE'
Required = True
end
object tblCidadesTX_NOME: TWideStringField
FieldName = 'TX_NOME'
Size = 60
end
object tblCidadesID_ESTADO: TIntegerField
FieldName = 'ID_ESTADO'
end
object tblCidadesCD_IBGE: TWideStringField
FieldName = 'CD_IBGE'
Size = 10
end
end
object tblDevedores: TZQuery
Connection = ZConnection
SortedFields = 'TX_NOME'
AfterOpen = tblDevedoresAfterOpen
OnCalcFields = tblDevedoresCalcFields
BeforeEdit = tblDevedoresBeforeEdit
BeforePost = tblDevedoresBeforePost
BeforeDelete = tblDevedoresBeforeDelete
SQL.Strings = (
'select * from CHG_DEVEDORES')
Params = <>
IndexFieldNames = 'TX_NOME Asc'
Sequence = seqDevedores
SequenceField = 'ID_DEVEDOR'
Left = 544
Top = 656
object tblDevedoresID_DEVEDOR: TIntegerField
FieldName = 'ID_DEVEDOR'
Required = True
end
object tblDevedoresTP_CLIENTE: TWideStringField
FieldName = 'TP_CLIENTE'
Size = 1
end
object tblDevedoresTX_PAI: TWideStringField
FieldName = 'TX_PAI'
Size = 60
end
object tblDevedoresTX_NOME: TWideStringField
FieldName = 'TX_NOME'
Size = 60
end
object tblDevedoresTX_MAE: TWideStringField
FieldName = 'TX_MAE'
Size = 60
end
object tblDevedoresDT_CADASTRO: TDateTimeField
FieldName = 'DT_CADASTRO'
end
object tblDevedoresDT_NASC: TDateTimeField
FieldName = 'DT_NASC'
end
object tblDevedoresCD_CPF: TWideStringField
FieldName = 'CD_CPF'
Size = 14
end
object tblDevedoresCD_CNPJ: TWideStringField
FieldName = 'CD_CNPJ'
Size = 18
end
object tblDevedoresTL_MEMO: TWideMemoField
FieldName = 'TL_MEMO'
BlobType = ftWideMemo
end
object tblDevedoresID_COBRADOR: TIntegerField
FieldName = 'ID_COBRADOR'
end
object tblDevedoresCD_RG: TWideStringField
FieldName = 'CD_RG'
end
object tblDevedoresCD_DEVEDOR: TWideStringField
FieldName = 'CD_DEVEDOR'
end
object tblDevedoresTX_EMAIL: TWideStringField
FieldName = 'TX_EMAIL'
Size = 60
end
object tblDevedoresID_ULTIMO_USUARIO: TIntegerField
FieldName = 'ID_ULTIMO_USUARIO'
end
object tblDevedoresDT_HORA_ULTIMA_ATT: TDateTimeField
FieldName = 'DT_HORA_ULTIMA_ATT'
end
object tblDevedoresTX_ULTIMO_USUARIO: TStringField
FieldKind = fkLookup
FieldName = 'TX_ULTIMO_USUARIO'
LookupDataSet = tblUsuariosConsulta
LookupKeyFields = 'ID_USUARIO'
LookupResultField = 'TX_NOME'
KeyFields = 'ID_ULTIMO_USUARIO'
Size = 60
Lookup = True
end
object tblDevedoresCD_DOCUMENTO: TStringField
FieldKind = fkCalculated
FieldName = 'CD_DOCUMENTO'
Size = 24
Calculated = True
end
object tblDevedoresNR_DIA_VENCIMENTO: TIntegerField
FieldName = 'NR_DIA_VENCIMENTO'
end
object tblDevedoresNR_DIAS_AGENDA: TIntegerField
FieldName = 'NR_DIAS_AGENDA'
end
object tblDevedoresID_ENDERECO_BOLETO: TIntegerField
FieldName = 'ID_ENDERECO_BOLETO'
end
object tblDevedoresID_TELEFONE_BOLETO: TIntegerField
FieldName = 'ID_TELEFONE_BOLETO'
end
object tblDevedoresID_EMAIL_BOLETO: TIntegerField
FieldName = 'ID_EMAIL_BOLETO'
end
object tblDevedoresTX_MENSAGEM_BOLETO_1: TWideStringField
FieldName = 'TX_MENSAGEM_BOLETO_1'
Size = 78
end
object tblDevedoresTX_MENSAGEM_BOLETO_2: TWideStringField
FieldName = 'TX_MENSAGEM_BOLETO_2'
Size = 78
end
object tblDevedoresTX_MENSAGEM_BOLETO_3: TWideStringField
FieldName = 'TX_MENSAGEM_BOLETO_3'
Size = 78
end
object tblDevedoresTX_MENSAGEM_BOLETO_4: TWideStringField
FieldName = 'TX_MENSAGEM_BOLETO_4'
Size = 78
end
object tblDevedoresTX_MENSAGEM_BOLETO_5: TWideStringField
FieldName = 'TX_MENSAGEM_BOLETO_5'
Size = 78
end
object tblDevedoresVL_NOMINAL_BOLETO: TFloatField
FieldName = 'VL_NOMINAL_BOLETO'
end
object tblDevedoresTP_DESC_BOLETO_1: TWideStringField
FieldName = 'TP_DESC_BOLETO_1'
Size = 1
end
object tblDevedoresTP_DESC_BOLETO_2: TWideStringField
FieldName = 'TP_DESC_BOLETO_2'
Size = 1
end
object tblDevedoresTP_DESC_BOLETO_3: TWideStringField
FieldName = 'TP_DESC_BOLETO_3'
Size = 1
end
object tblDevedoresNR_DIAS_DESC_BOLETO_1: TIntegerField
FieldName = 'NR_DIAS_DESC_BOLETO_1'
end
object tblDevedoresNR_DIAS_DESC_BOLETO_2: TIntegerField
FieldName = 'NR_DIAS_DESC_BOLETO_2'
end
object tblDevedoresNR_DIAS_DESC_BOLETO_3: TIntegerField
FieldName = 'NR_DIAS_DESC_BOLETO_3'
end
object tblDevedoresPR_DESC_BOLETO_1: TFloatField
FieldName = 'PR_DESC_BOLETO_1'
end
object tblDevedoresPR_DESC_BOLETO_2: TFloatField
FieldName = 'PR_DESC_BOLETO_2'
end
object tblDevedoresPR_DESC_BOLETO_3: TFloatField
FieldName = 'PR_DESC_BOLETO_3'
end
object tblDevedoresVL_DESC_BOLETO_1: TFloatField
FieldName = 'VL_DESC_BOLETO_1'
end
object tblDevedoresVL_DESC_BOLETO_2: TFloatField
FieldName = 'VL_DESC_BOLETO_2'
end
object tblDevedoresVL_DESC_BOLETO_3: TFloatField
FieldName = 'VL_DESC_BOLETO_3'
end
object tblDevedoresTP_MULTA_BOLETO: TWideStringField
FieldName = 'TP_MULTA_BOLETO'
Size = 1
end
object tblDevedoresNR_DIAS_MULTA_BOLETO: TIntegerField
FieldName = 'NR_DIAS_MULTA_BOLETO'
end
object tblDevedoresPR_MULTA_BOLETO: TFloatField
FieldName = 'PR_MULTA_BOLETO'
end
object tblDevedoresVL_MULTA_BOLETO: TFloatField
FieldName = 'VL_MULTA_BOLETO'
end
object tblDevedoresTP_MORA_BOLETO: TWideStringField
FieldName = 'TP_MORA_BOLETO'
Size = 1
end
object tblDevedoresNR_MORA_BOLETO: TIntegerField
FieldName = 'NR_MORA_BOLETO'
end
object tblDevedoresPR_MORA_BOLETO: TFloatField
FieldName = 'PR_MORA_BOLETO'
end
object tblDevedoresVL_MORA_BOLETO: TFloatField
FieldName = 'VL_MORA_BOLETO'
end
object tblDevedoresTX_SUFIXO_SEU_NUMERO: TWideStringField
FieldName = 'TX_SUFIXO_SEU_NUMERO'
Size = 5
end
end
object tblTextoEmail: TZQuery
Connection = ZConnection
SortedFields = 'ID_TEXTO'
BeforeEdit = tblTextoEmailBeforeEdit
BeforePost = tblTextoEmailBeforePost
BeforeDelete = tblTextoEmailBeforeDelete
SQL.Strings = (
'select * from SYS_TEXTO_EMAIL')
Params = <>
IndexFieldNames = 'ID_TEXTO Asc'
Left = 912
Top = 248
object tblTextoEmailID_TEXTO: TIntegerField
FieldName = 'ID_TEXTO'
Required = True
end
object tblTextoEmailTX_DESCRICAO: TWideStringField
FieldName = 'TX_DESCRICAO'
Required = True
Size = 255
end
object tblTextoEmailTL_TEXTO: TWideMemoField
FieldName = 'TL_TEXTO'
Required = True
BlobType = ftWideMemo
end
end
object dtsTextoEmail: TDataSource
DataSet = tblTextoEmail
Left = 1024
Top = 296
end
object tblEmail: TZQuery
Connection = ZConnection
BeforeOpen = tblEmailBeforeOpen
BeforeEdit = tblEmailBeforeEdit
BeforePost = tblEmailBeforePost
BeforeDelete = tblEmailBeforeDelete
SQL.Strings = (
'select * from chg_emails')
Params = <>
Left = 912
Top = 304
object tblEmailID_DEVEDOR: TIntegerField
FieldName = 'ID_DEVEDOR'
end
object tblEmailTX_EMAIL: TWideStringField
FieldName = 'TX_EMAIL'
Size = 40
end
object tblEmailID_ULTIMO_USUARIO: TIntegerField
FieldName = 'ID_ULTIMO_USUARIO'
end
object tblEmailDT_HORA_ULTIMA_ATT: TDateTimeField
FieldName = 'DT_HORA_ULTIMA_ATT'
end
object tblEmailTX_ULTIMO_USUARIO: TStringField
FieldKind = fkLookup
FieldName = 'TX_ULTIMO_USUARIO'
LookupDataSet = tblUsuariosConsulta
LookupKeyFields = 'ID_USUARIO'
LookupResultField = 'TX_NOME'
KeyFields = 'ID_ULTIMO_USUARIO'
Lookup = True
end
object tblEmailID_EMAIL: TIntegerField
FieldName = 'ID_EMAIL'
Required = True
end
end
object dtsEmail: TDataSource
DataSet = tblEmail
Left = 1024
Top = 352
end
object dtsLogCampanhas: TDataSource
Left = 1024
Top = 408
end
object tblLogCampanhas: TZQuery
Connection = ZConnection
BeforePost = tblLogCampanhasBeforePost
SQL.Strings = (
'select * from sys_campanhas_old')
Params = <>
Left = 912
Top = 360
object tblLogCampanhasID_ITEM: TIntegerField
FieldName = 'ID_ITEM'
Required = True
end
object tblLogCampanhasID_CAMPANHA: TIntegerField
FieldName = 'ID_CAMPANHA'
Required = True
end
object tblLogCampanhasTX_NOME_CAMPANHA: TWideStringField
FieldName = 'TX_NOME_CAMPANHA'
Required = True
Size = 40
end
object tblLogCampanhasID_DEVEDOR: TIntegerField
FieldName = 'ID_DEVEDOR'
Required = True
end
object tblLogCampanhasID_USUARIO: TIntegerField
FieldName = 'ID_USUARIO'
Required = True
end
object tblLogCampanhasDT_TRANSF: TDateTimeField
FieldName = 'DT_TRANSF'
Required = True
end
object tblLogCampanhasTP_ACAO: TWideStringField
FieldName = 'TP_ACAO'
end
end
object dtsAcordos: TDataSource
DataSet = tblAcordos
Left = 1024
Top = 464
end
object tblAcordos: TZQuery
Connection = ZConnection
BeforeEdit = tblAcordosBeforeEdit
BeforePost = tblAcordosBeforePost
BeforeDelete = tblAcordosBeforeDelete
SQL.Strings = (
'select * from sys_acordos')
Params = <>
Left = 912
Top = 416
object tblAcordosID_ITEM: TIntegerField
FieldName = 'ID_ITEM'
Required = True
end
object tblAcordosID_ACORDO: TIntegerField
FieldName = 'ID_ACORDO'
Required = True
end
object tblAcordosID_PARCELA: TIntegerField
FieldName = 'ID_PARCELA'
Required = True
end
object tblAcordosID_ORIGINAL: TIntegerField
FieldName = 'ID_ORIGINAL'
Required = True
end
object tblAcordosID_DEVEDOR: TIntegerField
FieldName = 'ID_DEVEDOR'
Required = True
end
end
object zroQryAcordos: TZReadOnlyQuery
Connection = ZConnection
SQL.Strings = (
'select * from sys_acordos')
Params = <>
Left = 1112
Top = 464
object zroQryAcordosID_ITEM: TIntegerField
FieldName = 'ID_ITEM'
Required = True
end
object zroQryAcordosID_ACORDO: TIntegerField
FieldName = 'ID_ACORDO'
Required = True
end
object zroQryAcordosID_PARCELA: TIntegerField
FieldName = 'ID_PARCELA'
Required = True
end
object zroQryAcordosID_ORIGINAL: TIntegerField
FieldName = 'ID_ORIGINAL'
Required = True
end
object zroQryAcordosID_DEVEDOR: TIntegerField
FieldName = 'ID_DEVEDOR'
Required = True
end
object zroQryAcordosTX_NOME: TStringField
FieldKind = fkLookup
FieldName = 'TX_NOME'
LookupDataSet = tblTitulos
LookupKeyFields = 'ID_TITULO'
LookupResultField = 'TX_PRODUTO'
KeyFields = 'ID_PARCELA'
Size = 60
Lookup = True
end
object zroQryAcordosVL_TITULO: TCurrencyField
FieldKind = fkLookup
FieldName = 'VL_TITULO'
LookupDataSet = tblTitulos
LookupKeyFields = 'ID_TITULO'
LookupResultField = 'VL_TITULO'
KeyFields = 'ID_PARCELA'
Lookup = True
end
object zroQryAcordosDT_VENCIMENTO: TDateField
FieldKind = fkLookup
FieldName = 'DT_VENCIMENTO'
LookupDataSet = tblTitulos
LookupKeyFields = 'ID_TITULO'
LookupResultField = 'DT_VENCIMENTO'
KeyFields = 'ID_PARCELA'
Lookup = True
end
end
object dtsQAcordos: TDataSource
DataSet = zroQryAcordos
Left = 1112
Top = 410
end
object tblRepasseFase: TZQuery
Connection = ZConnection
BeforeOpen = tblRepasseFaseBeforeOpen
AfterOpen = tblRepasseFaseAfterOpen
BeforePost = tblRepasseFaseBeforePost
SQL.Strings = (
'select * from sys_repasses_fases')
Params = <>
Left = 1128
Top = 24
object tblRepasseFaseID_FASE: TIntegerField
FieldName = 'ID_FASE'
Required = True
end
object tblRepasseFasePR_PRINCIPAL: TFloatField
FieldName = 'PR_PRINCIPAL'
end
object tblRepasseFasePR_JUROS: TFloatField
FieldName = 'PR_JUROS'
end
object tblRepasseFasePR_MULTA: TFloatField
FieldName = 'PR_MULTA'
end
object tblRepasseFasePR_ENCARGOS: TFloatField
FieldName = 'PR_ENCARGOS'
end
object tblRepasseFasePR_CORRIGIDO: TFloatField
FieldName = 'PR_CORRIGIDO'
end
object tblRepasseFaseMIN_ATRASO: TIntegerField
FieldName = 'MIN_ATRASO'
end
object tblRepasseFaseMAX_ATRASO: TIntegerField
FieldName = 'MAX_ATRASO'
end
object tblRepasseFaseID_REPASSE: TIntegerField
FieldName = 'ID_REPASSE'
end
object tblRepasseFaseID_ULTIMO_USUARIO: TIntegerField
FieldName = 'ID_ULTIMO_USUARIO'
end
object tblRepasseFaseDT_HORA_ULTIMA_ATT: TDateTimeField
FieldName = 'DT_HORA_ULTIMA_ATT'
end
end
object dtsRepasseFase: TDataSource
DataSet = tblRepasseFase
OnDataChange = dtsRepasseFaseDataChange
Left = 1128
Top = 80
end
object zroqryContatos: TZReadOnlyQuery
Connection = ZConnection
SQL.Strings = (
'select first 0'
'h.id_cobrador,'
'case when u.tx_nome is not NULL then u.tx_nome when u.tx_nome is' +
' NULL then '#39'Usu'#225'rio Inexistente'#39' end as NOME,'
'COUNT (DISTINCT h.ID_DEVEDOR) as qtde_acionamentos'
'from chg_historico h'
'left join sys_usuarios u on h.id_cobrador = u.id_usuario'
'where h.id_cobrador in (select id_usuario from sys_usuarios wher' +
'e tp_ativo = '#39'S'#39')'
'and CAST(h.dt_contato AS DATE) >= '#39'2019-10-15'#39' and'
'CAST(h.dt_contato AS DATE) <= '#39'2019-10-15'#39
'and h.id_cobrador = 7'
'group by h.id_cobrador, u.tx_nome'
'order by NOME, qtde_acionamentos desc')
Params = <>
Left = 1112
Top = 352
object zroqryContatosID_COBRADOR: TIntegerField
FieldName = 'ID_COBRADOR'
end
object zroqryContatosNOME: TWideStringField
FieldName = 'NOME'
ReadOnly = True
Size = 60
end
object zroqryContatosQTDE_ACIONAMENTOS: TIntegerField
FieldName = 'QTDE_ACIONAMENTOS'
ReadOnly = True
end
end
object dtsContatos: TDataSource
DataSet = zroqryContatos
Left = 1112
Top = 296
end
object dtsDepartamentos: TDataSource
DataSet = tblDepartamentos
Left = 400
Top = 376
end
object tblDepartamentos: TZQuery
Connection = ZConnection
SortedFields = 'TX_NOME'
BeforeEdit = tblDepartamentosBeforeEdit
BeforePost = tblDepartamentosBeforePost
BeforeDelete = tblDepartamentosBeforeDelete
SQL.Strings = (
'SELECT * FROM CHG_DEPARTAMENTOS')
Params = <>
IndexFieldNames = 'TX_NOME Asc'
Left = 288
Top = 376
object tblDepartamentosID_DEPARTAMENTOS: TIntegerField
FieldName = 'ID_DEPARTAMENTOS'
Required = True
end
object tblDepartamentosTX_NOME: TWideStringField
FieldName = 'TX_NOME'
Size = 255
end
end
object dtsUsuariosConsulta: TDataSource
DataSet = tblUsuariosConsulta
Left = 40
Top = 520
end
object dtsEmpresaRepasse: TDataSource
DataSet = tblEmpresaRepasse
OnDataChange = dtsEmpresaRepasseDataChange
Left = 1128
Top = 128
end
object tblEmpresaRepasse: TZQuery
Connection = ZConnection
AfterOpen = tblEmpresaRepasseAfterOpen
BeforeEdit = tblEmpresaRepasseBeforeEdit
BeforePost = tblEmpresaRepasseBeforePost
AfterPost = tblEmpresaRepasseAfterPost
BeforeDelete = tblEmpresaRepasseBeforeDelete
SQL.Strings = (
'SELECT * FROM CHG_EMPRESA_REPASSE'
'order by ID_ANO, ID_MES')
Params = <>
Left = 1128
Top = 184
object tblEmpresaRepasseID_ITEM: TIntegerField
FieldName = 'ID_ITEM'
Required = True
end
object tblEmpresaRepasseID_EMPRESA: TIntegerField
FieldName = 'ID_EMPRESA'
Required = True
end
object tblEmpresaRepassePR_PRINCIPAL: TFloatField
FieldName = 'PR_PRINCIPAL'
Required = True
end
object tblEmpresaRepassePR_JUROS: TFloatField
FieldName = 'PR_JUROS'
Required = True
end
object tblEmpresaRepassePR_MULTA: TFloatField
FieldName = 'PR_MULTA'
Required = True
end
object tblEmpresaRepassePR_ENCARGOS: TFloatField
FieldName = 'PR_ENCARGOS'
Required = True
end
object tblEmpresaRepassePR_CORRIGIDO: TFloatField
FieldName = 'PR_CORRIGIDO'
Required = True
end
object tblEmpresaRepasseTX_NOME: TWideStringField
FieldName = 'TX_NOME'
Size = 255
end
object tblEmpresaRepasseID_MES: TIntegerField
FieldName = 'ID_MES'
Required = True
end
object tblEmpresaRepasseID_ANO: TIntegerField
FieldName = 'ID_ANO'
Required = True
end
end
object tblLog: TZQuery
Connection = ZConnection
SortedFields = 'ID_LOG'
BeforePost = tblLogBeforePost
OnPostError = tblLogPostError
SQL.Strings = (
'SELECT * FROM SYS_LOG'
'ORDER BY DT_LOG DESC')
Params = <>
IndexFieldNames = 'ID_LOG Asc'
Sequence = seqLogs
SequenceField = 'ID_LOG'
Left = 72
Top = 656
object tblLogID_LOG: TIntegerField
FieldName = 'ID_LOG'
Required = True
end
object tblLogTX_TABELA: TWideStringField
FieldName = 'TX_TABELA'
end
object tblLogID_REGISTRO: TIntegerField
FieldName = 'ID_REGISTRO'
end
object tblLogTX_ACAO: TWideStringField
FieldName = 'TX_ACAO'
Size = 255
end
object tblLogID_USUARIO: TIntegerField
FieldName = 'ID_USUARIO'
end
object tblLogDT_LOG: TDateTimeField
FieldName = 'DT_LOG'
end
object tblLogTL_ACAO: TWideMemoField
FieldName = 'TL_ACAO'
BlobType = ftWideMemo
end
end
object ZSQLProcessorAcordos: TZSQLProcessor
Params = <>
Connection = ZConnection
Delimiter = ';'
Left = 1112
Top = 512
end
object seqLogs: TZSequence
Connection = ZConnection
SequenceName = 'GEN_LOG'
Left = 128
Top = 656
end
object seqHistoricos: TZSequence
Connection = ZConnection
SequenceName = 'GEN_HISTORICOS'
Left = 392
Top = 656
end
object seqDevedores: TZSequence
Connection = ZConnection
SequenceName = 'GEN_DEVEDORES'
Left = 632
Top = 656
end
object seqRecibos: TZSequence
Connection = ZConnection
SequenceName = 'GEN_RECIBOS'
Left = 128
Top = 608
end
object seqEnderecos: TZSequence
Connection = ZConnection
SequenceName = 'GEN_ENDERECOS'
Left = 392
Top = 608
end
object seqTelefones: TZSequence
Connection = ZConnection
SequenceName = 'GEN_TELEFONES'
Left = 632
Top = 608
end
object ImageList1: TImageList
Left = 536
Top = 488
Bitmap = {
494C01010C0018007C0210001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
0000000000003600000028000000400000004000000001002000000000000040
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000C58A6000C58A6000C58A6000C58A6000C58A6000C58A6000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000C58A6000C58A6000C58A6000C58A6000C58A6000C58A6000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000099330000993300009933000099330000993300009933
0000993300009933000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000E80AA000E80
AA000E80AA000E80AA000E80AA00000000000000000000000000000000000A66
C5000A66C5001978DA00609DDA007DA8D40079A3CD00578CC4001362B3000054
AE000C58A6000000000000000000000000000000000000000000000000000A66
C5000A66C5001978DA00609DDA007DA8D40079A3CD00578CC4001362B3000054
AE000C58A6000000000000000000000000000000000000000000000000000000
0000000000000000000099330000FEFEFE00FEFEFE00FEFEFE008EA4FD00B8C6
FD00FEFEFE00993300000000000000000000B7818300A4787400A4787400A478
7400A4787400A4787400A4787400A4787400A4787400078DBB0061DDEE0031E2
FF0047E3FF0093F1FF003AB7DD000E80AA0000000000000000000A66C5000B76
E60090C2F400F8F7F800E2ECF400C7DDF400C5DBF200DAE3EC00E6E2DF007098
C100065CB7000C58A600000000000000000000000000000000000A66C5000B76
E60090C2F400F8F7F800E2ECF400C7DDF400C5DBF200DAE3EC00E6E2DF007098
C100065CB7000C58A60000000000000000000000000088452400884524008845
2400884524008845240099330000FEFEFE00FAFBFE007E98FC000335FB00597A
FC00FEFEFE00993300000000000000000000B7818300F6E4C800F5E1C200F4DE
BD00F3DCB800F2D9B200F2D6AD00F1D4A800F0D2A400078DBB007EF9FF0023D9
FE0037DAFF0083E8FC0030B7E0000E80AA00000000000A66C4000A76E600B2D6
FA00FFFFFF0073B2F3002183EB000677E9000677EA002183EB0077B4F300FAF7
F30098B2CB00055DB8000C58A60000000000000000000A66C4000A76E600B2D6
FA00FFFFFF0073B2F3002183EB000677E9000677EA002183EB0077B4F300FAF7
F30098B2CB00055DB8000C58A6000000000088452400DA592E00F1624A00F56D
5400F87B5D00F7765C0099330000D6DEFE004368FC000335FB004066FC000436
FB00D9E0FE00993300000000000000000000B4817600F7E8D000F6E5CA00F5E2
C400F5E0BF00F4DDBA00F3DBB400F1D8AF00F1D6AA00078DBB00B6F9FD00B2EF
FC00CDF3FD00D5F5FC0097DAEF000E80AA00000000000A66C50093C5F800FEFE
FF004094ED000572E8000070E7000070E800006FE7000072E800006EE800509F
F100FAFBF80076A0CB000C58A60000000000000000000A66C50093C5F800FEFE
FF004197EE000066E6002285EB0055A1F0004F9EEF000C79E9000066E700509F
F100FAFBF80076A0CB000C58A6000000000088452400E45C3500F9785A00FD8B
6900C85B2A00F1B09F00993300005274FC001442FB00BCC9FD00EFF2FE001A47
FB004F72FC00973304000000000000000000B4817600F8ECD700F8E9D2000066
00000066000000660000F4DEBC000066000000660000078DBB007CCCE0002FAC
D000219CC40046ABCC0064B3D2000E80AA001F84E6002283E600FAFCFF0075B3
F3000474E800EFF6FE009FCBF6000073E800107CE900CFE5FB00CFE5FB00006E
E7007EB9F500F2EFED00156AC0000C58A6001F84E6002283E600FAFCFF0075B3
F3000068E700509FEF00EDF5FD00CFE5FB00E2EFFD00D8EAFC002888EC00006E
E7007EB9F500F2EFED00156AC0000C58A60088452400F26E4900FE8C6A00FA84
5F00C85B2A00FFF4F30099330000E4EAFE00D9E0FE00FEFEFE00FEFEFE0098AC
FD000335FB00643459000000000000000000BA8E8500FAF0DE00F9EDDA001693
2C0032D9650000660000F5E2C20016932C0032D96500078DBB0055D0E3002ED6
F60045DFFE0084E4F6002CA9D1000E80AA001F84E60079B8F500EEF6FD00288D
ED000D7FEB00D2E7FB00FFFFFF009FCBF600CFE5FB00FFFFFF009FCBF600006F
E7001F84EB00EAF2F900629EDC000C58A6001F84E60079B8F500EEF6FD00288D
ED001F88ED00E4F1FD006BB0F200006BE7000272E800B2D5F800B7D8F900006F
E7001F84EB00EAF2F900629EDC000C58A60000000000C54B2700FF886100C85B
2A00EEB5A300FCFDFD0099330000FEFEFE00FEFEFE00FEFEFE00FEFEFE00FEFE
FE005677FC000335FB000000000000000000BA8E8500FAF3E600FAF0E0001693
2C0016932C0016932C00F6E5CB0016932C0016932C00078DBB007EF7FE0028D9
FE003ED9FF0088E7FC0035B8DF000E80AA001F84E6009ACBF800D5EAFC00218F
EF001487EE002790EF00D4E9FC00FFFFFF00FFFFFF009FCBF6000073E8000070
E8000877E900D1E5FA008ABBEC000C58A6001F84E6009ACBF800D5EAFC00218F
EF004AA2F200F2F8FE001684EC00FFFFFF000071E8002B8AEB0093C4F5000070
E8000877E900D1E5FA008ABBEC000C58A6000000000000000000A8695C009D90
9000759EAE00729BA50099330000993300009933000099330000993300009933
00008F3311002235C8000335FB0000000000CB9A8200FBF6EC00FBF4E700FAF1
E200007F0000F8ECD800F8E9D300F7E6CC00007F0000088CB90099FDFF006DFB
FF0081FFFF00AAFDFF0050D1F3000E80AA001F84E600A0D1F900D7ECFD002E9A
F2002293F1003199F100D5E9FC00FFFFFF00FFFFFF009FCBF6000073E8000070
E8000877E900D2E6FB008FC3F7000C58A6001F84E600A0D1F900D7ECFD002E9A
F20042A3F300E9F4FE0053A6F200FFFFFF00FFFFFF002C8BEC00006CE7000070
E8000877E900D2E6FB008FC3F7000C58A60000000000000000001E87E4000C7E
D800147AD0000C72CF001888AF00000000000000000000000000000000000000
000000000000000000000335FB000335FB00CB9A8200FDF9F200FDF7EE00FBF5
EA00007F0000007F0000007F0000007F0000007F0000078DBB00D0F0F700FEFF
FF00D9FFFF00CCFFFF009FFAFC000E80AA001F84E60090CBFA00F0F7FE004BAD
F50034A1F400D8ECFD00FFFFFF00ABD4F900D4E9FC00FFFFFF009FCBF600006D
E7002084EB00EDF5FE006DB2F7000C58A6001F84E60090CBFA00F0F7FE004BAD
F500279AF3009FD2FA00FFFFFF00FFFFFF00FFFFFF00FFFFFF0074B3F200006D
E7002084EB00EDF5FE006DB2F7000C58A60000000000075177003296FD003699
FC003699FC003394F9002985F3001888AF000000000000000000000000000000
00000000000000000000000000000335FB00DCA88700FDFCF800FEFAF400FDF7
F000FCF5EB00FBF3E600007F0000FAEDDB00F9ECD600F8E8D100078DBB00078D
BB00078DBB00078DBB00078DBB00000000001F84E6004FAEF600FCFEFF0097D2
FB0041ABF700F3FAFF00B2DAFA002694F1002992EF00D3E8FC00CFE5FB00006A
E70080BAF300FAFDFF001B81E9000C58A6001F84E6004FAEF600FCFEFF0097D2
FB0035A6F60036A3F5008ECAF900FFFFFF00FFFFFF00B3D7F8002B8BEC00006A
E70080BAF300FAFDFF001B81E9000C58A600005A87001A6EAC0041A9FF0042AA
FE0041A7FB003DA4FB00379CFB002E8AF0001888AF0000000000000000000000
000000000000000000000000000000000000DCA88700FFFEFC00FEFCF900FDFA
F600FCF9F2000A14B1000618BB000B0EA700FAEEDD00F8ECD800F7EAD400F7E7
CE00986B6600000000000000000000000000000000001F84E600B7E4FD00FEFE
FF0075C6FA0042AEF70032A0F4002897F200188AEE001182ED000876E9004F9C
EF00FDFEFF008CC1F7000A66C50000000000000000001F84E600B7E4FD00FEFE
FF0079C8FA0036A8F70031A0F400FFFFFF0060AFF300037BEB00006BE7004F9C
EF00FDFEFF008CC1F7000A66C50000000000005580000751770041A6EF0040A4
EC0049B1FC0046ADFB003FA6FC00359AF9001888AF0000000000000000000000
000000000000000000000000000000000000E3B18E00FFFFFF00FEFEFD00FEFC
FB00FEFBF7000B3EFF002867FF000C1DBF00FBF3E500FAF0E000F9EDDA00F8EA
D500986B6600000000000000000000000000000000001F84E6005BC0FD00D2F1
FF00FFFFFF0099D4FB0050B0F700339EF3002593EF002C91EE0079B6F400FFFF
FF00B2D6FA000976E6000A66C50000000000000000001F84E6005BC0FD00D2F1
FF00FFFFFF0099D4FB0050B0F700339EF3002593EF002C91EE0079B6F400FFFF
FF00B2D6FA000976E6000A66C5000000000007689900106A9B00075177000751
77004FB9FF004AB1FC0044ABFC0039A0F8001888AF0000000000000000000000
000000000000000000000000000000000000E3B18E00FFFFFF00FFFFFF00FEFF
FE00FEFDFB00243AC9000B3EFF000D17B000FCF6EC00FBF4E700FAF0E200F9EE
DD00986B660000000000000000000000000000000000000000001F84E60060C4
FE00BAE6FF00FFFFFF00EEF8FE00D8EDFC00D6EBFC00ECF5FD00FFFFFF008AC0
F7000B76E6000A66C500000000000000000000000000000000001F84E60060C4
FE00BAE6FF00FFFFFF00EEF8FE00D8EDFC00D6EBFC00ECF5FD00FFFFFF008AC0
F7000B76E6000A66C50000000000000000002484B0006DADCB00065D87003291
CC0053BEFF0051BAFF004DB4FF001888AF000000000000000000000000000000
000000000000000000000000000000000000EDBD9200FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFDFC00FEFCF900FDFAF600FDF9F200FCF6EE00FBF4E800FAF1
E400986B66000000000000000000000000000000000000000000000000001F84
E6001F84E60054B4F8008FCDFB00A4D4FA009ECEF80077B8F5001F84E7000A66
C5000A66C5000000000000000000000000000000000000000000000000001F84
E6001F84E60054B4F8008FCDFB00A4D4FA009ECEF80077B8F5001F84E7000A66
C5000A66C500000000000000000000000000000000002583B0006DADCB00277D
A8000A5882000A588200005684001888AF000000000000000000000000000000
000000000000000000000000000000000000EDBD9200FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFEFD00FFFDFB00FEFBF700FDF9F400FCF7EF00FCF5
EB00986B66000000000000000000000000000000000000000000000000000000
0000000000001F84E6001F84E6001F84E6001F84E6001F84E6001F84E6000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000001F84E6001F84E6001F84E6001F84E6001F84E6001F84E6000000
00000000000000000000000000000000000000000000000000003990B9002983
AC00116B96000056840000000000000000000000000000000000000000000000
000000000000000000000000000000000000EDBD9200DAA48200DAA48200DAA4
8200DAA48200DAA48200DAA48200DAA48200DAA48200DAA48200DAA48200DAA4
8200986B66000000000000000000000000000000000000000000000000000000
0000000000000000990000009900000099000000990000009900000099000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000990000009900000099000000990000009900000099000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000990000009900000099000000990000009900000099000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000C58A6000C58A6000C58A6000C58A6000C58A6000C58A6000000
0000000000000000000000000000000000000000000000000000000000000019
BD000019BD001D40BF00667EC5008192C3007D8EBD005B72B10017349B000000
9500000095000000000000000000000000000000000000000000000000000019
BD000019BD001D40BF00667EC5008192C3007D8EBD005B72B10017349B000000
9500000095000000000000000000000000000000000000000000000000000019
BD000019BD001D40BF00667EC5008192C3007D8EBD005B72B10017349B000000
9500000095000000000000000000000000000000000000000000000000000A66
C5000A66C5001978DA00609DDA007DA8D40079A3CD00578CC4001362B3000054
AE000C58A60000000000000000000000000000000000000000000019BD000C34
D00094A9EB00F9F9F700E4E7F400C9D1F000C6CFED00DCDFEB00E5E5DE007484
B3000927990000009500000000000000000000000000000000000019BD000C34
D00094A9EB00F9F9F700E4E7F400C9D1F000C6CFED00DCDFEB00E5E5DE007484
B3000927990000009500000000000000000000000000000000000019BD000C34
D00094A9EB00F9F9F700E4E7F400C9D1F000C6CFED00DCDFEB00E5E5DE007484
B3000927990000009500000000000000000000000000000000000A66C5000B76
E60090C2F400F8F7F800E2ECF400C7DDF400C5DBF200DAE3EC00E6E2DF007098
C100065CB7000C58A6000000000000000000000000000019BD000D34D800B4C3
F500FFFFFF007891EF002249E100002DD900002ED400244AD7007E94E500FBF9
F5009AA5C300092799000000950000000000000000000019BD000D34D800B4C3
F500FFFFFF007891EF002249E100002DD900002ED400244AD7007E94E500FBF9
F5009AA5C300092799000000950000000000000000000019BD000D34D800B4C3
F500FFFFFF007891EF002249E100002DD900002ED400244AD7007E94E500FBF9
F5009AA5C300092799000000950000000000000000000A66C4000A76E600B2D6
FA00FFFFFF0073B2F3002183EB000677E9000677EA002183EB0077B4F300FAF7
F30098B2CB00055DB8000C58A60000000000000000000019BD0095ACF900FEFE
FF004367F0000025E6000535E600496AE900496AE6000734D9000023CE005674
DE00FAFBF900798BBD000000950000000000000000000019BD0095ACF900FEFE
FF004367F0000027E600002DE5000130E2000130DE00002CD8000025CF005674
DE00FAFBF900798BBD000000950000000000000000000019BD0095ACF900FEFE
FF003259EE000333E900224DEA00627FEC00133FE0000432D9000532D2003558
D600FAFBF900798BBD000000950000000000000000000A66C50093C5F800FEFE
FF004196EE00006AE700006BE7004E9EEF002B8BEC00006CE700006AE700509F
F100FAFBF80076A0CB000C58A600000000000032FE00234CEC00FAFBFF007792
F9000025F4000028F3001D49F300FFFFFF00F7F9FF001E49E6000027D9000024
CE00859AE700F2F2ED001939A700000095000032FE00234CEC00FAFBFF007792
F9000025F4000031F5000030F1000030EE000030E8000030E2000130DA000023
CE00859AE700F2F2ED001939A700000095000032FE00234CEC00FAFBFF007792
F9000133F5004166F6000233F100D0D9FD00EFF2FD00234CE5000432DB000532
D300859AE700F2F2ED001939A700000095001F84E6002283E600FAFCFF0075B3
F300006CE700006EE7006AAEF100FDFEFF0098C7F6000069E6000074E800006E
E7007EB9F500F2EFED00156AC0000C58A6000032FE007694FF00ECF0FF001E4B
FE000B37FE00224BFE003B62FC00FFFFFF00FFFFFF003D62EE001E46E6000631
DA00244BD700EBEEF8006780C700000095000032FE007694FF00ECF0FF001E4B
FE000533FE000A3AFE000738FB000738F8000838F1000838EB000A38E300032F
D900244BD700EBEEF8006780C700000095000032FE007694FF00ECF0FF001E4B
FE004368FE00DFE6FF000133FC005073FA00FFFFFF008199F4000333E3000432
DB00244BD700EBEEF8006780C700000095001F84E60079B8F500EEF6FD00288D
ED000B7BEA0079B7F400FFFFFF00FFFFFF00D8E9FB00127DEA000070E800006F
E7001F84EB00EAF2F900629EDC000C58A6000032FE0092A8FF00D4DDFF001040
FE005679FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF003258
E6000331D800D2D9F7008FA2DC00000095000032FE0092A8FF00D4DDFF001040
FE0089A2FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF008199
EE000331D800D2D9F7008FA2DC00000095000032FE0092A8FF00D4DDFF001040
FE005376FE00FFFFFF00A3B5FF00D0D9FF00FFFFFF005173F6000233EA000333
E1000331D800D2D9F7008FA2DC00000095001F84E6009ACBF800D5EAFC00218F
EF006AB3F400FFFFFF00D7EAFC0051A2F000EFF6FD004B9CEF00006DE7000070
E8000877E900D1E5FA008ABBEC000C58A6000032FE0099AFFF00D8E0FF002955
FD006A89FE00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF003159
EA000231DC00D2DAF90094A9E600000095000032FE0099AFFF00D8E0FF002955
FD00B7C6FE00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00A5B6
F5000231DC00D2DAF90094A9E600000095000032FE0099AFFF00D8E0FF002955
FD00325CFD00DAE1FF00FFFFFF00FFFFFF00FFFFFF00CFD9FD001240F1000333
E7000231DC00D2DAF90094A9E600000095001F84E600A0D1F900D7ECFD002E9A
F2003FA1F30097CCF8003598F000007AEB007CB9F500B1D4F8000070E7000070
E8000877E900D2E6FB008FC3F7000C58A6000032FE008CA4FF00F1F4FF005A7C
FD004B70FC005A7BFD006685FD00FFFFFF00FFFFFF003C63FE001D47F5000632
EA00224CE500EEF1FD00738EE300000095000032FE008CA4FF00F1F4FF005A7C
FD005F80FC00728EFD006585FD00587AFE00496DFE003A61FF003B62F7002349
EC00224CE500EEF1FD00738EE300000095000032FE008CA4FF00F1F4FF005A7C
FD004A6FFC00466CFC006D8BFD006080FE00C7D2FF00FFFFFF00A0B3FA000233
EB00224CE500EEF1FD00738EE300000095001F84E60090CBFA00F0F7FE004BAD
F5002C9CF4002296F2002493F1001A8CEE001584ED00BADAF9002587EB00006D
E7002084EB00EDF5FE006DB2F7000C58A6000032FE004B71FD00FCFCFF00AABC
FD00587AFB005075FB005D7EFD00FFFFFF00FFFFFF00224EFF000029F9000025
ED00839BF300FBFCFE001E45D000000095000032FE004B71FD00FCFCFF00AABC
FD005478FB005377FB004269FC002D58FD001645FE000033FF00002AF9000021
EB00839BF300FBFCFE001E45D000000095000032FE004B71FD00FCFCFF00AABC
FD006283FB005B7DFB004B70FC003760FD00305AFE00F0F3FF00FFFFFF004166
F200839BF300FBFCFE001E45D000000095001F84E6004FAEF600FCFEFF0097D2
FB0036A7F6003BA6F500309CF2002694F0001386ED003695EE0072B2F200006A
E70080BAF300FAFDFF001B81E9000C58A600000000000032FE00BBC9FD00FFFF
FF009BB0FB006384FA00587BFB007491FE006182FE001040FF000024FB005073
F500FCFDFF0090A6F0000019BD0000000000000000000032FE00BBC9FD00FFFF
FF009BB0FB006585FA005175FB003C64FD002450FD000739FF000025FB005073
F400FCFDFF0090A6F0000019BD0000000000000000000032FE00BBC9FD00FFFF
FF0091A9FB006D8CFA00577AFB003F67FC002853FD003E65FE00708CFD003159
F400FCFDFF0090A6F0000019BD0000000000000000001F84E600B7E4FD00FEFE
FF0079C8FA0038A9F70032A0F3002998F2001C8CEF00087DEB001E85EB004F9C
EF00FDFEFF008CC1F7000A66C50000000000000000000032FE005B7EFB00D6DE
FE00FFFFFF00B3C3FC006B8AFC003B64FC00224FFD002A55FF007994FE00FFFF
FF00B3C3F8000D34D7000019BD0000000000000000000032FE005B7EFB00D6DE
FE00FFFFFF00B3C3FC006B8AFC003B64FC00224FFD002A55FF007994FE00FFFF
FF00B3C3F8000D34D7000019BD0000000000000000000032FE005B7EFB00D6DE
FE00FFFFFF00B3C3FC006B8AFC003B64FC00224FFD002A55FF007994FE00FFFF
FF00B3C3F8000D34D7000019BD0000000000000000001F84E6005BC0FD00D2F1
FF00FFFFFF0099D4FB0050B0F700339EF3002593EF002C91EE0079B6F400FFFF
FF00B2D6FA000976E6000A66C5000000000000000000000000000032FE006283
FB00C3CFFD00FFFFFF00F1F4FF00DCE3FF00D7DFFF00ECF0FF00FFFFFF008CA4
FA000C34DF000019BD00000000000000000000000000000000000032FE006283
FB00C3CFFD00FFFFFF00F1F4FF00DCE3FF00D7DFFF00ECF0FF00FFFFFF008CA4
FA000C34DF000019BD00000000000000000000000000000000000032FE006283
FB00C3CFFD00FFFFFF00F1F4FF00DCE3FF00D7DFFF00ECF0FF00FFFFFF008CA4
FA000C34DF000019BD00000000000000000000000000000000001F84E60060C4
FE00BAE6FF00FFFFFF00EEF8FE00D8EDFC00D6EBFC00ECF5FD00FFFFFF008AC0
F7000B76E6000A66C50000000000000000000000000000000000000000000032
FE000032FE005C7EFC0094AAFD00A5B7FF009CB1FF006F8EFF001B46F5000019
BD000019BD000000000000000000000000000000000000000000000000000032
FE000032FE005C7EFC0094AAFD00A5B7FF009CB1FF006F8EFF001B46F5000019
BD000019BD000000000000000000000000000000000000000000000000000032
FE000032FE005C7EFC0094AAFD00A5B7FF009CB1FF006F8EFF001B46F5000019
BD000019BD000000000000000000000000000000000000000000000000001F84
E6001F84E60054B4F8008FCDFB00A4D4FA009ECEF80077B8F5001F84E7000A66
C5000A66C5000000000000000000000000000000000000000000000000000000
0000000000000032FE000032FE000032FE000032FE00001EE600001ED5000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000032FE000032FE000032FE000032FE00001EE600001ED5000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000032FE000032FE000032FE000032FE00001EE600001ED5000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000001F84E6001F84E6001F84E6001F84E6001F84E6001F84E6000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000006533330065333300653333006533330065333300653333000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000015B0600015B0600015B0600015B0600015B0600015B06000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000015B0600015B0600015B0600015B0600015B0600015B06000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000006533330065333300653333006533330065333300653333000000
000000000000000000000000000000000000000000000000000000000000934A
1C00934A1C00CC731C00CE995D00CDA67B00C6A07600BA8A54009B5716006533
330065333300000000000000000000000000000000000000000000000000016F
0900016F09001FAB2C0066C2700082C288007EBB84005CAD6400178E2300015B
0600015B0600000000000000000000000000000000000000000000000000016F
0900016F09001FAB2C0066C2700082C288007EBB84005CAD6400178E2300015B
0600015B0600000000000000000000000000000000000000000000000000934A
1C00934A1C00CC731C00CE995D00CDA67B00C6A07600BA8A54009B5716006533
3300653333000000000000000000000000000000000000000000934A1C00C466
0C00ECBF9000FFFFFF00F3EBE200EEDBC700ECD9C500EAE3DA00E1E4E500BA96
6D009A4F07006533330000000000000000000000000000000000016F090010AD
1E0095E19C00F8F8F900E4F1E500C9E9CC00C7E8CA00DCE9DD00E6E1E50074B1
79000A871500015B060000000000000000000000000000000000016F090010AD
1E0095E19C00F8F8F900E4F1E500C9E9CC00C7E8CA00DCE9DD00E6E1E50074B1
79000A871500015B060000000000000000000000000000000000934A1C00C466
0C00ECBF9000FFFFFF00F3EBE200EEDBC700ECD9C500EAE3DA00E1E4E500BA96
6D009A4F070065333300000000000000000000000000934A1C00C6660B00F2D2
B200FFFFFF00E3AC7600D1782300CD6A0600CD6A0600D2792400E3AF7A00F4F7
FA00C7B098009B5007006533330000000000000000000F83190010AD1E00B5EA
BB00FFFFFF007BD6830026BC34000FB41F000AB31A0022BB30007FD78700FAF4
F9009BC19F000A891600015B060000000000000000000F83190010AD1E00B5EA
BB00FFFFFF007BD6830026BC34000FB41F000AB31A0022BB30007FD78700FAF4
F9009BC19F000A891600015B06000000000000000000934A1C00C6660B00F2D2
B200FFFFFF00E3AC7600D1782300CD6A0600CD6A0600D2792400E3AF7A00F4F7
FA00C7B098009B500700653333000000000000000000934A1C00EDC19200FFFE
FE00D98E4100C6580000CA620000CA630000CA640000C9610000C7580000DB95
4F00F8FBFA00C39E730089400A0000000000000000000F83190098E49F00FEFE
FE004AC7580000AE0E0002B0140000AF0E0022BA300033BF400000AD080057CC
6300FAF9FB007ABA8000015B060000000000000000000F83190098E49F00FEFE
FE004AC7580000AE0E0002B0140000AF0E0022BA300033BF400000AD080057CC
6300FAF9FB007ABA8000015B06000000000000000000934A1C00EDC19200FFFE
FE00D98E4100C6580000CA620000CA630000CA640000C9610000C7580000DB95
4F00F8FBFA00C39E730089400A0000000000BC5F0700CD7B2C00FFFCF900E7B2
7D00D7832F00EABE9200D1721300CD6B0700CA610000CC680300D78A3B00C961
0000E5B38000EFF1F100A65E18006533330025AE39002DBB3E00FAFEFA0082D9
910006B2230013B62D0005B31F0038C14A00FFFFFF0089DA910001AF120000AD
0A0086DA8E00F2EFF2001A9A2600015B060025AE39002DBB3E00FAFEFA0082D9
910006B223000CB328008DDC9A00FFFFFF001FB92F0000AF0F0009B2190000AD
0A0086DA8E00F2EFF2001A9A2600015B0600BC5F0700CD7B2C00FFFCF900E7B2
7D00DE985100D8863300D1721200CE6D0A00CC670200CC670200E5B38000D37F
2800E5B38000EFF1F100A65E180065333300BC5F0700EBB78400FCF7F000DD8B
3800E5AA6D00FFFFFF00D8812700D4741400DC934B00F3DDC700F5E1CD00CA65
0000D1771D00F8F1EA00D19A5F006533330025AE390082DE9400EEF9F20037C3
580017B93E0013B83A0068D17E00FFFFFF00FFFFFF0081D88A0001AF110001AF
110029BD3700EBF7EC0068C37100015B060025AE390082DE9400EEF9F20037C3
580017B93E0016B93C0089DB9C00FFFFFF00FFFFFF004AC7570000AE0C0001AF
110029BD3700EBF7EC0068C37100015B0600BC5F0700EBB78400FCF7F000DD8B
3800EDC29700FFFFFF00EDC69E00D7812A00D0711000CF6D0B00FFFFFF00DC98
5300D1771D00F8F1EA00D19A5F0065333300BC5F0700F0CBA400FAEBDC00E08D
3B00EBB47C00FFFFFF00E1984D00F0CBA700FFFEFD00FFFFFF00F4DDC700CC67
0300CC690400F5E3D100E3B887006533330025AE39009EE5B100D7F3DF0029C0
570025BF56008FDEA700FFFFFF00FFFFFF00FFFFFF0085D9920005B1190006B1
150010B42000D2F1D5008FD79600015B060025AE39009EE5B100D7F3DF0029C0
570025BF56001FBD50008EDDA500FFFFFF00FFFFFF00F9FDF9006ED1780006B1
150010B42000D2F1D5008FD79600015B0600BC5F0700F0CBA400FAEBDC00E08D
3B00F1C9A100FFFFFF00FFFFFF00FDF7F100E7B47F00D4761800FFFFFF00DC98
5300CC690400F5E3D100E3B8870065333300BC5F0700F3D0AC00FBEDDF00E79C
5000F0BE8C00FFFFFF00ECB67D00FBEDE000FFFFFF00FFFFFF00F4DDC700CC67
0300CC690400F6E4D200EEC08C006533330025AE3900A2E6B800D9F4E30037C5
6C0035C56C00A5E5BE00FFFFFF00FFFFFF00FFFFFF0088DA99000BB4260007B1
1A0010B41F00D3F2D70095E19C00015B060025AE3900A2E6B800D9F4E30037C5
6C0035C56C002EC3660093E0AF00FFFFFF00FFFFFF00FFFFFF0078D5870007B1
1A0010B41F00D3F2D70095E19C00015B0600BC5F0700F3D0AC00FBEDDF00E79C
5000F4D1AC00FFFFFF00FFFFFF00FFFFFF00F6E1CB00D87F2500FFFFFF00DC98
5300CC690400F6E4D200EEC08C0065333300BC5F0700F3CBA100FEF9F400F0B2
7300F5C79900FFFFFF00E9A15700E69D5300F0C9A000FFFEFE00F5E4D200CB66
0000D1771D00FBF4ED00EAAC6A006533330025AE39008FE1B000F1FCF50069D7
900055D181004ACE780093E1AF00FFFFFF00FFFFFF008ADC9E0010B6310006B2
1D0028BC3700EEFAEF0074DB7E00015B060025AE39008FE1B000F1FCF50069D7
900055D181004ECF7C00A1E5BA00FFFFFF00FFFFFF0065D181000EB52E0006B2
1D0028BC3700EEFAEF0074DB7E00015B0600BC5F0700F3CBA100FEF9F400F0B2
7300F8D8B700FFFFFF00FDF4EB00ECB37900DF8D3A00DB852E00FFFFFF00DC98
5300D1771D00FBF4ED00EAAC6A0065333300BC5F0700E7A46000FFFEFD00F9D9
B500F9CA9900FDF0E200EFAE6D00E79D5200E08C3700E0995000E8B78700CA63
0000E5B27F00FFFDFA00CD731B006533330025AE390057CF8100FCFFFD00B7ED
C8007AE1980079DF970058D4820071D89600FFFFFF0095DFA90014B83A0003B1
1D0087D99000FAFFFB0021B73000015B060025AE390057CF8100FCFFFD00B7ED
C8007AE1980073DD9300B7EDC900FFFFFF0053CD80001ABB49001BBA3E0003B1
1D0087D99000FAFFFB0021B73000015B0600BC5F0700E7A46000FFFEFD00F9D9
B500FBD7B300FADDBE00EFAD6A00E8A05600E1924100DB852E00F4DDC500D991
4700E5B27F00FFFDFA00CD731B006533330000000000BC5F0700FBE1C500FFFF
FF00FDD6AD00F7BC7E00F0AE6900E9A15700E2924000D87F2300CE660000DD99
5400FEFDFC00ECBD8B00934A1C00000000000000000025AE3900C9F4D800FFFF
FF00BAF3C60093EBA70076DF96004ED07B005BD087005ACE7E000DB636005ECE
7200FDFEFD0091E29900016F0900000000000000000025AE3900C9F4D800FFFF
FF00BAF3C60092EAA70097E7AF0066D68E002DC3660021BE53000FB637005ECE
7200FDFEFD0091E29900016F09000000000000000000BC5F0700FBE1C500FFFF
FF00FDD6AD00F7BC7E00F0AE6900E9A15700E2924000D87F2300CE660000DD99
5400FEFDFC00ECBD8B00934A1C000000000000000000BC5F0700ECAA6600FCEB
D800FFFFFF00FADAB800F1B77B00E8A15900E2934400DE914400E8B78500FFFF
FF00F2D2B100C2650C00934A1C00000000000000000025AE390081E09900E7FC
EC00FFFFFF00D0F8D80092E7AA0063D68A0039C76F003EC66B008ADC9F00FFFF
FF00B6EABA000FAC1D00016F0900000000000000000025AE390081E09900E7FC
EC00FFFFFF00D0F8D80092E7AA0063D68A0039C76F003EC66B008ADC9F00FFFF
FF00B6EABA000FAC1D00016F09000000000000000000BC5F0700ECAA6600FCEB
D800FFFFFF00FADAB800F1B77B00E8A15900E2934400DE914400E8B78500FFFF
FF00F2D2B100C2650C00934A1C00000000000000000000000000BC5F0700ECA9
6600FBE1C400FFFFFF00FEF8F200FBEDDF00FAEADC00FCF5EE00FFFFFF00EBBC
8900C3650B00934A1C000000000000000000000000000000000025AE390094E8
A500DFFDE600FFFFFF00F5FDF700E2F8E900DBF5E500EDFAF200FFFFFF0094E2
A10011AF2200016F09000000000000000000000000000000000025AE390094E8
A500DFFDE600FFFFFF00F5FDF700E2F8E900DBF5E500EDFAF200FFFFFF0094E2
A10011AF2200016F090000000000000000000000000000000000BC5F0700ECA9
6600FBE1C400FFFFFF00FEF8F200FBEDDF00FAEADC00FCF5EE00FFFFFF00EBBC
8900C3650B00934A1C000000000000000000000000000000000000000000BC5F
0700BC5F0700E6A36000F3C89B00F3D0AC00F0CBA500EBB47C00CE782300934A
1C00934A1C0000000000000000000000000000000000000000000000000025AE
390025AE390087E2A000ABECC400B0EBC800A7E7C00084DEA00032BF5100016F
0900016F090000000000000000000000000000000000000000000000000025AE
390025AE390087E2A000ABECC400B0EBC800A7E7C00084DEA00032BF5100016F
0900016F0900000000000000000000000000000000000000000000000000BC5F
0700BC5F0700E6A36000F3C89B00F3D0AC00F0CBA500EBB47C00CE782300934A
1C00934A1C000000000000000000000000000000000000000000000000000000
000000000000BC5F0700BC5F0700BC5F0700BC5F0700AF570B00994C17000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000025AE390025AE390025AE390025AE390025AE39000C921D000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000025AE390025AE390025AE390025AE390025AE39000C921D000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000BC5F0700BC5F0700BC5F0700BC5F0700AF570B00994C17000000
000000000000000000000000000000000000424D3E000000000000003E000000
2800000040000000400000000100010000000000000200000000000000000000
000000000000000000000000FFFFFF0000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000F81FF81FFC03FFC1E007E007FC030000
C003C00380030000800180010003000080018001000300000000000000030000
000000008003000000000000C001000000000000C1FC00000000000080FE0001
00000000007F000780018001007F000780018001007F0007C003C00300FF0007
E007E00780FF0007F81FF81FC3FF0007F81FF81FF81FF81FE007E007E007E007
C003C003C003C003800180018001800180018001800180010000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000080018001800180018001800180018001C003C003C003C003
E007E007E007E007F81FF81FF81FF81FF81FF81FF81FF81FE007E007E007E007
C003C003C003C003800180018001800180018001800180010000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000080018001800180018001800180018001C003C003C003C003
E007E007E007E007F81FF81FF81FF81F00000000000000000000000000000000
000000000000}
end
object tblBoletos: TZQuery
Connection = ZConnection
BeforeOpen = tblBoletosBeforeOpen
BeforeEdit = tblBoletosBeforeEdit
BeforePost = tblBoletosBeforePost
BeforeDelete = tblBoletosBeforeDelete
SQL.Strings = (
'select * from chg_boletos')
Params = <>
Sequence = seqBoletos
SequenceField = 'ID'
Left = 864
Top = 576
object tblBoletosID_BOLETO: TIntegerField
FieldName = 'ID_BOLETO'
Required = True
end
object tblBoletosID_DEVEDOR: TIntegerField
FieldName = 'ID_DEVEDOR'
Required = True
end
object tblBoletosTX_NOSSO_NUMERO: TWideStringField
FieldName = 'TX_NOSSO_NUMERO'
Size = 60
end
object tblBoletosTX_SEU_NUMERO: TWideStringField
FieldName = 'TX_SEU_NUMERO'
end
object tblBoletosCD_BARRAS: TWideStringField
FieldName = 'CD_BARRAS'
Size = 255
end
object tblBoletosCD_LINHA_DIGITAVEL: TWideStringField
FieldName = 'CD_LINHA_DIGITAVEL'
Size = 255
end
object tblBoletosVL_NOMINAL: TFloatField
FieldName = 'VL_NOMINAL'
Required = True
end
object tblBoletosDT_VENCIMENTO: TDateField
FieldName = 'DT_VENCIMENTO'
Required = True
end
object tblBoletosNR_ADIAS_AGENDA: TIntegerField
FieldName = 'NR_ADIAS_AGENDA'
Required = True
end
object tblBoletosTX_DOCUMENTO: TWideStringField
FieldName = 'TX_DOCUMENTO'
Required = True
end
object tblBoletosTP_PESSOA: TWideStringField
FieldName = 'TP_PESSOA'
Required = True
Size = 1
end
object tblBoletosTX_NOME: TWideStringField
FieldName = 'TX_NOME'
Required = True
Size = 255
end
object tblBoletosTX_ENDERECO: TWideStringField
FieldName = 'TX_ENDERECO'
Required = True
Size = 255
end
object tblBoletosNR_ENDERECO: TIntegerField
FieldName = 'NR_ENDERECO'
Required = True
end
object tblBoletosTX_COMPLEMENTO: TWideStringField
FieldName = 'TX_COMPLEMENTO'
Size = 255
end
object tblBoletosTX_BAIRRO: TWideStringField
FieldName = 'TX_BAIRRO'
Size = 60
end
object tblBoletosTX_CIDADE: TWideStringField
FieldName = 'TX_CIDADE'
Required = True
Size = 60
end
object tblBoletosTX_UF: TWideStringField
FieldName = 'TX_UF'
Required = True
Size = 2
end
object tblBoletosCD_CEP: TWideStringField
FieldName = 'CD_CEP'
Required = True
Size = 10
end
object tblBoletosTX_EMAIL: TWideStringField
FieldName = 'TX_EMAIL'
Size = 255
end
object tblBoletosNR_DDD: TWideStringField
FieldName = 'NR_DDD'
Size = 3
end
object tblBoletosNR_TELEFONE: TWideStringField
FieldName = 'NR_TELEFONE'
Size = 10
end
object tblBoletosTX_MENSAGEM_1: TWideStringField
FieldName = 'TX_MENSAGEM_1'
Size = 100
end
object tblBoletosTX_MENSAGEM_2: TWideStringField
FieldName = 'TX_MENSAGEM_2'
Size = 100
end
object tblBoletosTX_MENSAGEM_3: TWideStringField
FieldName = 'TX_MENSAGEM_3'
Size = 100
end
object tblBoletosTX_MENSAGEM_4: TWideStringField
FieldName = 'TX_MENSAGEM_4'
Size = 100
end
object tblBoletosTX_MENSAGEM_5: TWideStringField
FieldName = 'TX_MENSAGEM_5'
Size = 100
end
object tblBoletosTP_DESCONTO_1: TWideStringField
FieldName = 'TP_DESCONTO_1'
Size = 1
end
object tblBoletosDT_DESCONTO_1: TDateField
FieldName = 'DT_DESCONTO_1'
end
object tblBoletosPR_DESCONTO_1: TFloatField
FieldName = 'PR_DESCONTO_1'
end
object tblBoletosVL_DESCONTO_1: TFloatField
FieldName = 'VL_DESCONTO_1'
end
object tblBoletosTP_DESCONTO_2: TWideStringField
FieldName = 'TP_DESCONTO_2'
Size = 1
end
object tblBoletosDT_DESCONTO_2: TDateField
FieldName = 'DT_DESCONTO_2'
end
object tblBoletosPR_DESCONTO_2: TFloatField
FieldName = 'PR_DESCONTO_2'
end
object tblBoletosVL_DESCONTO_2: TFloatField
FieldName = 'VL_DESCONTO_2'
end
object tblBoletosTP_DESCONTO_3: TWideStringField
FieldName = 'TP_DESCONTO_3'
Size = 1
end
object tblBoletosDT_DESCONTO_3: TDateField
FieldName = 'DT_DESCONTO_3'
end
object tblBoletosPR_DESCONTO_3: TFloatField
FieldName = 'PR_DESCONTO_3'
end
object tblBoletosVL_DESCONTO_3: TFloatField
FieldName = 'VL_DESCONTO_3'
end
object tblBoletosTP_MULTA: TWideStringField
FieldName = 'TP_MULTA'
Size = 1
end
object tblBoletosDT_MULTA: TDateField
FieldName = 'DT_MULTA'
end
object tblBoletosPR_MULTA: TFloatField
FieldName = 'PR_MULTA'
end
object tblBoletosVL_MULTA: TFloatField
FieldName = 'VL_MULTA'
end
object tblBoletosTP_MORA: TWideStringField
FieldName = 'TP_MORA'
Size = 1
end
object tblBoletosDT_MORA: TDateField
FieldName = 'DT_MORA'
end
object tblBoletosPR_MORA: TFloatField
FieldName = 'PR_MORA'
end
object tblBoletosVL_MORA: TFloatField
FieldName = 'VL_MORA'
end
object tblBoletosTX_NOME_BENEFICIARIO: TWideStringField
FieldName = 'TX_NOME_BENEFICIARIO'
Size = 255
end
object tblBoletosTX_DOCUMENTO_BENEFICIARIO: TWideStringField
FieldName = 'TX_DOCUMENTO_BENEFICIARIO'
Size = 18
end
object tblBoletosTP_PESSOA_BENEFICIARIO: TWideStringField
FieldName = 'TP_PESSOA_BENEFICIARIO'
Size = 1
end
object tblBoletosCD_CEP_BENEFICIARIO: TWideStringField
FieldName = 'CD_CEP_BENEFICIARIO'
Size = 9
end
object tblBoletosTX_ENDERECO_BENEFICIARIO: TWideStringField
FieldName = 'TX_ENDERECO_BENEFICIARIO'
Size = 255
end
object tblBoletosTX_BAIRRO_BENEFICIARIO: TWideStringField
FieldName = 'TX_BAIRRO_BENEFICIARIO'
Size = 60
end
object tblBoletosTX_CIDADE_BENEFICIARIO: TWideStringField
FieldName = 'TX_CIDADE_BENEFICIARIO'
Size = 60
end
object tblBoletosTX_UF_BENEFICIARIO: TWideStringField
FieldName = 'TX_UF_BENEFICIARIO'
Size = 2
end
object tblBoletosTX_MOTIVO_CANCELAMENTO: TWideStringField
FieldName = 'TX_MOTIVO_CANCELAMENTO'
Size = 255
end
object tblBoletosTX_SITUACAO: TWideStringField
FieldName = 'TX_SITUACAO'
Size = 60
end
object tblBoletosDT_SITUACAO: TDateTimeField
FieldName = 'DT_SITUACAO'
end
object tblBoletosVL_TOTAL_RECEBIDO: TFloatField
FieldName = 'VL_TOTAL_RECEBIDO'
end
object tblBoletosDT_EMISSAO: TDateTimeField
FieldName = 'DT_EMISSAO'
end
end
object dtsBoletos: TDataSource
DataSet = tblBoletos
Left = 760
Top = 576
end
object seqBoletos: TZSequence
Connection = ZConnection
SequenceName = 'GEN_BOLETO'
Left = 984
Top = 560
end
object seqBoletoTitulos: TZSequence
Connection = ZConnection
SequenceName = 'GEN_BOLETO_TITULO'
Left = 1120
Top = 656
end
object tblBoletoTitulos: TZQuery
Connection = ZConnection
BeforeEdit = tblBoletoTitulosBeforeEdit
BeforePost = tblBoletoTitulosBeforePost
BeforeDelete = tblBoletoTitulosBeforeDelete
SQL.Strings = (
'select * from chg_boleto_titulos')
Params = <>
MasterFields = 'ID'
MasterSource = dtsBoletos
LinkedFields = 'ID_BOLETO'
Sequence = seqBoletoTitulos
SequenceField = 'ID_ITEM'
Left = 1120
Top = 608
object tblBoletoTitulosID_ITEM: TIntegerField
FieldName = 'ID_ITEM'
Required = True
end
object tblBoletoTitulosID_DEVEDOR: TIntegerField
FieldName = 'ID_DEVEDOR'
end
object tblBoletoTitulosID_TITULO: TIntegerField
FieldName = 'ID_TITULO'
end
object tblBoletoTitulosID_BOLETO: TIntegerField
FieldName = 'ID_BOLETO'
end
end
object dtsBoletoTitulos: TDataSource
DataSet = tblBoletoTitulos
Left = 1120
Top = 560
end
object tblCidadesConsulta: TZReadOnlyQuery
Connection = ZConnection
SQL.Strings = (
'select * from sys_cidades')
Params = <>
Left = 288
Top = 440
object tblCidadesConsultaID_CIDADE: TIntegerField
FieldName = 'ID_CIDADE'
Required = True
end
object tblCidadesConsultaTX_NOME: TWideStringField
FieldName = 'TX_NOME'
Size = 60
end
object tblCidadesConsultaID_ESTADO: TIntegerField
FieldName = 'ID_ESTADO'
end
object tblCidadesConsultaCD_IBGE: TWideStringField
FieldName = 'CD_IBGE'
Size = 10
end
end
object dtsContas: TDataSource
DataSet = tblContas
Left = 208
Top = 552
end
object tblContas: TZQuery
Connection = ZConnection
SQL.Strings = (
'select * from sys_contas')
Params = <>
Sequence = seqContas
SequenceField = 'ID_CONTA'
Left = 304
Top = 552
object tblContasID_CONTA: TIntegerField
FieldName = 'ID_CONTA'
Required = True
end
object tblContasTX_DESCRICAO: TWideStringField
FieldName = 'TX_DESCRICAO'
Size = 60
end
object tblContasCD_AGENCIA: TWideStringField
FieldName = 'CD_AGENCIA'
Size = 10
end
object tblContasCD_AGENCIA_DV: TWideStringField
FieldName = 'CD_AGENCIA_DV'
Size = 1
end
object tblContasCD_CEDENTE: TWideStringField
FieldName = 'CD_CEDENTE'
end
object tblContasCD_CEDENTE_DV: TWideStringField
FieldName = 'CD_CEDENTE_DV'
Size = 1
end
object tblContasCD_CONVENIO: TWideStringField
FieldName = 'CD_CONVENIO'
end
object tblContasCD_CONVENIO_DV: TWideStringField
FieldName = 'CD_CONVENIO_DV'
Size = 1
end
object tblContasCD_CONTA: TWideStringField
FieldName = 'CD_CONTA'
Size = 10
end
object tblContasCD_CONTA_DV: TWideStringField
FieldName = 'CD_CONTA_DV'
Size = 1
end
object tblContasID_BANCO: TIntegerField
FieldName = 'ID_BANCO'
end
object tblContasTP_SITUACAO: TWideStringField
FieldName = 'TP_SITUACAO'
Size = 1
end
object tblContasCD_MODALIDADE: TWideStringField
FieldName = 'CD_MODALIDADE'
Size = 10
end
object tblContasDT_REMESSA: TDateField
FieldName = 'DT_REMESSA'
end
object tblContasNR_REMESSA: TIntegerField
FieldName = 'NR_REMESSA'
end
end
object seqContas: TZSequence
Connection = ZConnection
SequenceName = 'GEN_CONTA'
Left = 392
Top = 552
end
object seqNrRecibo: TZSequence
Connection = ZConnection
SequenceName = 'GEN_NR_RECIBO'
Left = 128
Top = 552
end
object dtsPrCartao: TDataSource
DataSet = tblPrCartao
Left = 656
Top = 416
end
object tblPrCartao: TZQuery
Connection = ZConnection
AfterInsert = tblPrCartaoAfterInsert
SQL.Strings = (
'select * from sys_porcentagens_cartoes')
Params = <>
Left = 520
Top = 416
object tblPrCartaoID_ITEM: TIntegerField
FieldName = 'ID_ITEM'
Required = True
end
object tblPrCartaoNR_PARCELA: TIntegerField
FieldName = 'NR_PARCELA'
Required = True
end
object tblPrCartaoPR_JUROS: TFloatField
FieldName = 'PR_JUROS'
Required = True
end
object tblPrCartaoPR_REPASSE: TFloatField
FieldName = 'PR_REPASSE'
end
object tblPrCartaoTX_DESCRICAO: TWideStringField
FieldName = 'TX_DESCRICAO'
Size = 60
end
end
object cdsDescBoleto: TClientDataSet
Aggregates = <>
Params = <>
Left = 656
Top = 464
object cdsDescBoletoID_STATUS: TIntegerField
FieldName = 'ID_STATUS'
end
object cdsDescBoletoTX_VALOR: TStringField
FieldName = 'TX_VALOR'
end
object cdsDescBoletoTX_DESCRICAO: TStringField
FieldName = 'TX_DESCRICAO'
Size = 60
end
end
object dtsDescBoleto: TDataSource
DataSet = cdsDescBoleto
Left = 760
Top = 464
end
object dtsMoraBoleto: TDataSource
DataSet = cdsMoraBoleto
Left = 760
Top = 520
end
object cdsMoraBoleto: TClientDataSet
Aggregates = <>
Params = <>
Left = 656
Top = 520
object IntegerField1: TIntegerField
FieldName = 'ID_STATUS'
end
object StringField1: TStringField
FieldName = 'TX_VALOR'
end
object StringField2: TStringField
FieldName = 'TX_DESCRICAO'
Size = 60
end
end
object dtsMultaBoleto: TDataSource
DataSet = cdsMultaBoleto
Left = 912
Top = 472
end
object cdsMultaBoleto: TClientDataSet
Aggregates = <>
Params = <>
Left = 832
Top = 472
object IntegerField2: TIntegerField
FieldName = 'ID_STATUS'
end
object StringField3: TStringField
FieldName = 'TX_VALOR'
end
object StringField4: TStringField
FieldName = 'TX_DESCRICAO'
Size = 60
end
end
object tblDevEmpBoletos: TZQuery
Connection = ZConnection
BeforeOpen = tblDevEmpBoletosBeforeOpen
SQL.Strings = (
'select * from chg_dev_emp_boletos')
Params = <>
Sequence = seqDevEmpBoletos
SequenceField = 'ID_ITEM'
Left = 864
Top = 632
object tblDevEmpBoletosID_ITEM: TIntegerField
FieldName = 'ID_ITEM'
Required = True
end
object tblDevEmpBoletosID_DEVEDOR: TIntegerField
FieldName = 'ID_DEVEDOR'
Required = True
end
object tblDevEmpBoletosID_EMPRESA: TIntegerField
FieldName = 'ID_EMPRESA'
Required = True
end
object tblDevEmpBoletosTX_EMPRESA: TWideStringField
FieldKind = fkLookup
FieldName = 'TX_EMPRESA'
LookupDataSet = tblCHGEmpresa
LookupKeyFields = 'ID_EMPRESA'
LookupResultField = 'TX_NOME'
KeyFields = 'ID_EMPRESA'
Size = 250
Lookup = True
end
end
object dtsDevEmpBoletos: TDataSource
DataSet = tblDevEmpBoletos
Left = 760
Top = 632
end
object seqDevEmpBoletos: TZSequence
Connection = ZConnection
SequenceName = 'GEN_DEV_EMP_BOLETOS'
Left = 984
Top = 632
end
end