Declaration

TEditDCSummRec = record
  Title: Integer;
  DocType: integer;
  Addend: integer;
  EditIEN: integer;
  AdmitDateTime: TFMDateTime;
  DischargeDateTime: TFMDateTime;
  TitleName: string;
  DictDateTime: TFMDateTime;
  Dictator: Int64;
  DictatorName: string;
  Cosigner: Int64;
  CosignerName: string;
  Transcriptionist: int64;
  TranscriptionistName: string;
  Attending: int64;
  AttendingName: string;
  Urgency: string;
  UrgencyName: string;
  Location: Integer;
  LocationName: string;
  VisitStr: string;
  NeedCPT: Boolean;
  Status: integer;       
  LastCosigner: Int64;
  LastCosignerName: string;
  IDParent: integer;
  Lines: TStrings;
end;