1 // File: RWStepBasic_RWContract.cxx
2 // Created: Fri Nov 26 16:26:37 1999
3 // Author: Andrey BETENEV
4 // Generator: ExpToCas (EXPRESS -> CASCADE/XSTEP Translator) V1.0
5 // Copyright: Matra Datavision 1999
7 #include <RWStepBasic_RWContract.ixx>
9 //=======================================================================
10 //function : RWStepBasic_RWContract
12 //=======================================================================
14 RWStepBasic_RWContract::RWStepBasic_RWContract ()
18 //=======================================================================
21 //=======================================================================
23 void RWStepBasic_RWContract::ReadStep (const Handle(StepData_StepReaderData)& data,
24 const Standard_Integer num,
25 Handle(Interface_Check)& ach,
26 const Handle(StepBasic_Contract) &ent) const
28 // Check number of parameters
29 if ( ! data->CheckNbParams(num,3,ach,"contract") ) return;
31 // Own fields of Contract
33 Handle(TCollection_HAsciiString) aName;
34 data->ReadString (num, 1, "name", ach, aName);
36 Handle(TCollection_HAsciiString) aPurpose;
37 data->ReadString (num, 2, "purpose", ach, aPurpose);
39 Handle(StepBasic_ContractType) aKind;
40 data->ReadEntity (num, 3, "kind", ach, STANDARD_TYPE(StepBasic_ContractType), aKind);
48 //=======================================================================
49 //function : WriteStep
51 //=======================================================================
53 void RWStepBasic_RWContract::WriteStep (StepData_StepWriter& SW,
54 const Handle(StepBasic_Contract) &ent) const
57 // Own fields of Contract
59 SW.Send (ent->Name());
61 SW.Send (ent->Purpose());
63 SW.Send (ent->Kind());
66 //=======================================================================
69 //=======================================================================
71 void RWStepBasic_RWContract::Share (const Handle(StepBasic_Contract) &ent,
72 Interface_EntityIterator& iter) const
75 // Own fields of Contract
77 iter.AddItem (ent->Kind());