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