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

kanggeng

ug中运行时 提示在GRIP中IDENT处无法显示对话框，当时上一个操作对话框还在打开着 但我确实规定了return (UF_UI_CB_EXIT_DIALOG);关闭对话框的命令啊 ！请帮我看看程序！！
) W; i4 T) s/ QAPI中OK按钮的定义：
int BOTTLE_DESIGN_ok_cb ( int dialog_id,
9 d. b$ T3 I2 G' X" O* R             void * client_data,
; i' `, c1 W  _" m, o9 u; l             UF_STYLER_item_value_type_p_t callback_data)
  V' ~: m, x( f* G7 Y5 g4 N0 R{
     /* Make sure User Function is available. */  
     if ( UF_initialize() != 0)
( b+ ~4 x' R, H8 u4 y# o          return ( UF_UI_CB_CONTINUE_DIALOG );
$ O. O/ i" e6 w, b/ r- P  q, ]; Y     /* ---- Enter your callback code here ----- */
( f4 ?* f+ I3 A    UF_PART_save();
  int scope=0;
  int mode=1;
% N' i% L" C7 l6 w, k$ E9 X# ?  tag_t part;
4 {  U6 H( J% n8 u  UF_PART_close(part,scope,mode);    /*蓝色部分是关闭并保存上一个部件，然后再把几个参数给GRIP调用并建模*/
0 n! k9 M, M  K! O, M. S   int i;
4 ~8 Y" ]$ z. H  i8 R4 O     write_para(dialog_id);
  const char env[255]="UGII_USER_DIR";
  char *basedir=NULL;
8 o+ R" o0 C! X  basedir=getenv(env);
* e9 q4 H2 z( A; I% {1 B  
  char dir[100];
  strcpy(dir,basedir);
  strcat(dir,\\grip\\mentou.grx);
3 p+ {0 y8 m5 a/ a5 t5 x  Q   
  char *grip_exe=dir;
  int status;
  int grip_arg_count=4;
) E+ p2 S% z- H) x) Y3 d* M0 s     UF_args_t grip_arg_list[4];

% m" @! B; k$ }! ?" t& h) V8 y     grip_arg_list[0].type=UF_TYPE_DOUBLE;
  k3 U; z- Y9 Z' J" }     grip_arg_list[0].length=0;
     grip_arg_list[0].address=&data[0].value.real;
0 q5 \; R7 e& C% q7 O6 O- j  y  grip_arg_list[1].type=UF_TYPE_DOUBLE;
     grip_arg_list[1].length=0;
% R8 v: W, N; M, Z" r     grip_arg_list[1].address=&data[1].value.real;
- c7 k) S- {* I; g+ w  grip_arg_list[2].type=UF_TYPE_DOUBLE;
     grip_arg_list[2].length=0;
     grip_arg_list[2].address=&data[2].value.real;
5 q% O# ^9 `. p1 m. L. m   grip_arg_list[3].type=UF_TYPE_DOUBLE;
; T$ V3 A8 \8 R, S! `. k     grip_arg_list[3].length=0;
     grip_arg_list[3].address=&data[3].value.real;
      
0 S# I7 B: C! n  f- Y     status=UF_call_grip(grip_exe,grip_arg_count,grip_arg_list);
     UF_terminate ();
    /* Callback acknowledged, terminate dialog             */
    /* It is STRONGLY recommended that you exit your       */
    /* callback with UF_UI_CB_EXIT_DIALOG in a ok callback.*/
# o1 O" h$ t! T5 \+ U, A! r    /* return ( UF_UI_CB_EXIT_DIALOG );                    */
/ f- {  j# M% B/ W    return (UF_UI_CB_EXIT_DIALOG);                           
}
* ^1 [- }# v9 C/ Wvoid write_para(int dialog_id)
{
  data[0].item_attr=UF_STYLER_VALUE;
  data[0].item_id=BOTTLE_DESIGN_REAL_DMAX;
     UF_STYLER_ask_value(dialog_id,&data[0]);
  data[1].item_attr=UF_STYLER_VALUE;
  data[1].item_id=BOTTLE_DESIGN_REAL_DMIN;
! t- P# ~7 h6 C5 G8 m     UF_STYLER_ask_value(dialog_id,&data[1]);
% J) a5 R. t7 f0 j. H  data[2].item_attr=UF_STYLER_VALUE;
) V5 V9 O/ U( y1 t; V  data[2].item_id=BOTTLE_DESIGN_REAL_B;
     UF_STYLER_ask_value(dialog_id,&data[2]);
  data[3].item_attr=UF_STYLER_VALUE;
  data[3].item_id=BOTTLE_DESIGN_REAL_HF;
, b# d) t9 S; V- A     UF_STYLER_ask_value(dialog_id,&data[3]);
}
4 u5 X& O- H5 d: R* t
3 x1 Y9 J; H; @. {1 K" S! dGRIP部分代码（打开一个部件，在此部件上减实体添特征，有一个IDENT选择）
% X4 I" t# y( j9 ^) Q. ?number/b,dmax,dmin,df,da,hf
& W3 _% z! {6 n% C* Gentity/org,org1,org2
, T- Y- |8 q; c$ V! z; b/ w+ Qufargs/b,dmax,dmin,hf
7 c4 S$ |2 t0 a* ^$ r0 L  F3 i  Bda=(dmin+dmax)/2
+ j) o4 B" x0 q3 P; N$ `" c) f7 pdf=b*da
fetch/part,'D:\\model\\part\\mentou'
5 q- {5 \- Z; E3 h8 Kl10:
ident/'选择实体',org,resp
jump/l10:,trm:,,resp
org1=solcyl/origin,0,0,0,height,hf,diamtr,df
org2=subtra/org,with,org1
trm:
; w! T! E" t- n" }) Qhalt