src/StepBasic/StepBasic_DateAssignment.cdl

   1 -- File:        DateAssignment.cdl
   2 -- Created:     Fri Dec  1 11:11:18 1995
   3 -- Author:      EXPRESS->CDL V0.2 Translator
   4 -- Copyright:   Matra-Datavision 1993
   5
   6
   7 deferred class DateAssignment from StepBasic
   8
   9 inherits TShared from MMgt
  10
  11 uses
  12
  13         Date from StepBasic,
  14         DateRole from StepBasic
  15 is
  16
  17         Init (me : mutable;
  18               aAssignedDate : mutable Date from StepBasic;
  19               aRole : mutable DateRole from StepBasic) is virtual;
  20
  21         -- Specific Methods for Field Data Access --
  22
  23         SetAssignedDate(me : mutable; aAssignedDate : mutable Date);
  24         AssignedDate (me) returns mutable Date;
  25         SetRole(me : mutable; aRole : mutable DateRole);
  26         Role (me) returns mutable DateRole;
  27
  28 fields
  29
  30         assignedDate : Date from StepBasic;
  31         role : DateRole from StepBasic;
  32
  33 end DateAssignment;