VCPFldSetEditable
void VCPFldSetEditable(Word id, int mode);
//ENDH
/*****************************************************
    Set the editable flag of a field

    id   = user defined id of the field
    mode = TRUE or FALSE

******************************************************/
void VCPFldSetEditable(Word id, int mode)
{
	FormPtr frmp;
	FieldPtr fldp;
	FieldAttrType fa;

	frmp=FrmGetActiveForm();
	fldp=FrmGetObjectPtr(frmp, FrmGetObjectIndex(frmp, id));
	FldGetAttributes(fldp, &fa);
	fa.editable = mode;
	FldSetAttributes(fldp, &fa);

	FldDrawField(fldp);
}
