Ejemplo n.º 1
0
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);
}
Ejemplo n.º 2
0
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 ();
}