34 #include "form.priv.h"
40 |   Function      :  int set_current_field(FORM  * form,FIELD * field)
42 |   Description   :  Set the current field of the form to the specified one.
45 |                    E_BAD_ARGUMENT    - invalid form or field pointer
52 set_current_field(FORM *form, FIELD *field)  in FORM_EXPORT()
56   T((T_CALLED("set_current_field(%p,%p)"), (void *)form, (void *)field));  in FORM_EXPORT()
57   if (form == 0 || field == 0)  in FORM_EXPORT()
61   else if ((form != field->form) || Field_Is_Not_Selectable(field))  in FORM_EXPORT()
65   else if ((form->status & _POSTED) == 0)  in FORM_EXPORT()
67       form->current = field;  in FORM_EXPORT()
68       form->curpage = field->page;  in FORM_EXPORT()
72       if ((form->status & _IN_DRIVER) != 0)  in FORM_EXPORT()
78 	  if (form->current != field)  in FORM_EXPORT()
80 	      if (form->current && !_nc_Internal_Validation(form))  in FORM_EXPORT()
86 		  Call_Hook(form, fieldterm);  in FORM_EXPORT()
87 		  if (field->page != form->curpage)  in FORM_EXPORT()
89 		      Call_Hook(form, formterm);  in FORM_EXPORT()
90 		      err = _nc_Set_Form_Page(form, (int)field->page, field);  in FORM_EXPORT()
91 		      Call_Hook(form, forminit);  in FORM_EXPORT()
95 		      err = _nc_Set_Current_Field(form, field);  in FORM_EXPORT()
97 		  Call_Hook(form, fieldinit);  in FORM_EXPORT()
98 		  (void)_nc_Refresh_Current_Field(form);  in FORM_EXPORT()
108 |   Function      :  int unfocus_current_field(FORM * form)
113 |                    E_BAD_ARGUMENT    - invalid form pointer
117 unfocus_current_field(FORM *const form)  in unfocus_current_field()  argument
119   T((T_CALLED("unfocus_current_field(%p)"), (const void *)form));  in unfocus_current_field()
120   if (form == 0)  in unfocus_current_field()
124   else if (form->current == 0)  in unfocus_current_field()
128   _nc_Unset_Current_Field(form);  in unfocus_current_field()
134 |   Function      :  FIELD *current_field(const FORM * form)
141 current_field(const FORM *form)  in current_field()  argument
143   T((T_CALLED("current_field(%p)"), (const void *)form));  in current_field()
144   returnField(Normalize_Form(form)->current);  in current_field()
152 |                    the form.
161   returnCode((field != 0 && field->form != 0) ? (int)field->index : -1);  in field_index()