View Issue Details
| ID | Project | Category | View Status | Date Submitted | Last Update |
|---|---|---|---|---|---|
| 0021635 | Open CASCADE | OCCT:Application Framework | public | 2010-03-18 11:56 | 2011-07-12 12:00 |
| Reporter | szy | Assigned To | szy | ||
| Priority | normal | Severity | trivial | ||
| Status | closed | Resolution | fixed | ||
| OS | All | ||||
| Fixed in Version | 6.4.0 | ||||
| Summary | 0021635: Naming of main part of faces of the presented shape fails | ||||
| Description | Naming of the next shapes of the presented data model (see below a script to reproduce data model) fail: 1, 2, 5, 8,10, 11, 12, 13, 14, 15, 16, 18, 19. Script to reproduce the problem: NewDocument D MDTV-Standard AddDriver D Box Attach PTxyz PTALine PRLine PMirr Sph Prism FulRevol SecRevol 0000001 - create box using more flexible set of commands NewCommand D isos 12 set B2 [AddObject D]; ## add object set F2 [AddFunction D $B2 Box]; ## add function BoxDX D $B2 190; ## set arguments of this function BoxDY D $B2 290 BoxDZ D $B2 390 InitLogBook D; ## initialize (clean) internal map of labels ComputeFun D $F2; ## compute the function GetShape D $F2:2 Box2; ## check result fit 0000002 Prism (after step 0000001) explode Box2 F set Bas1 [AttachShape D Box2_1 ${B2} ${B2} 0] set Prism [AddPrism D $Bas1 300 0] ComputeFun D $Prism:1 GetShape D $Prism:1:2 Pr PrismHeight D $Prism 500 ComputeFun D $Prism:1 GetShape D $Prism:1:2 Pr fit #3 Revol Full explode Box2 F explode Box2_3 E set Bas2 [AttachShape D Box2_3 ${B2} ${B2} 0] set Ax2 [AttachShape D Box2_3_3 ${B2} ${B2} 0] set FRev [AddRevol D $Bas2 $Ax2] ComputeFun D $FRev:1 GetShape D $FRev:1:2 R1 #5 NewCommand D set FTr1 [PTranslateDXYZ D $FRev -250 50 -130] ComputeFun D $FTr1; ## function recomputation GetShape D $FTr1:2 R1; ## get modified result #6 => fuse AddDriver D Fuse set FS1 [AddFuse D $Prism $FRev] ComputeFun D $FS1 GetShape D $FS1:2 Pr 0000007 Revol Sectioned GetShape D $F2:2 Box2; explode Box2 F explode Box2_2 E set Bas3 [AttachShape D Box2_2 ${B2} ${B2} 0] set Ax3 [AttachShape D Box2_2_3 ${B2} ${B2} 0] set SRev [AddRevol D $Bas3 $Ax3 120 0] ComputeFun D $SRev:1 GetShape D $SRev:1:2 R2 0000008 set FS2 [AddFuse D $B2 $SRev] ComputeFun D $FS2 GetShape D $FS2:2 Box2 0000009 set FS3 [AddFuse D $B2 $Prism] ComputeFun D $FS3 GetShape D $FS3:2 Box2 0000007 NewCommand D explode Box2 F set Sel1 [AttachShape D Box2_1 ${B2} ${B2} 0] # where Box2_1 is face 0000001... | ||||
| Tags | No tags attached. | ||||
| Test case number | |||||
| Date Modified | Username | Field | Change |
|---|---|---|---|
| 2010-03-18 12:11 | bugmaster | Assigned To | bugmaster => szy |
| 2010-03-18 12:11 | bugmaster | Status | new => assigned |
| 2010-03-25 14:34 | szy | OtherBugsDependingOnThis | => 21424, 21542 |
| 2010-03-25 14:34 | szy | Status | assigned => resolved |
| 2010-06-23 12:34 | bugmaster | Status | resolved => tested |
| 2010-07-28 15:35 | bugmaster | Status | tested => verified |
| 2011-08-02 10:32 | bugmaster | Category | OCCT:OCAF => OCCT:Application Framework |
