API调用GRIP时 IDENT选择对话框无法显示问题！！

kanggeng

ug中运行时 提示在GRIP中IDENT处无法显示对话框，当时上一个操作对话框还在打开着 但我确实规定了return (UF_UI_CB_EXIT_DIALOG);关闭对话框的命令啊 ！请帮我看看程序！！
  S7 C! B0 e5 a7 T/ m. b- BAPI中OK按钮的定义：
int BOTTLE_DESIGN_ok_cb ( int dialog_id,
8 ?& C: \1 l& W0 x0 p9 L& S" b9 r             void * client_data,
9 X9 D( D- g. j+ r4 _0 W" }             UF_STYLER_item_value_type_p_t callback_data)
- @5 B6 P) Q. X6 w. Q{
  M* D. g: ?3 V4 H7 p     /* Make sure User Function is available. */  
8 v1 D) k0 _' ]* V/ ?     if ( UF_initialize() != 0)
( s0 ~: k3 _' N6 v. p$ h          return ( UF_UI_CB_CONTINUE_DIALOG );
+ m% S4 W, n! n% {/ X) f' O     /* ---- Enter your callback code here ----- */
    UF_PART_save();
0 @" h, r( ?; N) p% S) Y  int scope=0;
. i+ D& f, f2 k: e  int mode=1;
5 H" w  u  N- q' D5 L0 K& p  tag_t part;
0 Q7 R9 B& [, b; d  UF_PART_close(part,scope,mode);    /*蓝色部分是关闭并保存上一个部件，然后再把几个参数给GRIP调用并建模*/
   int i;
     write_para(dialog_id);
; n! }; N  B# s8 ]! Q. L' b' [- |6 g  const char env[255]="UGII_USER_DIR";
  char *basedir=NULL;
  basedir=getenv(env);
  
  char dir[100];
  strcpy(dir,basedir);
$ A( T! N; i$ {$ B  strcat(dir,\\grip\\mentou.grx);
4 e7 @# j# Z9 \2 @% @   
  char *grip_exe=dir;
  int status;
  int grip_arg_count=4;
     UF_args_t grip_arg_list[4];

     grip_arg_list[0].type=UF_TYPE_DOUBLE;
+ }+ W$ i/ t  N  q! ]" @! e     grip_arg_list[0].length=0;
& u# I+ _6 t! a" |8 n     grip_arg_list[0].address=&data[0].value.real;
6 Y8 x# a2 @9 l" }  grip_arg_list[1].type=UF_TYPE_DOUBLE;
     grip_arg_list[1].length=0;
1 n& W) p/ P8 W  a" C     grip_arg_list[1].address=&data[1].value.real;
  grip_arg_list[2].type=UF_TYPE_DOUBLE;
1 B% `# O  W, v$ v0 L9 T$ ^+ j" C     grip_arg_list[2].length=0;
     grip_arg_list[2].address=&data[2].value.real;
   grip_arg_list[3].type=UF_TYPE_DOUBLE;
+ Z8 T9 v( y, p, c     grip_arg_list[3].length=0;
. D# X+ a( i7 d     grip_arg_list[3].address=&data[3].value.real;
3 @) d. v* e3 I- u) F+ K      
+ z4 j- Q+ S$ W% k) J4 w* a3 o     status=UF_call_grip(grip_exe,grip_arg_count,grip_arg_list);
6 Q; n0 @  T: P1 S" N4 k     UF_terminate ();
8 m+ c& O$ W5 ~" Z/ F# [    /* Callback acknowledged, terminate dialog             */
    /* It is STRONGLY recommended that you exit your       */
8 e* T$ b2 F7 `) K4 R    /* callback with UF_UI_CB_EXIT_DIALOG in a ok callback.*/
    /* return ( UF_UI_CB_EXIT_DIALOG );                    */
; `. ?+ E) l* c' `4 C    return (UF_UI_CB_EXIT_DIALOG);                           
}
void write_para(int dialog_id)
, y. n& W# m# r- h{
* ?* \8 _. l, H- c9 q  data[0].item_attr=UF_STYLER_VALUE;
' R! B! K" p. e" w5 t  data[0].item_id=BOTTLE_DESIGN_REAL_DMAX;
8 }* e6 E5 g' B* I- x3 H- [, d     UF_STYLER_ask_value(dialog_id,&data[0]);
9 E- z1 \7 P$ V3 k4 o0 P  data[1].item_attr=UF_STYLER_VALUE;
  data[1].item_id=BOTTLE_DESIGN_REAL_DMIN;
     UF_STYLER_ask_value(dialog_id,&data[1]);
  data[2].item_attr=UF_STYLER_VALUE;
4 m7 w; h# h) `  data[2].item_id=BOTTLE_DESIGN_REAL_B;
     UF_STYLER_ask_value(dialog_id,&data[2]);
& G4 t0 G0 A( u3 s8 B% M" a  data[3].item_attr=UF_STYLER_VALUE;
  data[3].item_id=BOTTLE_DESIGN_REAL_HF;
& n: j3 g8 S* I% u; ]" z# W     UF_STYLER_ask_value(dialog_id,&data[3]);
}
; }" \- u: f/ B- t0 K2 l$ g
# d  p7 R/ H* T' Y8 ^GRIP部分代码（打开一个部件，在此部件上减实体添特征，有一个IDENT选择）
3 e4 o" s& i0 |. M- Q! Hnumber/b,dmax,dmin,df,da,hf
entity/org,org1,org2
6 }/ F* m% S3 ]( ]3 Kufargs/b,dmax,dmin,hf
da=(dmin+dmax)/2
3 t% B3 o+ _5 G& ]% a1 ]+ q; q/ _df=b*da
9 d) R+ p; F1 N' K+ Q4 F+ c- yfetch/part,'D:\\model\\part\\mentou'
3 Y8 A1 n; c% il10:
5 Z, v! k2 X+ L/ I- T0 g3 hident/'选择实体',org,resp
$ s7 n( t! m8 D$ Njump/l10:,trm:,,resp
org1=solcyl/origin,0,0,0,height,hf,diamtr,df
org2=subtra/org,with,org1
( ^1 ?$ {# j3 |) Y& J4 atrm:
halt