从ug4.0到NX7.5,Grip写的程序一直没有问题,在NX8上运行居然返回了错误的结果!!!3 W" K" Z% F4 R K4 g
如下代码用Obtain读取当前2D工作图纸中的所有名义尺寸,NX8上运行返回错误结果,有图有真相. }, ^; }9 P0 x
' i1 J3 {. k8 F9 q/ `( R
ENTITY/ent,dim(100)9 J. ]2 ?5 I% ], _( [
NUMBER/i,n(51)
/ w# J5 u' t# ^9 ], `PRINT/'Here is the nominal dimension in current sheet'* Q" B( _- f: a6 w J! \+ ?/ a x0 h
MASK/26 $$Filter dimension
% Y, ~5 }# [! c0 Y* L$ I4 f2 ? mINEXTE/ALL,WORK: \7 f ` K& f/ h9 c
DO/L10:,i,1,100
3 m" q( r/ d/ V1 p+ ?+ [5 M ent=NEXTE/IFEND,L20:
- X. j- D; v* h p0 T9 R) L OBTAIN/ent,n
+ E$ u4 [; y u- i PRINT/FSTRL(n(1)) $$Print nominal dimension
$ U" {! s% U4 B5 Q/ KL10:
/ {0 z/ r8 i- P' D3 O' qL20:3 q* m& f0 K. J4 X/ w# K& Z4 A4 W, i' B
HALT
5 \( b. W* l& w; r
: m. j# }* h+ \, H2 h2 I' K0 Y% p0 O' J' T( m' ~% _! u
" _! z) G4 i! ]+ h2 f
|