[occt.git] / src / IGESSelect / IGESSelect_AutoCorrect.cdl

-- Created on: 1994-06-01
-- Created by: Christian CAILLET
-- Copyright (c) 1994-1999 Matra Datavision
-- Copyright (c) 1999-2014 OPEN CASCADE SAS
--
-- This file is part of Open CASCADE Technology software library.
--
-- This library is free software; you can redistribute it and/or modify it under
-- the terms of the GNU Lesser General Public License version 2.1 as published
-- by the Free Software Foundation, with special exception defined in the file
-- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
-- distribution for complete text of the license and disclaimer of any warranty.
--
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.

class AutoCorrect  from IGESSelect  inherits ModelModifier from IGESSelect

    ---Purpose : Does the absolutely effective corrections on IGES Entity.
    --           That is to say : regarding the norm in details, some values
    --           have mandatory values, or set of values with constraints.
    --           When such values/constraints are univoque, they can be forced.
    --           Also nullifies items of Directory Part, Associativities, and
    --           Properties, which are not (or not longer) in <target> Model.
    --           
    --           Works by calling a BasicEditor from IGESData
    --           Works with the specific IGES Services : DirChecker which
    --           allows to correct data in "Directory Part" of Entities (such
    --           as required values for status, or references to be null), and
    --           the specific IGES service OwnCorrect, which is specialised for
    --           each type of entity.
    --           
    --           Remark : this does not comprise the computation of use flag or
    --           subordinate status according references, which is made by
    --           the ModelModifier class ComputeStatus.
    --           
    --           The Input Selection, when present, designates the entities to
    --           be corrected. If it is not present, all the entities of the
    --           model are corrected.

uses AsciiString from TCollection,
     CopyTool, IGESModel, ContextModif,
     GeneralLib, SpecificLib, IGESEntity

is

    Create returns AutoCorrect;
    ---Purpose : Creates an AutoCorrect.

    Performing (me; ctx : in out ContextModif;
    	        target  : IGESModel;
                TC      : in out CopyTool);
    ---Purpose : Specific action : corrects entities when it is absolutely
    --           obvious, i.e. non equivoque (by DirChecker and specific
    --           service OwnCorrect) : works with a protocol.

    Label (me) returns AsciiString from TCollection;
    ---Purpose : Returns a text which is
    --           "Auto-correction of IGES Entities"

end AutoCorrect;
Commit	Line	Data
b311480e	1	-- Created on: 1994-06-01
	2	-- Created by: Christian CAILLET
	3	-- Copyright (c) 1994-1999 Matra Datavision
973c2be1	4	-- Copyright (c) 1999-2014 OPEN CASCADE SAS
b311480e	5	--
973c2be1	6	-- This file is part of Open CASCADE Technology software library.
b311480e	7	--
d5f74e42	8	-- This library is free software; you can redistribute it and/or modify it under
d5f74e42	9	-- the terms of the GNU Lesser General Public License version 2.1 as published
973c2be1	10	-- by the Free Software Foundation, with special exception defined in the file
	11	-- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
	12	-- distribution for complete text of the license and disclaimer of any warranty.
b311480e	13	--
973c2be1	14	-- Alternatively, this file may be used under the terms of Open CASCADE
973c2be1	15	-- commercial license or contractual agreement.
7fd59977	16
	17	class AutoCorrect from IGESSelect inherits ModelModifier from IGESSelect
	18
	19	---Purpose : Does the absolutely effective corrections on IGES Entity.
	20	-- That is to say : regarding the norm in details, some values
	21	-- have mandatory values, or set of values with constraints.
	22	-- When such values/constraints are univoque, they can be forced.
	23	-- Also nullifies items of Directory Part, Associativities, and
	24	-- Properties, which are not (or not longer) in <target> Model.
	25	--
	26	-- Works by calling a BasicEditor from IGESData
	27	-- Works with the specific IGES Services : DirChecker which
	28	-- allows to correct data in "Directory Part" of Entities (such
	29	-- as required values for status, or references to be null), and
	30	-- the specific IGES service OwnCorrect, which is specialised for
	31	-- each type of entity.
	32	--
	33	-- Remark : this does not comprise the computation of use flag or
	34	-- subordinate status according references, which is made by
	35	-- the ModelModifier class ComputeStatus.
	36	--
	37	-- The Input Selection, when present, designates the entities to
	38	-- be corrected. If it is not present, all the entities of the
	39	-- model are corrected.
	40
	41	uses AsciiString from TCollection,
	42	CopyTool, IGESModel, ContextModif,
	43	GeneralLib, SpecificLib, IGESEntity
	44
	45	is
	46
6e33d3ce	47	Create returns AutoCorrect;
7fd59977	48	---Purpose : Creates an AutoCorrect.
	49
	50	Performing (me; ctx : in out ContextModif;
6e33d3ce	51	target : IGESModel;
7fd59977	52	TC : in out CopyTool);
	53	---Purpose : Specific action : corrects entities when it is absolutely
	54	-- obvious, i.e. non equivoque (by DirChecker and specific
	55	-- service OwnCorrect) : works with a protocol.
	56
	57	Label (me) returns AsciiString from TCollection;
	58	---Purpose : Returns a text which is
	59	-- "Auto-correction of IGES Entities"
	60
	61	end AutoCorrect;