/* ARGSUSED */
void model_confirm ( Widget w, long which, XtPointer call )
{
switch (which) {
case 0: /* Select */
if ( ( SelectFileNo == -1 ) |
( SelectModelNo == -1) )return;
strcpy(MetaFile,
ModelStr[SelectModelNo].file_fullnames[SelectFileNo - 1]);
XmListDeselectAllItems(model_listW);
if ( !MpanelMode )
clear_window();
load_meta();
break;
case 1: /* HELP */
NxmHelp_helpBtnCb( NULL, 8, NULL);
break;
case 2: /* CANCEL */
XtUnmanageChild(model_toplevel);
break;
}
}
/* ARGSUSED */
void mpcstw_ctlBtnCb ( Widget w, long which, XtPointer call )
/************************************************************************
* mpcstw_ctlBtnCb *
* *
* This is the callback for the control buttons *
* *
* void mpcstw_ctlBtnCb(w, which, call) *
* *
* Input parameters: *
* w Widget calling widget ID *
* which long client data *
* call XtPointer never used *
* *
* Output parameters: *
* Return parameters: *
* NONE *
* *
** *
* Log: *
* S. Wang/GSC 09/96 *
* C. Lin/EAI 07/97 call new mapw module *
* G. Krueger/EAI 11/97 Renamed NxmHelp functions *
* S. Jacobs/NCEP 10/99 Added current loop to setting map proj *
* E. Safford/GSC 10/99 dataw_getCurLoop -> loop_getCurLoop *
* M. Li/GSC 03/01 removed mapw_setMap *
***********************************************************************/
{
int ignore;
/*---------------------------------------------------------------------*/
switch(which) {
case 0: /* Accept */
mpcstw_textCb( NULL, 0, NULL );
mpcstw_popdown();
mpcstw_updtMapDvr( );
/*
* draws map
*/
gclear( &ignore );
mapw_redrawMap();
break;
case 1: /* Help */
NxmHelp_helpBtnCb(w, 4, NULL);
break;
case 2: /* Cancel */
mpcstw_popdown();
break;
}
}
void wnxm_NxmHelp_helpBtnCb( Widget wid, long fileid, XtPointer cbs )
/************************************************************************
* wnxm_NxmHelp_helpBtnCb *
* *
* void wnxm_NxmHelp_helpBtnCb( wid, fileid, cbs ) *
* *
* Input parameters: *
* wid Widget ID of calling widget *
* fileid long id of help file *
* cbs XtPointer callback struct (not used) *
* *
* Output parameters: *
* None *
** *
* Log: *
* E. Safford/SAIC 12/07 initial coding *
***********************************************************************/
{
NxmHelp_helpBtnCb( wid, fileid, cbs );
}
/* ARGSUSED */
void CtrB_Callback ( Widget w, long which, XtPointer call )
/************************************************************************
*
* Callback function of control buttons for group creation panel.
*
* ctrB_Callback ( w, which, call )
*
***********************************************************************/
{
int status = 0;
/*---------------------------------------------------------------------*/
switch (which) {
case 0: /* HELP */
NxmHelp_helpBtnCb( NULL, 7, NULL );
status = 0;
break;
case 1: /* CANCEL */
status = 1;
break;
default:
status = 1;
break;
}
if (status) {
XmListDeselectAllItems(gframe_listW);
XmTextSetString(group_nameW, "");
XtUnmanageChild(group_panel_toplevel);
}
}
