static void CalendarDatePtrToDatePage ( DialoG d, Pointer data ) { CalendarDatePtr cdp; DatePagePtr dpp; dpp = (DatePagePtr) GetObjectExtra (d); if (dpp == NULL) return; cdp = (CalendarDatePtr) data; if (cdp != NULL) { SetEnumPopup (dpp->month, months_alist, (UIEnum) cdp->month); SetEnumPopup (dpp->day, days_alist, (UIEnum) cdp->day); SetEnumPopup (dpp->year, years_alist, (UIEnum) cdp->year); return; } SafeSetValue (dpp->month, 1); SafeSetValue (dpp->day, 1); SafeSetValue (dpp->year, 1); }
static void ChangeBadgTableSelect ( DoC d, Int2 item, Int2 row, Int2 col, Boolean dblClck ) { IntBadgPtr ibp; Int2 itemOld1, itemOld2; SscBadgPtr sbp; SscTablesPtr stp; sbp = (SscBadgPtr) GetObjectExtra (d); if (sbp == NULL) return; stp = sbp->tables; if (stp == NULL) return; if (item == 0 || row == 0 || col == 0) return; GetDocHighlight (d, &itemOld1, &itemOld2); SetDocHighlight (d, item, item); UpdateDocument (d, itemOld1, itemOld2); UpdateDocument (d, item, item); sbp->currItem = item; ResetClip (); ibp = GetBadgInfo (sbp, sbp->currItem); if (ibp != NULL) { SetEnumPopupByName (sbp->name, stp->payers.alist, ibp->name); SetEnumPopup (sbp->reason, reason_alist, (UIEnum) ibp->reason); SetTitle (sbp->comment, ibp->comment); } Update (); }