Dialog box not reponding

Hi all,

I have got a problem with dialog boxes.
In the below code, with the click of a button, I am trying to close the current dialog box and call a function that contains another dialog box. The problem here is, the first dialog box does not get closed. I tried with (term_dialog) and (unload_dialog dcl_id) instead of (done_dialog). That too does not work.

Any help from anybody is very much appreciated.

The part of the coding is as given below:

(defun c:xyz()
....
....
....
   (setq dcl_id (load_dialog (findfile "cdfld.dcl")))
   (if (not (new_dialog "CDFLD" dcl_id))(progn (alert "CDFLD.dcl not found in the search path")(exit)))
   (action_tile "lnkbtn" "(progn (done_dialog)(cdlnk))")
....
....
....
);end defun c:xyz

(defun cdlnk()
  (setq ndcl_id (load_dialog (findfile "CDFLD.DCL")))
  (if (not (new_dialog "CDLNK" ndcl_id))(progn (alert "CDFLD.DCL not found in the search path")(exit)))
...
...
...

Thanks,
MNRaghu

 

Jon Fleming, Thanks a lot for a good advice. That made my program work fine.

MNRaghu