program Project1;
{$APPTYPE CONSOLE}
uses
System.Rtti;
type
TvatIndividual = record
DocumentNumber: string;
TurnoverDate: TDate;
PaymentDate: TDate;
DocumentType: string;
Year: integer;
TurnoverDescription: string;
TurnoverAmount: Currency;
end;
begin
for var f in TRttiContext.Create.GetType(TypeInfo(TvatIndividual)).GetFields do
WriteLn(f.ToString);
ReadLn;
end.