unit urelHistorico;

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;

type
  TrelHistorico = class(TForm)
    relHistorico: TRLReport;
    dtsRelatorio: TDataSource;
    zroqryHistorico: TZReadOnlyQuery;
    zroqryHistoricoID_DEVEDOR: TIntegerField;
    zroqryHistoricoID_COBRADOR: TIntegerField;
    zroqryHistoricoID_PROVIDENCIA: TIntegerField;
    zroqryHistoricoDT_CONTATO: TDateTimeField;
    zroqryHistoricoCD_PROTOCOLO: TWideStringField;
    zroqryHistoricoTL_MEMO: TWideMemoField;
    zroqryHistoricoTX_COBRADOR: TStringField;
    zroqryHistoricoTX_PROVIDENCIA: TStringField;
    frbnd_header: TRLBand;
    frlbl_titulorel: TRLLabel;
    frlbl_nome: TRLDBText;
    frlbl_referente: TRLLabel;
    frlbl_documento: TRLDBText;
    RLBand1: TRLBand;
    frdblbl_datacontato: TRLDBText;
    frdblbl_quemfez: TRLDBText;
    frdblbl_providencia: TRLDBText;
    frdbmem_hist: TRLDBMemo;
    frlbl_hist: TRLLabel;
    RLBand2: TRLBand;
    RLSystemInfo2: TRLSystemInfo;
    RLSystemInfo1: TRLSystemInfo;
    frlbl_usuario: TRLLabel;
    frdblbl_usuario: TRLDBText;
    dtsUser: TDataSource;
    RLSystemInfo3: TRLSystemInfo;
    RLSystemInfo4: TRLSystemInfo;
    frlbl_de: TRLLabel;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  relHistorico: TrelHistorico;

implementation

{$R *.dfm}

uses udtmSystem;

end.