_TRIGGER_TYPE_UNION

type _TRIGGER_TYPE_UNION = record

  case Integer of

    0: (

        Daily: TDaily;

      );

    1: (

        Weekly: TWeekly;

      );

    2: (

        MonthlyDate: TMonthlyDate;

      );

    3: (

        MonthlyDOW: TMonthlyDow;

      );

end;