mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
c10703215e
Add check for datum position during export of datum_system Add Draw commands for set/get datum position update test cases Correction of case bugs/step/bug27313
32 lines
711 B
Plaintext
32 lines
711 B
Plaintext
puts "========"
|
|
puts "OCC27313"
|
|
puts "========"
|
|
puts ""
|
|
##########################################################################
|
|
# Exception during WriteStep with PMI
|
|
##########################################################################
|
|
|
|
pload DCAF
|
|
|
|
box b 10 10 10
|
|
explode b
|
|
explode b_1
|
|
NewDocument D
|
|
XAddShape D b
|
|
XAddGeomTolerance D b_1_1
|
|
XAddDatum D b_1_2
|
|
#0:1:4:1
|
|
#0:1:4:2
|
|
XSetDatumName D 0:1:4:2 A
|
|
XAddDatumModifier D 0:1:4:2 10
|
|
XSetDatumPosition D 0:1:4:2 1
|
|
XSetDatum D 0:1:4:2 0:1:4:1
|
|
XSetToleranceValue D 0:1:4:1 0.5
|
|
XSetTypeOfTolerance D 0:1:4:1 1
|
|
XSetTypeOfToleranceValue D 0:1:4:1 1
|
|
param write.step.schema 5
|
|
newmodel
|
|
WriteStep D $imagedir/${casename}_D.stp
|
|
param write.step.schema 4
|
|
newmodel
|