Function alter_domain

src/gpre/cmd.cpp:296–333

//

static void alter_domain( gpre_req* request, const act* action)
{
	const gpre_fld* field = (gpre_fld*) action->act_object;

	// modify field info

	put_symbol(request, isc_dyn_mod_global_fld, field->fld_symbol);

	const gpre_nod* default_node = field->fld_default_value;
	if (default_node)
	{
		if (default_node->nod_type == nod_erase) {
			request->add_byte(isc_dyn_del_default);
		}
		else
		{
			put_blr(request, isc_dyn_fld_default_value, field->fld_default_value, CME_expr);
			TEXT* default_source = (TEXT *) MSC_alloc(field->fld_default_source->txt_length + 1);
			CPR_get_text(default_source, field->fld_default_source);
			put_cstring(request, isc_dyn_fld_default_source, default_source);
		}
	}

	if (field->fld_constraints)
	{
		request->add_byte(isc_dyn_single_validation);
		for (const cnstrt* constraint = field->fld_constraints;
			 constraint;
			 constraint = constraint->cnstrt_next)
		{
			if (constraint->cnstrt_flags & CNSTRT_delete)
				request->add_byte(isc_dyn_del_validation);
		}
		create_domain_constraint(request, field->fld_constraints);
	}

	request->add_end();
}


//____________________________________________________________