unit urelTeste;

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants,
  System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, RLReport, Data.DB, ZAbstractRODataset,
  ZDataset, Vcl.ComCtrls, RLFilters, RLPDFFilter;

type
  TrelTeste = class(TForm)
    dtsCaixa: TDataSource;
    dtsDevedor: TDataSource;
    dtsReport: TDataSource;
    dtsTitulos: TDataSource;
    fr_filterpdf: TRLPDFFilter;
    frRecibo: TRLReport;
    frb_detail: TRLBand;
    frb_footer: TRLBand;
    frb_headertop: TRLBand;
    frpnl_logoL: TRLPanel;
    frdbimg_logoR: TRLDBImage;
    frb_headerbot: TRLBand;
    frpnl_headers: TRLPanel;
    frlbl_vencimentoL: TRLLabel;
    frlbl_principal: TRLLabel;
    frlbl_encargos: TRLLabel;
    frlbl_descontos: TRLLabel;
    frlbl_total: TRLLabel;
    frlbl_juros: TRLLabel;
    frlbl_multa: TRLLabel;
    frlbl_extras: TRLLabel;
    frlbl_nometitL: TRLLabel;
    frpnl_headerbotR: TRLPanel;
    RLPanel3: TRLPanel;
    RLDBText3: TRLDBText;
    RLLabel1: TRLLabel;
    RLPanel4: TRLPanel;
    frdblbl_cpfR: TRLDBText;
    RLDBText6: TRLDBText;
    RLPanel: TRLPanel;
    frlbl_empresatitR: TRLLabel;
    frlbl_valortotR: TRLLabel;
    frlbl_vlextensoR: TRLLabel;
    frlbl_dtpagR: TRLLabel;
    frpnl_headerbotL: TRLPanel;
    RLPanel5: TRLPanel;
    RLDBText7: TRLDBText;
    RLLabel7: TRLLabel;
    RLPanel6: TRLPanel;
    frdblbl_cpfL: TRLDBText;
    RLDBText9: TRLDBText;
    RLPanel7: TRLPanel;
    frlbl_empresatitL: TRLLabel;
    frlbl_valortotL: TRLLabel;
    frlbl_vlextensoL: TRLLabel;
    frlbl_dtpagL: TRLLabel;
    frpnl_headertopR: TRLPanel;
    frpnl_headertopL: TRLPanel;
    frpnl_logoR: TRLPanel;
    frdbimg_logoL: TRLDBImage;
    RLPanel1: TRLPanel;
    frlbl_vencimentoR: TRLLabel;
    RLLabel15: TRLLabel;
    RLLabel16: TRLLabel;
    RLLabel17: TRLLabel;
    RLLabel18: TRLLabel;
    RLLabel19: TRLLabel;
    RLLabel20: TRLLabel;
    RLLabel22: TRLLabel;
    frlbl_nometitR: TRLLabel;
    frpnl_footerR: TRLPanel;
    frpnl_organizasumR: TRLPanel;
    frdbresult_extrasR: TRLDBResult;
    frdbresult_descontosR: TRLDBResult;
    frdbresult_encargosR: TRLDBResult;
    frdbresult_jurosR: TRLDBResult;
    frdbresult_multaR: TRLDBResult;
    frdbresult_principalR: TRLDBResult;
    frdbresult_totalR: TRLDBResult;
    frlbl_formarecebimentoR: TRLLabel;
    frpnl_chequeR: TRLPanel;
    frlbl_nrchequeR: TRLLabel;
    frlbl_bancoR: TRLLabel;
    frlbl_pracaR: TRLLabel;
    frlbl_obschequeR: TRLLabel;
    fr_membobsR: TRLMemo;
    frlbl_empresaR: TRLLabel;
    frlbl_usuarioR: TRLLabel;
    frdblbl_usuarioR: TRLDBText;
    fr_dateR: TRLSystemInfo;
    fr_timeR: TRLSystemInfo;
    frpnl_footerL: TRLPanel;
    frpnl_organizasumL: TRLPanel;
    frdbresult_extrasL: TRLDBResult;
    frdbresult_descontosL: TRLDBResult;
    frdbresult_encargosL: TRLDBResult;
    frdbresult_jurosL: TRLDBResult;
    frdbresult_multaL: TRLDBResult;
    frdbresult_principalL: TRLDBResult;
    frdbresult_totalL: TRLDBResult;
    frlbl_formarecebimentoL: TRLLabel;
    frpnl_chequeL: TRLPanel;
    frlbl_nrchequeL: TRLLabel;
    frlbl_bancoL: TRLLabel;
    frlbl_pracaL: TRLLabel;
    frlbl_obschequeL: TRLLabel;
    fr_membobsL: TRLMemo;
    frlbl_empresaL: TRLLabel;
    frlbl_usuarioL: TRLLabel;
    frdblbl_usuarioL: TRLDBText;
    fr_dateL: TRLSystemInfo;
    fr_timeL: TRLSystemInfo;
    frpnl_detailR: TRLPanel;
    frpnl_detailL: TRLPanel;
    frdblbl_descontosL: TRLDBText;
    frdblbl_encargosL: TRLDBText;
    frdblbl_jurosL: TRLDBText;
    frdblbl_multaL: TRLDBText;
    frdblbl_principalL: TRLDBText;
    frdblbl_totalL: TRLDBText;
    frdblbl_vencimentoL: TRLDBText;
    frdblbl_nometitL: TRLDBText;
    frdblbl_extraL: TRLDBText;
    frdblbl_encargosR: TRLDBText;
    frdblbl_jurosR: TRLDBText;
    frdblbl_multaR: TRLDBText;
    frdblbl_principalR: TRLDBText;
    frdblbl_totalR: TRLDBText;
    frdblbl_vencimentoR: TRLDBText;
    frdblbl_nometitR: TRLDBText;
    frdblbl_extraR: TRLDBText;
    frdblbl_descontosR: TRLDBText;
    RLPanel2: TRLPanel;
    RLPanel8: TRLPanel;
    frlbl_headertopL: TRLMemo;
    frlbl_headerbotL: TRLMemo;
    RLPanel9: TRLPanel;
    frlbl_headertopR: TRLMemo;
    RLPanel10: TRLPanel;
    frlbl_headerbotR: TRLMemo;
  private
    old_recno, new_recno: Integer;
    { Private declarations }
  public
    { Public declarations }
  end;

var
  relTeste: TrelTeste;

implementation

{$R *.dfm}

uses udtmSystem;

end.