src/IGESBasic/IGESBasic_ExternalRefLibName.cdl

   1 -- Created on: 1993-01-09
   2 -- Created by: CKY / Contract Toubro-Larsen ( Anand NATRAJAN )
   3 -- Copyright (c) 1993-1999 Matra Datavision
   4 -- Copyright (c) 1999-2014 OPEN CASCADE SAS
   5 --
   6 -- This file is part of Open CASCADE Technology software library.
   7 --
   8 -- This library is free software; you can redistribute it and/or modify it under
   9 -- the terms of the GNU Lesser General Public License version 2.1 as published
  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.
  13 --
  14 -- Alternatively, this file may be used under the terms of Open CASCADE
  15 -- commercial license or contractual agreement.
  16
  17 class ExternalRefLibName from IGESBasic  inherits IGESEntity
  18
  19         ---Purpose: defines ExternalRefLibName, Type <416> Form <4>
  20         --          in package IGESBasic
  21         --          Used when it is assumed that a copy of the subfigure
  22         --          exists in native form in a library on the receiving
  23         --          system
  24
  25 uses
  26
  27         HAsciiString from TCollection
  28
  29 is
  30
  31         Create returns ExternalRefLibName;
  32
  33         -- Specific Methods pertaining to the class
  34
  35         Init (me : mutable; aLibName, anExtName : HAsciiString);
  36         ---Purpose : This method is used to set the fields of the class
  37         --           ExternalRefLibName
  38         --       - aLibName  : Name of library in which ExtName resides
  39         --       - anExtName : External Reference Entity Symbolic Name
  40
  41         LibraryName (me) returns HAsciiString from TCollection;
  42         ---Purpose : returns name of library in which External Reference Entity
  43         -- Symbolic Name resides
  44
  45         ReferenceName (me) returns HAsciiString from TCollection;
  46         ---Purpose : returns External Reference Entity Symbolic Name
  47
  48 fields
  49
  50 --
  51 -- Class    : IGESBasic_ExternalRefLibName
  52 --
  53 -- Purpose  : Declaration of variables specific to the definition
  54 --            of the Class ExternalRefLibName.
  55 --
  56 -- Reminder : A ExternalRefLibName instance is defined by :
  57 --            - Name of library in which name resides
  58 --            - External Reference Entity Symbolic Name
  59
  60         theLibName              : HAsciiString from TCollection;
  61         theExtRefEntitySymbName : HAsciiString from TCollection;
  62
  63 end ExternalRefLibName;