src/IFSelect/IFSelect_Modifier.cdl

   1 -- File:        IFSelect_Modifier.cdl
   2 -- Created:     Thu Aug 26 15:58:50 1993
   3 -- Author:      Christian CAILLET
   4 --              <cky@bravox>
   5 ---Copyright:    Matra Datavision 1993
   6
   7
   8 deferred class Modifier  from IFSelect  inherits GeneralModifier
   9
  10     ---Purpose : This class gives a frame for Actions which can work globally
  11     --           on a File once completely defined (i.e. afterwards)
  12     --
  13     --           Remark : if no Selection is set as criterium, the Modifier is
  14     --           set to work and should consider all the content of the Model
  15     --           produced.
  16
  17 uses CString, InterfaceModel, CopyTool, Protocol from Interface, ContextModif
  18
  19 is
  20
  21     Initialize (maychangegraph : Boolean);
  22     ---Purpose : Calls inherited Initialize, transmits to it the information
  23     --           <maychangegraph>
  24
  25     Perform (me; ctx  : in out ContextModif;
  26              target   : mutable InterfaceModel;
  27              protocol : Protocol from Interface;
  28              TC       : in out CopyTool) is deferred;
  29     ---Purpose : This deferred method defines the action specific to each class
  30     --           of Modifier. It is called by a ModelCopier, once the Model
  31     --           generated and filled. ModelCopier has already checked the
  32     --           criteria (Dispatch, Model Rank, Selection) before calling it.
  33     --
  34     --           <ctx> detains informations about original data and selection.
  35     --           The result of copying, on which modifications are to be done,
  36     --           is <target>.
  37     --           <TC> allows to run additional copies as required
  38     --
  39     --           In case of Error, use methods CCheck from the ContextModif
  40     --           to aknowledge an entity Check or a Global Check with messages
  41
  42 end Modifier;