53 set_current_field(FORM *form, FIELD *field)  in FORM_EXPORT()
57   T((T_CALLED("set_current_field(%p,%p)"), (void *)form, (void *)field));  in FORM_EXPORT()
58   if (form == 0 || field == 0)  in FORM_EXPORT()
62   else if ((form != field->form) || Field_Is_Not_Selectable(field))  in FORM_EXPORT()
66   else if ((form->status & _POSTED) == 0)  in FORM_EXPORT()
68       form->current = field;  in FORM_EXPORT()
69       form->curpage = field->page;  in FORM_EXPORT()
73       if ((form->status & _IN_DRIVER) != 0)  in FORM_EXPORT()
79 	  if (form->current != field)  in FORM_EXPORT()
81 	      if (form->current && !_nc_Internal_Validation(form))  in FORM_EXPORT()
87 		  Call_Hook(form, fieldterm);  in FORM_EXPORT()
88 		  if (field->page != form->curpage)  in FORM_EXPORT()
90 		      Call_Hook(form, formterm);  in FORM_EXPORT()
91 		      err = _nc_Set_Form_Page(form, (int)field->page, field);  in FORM_EXPORT()
92 		      Call_Hook(form, forminit);  in FORM_EXPORT()
96 		      err = _nc_Set_Current_Field(form, field);  in FORM_EXPORT()
98 		  Call_Hook(form, fieldinit);  in FORM_EXPORT()
99 		  (void)_nc_Refresh_Current_Field(form);  in FORM_EXPORT()
118 unfocus_current_field(FORM *const form)  in unfocus_current_field()  argument
120   T((T_CALLED("unfocus_current_field(%p)"), (const void *)form));  in unfocus_current_field()
121   if (form == 0)  in unfocus_current_field()
125   else if (form->current == 0)  in unfocus_current_field()
129   _nc_Unset_Current_Field(form);  in unfocus_current_field()
142 current_field(const FORM *form)  in current_field()  argument
144   T((T_CALLED("current_field(%p)"), (const void *)form));  in current_field()
145   returnField(Normalize_Form(form)->current);  in current_field()
162   returnCode((field != 0 && field->form != 0) ? (int)field->index : -1);  in field_index()