/****
 * IEC 61131-3 standard function lib
 * generated code, do not edit by hand
 */
switch(current_function_type){

/****
 *REAL_TO_REAL
 */
	case function_real_to_real :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(real_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::real_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_real_to_real*/
	break;

/****
 *REAL_TO_SINT
 */
	case function_real_to_sint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(real_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::sint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_real_to_sint*/
	break;

/****
 *REAL_TO_LINT
 */
	case function_real_to_lint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(real_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_real_to_lint*/
	break;

/****
 *REAL_TO_DINT
 */
	case function_real_to_dint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(real_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_real_to_dint*/
	break;

/****
 *REAL_TO_DATE
 */
	case function_real_to_date :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(real_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::date_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_real_to_date*/
	break;

/****
 *REAL_TO_DWORD
 */
	case function_real_to_dword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(real_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_real_to_dword*/
	break;

/****
 *REAL_TO_DT
 */
	case function_real_to_dt :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(real_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dt_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_real_to_dt*/
	break;

/****
 *REAL_TO_TOD
 */
	case function_real_to_tod :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(real_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::tod_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_real_to_tod*/
	break;

/****
 *REAL_TO_UDINT
 */
	case function_real_to_udint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(real_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::udint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_real_to_udint*/
	break;

/****
 *REAL_TO_WORD
 */
	case function_real_to_word :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(real_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::word_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_real_to_word*/
	break;

/****
 *REAL_TO_WSTRING
 */
	case function_real_to_wstring :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(real_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::wstring_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_real_to_wstring*/
	break;

/****
 *REAL_TO_STRING
 */
	case function_real_to_string :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(real_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_real_to_string*/
	break;

/****
 *REAL_TO_LWORD
 */
	case function_real_to_lword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(real_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_real_to_lword*/
	break;

/****
 *REAL_TO_UINT
 */
	case function_real_to_uint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(real_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::uint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_real_to_uint*/
	break;

/****
 *REAL_TO_LREAL
 */
	case function_real_to_lreal :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(real_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lreal_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_real_to_lreal*/
	break;

/****
 *REAL_TO_BYTE
 */
	case function_real_to_byte :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(real_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::byte_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_real_to_byte*/
	break;

/****
 *REAL_TO_USINT
 */
	case function_real_to_usint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(real_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::usint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_real_to_usint*/
	break;

/****
 *REAL_TO_ULINT
 */
	case function_real_to_ulint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(real_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::ulint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_real_to_ulint*/
	break;

/****
 *REAL_TO_BOOL
 */
	case function_real_to_bool :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(real_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_real_to_bool*/
	break;

/****
 *REAL_TO_TIME
 */
	case function_real_to_time :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(real_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_real_to_time*/
	break;

/****
 *REAL_TO_INT
 */
	case function_real_to_int :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(real_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_real_to_int*/
	break;

/****
 *SINT_TO_REAL
 */
	case function_sint_to_real :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(sint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::real_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_sint_to_real*/
	break;

/****
 *SINT_TO_SINT
 */
	case function_sint_to_sint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(sint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::sint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_sint_to_sint*/
	break;

/****
 *SINT_TO_LINT
 */
	case function_sint_to_lint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(sint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_sint_to_lint*/
	break;

/****
 *SINT_TO_DINT
 */
	case function_sint_to_dint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(sint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_sint_to_dint*/
	break;

/****
 *SINT_TO_DATE
 */
	case function_sint_to_date :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(sint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::date_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_sint_to_date*/
	break;

/****
 *SINT_TO_DWORD
 */
	case function_sint_to_dword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(sint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_sint_to_dword*/
	break;

/****
 *SINT_TO_DT
 */
	case function_sint_to_dt :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(sint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dt_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_sint_to_dt*/
	break;

/****
 *SINT_TO_TOD
 */
	case function_sint_to_tod :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(sint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::tod_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_sint_to_tod*/
	break;

/****
 *SINT_TO_UDINT
 */
	case function_sint_to_udint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(sint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::udint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_sint_to_udint*/
	break;

/****
 *SINT_TO_WORD
 */
	case function_sint_to_word :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(sint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::word_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_sint_to_word*/
	break;

/****
 *SINT_TO_WSTRING
 */
	case function_sint_to_wstring :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(sint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::wstring_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_sint_to_wstring*/
	break;

/****
 *SINT_TO_STRING
 */
	case function_sint_to_string :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(sint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_sint_to_string*/
	break;

/****
 *SINT_TO_LWORD
 */
	case function_sint_to_lword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(sint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_sint_to_lword*/
	break;

/****
 *SINT_TO_UINT
 */
	case function_sint_to_uint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(sint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::uint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_sint_to_uint*/
	break;

/****
 *SINT_TO_LREAL
 */
	case function_sint_to_lreal :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(sint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lreal_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_sint_to_lreal*/
	break;

/****
 *SINT_TO_BYTE
 */
	case function_sint_to_byte :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(sint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::byte_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_sint_to_byte*/
	break;

/****
 *SINT_TO_USINT
 */
	case function_sint_to_usint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(sint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::usint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_sint_to_usint*/
	break;

/****
 *SINT_TO_ULINT
 */
	case function_sint_to_ulint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(sint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::ulint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_sint_to_ulint*/
	break;

/****
 *SINT_TO_BOOL
 */
	case function_sint_to_bool :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(sint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_sint_to_bool*/
	break;

/****
 *SINT_TO_TIME
 */
	case function_sint_to_time :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(sint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_sint_to_time*/
	break;

/****
 *SINT_TO_INT
 */
	case function_sint_to_int :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(sint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_sint_to_int*/
	break;

/****
 *LINT_TO_REAL
 */
	case function_lint_to_real :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::real_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lint_to_real*/
	break;

/****
 *LINT_TO_SINT
 */
	case function_lint_to_sint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::sint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lint_to_sint*/
	break;

/****
 *LINT_TO_LINT
 */
	case function_lint_to_lint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lint_to_lint*/
	break;

/****
 *LINT_TO_DINT
 */
	case function_lint_to_dint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lint_to_dint*/
	break;

/****
 *LINT_TO_DATE
 */
	case function_lint_to_date :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::date_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lint_to_date*/
	break;

/****
 *LINT_TO_DWORD
 */
	case function_lint_to_dword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lint_to_dword*/
	break;

/****
 *LINT_TO_DT
 */
	case function_lint_to_dt :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dt_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lint_to_dt*/
	break;

/****
 *LINT_TO_TOD
 */
	case function_lint_to_tod :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::tod_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lint_to_tod*/
	break;

/****
 *LINT_TO_UDINT
 */
	case function_lint_to_udint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::udint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lint_to_udint*/
	break;

/****
 *LINT_TO_WORD
 */
	case function_lint_to_word :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::word_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lint_to_word*/
	break;

/****
 *LINT_TO_WSTRING
 */
	case function_lint_to_wstring :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::wstring_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lint_to_wstring*/
	break;

/****
 *LINT_TO_STRING
 */
	case function_lint_to_string :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lint_to_string*/
	break;

/****
 *LINT_TO_LWORD
 */
	case function_lint_to_lword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lint_to_lword*/
	break;

/****
 *LINT_TO_UINT
 */
	case function_lint_to_uint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::uint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lint_to_uint*/
	break;

/****
 *LINT_TO_LREAL
 */
	case function_lint_to_lreal :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lreal_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lint_to_lreal*/
	break;

/****
 *LINT_TO_BYTE
 */
	case function_lint_to_byte :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::byte_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lint_to_byte*/
	break;

/****
 *LINT_TO_USINT
 */
	case function_lint_to_usint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::usint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lint_to_usint*/
	break;

/****
 *LINT_TO_ULINT
 */
	case function_lint_to_ulint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::ulint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lint_to_ulint*/
	break;

/****
 *LINT_TO_BOOL
 */
	case function_lint_to_bool :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lint_to_bool*/
	break;

/****
 *LINT_TO_TIME
 */
	case function_lint_to_time :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lint_to_time*/
	break;

/****
 *LINT_TO_INT
 */
	case function_lint_to_int :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lint_to_int*/
	break;

/****
 *DINT_TO_REAL
 */
	case function_dint_to_real :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::real_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dint_to_real*/
	break;

/****
 *DINT_TO_SINT
 */
	case function_dint_to_sint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::sint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dint_to_sint*/
	break;

/****
 *DINT_TO_LINT
 */
	case function_dint_to_lint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dint_to_lint*/
	break;

/****
 *DINT_TO_DINT
 */
	case function_dint_to_dint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dint_to_dint*/
	break;

/****
 *DINT_TO_DATE
 */
	case function_dint_to_date :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::date_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dint_to_date*/
	break;

/****
 *DINT_TO_DWORD
 */
	case function_dint_to_dword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dint_to_dword*/
	break;

/****
 *DINT_TO_DT
 */
	case function_dint_to_dt :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dt_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dint_to_dt*/
	break;

/****
 *DINT_TO_TOD
 */
	case function_dint_to_tod :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::tod_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dint_to_tod*/
	break;

/****
 *DINT_TO_UDINT
 */
	case function_dint_to_udint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::udint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dint_to_udint*/
	break;

/****
 *DINT_TO_WORD
 */
	case function_dint_to_word :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::word_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dint_to_word*/
	break;

/****
 *DINT_TO_WSTRING
 */
	case function_dint_to_wstring :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::wstring_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dint_to_wstring*/
	break;

/****
 *DINT_TO_STRING
 */
	case function_dint_to_string :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dint_to_string*/
	break;

/****
 *DINT_TO_LWORD
 */
	case function_dint_to_lword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dint_to_lword*/
	break;

/****
 *DINT_TO_UINT
 */
	case function_dint_to_uint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::uint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dint_to_uint*/
	break;

/****
 *DINT_TO_LREAL
 */
	case function_dint_to_lreal :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lreal_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dint_to_lreal*/
	break;

/****
 *DINT_TO_BYTE
 */
	case function_dint_to_byte :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::byte_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dint_to_byte*/
	break;

/****
 *DINT_TO_USINT
 */
	case function_dint_to_usint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::usint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dint_to_usint*/
	break;

/****
 *DINT_TO_ULINT
 */
	case function_dint_to_ulint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::ulint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dint_to_ulint*/
	break;

/****
 *DINT_TO_BOOL
 */
	case function_dint_to_bool :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dint_to_bool*/
	break;

/****
 *DINT_TO_TIME
 */
	case function_dint_to_time :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dint_to_time*/
	break;

/****
 *DINT_TO_INT
 */
	case function_dint_to_int :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dint_to_int*/
	break;

/****
 *DATE_TO_REAL
 */
	case function_date_to_real :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(date_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::real_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_date_to_real*/
	break;

/****
 *DATE_TO_SINT
 */
	case function_date_to_sint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(date_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::sint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_date_to_sint*/
	break;

/****
 *DATE_TO_LINT
 */
	case function_date_to_lint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(date_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_date_to_lint*/
	break;

/****
 *DATE_TO_DINT
 */
	case function_date_to_dint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(date_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_date_to_dint*/
	break;

/****
 *DATE_TO_DATE
 */
	case function_date_to_date :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(date_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::date_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_date_to_date*/
	break;

/****
 *DATE_TO_DWORD
 */
	case function_date_to_dword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(date_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_date_to_dword*/
	break;

/****
 *DATE_TO_DT
 */
	case function_date_to_dt :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(date_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dt_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_date_to_dt*/
	break;

/****
 *DATE_TO_TOD
 */
	case function_date_to_tod :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(date_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::tod_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_date_to_tod*/
	break;

/****
 *DATE_TO_UDINT
 */
	case function_date_to_udint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(date_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::udint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_date_to_udint*/
	break;

/****
 *DATE_TO_WORD
 */
	case function_date_to_word :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(date_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::word_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_date_to_word*/
	break;

/****
 *DATE_TO_WSTRING
 */
	case function_date_to_wstring :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(date_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::wstring_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_date_to_wstring*/
	break;

/****
 *DATE_TO_STRING
 */
	case function_date_to_string :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(date_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_date_to_string*/
	break;

/****
 *DATE_TO_LWORD
 */
	case function_date_to_lword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(date_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_date_to_lword*/
	break;

/****
 *DATE_TO_UINT
 */
	case function_date_to_uint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(date_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::uint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_date_to_uint*/
	break;

/****
 *DATE_TO_LREAL
 */
	case function_date_to_lreal :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(date_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lreal_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_date_to_lreal*/
	break;

/****
 *DATE_TO_BYTE
 */
	case function_date_to_byte :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(date_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::byte_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_date_to_byte*/
	break;

/****
 *DATE_TO_USINT
 */
	case function_date_to_usint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(date_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::usint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_date_to_usint*/
	break;

/****
 *DATE_TO_ULINT
 */
	case function_date_to_ulint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(date_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::ulint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_date_to_ulint*/
	break;

/****
 *DATE_TO_BOOL
 */
	case function_date_to_bool :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(date_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_date_to_bool*/
	break;

/****
 *DATE_TO_TIME
 */
	case function_date_to_time :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(date_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_date_to_time*/
	break;

/****
 *DATE_TO_INT
 */
	case function_date_to_int :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(date_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_date_to_int*/
	break;

/****
 *DWORD_TO_REAL
 */
	case function_dword_to_real :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::real_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dword_to_real*/
	break;

/****
 *DWORD_TO_SINT
 */
	case function_dword_to_sint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::sint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dword_to_sint*/
	break;

/****
 *DWORD_TO_LINT
 */
	case function_dword_to_lint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dword_to_lint*/
	break;

/****
 *DWORD_TO_DINT
 */
	case function_dword_to_dint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dword_to_dint*/
	break;

/****
 *DWORD_TO_DATE
 */
	case function_dword_to_date :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::date_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dword_to_date*/
	break;

/****
 *DWORD_TO_DWORD
 */
	case function_dword_to_dword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dword_to_dword*/
	break;

/****
 *DWORD_TO_DT
 */
	case function_dword_to_dt :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dt_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dword_to_dt*/
	break;

/****
 *DWORD_TO_TOD
 */
	case function_dword_to_tod :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::tod_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dword_to_tod*/
	break;

/****
 *DWORD_TO_UDINT
 */
	case function_dword_to_udint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::udint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dword_to_udint*/
	break;

/****
 *DWORD_TO_WORD
 */
	case function_dword_to_word :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::word_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dword_to_word*/
	break;

/****
 *DWORD_TO_WSTRING
 */
	case function_dword_to_wstring :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::wstring_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dword_to_wstring*/
	break;

/****
 *DWORD_TO_STRING
 */
	case function_dword_to_string :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dword_to_string*/
	break;

/****
 *DWORD_TO_LWORD
 */
	case function_dword_to_lword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dword_to_lword*/
	break;

/****
 *DWORD_TO_UINT
 */
	case function_dword_to_uint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::uint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dword_to_uint*/
	break;

/****
 *DWORD_TO_LREAL
 */
	case function_dword_to_lreal :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lreal_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dword_to_lreal*/
	break;

/****
 *DWORD_TO_BYTE
 */
	case function_dword_to_byte :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::byte_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dword_to_byte*/
	break;

/****
 *DWORD_TO_USINT
 */
	case function_dword_to_usint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::usint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dword_to_usint*/
	break;

/****
 *DWORD_TO_ULINT
 */
	case function_dword_to_ulint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::ulint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dword_to_ulint*/
	break;

/****
 *DWORD_TO_BOOL
 */
	case function_dword_to_bool :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dword_to_bool*/
	break;

/****
 *DWORD_TO_TIME
 */
	case function_dword_to_time :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dword_to_time*/
	break;

/****
 *DWORD_TO_INT
 */
	case function_dword_to_int :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dword_to_int*/
	break;

/****
 *DT_TO_REAL
 */
	case function_dt_to_real :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::real_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dt_to_real*/
	break;

/****
 *DT_TO_SINT
 */
	case function_dt_to_sint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::sint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dt_to_sint*/
	break;

/****
 *DT_TO_LINT
 */
	case function_dt_to_lint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dt_to_lint*/
	break;

/****
 *DT_TO_DINT
 */
	case function_dt_to_dint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dt_to_dint*/
	break;

/****
 *DT_TO_DATE
 */
	case function_dt_to_date :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::date_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dt_to_date*/
	break;

/****
 *DT_TO_DWORD
 */
	case function_dt_to_dword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dt_to_dword*/
	break;

/****
 *DT_TO_DT
 */
	case function_dt_to_dt :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dt_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dt_to_dt*/
	break;

/****
 *DT_TO_TOD
 */
	case function_dt_to_tod :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::tod_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dt_to_tod*/
	break;

/****
 *DT_TO_UDINT
 */
	case function_dt_to_udint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::udint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dt_to_udint*/
	break;

/****
 *DT_TO_WORD
 */
	case function_dt_to_word :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::word_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dt_to_word*/
	break;

/****
 *DT_TO_WSTRING
 */
	case function_dt_to_wstring :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::wstring_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dt_to_wstring*/
	break;

/****
 *DT_TO_STRING
 */
	case function_dt_to_string :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dt_to_string*/
	break;

/****
 *DT_TO_LWORD
 */
	case function_dt_to_lword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dt_to_lword*/
	break;

/****
 *DT_TO_UINT
 */
	case function_dt_to_uint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::uint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dt_to_uint*/
	break;

/****
 *DT_TO_LREAL
 */
	case function_dt_to_lreal :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lreal_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dt_to_lreal*/
	break;

/****
 *DT_TO_BYTE
 */
	case function_dt_to_byte :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::byte_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dt_to_byte*/
	break;

/****
 *DT_TO_USINT
 */
	case function_dt_to_usint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::usint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dt_to_usint*/
	break;

/****
 *DT_TO_ULINT
 */
	case function_dt_to_ulint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::ulint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dt_to_ulint*/
	break;

/****
 *DT_TO_BOOL
 */
	case function_dt_to_bool :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dt_to_bool*/
	break;

/****
 *DT_TO_TIME
 */
	case function_dt_to_time :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dt_to_time*/
	break;

/****
 *DT_TO_INT
 */
	case function_dt_to_int :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dt_to_int*/
	break;

/****
 *TOD_TO_REAL
 */
	case function_tod_to_real :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(tod_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::real_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_tod_to_real*/
	break;

/****
 *TOD_TO_SINT
 */
	case function_tod_to_sint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(tod_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::sint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_tod_to_sint*/
	break;

/****
 *TOD_TO_LINT
 */
	case function_tod_to_lint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(tod_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_tod_to_lint*/
	break;

/****
 *TOD_TO_DINT
 */
	case function_tod_to_dint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(tod_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_tod_to_dint*/
	break;

/****
 *TOD_TO_DATE
 */
	case function_tod_to_date :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(tod_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::date_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_tod_to_date*/
	break;

/****
 *TOD_TO_DWORD
 */
	case function_tod_to_dword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(tod_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_tod_to_dword*/
	break;

/****
 *TOD_TO_DT
 */
	case function_tod_to_dt :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(tod_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dt_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_tod_to_dt*/
	break;

/****
 *TOD_TO_TOD
 */
	case function_tod_to_tod :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(tod_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::tod_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_tod_to_tod*/
	break;

/****
 *TOD_TO_UDINT
 */
	case function_tod_to_udint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(tod_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::udint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_tod_to_udint*/
	break;

/****
 *TOD_TO_WORD
 */
	case function_tod_to_word :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(tod_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::word_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_tod_to_word*/
	break;

/****
 *TOD_TO_WSTRING
 */
	case function_tod_to_wstring :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(tod_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::wstring_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_tod_to_wstring*/
	break;

/****
 *TOD_TO_STRING
 */
	case function_tod_to_string :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(tod_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_tod_to_string*/
	break;

/****
 *TOD_TO_LWORD
 */
	case function_tod_to_lword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(tod_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_tod_to_lword*/
	break;

/****
 *TOD_TO_UINT
 */
	case function_tod_to_uint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(tod_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::uint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_tod_to_uint*/
	break;

/****
 *TOD_TO_LREAL
 */
	case function_tod_to_lreal :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(tod_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lreal_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_tod_to_lreal*/
	break;

/****
 *TOD_TO_BYTE
 */
	case function_tod_to_byte :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(tod_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::byte_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_tod_to_byte*/
	break;

/****
 *TOD_TO_USINT
 */
	case function_tod_to_usint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(tod_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::usint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_tod_to_usint*/
	break;

/****
 *TOD_TO_ULINT
 */
	case function_tod_to_ulint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(tod_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::ulint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_tod_to_ulint*/
	break;

/****
 *TOD_TO_BOOL
 */
	case function_tod_to_bool :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(tod_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_tod_to_bool*/
	break;

/****
 *TOD_TO_TIME
 */
	case function_tod_to_time :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(tod_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_tod_to_time*/
	break;

/****
 *TOD_TO_INT
 */
	case function_tod_to_int :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(tod_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_tod_to_int*/
	break;

/****
 *UDINT_TO_REAL
 */
	case function_udint_to_real :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(udint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::real_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_udint_to_real*/
	break;

/****
 *UDINT_TO_SINT
 */
	case function_udint_to_sint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(udint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::sint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_udint_to_sint*/
	break;

/****
 *UDINT_TO_LINT
 */
	case function_udint_to_lint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(udint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_udint_to_lint*/
	break;

/****
 *UDINT_TO_DINT
 */
	case function_udint_to_dint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(udint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_udint_to_dint*/
	break;

/****
 *UDINT_TO_DATE
 */
	case function_udint_to_date :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(udint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::date_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_udint_to_date*/
	break;

/****
 *UDINT_TO_DWORD
 */
	case function_udint_to_dword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(udint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_udint_to_dword*/
	break;

/****
 *UDINT_TO_DT
 */
	case function_udint_to_dt :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(udint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dt_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_udint_to_dt*/
	break;

/****
 *UDINT_TO_TOD
 */
	case function_udint_to_tod :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(udint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::tod_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_udint_to_tod*/
	break;

/****
 *UDINT_TO_UDINT
 */
	case function_udint_to_udint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(udint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::udint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_udint_to_udint*/
	break;

/****
 *UDINT_TO_WORD
 */
	case function_udint_to_word :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(udint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::word_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_udint_to_word*/
	break;

/****
 *UDINT_TO_WSTRING
 */
	case function_udint_to_wstring :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(udint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::wstring_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_udint_to_wstring*/
	break;

/****
 *UDINT_TO_STRING
 */
	case function_udint_to_string :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(udint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_udint_to_string*/
	break;

/****
 *UDINT_TO_LWORD
 */
	case function_udint_to_lword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(udint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_udint_to_lword*/
	break;

/****
 *UDINT_TO_UINT
 */
	case function_udint_to_uint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(udint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::uint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_udint_to_uint*/
	break;

/****
 *UDINT_TO_LREAL
 */
	case function_udint_to_lreal :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(udint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lreal_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_udint_to_lreal*/
	break;

/****
 *UDINT_TO_BYTE
 */
	case function_udint_to_byte :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(udint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::byte_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_udint_to_byte*/
	break;

/****
 *UDINT_TO_USINT
 */
	case function_udint_to_usint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(udint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::usint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_udint_to_usint*/
	break;

/****
 *UDINT_TO_ULINT
 */
	case function_udint_to_ulint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(udint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::ulint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_udint_to_ulint*/
	break;

/****
 *UDINT_TO_BOOL
 */
	case function_udint_to_bool :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(udint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_udint_to_bool*/
	break;

/****
 *UDINT_TO_TIME
 */
	case function_udint_to_time :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(udint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_udint_to_time*/
	break;

/****
 *UDINT_TO_INT
 */
	case function_udint_to_int :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(udint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_udint_to_int*/
	break;

/****
 *WORD_TO_REAL
 */
	case function_word_to_real :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(word_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::real_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_word_to_real*/
	break;

/****
 *WORD_TO_SINT
 */
	case function_word_to_sint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(word_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::sint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_word_to_sint*/
	break;

/****
 *WORD_TO_LINT
 */
	case function_word_to_lint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(word_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_word_to_lint*/
	break;

/****
 *WORD_TO_DINT
 */
	case function_word_to_dint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(word_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_word_to_dint*/
	break;

/****
 *WORD_TO_DATE
 */
	case function_word_to_date :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(word_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::date_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_word_to_date*/
	break;

/****
 *WORD_TO_DWORD
 */
	case function_word_to_dword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(word_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_word_to_dword*/
	break;

/****
 *WORD_TO_DT
 */
	case function_word_to_dt :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(word_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dt_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_word_to_dt*/
	break;

/****
 *WORD_TO_TOD
 */
	case function_word_to_tod :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(word_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::tod_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_word_to_tod*/
	break;

/****
 *WORD_TO_UDINT
 */
	case function_word_to_udint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(word_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::udint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_word_to_udint*/
	break;

/****
 *WORD_TO_WORD
 */
	case function_word_to_word :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(word_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::word_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_word_to_word*/
	break;

/****
 *WORD_TO_WSTRING
 */
	case function_word_to_wstring :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(word_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::wstring_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_word_to_wstring*/
	break;

/****
 *WORD_TO_STRING
 */
	case function_word_to_string :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(word_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_word_to_string*/
	break;

/****
 *WORD_TO_LWORD
 */
	case function_word_to_lword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(word_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_word_to_lword*/
	break;

/****
 *WORD_TO_UINT
 */
	case function_word_to_uint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(word_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::uint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_word_to_uint*/
	break;

/****
 *WORD_TO_LREAL
 */
	case function_word_to_lreal :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(word_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lreal_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_word_to_lreal*/
	break;

/****
 *WORD_TO_BYTE
 */
	case function_word_to_byte :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(word_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::byte_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_word_to_byte*/
	break;

/****
 *WORD_TO_USINT
 */
	case function_word_to_usint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(word_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::usint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_word_to_usint*/
	break;

/****
 *WORD_TO_ULINT
 */
	case function_word_to_ulint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(word_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::ulint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_word_to_ulint*/
	break;

/****
 *WORD_TO_BOOL
 */
	case function_word_to_bool :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(word_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_word_to_bool*/
	break;

/****
 *WORD_TO_TIME
 */
	case function_word_to_time :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(word_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_word_to_time*/
	break;

/****
 *WORD_TO_INT
 */
	case function_word_to_int :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(word_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_word_to_int*/
	break;

/****
 *WSTRING_TO_REAL
 */
	case function_wstring_to_real :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(wstring_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::real_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_wstring_to_real*/
	break;

/****
 *WSTRING_TO_SINT
 */
	case function_wstring_to_sint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(wstring_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::sint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_wstring_to_sint*/
	break;

/****
 *WSTRING_TO_LINT
 */
	case function_wstring_to_lint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(wstring_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_wstring_to_lint*/
	break;

/****
 *WSTRING_TO_DINT
 */
	case function_wstring_to_dint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(wstring_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_wstring_to_dint*/
	break;

/****
 *WSTRING_TO_DATE
 */
	case function_wstring_to_date :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(wstring_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::date_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_wstring_to_date*/
	break;

/****
 *WSTRING_TO_DWORD
 */
	case function_wstring_to_dword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(wstring_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_wstring_to_dword*/
	break;

/****
 *WSTRING_TO_DT
 */
	case function_wstring_to_dt :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(wstring_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dt_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_wstring_to_dt*/
	break;

/****
 *WSTRING_TO_TOD
 */
	case function_wstring_to_tod :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(wstring_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::tod_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_wstring_to_tod*/
	break;

/****
 *WSTRING_TO_UDINT
 */
	case function_wstring_to_udint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(wstring_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::udint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_wstring_to_udint*/
	break;

/****
 *WSTRING_TO_WORD
 */
	case function_wstring_to_word :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(wstring_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::word_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_wstring_to_word*/
	break;

/****
 *WSTRING_TO_WSTRING
 */
	case function_wstring_to_wstring :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(wstring_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::wstring_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_wstring_to_wstring*/
	break;

/****
 *WSTRING_TO_STRING
 */
	case function_wstring_to_string :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(wstring_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_wstring_to_string*/
	break;

/****
 *WSTRING_TO_LWORD
 */
	case function_wstring_to_lword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(wstring_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_wstring_to_lword*/
	break;

/****
 *WSTRING_TO_UINT
 */
	case function_wstring_to_uint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(wstring_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::uint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_wstring_to_uint*/
	break;

/****
 *WSTRING_TO_LREAL
 */
	case function_wstring_to_lreal :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(wstring_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lreal_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_wstring_to_lreal*/
	break;

/****
 *WSTRING_TO_BYTE
 */
	case function_wstring_to_byte :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(wstring_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::byte_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_wstring_to_byte*/
	break;

/****
 *WSTRING_TO_USINT
 */
	case function_wstring_to_usint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(wstring_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::usint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_wstring_to_usint*/
	break;

/****
 *WSTRING_TO_ULINT
 */
	case function_wstring_to_ulint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(wstring_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::ulint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_wstring_to_ulint*/
	break;

/****
 *WSTRING_TO_BOOL
 */
	case function_wstring_to_bool :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(wstring_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_wstring_to_bool*/
	break;

/****
 *WSTRING_TO_TIME
 */
	case function_wstring_to_time :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(wstring_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_wstring_to_time*/
	break;

/****
 *WSTRING_TO_INT
 */
	case function_wstring_to_int :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(wstring_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_wstring_to_int*/
	break;

/****
 *STRING_TO_REAL
 */
	case function_string_to_real :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::real_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_string_to_real*/
	break;

/****
 *STRING_TO_SINT
 */
	case function_string_to_sint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::sint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_string_to_sint*/
	break;

/****
 *STRING_TO_LINT
 */
	case function_string_to_lint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_string_to_lint*/
	break;

/****
 *STRING_TO_DINT
 */
	case function_string_to_dint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_string_to_dint*/
	break;

/****
 *STRING_TO_DATE
 */
	case function_string_to_date :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::date_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_string_to_date*/
	break;

/****
 *STRING_TO_DWORD
 */
	case function_string_to_dword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_string_to_dword*/
	break;

/****
 *STRING_TO_DT
 */
	case function_string_to_dt :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dt_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_string_to_dt*/
	break;

/****
 *STRING_TO_TOD
 */
	case function_string_to_tod :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::tod_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_string_to_tod*/
	break;

/****
 *STRING_TO_UDINT
 */
	case function_string_to_udint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::udint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_string_to_udint*/
	break;

/****
 *STRING_TO_WORD
 */
	case function_string_to_word :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::word_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_string_to_word*/
	break;

/****
 *STRING_TO_WSTRING
 */
	case function_string_to_wstring :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::wstring_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_string_to_wstring*/
	break;

/****
 *STRING_TO_STRING
 */
	case function_string_to_string :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_string_to_string*/
	break;

/****
 *STRING_TO_LWORD
 */
	case function_string_to_lword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_string_to_lword*/
	break;

/****
 *STRING_TO_UINT
 */
	case function_string_to_uint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::uint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_string_to_uint*/
	break;

/****
 *STRING_TO_LREAL
 */
	case function_string_to_lreal :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lreal_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_string_to_lreal*/
	break;

/****
 *STRING_TO_BYTE
 */
	case function_string_to_byte :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::byte_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_string_to_byte*/
	break;

/****
 *STRING_TO_USINT
 */
	case function_string_to_usint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::usint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_string_to_usint*/
	break;

/****
 *STRING_TO_ULINT
 */
	case function_string_to_ulint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::ulint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_string_to_ulint*/
	break;

/****
 *STRING_TO_BOOL
 */
	case function_string_to_bool :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_string_to_bool*/
	break;

/****
 *STRING_TO_TIME
 */
	case function_string_to_time :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_string_to_time*/
	break;

/****
 *STRING_TO_INT
 */
	case function_string_to_int :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_string_to_int*/
	break;

/****
 *LWORD_TO_REAL
 */
	case function_lword_to_real :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::real_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lword_to_real*/
	break;

/****
 *LWORD_TO_SINT
 */
	case function_lword_to_sint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::sint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lword_to_sint*/
	break;

/****
 *LWORD_TO_LINT
 */
	case function_lword_to_lint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lword_to_lint*/
	break;

/****
 *LWORD_TO_DINT
 */
	case function_lword_to_dint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lword_to_dint*/
	break;

/****
 *LWORD_TO_DATE
 */
	case function_lword_to_date :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::date_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lword_to_date*/
	break;

/****
 *LWORD_TO_DWORD
 */
	case function_lword_to_dword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lword_to_dword*/
	break;

/****
 *LWORD_TO_DT
 */
	case function_lword_to_dt :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dt_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lword_to_dt*/
	break;

/****
 *LWORD_TO_TOD
 */
	case function_lword_to_tod :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::tod_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lword_to_tod*/
	break;

/****
 *LWORD_TO_UDINT
 */
	case function_lword_to_udint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::udint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lword_to_udint*/
	break;

/****
 *LWORD_TO_WORD
 */
	case function_lword_to_word :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::word_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lword_to_word*/
	break;

/****
 *LWORD_TO_WSTRING
 */
	case function_lword_to_wstring :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::wstring_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lword_to_wstring*/
	break;

/****
 *LWORD_TO_STRING
 */
	case function_lword_to_string :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lword_to_string*/
	break;

/****
 *LWORD_TO_LWORD
 */
	case function_lword_to_lword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lword_to_lword*/
	break;

/****
 *LWORD_TO_UINT
 */
	case function_lword_to_uint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::uint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lword_to_uint*/
	break;

/****
 *LWORD_TO_LREAL
 */
	case function_lword_to_lreal :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lreal_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lword_to_lreal*/
	break;

/****
 *LWORD_TO_BYTE
 */
	case function_lword_to_byte :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::byte_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lword_to_byte*/
	break;

/****
 *LWORD_TO_USINT
 */
	case function_lword_to_usint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::usint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lword_to_usint*/
	break;

/****
 *LWORD_TO_ULINT
 */
	case function_lword_to_ulint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::ulint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lword_to_ulint*/
	break;

/****
 *LWORD_TO_BOOL
 */
	case function_lword_to_bool :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lword_to_bool*/
	break;

/****
 *LWORD_TO_TIME
 */
	case function_lword_to_time :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lword_to_time*/
	break;

/****
 *LWORD_TO_INT
 */
	case function_lword_to_int :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lword_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lword_to_int*/
	break;

/****
 *UINT_TO_REAL
 */
	case function_uint_to_real :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::real_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_uint_to_real*/
	break;

/****
 *UINT_TO_SINT
 */
	case function_uint_to_sint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::sint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_uint_to_sint*/
	break;

/****
 *UINT_TO_LINT
 */
	case function_uint_to_lint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_uint_to_lint*/
	break;

/****
 *UINT_TO_DINT
 */
	case function_uint_to_dint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_uint_to_dint*/
	break;

/****
 *UINT_TO_DATE
 */
	case function_uint_to_date :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::date_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_uint_to_date*/
	break;

/****
 *UINT_TO_DWORD
 */
	case function_uint_to_dword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_uint_to_dword*/
	break;

/****
 *UINT_TO_DT
 */
	case function_uint_to_dt :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dt_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_uint_to_dt*/
	break;

/****
 *UINT_TO_TOD
 */
	case function_uint_to_tod :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::tod_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_uint_to_tod*/
	break;

/****
 *UINT_TO_UDINT
 */
	case function_uint_to_udint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::udint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_uint_to_udint*/
	break;

/****
 *UINT_TO_WORD
 */
	case function_uint_to_word :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::word_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_uint_to_word*/
	break;

/****
 *UINT_TO_WSTRING
 */
	case function_uint_to_wstring :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::wstring_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_uint_to_wstring*/
	break;

/****
 *UINT_TO_STRING
 */
	case function_uint_to_string :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_uint_to_string*/
	break;

/****
 *UINT_TO_LWORD
 */
	case function_uint_to_lword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_uint_to_lword*/
	break;

/****
 *UINT_TO_UINT
 */
	case function_uint_to_uint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::uint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_uint_to_uint*/
	break;

/****
 *UINT_TO_LREAL
 */
	case function_uint_to_lreal :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lreal_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_uint_to_lreal*/
	break;

/****
 *UINT_TO_BYTE
 */
	case function_uint_to_byte :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::byte_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_uint_to_byte*/
	break;

/****
 *UINT_TO_USINT
 */
	case function_uint_to_usint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::usint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_uint_to_usint*/
	break;

/****
 *UINT_TO_ULINT
 */
	case function_uint_to_ulint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::ulint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_uint_to_ulint*/
	break;

/****
 *UINT_TO_BOOL
 */
	case function_uint_to_bool :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_uint_to_bool*/
	break;

/****
 *UINT_TO_TIME
 */
	case function_uint_to_time :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_uint_to_time*/
	break;

/****
 *UINT_TO_INT
 */
	case function_uint_to_int :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_uint_to_int*/
	break;

/****
 *LREAL_TO_REAL
 */
	case function_lreal_to_real :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lreal_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::real_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lreal_to_real*/
	break;

/****
 *LREAL_TO_SINT
 */
	case function_lreal_to_sint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lreal_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::sint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lreal_to_sint*/
	break;

/****
 *LREAL_TO_LINT
 */
	case function_lreal_to_lint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lreal_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lreal_to_lint*/
	break;

/****
 *LREAL_TO_DINT
 */
	case function_lreal_to_dint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lreal_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lreal_to_dint*/
	break;

/****
 *LREAL_TO_DATE
 */
	case function_lreal_to_date :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lreal_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::date_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lreal_to_date*/
	break;

/****
 *LREAL_TO_DWORD
 */
	case function_lreal_to_dword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lreal_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lreal_to_dword*/
	break;

/****
 *LREAL_TO_DT
 */
	case function_lreal_to_dt :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lreal_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dt_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lreal_to_dt*/
	break;

/****
 *LREAL_TO_TOD
 */
	case function_lreal_to_tod :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lreal_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::tod_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lreal_to_tod*/
	break;

/****
 *LREAL_TO_UDINT
 */
	case function_lreal_to_udint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lreal_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::udint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lreal_to_udint*/
	break;

/****
 *LREAL_TO_WORD
 */
	case function_lreal_to_word :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lreal_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::word_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lreal_to_word*/
	break;

/****
 *LREAL_TO_WSTRING
 */
	case function_lreal_to_wstring :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lreal_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::wstring_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lreal_to_wstring*/
	break;

/****
 *LREAL_TO_STRING
 */
	case function_lreal_to_string :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lreal_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lreal_to_string*/
	break;

/****
 *LREAL_TO_LWORD
 */
	case function_lreal_to_lword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lreal_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lreal_to_lword*/
	break;

/****
 *LREAL_TO_UINT
 */
	case function_lreal_to_uint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lreal_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::uint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lreal_to_uint*/
	break;

/****
 *LREAL_TO_LREAL
 */
	case function_lreal_to_lreal :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lreal_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lreal_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lreal_to_lreal*/
	break;

/****
 *LREAL_TO_BYTE
 */
	case function_lreal_to_byte :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lreal_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::byte_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lreal_to_byte*/
	break;

/****
 *LREAL_TO_USINT
 */
	case function_lreal_to_usint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lreal_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::usint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lreal_to_usint*/
	break;

/****
 *LREAL_TO_ULINT
 */
	case function_lreal_to_ulint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lreal_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::ulint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lreal_to_ulint*/
	break;

/****
 *LREAL_TO_BOOL
 */
	case function_lreal_to_bool :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lreal_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lreal_to_bool*/
	break;

/****
 *LREAL_TO_TIME
 */
	case function_lreal_to_time :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lreal_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lreal_to_time*/
	break;

/****
 *LREAL_TO_INT
 */
	case function_lreal_to_int :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lreal_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lreal_to_int*/
	break;

/****
 *BYTE_TO_REAL
 */
	case function_byte_to_real :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(byte_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::real_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_byte_to_real*/
	break;

/****
 *BYTE_TO_SINT
 */
	case function_byte_to_sint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(byte_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::sint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_byte_to_sint*/
	break;

/****
 *BYTE_TO_LINT
 */
	case function_byte_to_lint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(byte_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_byte_to_lint*/
	break;

/****
 *BYTE_TO_DINT
 */
	case function_byte_to_dint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(byte_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_byte_to_dint*/
	break;

/****
 *BYTE_TO_DATE
 */
	case function_byte_to_date :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(byte_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::date_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_byte_to_date*/
	break;

/****
 *BYTE_TO_DWORD
 */
	case function_byte_to_dword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(byte_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_byte_to_dword*/
	break;

/****
 *BYTE_TO_DT
 */
	case function_byte_to_dt :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(byte_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dt_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_byte_to_dt*/
	break;

/****
 *BYTE_TO_TOD
 */
	case function_byte_to_tod :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(byte_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::tod_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_byte_to_tod*/
	break;

/****
 *BYTE_TO_UDINT
 */
	case function_byte_to_udint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(byte_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::udint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_byte_to_udint*/
	break;

/****
 *BYTE_TO_WORD
 */
	case function_byte_to_word :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(byte_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::word_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_byte_to_word*/
	break;

/****
 *BYTE_TO_WSTRING
 */
	case function_byte_to_wstring :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(byte_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::wstring_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_byte_to_wstring*/
	break;

/****
 *BYTE_TO_STRING
 */
	case function_byte_to_string :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(byte_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_byte_to_string*/
	break;

/****
 *BYTE_TO_LWORD
 */
	case function_byte_to_lword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(byte_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_byte_to_lword*/
	break;

/****
 *BYTE_TO_UINT
 */
	case function_byte_to_uint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(byte_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::uint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_byte_to_uint*/
	break;

/****
 *BYTE_TO_LREAL
 */
	case function_byte_to_lreal :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(byte_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lreal_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_byte_to_lreal*/
	break;

/****
 *BYTE_TO_BYTE
 */
	case function_byte_to_byte :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(byte_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::byte_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_byte_to_byte*/
	break;

/****
 *BYTE_TO_USINT
 */
	case function_byte_to_usint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(byte_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::usint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_byte_to_usint*/
	break;

/****
 *BYTE_TO_ULINT
 */
	case function_byte_to_ulint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(byte_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::ulint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_byte_to_ulint*/
	break;

/****
 *BYTE_TO_BOOL
 */
	case function_byte_to_bool :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(byte_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_byte_to_bool*/
	break;

/****
 *BYTE_TO_TIME
 */
	case function_byte_to_time :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(byte_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_byte_to_time*/
	break;

/****
 *BYTE_TO_INT
 */
	case function_byte_to_int :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(byte_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_byte_to_int*/
	break;

/****
 *USINT_TO_REAL
 */
	case function_usint_to_real :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(usint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::real_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_usint_to_real*/
	break;

/****
 *USINT_TO_SINT
 */
	case function_usint_to_sint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(usint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::sint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_usint_to_sint*/
	break;

/****
 *USINT_TO_LINT
 */
	case function_usint_to_lint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(usint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_usint_to_lint*/
	break;

/****
 *USINT_TO_DINT
 */
	case function_usint_to_dint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(usint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_usint_to_dint*/
	break;

/****
 *USINT_TO_DATE
 */
	case function_usint_to_date :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(usint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::date_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_usint_to_date*/
	break;

/****
 *USINT_TO_DWORD
 */
	case function_usint_to_dword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(usint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_usint_to_dword*/
	break;

/****
 *USINT_TO_DT
 */
	case function_usint_to_dt :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(usint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dt_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_usint_to_dt*/
	break;

/****
 *USINT_TO_TOD
 */
	case function_usint_to_tod :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(usint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::tod_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_usint_to_tod*/
	break;

/****
 *USINT_TO_UDINT
 */
	case function_usint_to_udint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(usint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::udint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_usint_to_udint*/
	break;

/****
 *USINT_TO_WORD
 */
	case function_usint_to_word :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(usint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::word_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_usint_to_word*/
	break;

/****
 *USINT_TO_WSTRING
 */
	case function_usint_to_wstring :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(usint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::wstring_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_usint_to_wstring*/
	break;

/****
 *USINT_TO_STRING
 */
	case function_usint_to_string :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(usint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_usint_to_string*/
	break;

/****
 *USINT_TO_LWORD
 */
	case function_usint_to_lword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(usint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_usint_to_lword*/
	break;

/****
 *USINT_TO_UINT
 */
	case function_usint_to_uint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(usint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::uint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_usint_to_uint*/
	break;

/****
 *USINT_TO_LREAL
 */
	case function_usint_to_lreal :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(usint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lreal_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_usint_to_lreal*/
	break;

/****
 *USINT_TO_BYTE
 */
	case function_usint_to_byte :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(usint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::byte_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_usint_to_byte*/
	break;

/****
 *USINT_TO_USINT
 */
	case function_usint_to_usint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(usint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::usint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_usint_to_usint*/
	break;

/****
 *USINT_TO_ULINT
 */
	case function_usint_to_ulint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(usint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::ulint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_usint_to_ulint*/
	break;

/****
 *USINT_TO_BOOL
 */
	case function_usint_to_bool :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(usint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_usint_to_bool*/
	break;

/****
 *USINT_TO_TIME
 */
	case function_usint_to_time :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(usint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_usint_to_time*/
	break;

/****
 *USINT_TO_INT
 */
	case function_usint_to_int :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(usint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_usint_to_int*/
	break;

/****
 *ULINT_TO_REAL
 */
	case function_ulint_to_real :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(ulint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::real_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_ulint_to_real*/
	break;

/****
 *ULINT_TO_SINT
 */
	case function_ulint_to_sint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(ulint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::sint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_ulint_to_sint*/
	break;

/****
 *ULINT_TO_LINT
 */
	case function_ulint_to_lint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(ulint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_ulint_to_lint*/
	break;

/****
 *ULINT_TO_DINT
 */
	case function_ulint_to_dint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(ulint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_ulint_to_dint*/
	break;

/****
 *ULINT_TO_DATE
 */
	case function_ulint_to_date :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(ulint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::date_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_ulint_to_date*/
	break;

/****
 *ULINT_TO_DWORD
 */
	case function_ulint_to_dword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(ulint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_ulint_to_dword*/
	break;

/****
 *ULINT_TO_DT
 */
	case function_ulint_to_dt :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(ulint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dt_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_ulint_to_dt*/
	break;

/****
 *ULINT_TO_TOD
 */
	case function_ulint_to_tod :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(ulint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::tod_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_ulint_to_tod*/
	break;

/****
 *ULINT_TO_UDINT
 */
	case function_ulint_to_udint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(ulint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::udint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_ulint_to_udint*/
	break;

/****
 *ULINT_TO_WORD
 */
	case function_ulint_to_word :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(ulint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::word_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_ulint_to_word*/
	break;

/****
 *ULINT_TO_WSTRING
 */
	case function_ulint_to_wstring :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(ulint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::wstring_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_ulint_to_wstring*/
	break;

/****
 *ULINT_TO_STRING
 */
	case function_ulint_to_string :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(ulint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_ulint_to_string*/
	break;

/****
 *ULINT_TO_LWORD
 */
	case function_ulint_to_lword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(ulint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_ulint_to_lword*/
	break;

/****
 *ULINT_TO_UINT
 */
	case function_ulint_to_uint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(ulint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::uint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_ulint_to_uint*/
	break;

/****
 *ULINT_TO_LREAL
 */
	case function_ulint_to_lreal :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(ulint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lreal_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_ulint_to_lreal*/
	break;

/****
 *ULINT_TO_BYTE
 */
	case function_ulint_to_byte :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(ulint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::byte_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_ulint_to_byte*/
	break;

/****
 *ULINT_TO_USINT
 */
	case function_ulint_to_usint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(ulint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::usint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_ulint_to_usint*/
	break;

/****
 *ULINT_TO_ULINT
 */
	case function_ulint_to_ulint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(ulint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::ulint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_ulint_to_ulint*/
	break;

/****
 *ULINT_TO_BOOL
 */
	case function_ulint_to_bool :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(ulint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_ulint_to_bool*/
	break;

/****
 *ULINT_TO_TIME
 */
	case function_ulint_to_time :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(ulint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_ulint_to_time*/
	break;

/****
 *ULINT_TO_INT
 */
	case function_ulint_to_int :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(ulint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_ulint_to_int*/
	break;

/****
 *BOOL_TO_REAL
 */
	case function_bool_to_real :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(bool_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::real_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bool_to_real*/
	break;

/****
 *BOOL_TO_SINT
 */
	case function_bool_to_sint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(bool_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::sint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bool_to_sint*/
	break;

/****
 *BOOL_TO_LINT
 */
	case function_bool_to_lint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(bool_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bool_to_lint*/
	break;

/****
 *BOOL_TO_DINT
 */
	case function_bool_to_dint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(bool_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bool_to_dint*/
	break;

/****
 *BOOL_TO_DATE
 */
	case function_bool_to_date :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(bool_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::date_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bool_to_date*/
	break;

/****
 *BOOL_TO_DWORD
 */
	case function_bool_to_dword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(bool_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bool_to_dword*/
	break;

/****
 *BOOL_TO_DT
 */
	case function_bool_to_dt :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(bool_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dt_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bool_to_dt*/
	break;

/****
 *BOOL_TO_TOD
 */
	case function_bool_to_tod :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(bool_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::tod_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bool_to_tod*/
	break;

/****
 *BOOL_TO_UDINT
 */
	case function_bool_to_udint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(bool_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::udint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bool_to_udint*/
	break;

/****
 *BOOL_TO_WORD
 */
	case function_bool_to_word :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(bool_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::word_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bool_to_word*/
	break;

/****
 *BOOL_TO_WSTRING
 */
	case function_bool_to_wstring :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(bool_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::wstring_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bool_to_wstring*/
	break;

/****
 *BOOL_TO_STRING
 */
	case function_bool_to_string :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(bool_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bool_to_string*/
	break;

/****
 *BOOL_TO_LWORD
 */
	case function_bool_to_lword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(bool_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bool_to_lword*/
	break;

/****
 *BOOL_TO_UINT
 */
	case function_bool_to_uint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(bool_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::uint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bool_to_uint*/
	break;

/****
 *BOOL_TO_LREAL
 */
	case function_bool_to_lreal :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(bool_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lreal_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bool_to_lreal*/
	break;

/****
 *BOOL_TO_BYTE
 */
	case function_bool_to_byte :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(bool_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::byte_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bool_to_byte*/
	break;

/****
 *BOOL_TO_USINT
 */
	case function_bool_to_usint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(bool_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::usint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bool_to_usint*/
	break;

/****
 *BOOL_TO_ULINT
 */
	case function_bool_to_ulint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(bool_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::ulint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bool_to_ulint*/
	break;

/****
 *BOOL_TO_BOOL
 */
	case function_bool_to_bool :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(bool_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bool_to_bool*/
	break;

/****
 *BOOL_TO_TIME
 */
	case function_bool_to_time :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(bool_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bool_to_time*/
	break;

/****
 *BOOL_TO_INT
 */
	case function_bool_to_int :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(bool_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bool_to_int*/
	break;

/****
 *TIME_TO_REAL
 */
	case function_time_to_real :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(time_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::real_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_time_to_real*/
	break;

/****
 *TIME_TO_SINT
 */
	case function_time_to_sint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(time_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::sint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_time_to_sint*/
	break;

/****
 *TIME_TO_LINT
 */
	case function_time_to_lint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(time_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_time_to_lint*/
	break;

/****
 *TIME_TO_DINT
 */
	case function_time_to_dint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(time_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_time_to_dint*/
	break;

/****
 *TIME_TO_DATE
 */
	case function_time_to_date :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(time_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::date_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_time_to_date*/
	break;

/****
 *TIME_TO_DWORD
 */
	case function_time_to_dword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(time_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_time_to_dword*/
	break;

/****
 *TIME_TO_DT
 */
	case function_time_to_dt :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(time_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dt_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_time_to_dt*/
	break;

/****
 *TIME_TO_TOD
 */
	case function_time_to_tod :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(time_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::tod_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_time_to_tod*/
	break;

/****
 *TIME_TO_UDINT
 */
	case function_time_to_udint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(time_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::udint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_time_to_udint*/
	break;

/****
 *TIME_TO_WORD
 */
	case function_time_to_word :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(time_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::word_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_time_to_word*/
	break;

/****
 *TIME_TO_WSTRING
 */
	case function_time_to_wstring :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(time_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::wstring_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_time_to_wstring*/
	break;

/****
 *TIME_TO_STRING
 */
	case function_time_to_string :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(time_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_time_to_string*/
	break;

/****
 *TIME_TO_LWORD
 */
	case function_time_to_lword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(time_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_time_to_lword*/
	break;

/****
 *TIME_TO_UINT
 */
	case function_time_to_uint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(time_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::uint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_time_to_uint*/
	break;

/****
 *TIME_TO_LREAL
 */
	case function_time_to_lreal :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(time_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lreal_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_time_to_lreal*/
	break;

/****
 *TIME_TO_BYTE
 */
	case function_time_to_byte :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(time_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::byte_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_time_to_byte*/
	break;

/****
 *TIME_TO_USINT
 */
	case function_time_to_usint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(time_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::usint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_time_to_usint*/
	break;

/****
 *TIME_TO_ULINT
 */
	case function_time_to_ulint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(time_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::ulint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_time_to_ulint*/
	break;

/****
 *TIME_TO_BOOL
 */
	case function_time_to_bool :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(time_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_time_to_bool*/
	break;

/****
 *TIME_TO_TIME
 */
	case function_time_to_time :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(time_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_time_to_time*/
	break;

/****
 *TIME_TO_INT
 */
	case function_time_to_int :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(time_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_time_to_int*/
	break;

/****
 *INT_TO_REAL
 */
	case function_int_to_real :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(int_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::real_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_int_to_real*/
	break;

/****
 *INT_TO_SINT
 */
	case function_int_to_sint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(int_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::sint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_int_to_sint*/
	break;

/****
 *INT_TO_LINT
 */
	case function_int_to_lint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(int_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_int_to_lint*/
	break;

/****
 *INT_TO_DINT
 */
	case function_int_to_dint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(int_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_int_to_dint*/
	break;

/****
 *INT_TO_DATE
 */
	case function_int_to_date :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(int_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::date_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_int_to_date*/
	break;

/****
 *INT_TO_DWORD
 */
	case function_int_to_dword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(int_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_int_to_dword*/
	break;

/****
 *INT_TO_DT
 */
	case function_int_to_dt :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(int_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dt_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_int_to_dt*/
	break;

/****
 *INT_TO_TOD
 */
	case function_int_to_tod :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(int_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::tod_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_int_to_tod*/
	break;

/****
 *INT_TO_UDINT
 */
	case function_int_to_udint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(int_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::udint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_int_to_udint*/
	break;

/****
 *INT_TO_WORD
 */
	case function_int_to_word :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(int_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::word_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_int_to_word*/
	break;

/****
 *INT_TO_WSTRING
 */
	case function_int_to_wstring :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(int_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::wstring_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_int_to_wstring*/
	break;

/****
 *INT_TO_STRING
 */
	case function_int_to_string :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(int_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_int_to_string*/
	break;

/****
 *INT_TO_LWORD
 */
	case function_int_to_lword :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(int_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lword_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_int_to_lword*/
	break;

/****
 *INT_TO_UINT
 */
	case function_int_to_uint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(int_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::uint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_int_to_uint*/
	break;

/****
 *INT_TO_LREAL
 */
	case function_int_to_lreal :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(int_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lreal_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_int_to_lreal*/
	break;

/****
 *INT_TO_BYTE
 */
	case function_int_to_byte :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(int_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::byte_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_int_to_byte*/
	break;

/****
 *INT_TO_USINT
 */
	case function_int_to_usint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(int_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::usint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_int_to_usint*/
	break;

/****
 *INT_TO_ULINT
 */
	case function_int_to_ulint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(int_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::ulint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_int_to_ulint*/
	break;

/****
 *INT_TO_BOOL
 */
	case function_int_to_bool :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(int_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_int_to_bool*/
	break;

/****
 *INT_TO_TIME
 */
	case function_int_to_time :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(int_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_int_to_time*/
	break;

/****
 *INT_TO_INT
 */
	case function_int_to_int :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(int_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_int_to_int*/
	break;

/****
 *TRUNC
 */
	case function_trunc :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_real_type(IN_param_value))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::constant_int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_trunc*/
	break;

/****
 *BCD_TO_SINT
 */
	case function_bcd_to_sint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_binary_type(IN_param_value))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::sint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bcd_to_sint*/
	break;

/****
 *BCD_TO_LINT
 */
	case function_bcd_to_lint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_binary_type(IN_param_value))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::lint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bcd_to_lint*/
	break;

/****
 *BCD_TO_DINT
 */
	case function_bcd_to_dint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_binary_type(IN_param_value))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::dint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bcd_to_dint*/
	break;

/****
 *BCD_TO_UDINT
 */
	case function_bcd_to_udint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_binary_type(IN_param_value))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::udint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bcd_to_udint*/
	break;

/****
 *BCD_TO_UINT
 */
	case function_bcd_to_uint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_binary_type(IN_param_value))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::uint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bcd_to_uint*/
	break;

/****
 *BCD_TO_USINT
 */
	case function_bcd_to_usint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_binary_type(IN_param_value))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::usint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bcd_to_usint*/
	break;

/****
 *BCD_TO_ULINT
 */
	case function_bcd_to_ulint :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_binary_type(IN_param_value))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::ulint_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bcd_to_ulint*/
	break;

/****
 *BCD_TO_INT
 */
	case function_bcd_to_int :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_binary_type(IN_param_value))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_bcd_to_int*/
	break;

/****
 *SINT_TO_BCD
 */
	case function_sint_to_bcd :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(sint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::constant_int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_sint_to_bcd*/
	break;

/****
 *LINT_TO_BCD
 */
	case function_lint_to_bcd :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(lint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::constant_int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_lint_to_bcd*/
	break;

/****
 *DINT_TO_BCD
 */
	case function_dint_to_bcd :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::constant_int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_dint_to_bcd*/
	break;

/****
 *UDINT_TO_BCD
 */
	case function_udint_to_bcd :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(udint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::constant_int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_udint_to_bcd*/
	break;

/****
 *UINT_TO_BCD
 */
	case function_uint_to_bcd :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::constant_int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_uint_to_bcd*/
	break;

/****
 *USINT_TO_BCD
 */
	case function_usint_to_bcd :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(usint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::constant_int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_usint_to_bcd*/
	break;

/****
 *ULINT_TO_BCD
 */
	case function_ulint_to_bcd :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(ulint_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::constant_int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_ulint_to_bcd*/
	break;

/****
 *INT_TO_BCD
 */
	case function_int_to_bcd :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(int_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::constant_int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_int_to_bcd*/
	break;

/****
 *DATE_AND_TIME_TO_TIME_OF_DAY
 */
	case function_date_and_time_to_time_of_day :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::tod_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_date_and_time_to_time_of_day*/
	break;

/****
 *DATE_AND_TIME_TO_DATE
 */
	case function_date_and_time_to_date :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::date_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_date_and_time_to_date*/
	break;

/****
 *ABS
 */
	case function_abs :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_num_type(IN_param_value))
			{
		
				symbol_c * return_type_symbol = IN_type_symbol;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_abs*/
	break;

/****
 *SQRT
 */
	case function_sqrt :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_real_type(IN_param_value))
			{
		
				symbol_c * return_type_symbol = IN_type_symbol;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_sqrt*/
	break;

/****
 *LN
 */
	case function_ln :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_real_type(IN_param_value))
			{
		
				symbol_c * return_type_symbol = IN_type_symbol;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_ln*/
	break;

/****
 *LOG
 */
	case function_log :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_real_type(IN_param_value))
			{
		
				symbol_c * return_type_symbol = IN_type_symbol;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_log*/
	break;

/****
 *EXP
 */
	case function_exp :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_real_type(IN_param_value))
			{
		
				symbol_c * return_type_symbol = IN_type_symbol;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_exp*/
	break;

/****
 *SIN
 */
	case function_sin :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_real_type(IN_param_value))
			{
		
				symbol_c * return_type_symbol = IN_type_symbol;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_sin*/
	break;

/****
 *COS
 */
	case function_cos :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_real_type(IN_param_value))
			{
		
				symbol_c * return_type_symbol = IN_type_symbol;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_cos*/
	break;

/****
 *TAN
 */
	case function_tan :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_real_type(IN_param_value))
			{
		
				symbol_c * return_type_symbol = IN_type_symbol;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_tan*/
	break;

/****
 *ASIN
 */
	case function_asin :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_real_type(IN_param_value))
			{
		
				symbol_c * return_type_symbol = IN_type_symbol;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_asin*/
	break;

/****
 *ACOS
 */
	case function_acos :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_real_type(IN_param_value))
			{
		
				symbol_c * return_type_symbol = IN_type_symbol;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_acos*/
	break;

/****
 *ATAN
 */
	case function_atan :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_real_type(IN_param_value))
			{
		
				symbol_c * return_type_symbol = IN_type_symbol;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_atan*/
	break;

/****
 *ADD
 */
	case function_add :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN1");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN1_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN1_param_value == NULL)
			  IN1_param_value = function_call_param_iterator.next();
			symbol_c *IN1_type_symbol = search_expression_type->get_type(IN1_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN1_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN1_type_symbol, last_type_symbol) : IN1_type_symbol ;
			
			if(search_expression_type->is_num_type(IN1_param_value))
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					if(search_expression_type->is_num_type(IN2_param_value))
					{
				
						symbol_c * return_type_symbol = last_type_symbol;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					if (typeid(*last_type_symbol) == typeid(time_type_name_c))
					{
				
						symbol_c * return_type_symbol = &search_constant_type_c::dt_type_name;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			if (typeid(*last_type_symbol) == typeid(tod_type_name_c))
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					if (typeid(*last_type_symbol) == typeid(time_type_name_c))
					{
				
						symbol_c * return_type_symbol = &search_constant_type_c::tod_type_name;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			if (typeid(*last_type_symbol) == typeid(time_type_name_c))
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					if (typeid(*last_type_symbol) == typeid(time_type_name_c))
					{
				
						symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_add*/
	break;

/****
 *MUL
 */
	case function_mul :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN1");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN1_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN1_param_value == NULL)
			  IN1_param_value = function_call_param_iterator.next();
			symbol_c *IN1_type_symbol = search_expression_type->get_type(IN1_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN1_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN1_type_symbol, last_type_symbol) : IN1_type_symbol ;
			
			if(search_expression_type->is_num_type(IN1_param_value))
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					if(search_expression_type->is_num_type(IN2_param_value))
					{
				
						symbol_c * return_type_symbol = last_type_symbol;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			if (typeid(*last_type_symbol) == typeid(time_type_name_c))
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					if(search_expression_type->is_num_type(IN2_param_value))
					{
				
						symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_mul*/
	break;

/****
 *SUB
 */
	case function_sub :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN1");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN1_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN1_param_value == NULL)
			  IN1_param_value = function_call_param_iterator.next();
			symbol_c *IN1_type_symbol = search_expression_type->get_type(IN1_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN1_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN1_type_symbol, last_type_symbol) : IN1_type_symbol ;
			
			if(search_expression_type->is_num_type(IN1_param_value))
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					if(search_expression_type->is_num_type(IN2_param_value))
					{
				
						symbol_c * return_type_symbol = last_type_symbol;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			if (typeid(*last_type_symbol) == typeid(date_type_name_c))
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					if (typeid(*last_type_symbol) == typeid(date_type_name_c))
					{
				
						symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					if (typeid(*last_type_symbol) == typeid(dt_type_name_c))
					{
				
						symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
						return return_type_symbol;
						
					}
					
					if (typeid(*last_type_symbol) == typeid(time_type_name_c))
					{
				
						symbol_c * return_type_symbol = &search_constant_type_c::dt_type_name;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			if (typeid(*last_type_symbol) == typeid(tod_type_name_c))
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					if (typeid(*last_type_symbol) == typeid(tod_type_name_c))
					{
				
						symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
						return return_type_symbol;
						
					}
					
					if (typeid(*last_type_symbol) == typeid(time_type_name_c))
					{
				
						symbol_c * return_type_symbol = &search_constant_type_c::tod_type_name;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			if (typeid(*last_type_symbol) == typeid(time_type_name_c))
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					if (typeid(*last_type_symbol) == typeid(time_type_name_c))
					{
				
						symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_sub*/
	break;

/****
 *DIV
 */
	case function_div :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN1");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN1_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN1_param_value == NULL)
			  IN1_param_value = function_call_param_iterator.next();
			symbol_c *IN1_type_symbol = search_expression_type->get_type(IN1_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN1_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN1_type_symbol, last_type_symbol) : IN1_type_symbol ;
			
			if(search_expression_type->is_num_type(IN1_param_value))
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					if(search_expression_type->is_num_type(IN2_param_value))
					{
				
						symbol_c * return_type_symbol = last_type_symbol;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			if (typeid(*last_type_symbol) == typeid(time_type_name_c))
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					if(search_expression_type->is_num_type(IN2_param_value))
					{
				
						symbol_c * return_type_symbol = &search_constant_type_c::time_type_name;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_div*/
	break;

/****
 *MOD
 */
	case function_mod :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN1");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN1_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN1_param_value == NULL)
			  IN1_param_value = function_call_param_iterator.next();
			symbol_c *IN1_type_symbol = search_expression_type->get_type(IN1_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN1_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN1_type_symbol, last_type_symbol) : IN1_type_symbol ;
			
			if(search_expression_type->is_num_type(IN1_param_value))
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					if(search_expression_type->is_num_type(IN2_param_value))
					{
				
						symbol_c * return_type_symbol = last_type_symbol;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_mod*/
	break;

/****
 *EXPT
 */
	case function_expt :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN1");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN1_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN1_param_value == NULL)
			  IN1_param_value = function_call_param_iterator.next();
			symbol_c *IN1_type_symbol = search_expression_type->get_type(IN1_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN1_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN1_type_symbol, last_type_symbol) : IN1_type_symbol ;
			
			if(search_expression_type->is_num_type(IN1_param_value))
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					if(search_expression_type->is_num_type(IN2_param_value))
					{
				
						symbol_c * return_type_symbol = last_type_symbol;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_expt*/
	break;

/****
 *MOVE
 */
	case function_move :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_num_type(IN_param_value))
			{
		
				symbol_c * return_type_symbol = last_type_symbol;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_move*/
	break;

/****
 *SHL
 */
	case function_shl :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_binary_type(IN_param_value))
			{
		
				{
					identifier_c param_name("N");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *N_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (N_param_value == NULL)
					  N_param_value = function_call_param_iterator.next();
					symbol_c *N_type_symbol = search_expression_type->get_type(N_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(N_type_symbol, last_type_symbol) ? search_expression_type->common_type(N_type_symbol, last_type_symbol) : N_type_symbol ;
					
					if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
					{
				
						symbol_c * return_type_symbol = IN_type_symbol;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_shl*/
	break;

/****
 *SHR
 */
	case function_shr :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_binary_type(IN_param_value))
			{
		
				{
					identifier_c param_name("N");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *N_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (N_param_value == NULL)
					  N_param_value = function_call_param_iterator.next();
					symbol_c *N_type_symbol = search_expression_type->get_type(N_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(N_type_symbol, last_type_symbol) ? search_expression_type->common_type(N_type_symbol, last_type_symbol) : N_type_symbol ;
					
					if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
					{
				
						symbol_c * return_type_symbol = IN_type_symbol;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_shr*/
	break;

/****
 *ROR
 */
	case function_ror :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_binary_type(IN_param_value))
			{
		
				{
					identifier_c param_name("N");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *N_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (N_param_value == NULL)
					  N_param_value = function_call_param_iterator.next();
					symbol_c *N_type_symbol = search_expression_type->get_type(N_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(N_type_symbol, last_type_symbol) ? search_expression_type->common_type(N_type_symbol, last_type_symbol) : N_type_symbol ;
					
					if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
					{
				
						symbol_c * return_type_symbol = IN_type_symbol;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_ror*/
	break;

/****
 *ROL
 */
	case function_rol :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_binary_type(IN_param_value))
			{
		
				{
					identifier_c param_name("N");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *N_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (N_param_value == NULL)
					  N_param_value = function_call_param_iterator.next();
					symbol_c *N_type_symbol = search_expression_type->get_type(N_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(N_type_symbol, last_type_symbol) ? search_expression_type->common_type(N_type_symbol, last_type_symbol) : N_type_symbol ;
					
					if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
					{
				
						symbol_c * return_type_symbol = IN_type_symbol;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_rol*/
	break;

/****
 *AND
 */
	case function_and :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN1");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN1_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN1_param_value == NULL)
			  IN1_param_value = function_call_param_iterator.next();
			symbol_c *IN1_type_symbol = search_expression_type->get_type(IN1_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN1_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN1_type_symbol, last_type_symbol) : IN1_type_symbol ;
			
			if(search_expression_type->is_binary_type(IN1_param_value))
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					if(search_expression_type->is_binary_type(IN2_param_value))
					{
				
						symbol_c * return_type_symbol = last_type_symbol;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_and*/
	break;

/****
 *OR
 */
	case function_or :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN1");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN1_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN1_param_value == NULL)
			  IN1_param_value = function_call_param_iterator.next();
			symbol_c *IN1_type_symbol = search_expression_type->get_type(IN1_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN1_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN1_type_symbol, last_type_symbol) : IN1_type_symbol ;
			
			if(search_expression_type->is_binary_type(IN1_param_value))
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					if(search_expression_type->is_binary_type(IN2_param_value))
					{
				
						symbol_c * return_type_symbol = last_type_symbol;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_or*/
	break;

/****
 *XOR
 */
	case function_xor :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN1");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN1_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN1_param_value == NULL)
			  IN1_param_value = function_call_param_iterator.next();
			symbol_c *IN1_type_symbol = search_expression_type->get_type(IN1_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN1_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN1_type_symbol, last_type_symbol) : IN1_type_symbol ;
			
			if(search_expression_type->is_binary_type(IN1_param_value))
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					if(search_expression_type->is_binary_type(IN2_param_value))
					{
				
						symbol_c * return_type_symbol = last_type_symbol;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_xor*/
	break;

/****
 *NOT
 */
	case function_not :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if(search_expression_type->is_binary_type(IN_param_value))
			{
		
				symbol_c * return_type_symbol = IN_type_symbol;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_not*/
	break;

/****
 *SEL
 */
	case function_sel :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("G");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *G_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (G_param_value == NULL)
			  G_param_value = function_call_param_iterator.next();
			symbol_c *G_type_symbol = search_expression_type->get_type(G_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(G_type_symbol, last_type_symbol) ? search_expression_type->common_type(G_type_symbol, last_type_symbol) : G_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(bool_type_name_c))
			{
		
				{
					identifier_c param_name("IN0");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN0_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN0_param_value == NULL)
					  IN0_param_value = function_call_param_iterator.next();
					symbol_c *IN0_type_symbol = search_expression_type->get_type(IN0_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN0_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN0_type_symbol, last_type_symbol) : IN0_type_symbol ;
					
					
					{
				
						{
							identifier_c param_name("IN1");
							/* Get the value from a foo(<param_name> = <param_value>) style call */
							symbol_c *IN1_param_value = function_call_param_iterator.search(&param_name);
							
							/* Get the value from a foo(<param_value>) style call */
							if (IN1_param_value == NULL)
							  IN1_param_value = function_call_param_iterator.next();
							symbol_c *IN1_type_symbol = search_expression_type->get_type(IN1_param_value);
							last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN1_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN1_type_symbol, last_type_symbol) : IN1_type_symbol ;
							
							
							{
						
								symbol_c * return_type_symbol = last_type_symbol;
								return return_type_symbol;
								
							}
							
							ERROR;
						}
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_sel*/
	break;

/****
 *MAX
 */
	case function_max :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN1");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN1_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN1_param_value == NULL)
			  IN1_param_value = function_call_param_iterator.next();
			symbol_c *IN1_type_symbol = search_expression_type->get_type(IN1_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN1_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN1_type_symbol, last_type_symbol) : IN1_type_symbol ;
			
			
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					
					{
				
						symbol_c * return_type_symbol = last_type_symbol;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_max*/
	break;

/****
 *MIN
 */
	case function_min :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN1");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN1_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN1_param_value == NULL)
			  IN1_param_value = function_call_param_iterator.next();
			symbol_c *IN1_type_symbol = search_expression_type->get_type(IN1_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN1_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN1_type_symbol, last_type_symbol) : IN1_type_symbol ;
			
			
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					
					{
				
						symbol_c * return_type_symbol = last_type_symbol;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_min*/
	break;

/****
 *LIMIT
 */
	case function_limit :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("MN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *MN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (MN_param_value == NULL)
			  MN_param_value = function_call_param_iterator.next();
			symbol_c *MN_type_symbol = search_expression_type->get_type(MN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(MN_type_symbol, last_type_symbol) ? search_expression_type->common_type(MN_type_symbol, last_type_symbol) : MN_type_symbol ;
			
			
			{
		
				{
					identifier_c param_name("IN");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN_param_value == NULL)
					  IN_param_value = function_call_param_iterator.next();
					symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
					
					
					{
				
						{
							identifier_c param_name("MX");
							/* Get the value from a foo(<param_name> = <param_value>) style call */
							symbol_c *MX_param_value = function_call_param_iterator.search(&param_name);
							
							/* Get the value from a foo(<param_value>) style call */
							if (MX_param_value == NULL)
							  MX_param_value = function_call_param_iterator.next();
							symbol_c *MX_type_symbol = search_expression_type->get_type(MX_param_value);
							last_type_symbol = last_type_symbol && search_expression_type->is_same_type(MX_type_symbol, last_type_symbol) ? search_expression_type->common_type(MX_type_symbol, last_type_symbol) : MX_type_symbol ;
							
							
							{
						
								symbol_c * return_type_symbol = IN_type_symbol;
								return return_type_symbol;
								
							}
							
							ERROR;
						}
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_limit*/
	break;

/****
 *MUX
 */
	case function_mux :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("K");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *K_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (K_param_value == NULL)
			  K_param_value = function_call_param_iterator.next();
			symbol_c *K_type_symbol = search_expression_type->get_type(K_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(K_type_symbol, last_type_symbol) ? search_expression_type->common_type(K_type_symbol, last_type_symbol) : K_type_symbol ;
			
			if(search_expression_type->is_integer_type(K_param_value))
			{
		
				{
					identifier_c param_name("IN0");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN0_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN0_param_value == NULL)
					  IN0_param_value = function_call_param_iterator.next();
					symbol_c *IN0_type_symbol = search_expression_type->get_type(IN0_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN0_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN0_type_symbol, last_type_symbol) : IN0_type_symbol ;
					
					
					{
				
						{
							identifier_c param_name("IN1");
							/* Get the value from a foo(<param_name> = <param_value>) style call */
							symbol_c *IN1_param_value = function_call_param_iterator.search(&param_name);
							
							/* Get the value from a foo(<param_value>) style call */
							if (IN1_param_value == NULL)
							  IN1_param_value = function_call_param_iterator.next();
							symbol_c *IN1_type_symbol = search_expression_type->get_type(IN1_param_value);
							last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN1_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN1_type_symbol, last_type_symbol) : IN1_type_symbol ;
							
							
							{
						
								symbol_c * return_type_symbol = last_type_symbol;
								return return_type_symbol;
								
							}
							
							ERROR;
						}
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_mux*/
	break;

/****
 *GT
 */
	case function_gt :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN1");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN1_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN1_param_value == NULL)
			  IN1_param_value = function_call_param_iterator.next();
			symbol_c *IN1_type_symbol = search_expression_type->get_type(IN1_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN1_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN1_type_symbol, last_type_symbol) : IN1_type_symbol ;
			
			
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					
					{
				
						symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_gt*/
	break;

/****
 *GE
 */
	case function_ge :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN1");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN1_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN1_param_value == NULL)
			  IN1_param_value = function_call_param_iterator.next();
			symbol_c *IN1_type_symbol = search_expression_type->get_type(IN1_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN1_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN1_type_symbol, last_type_symbol) : IN1_type_symbol ;
			
			
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					
					{
				
						symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_ge*/
	break;

/****
 *EQ
 */
	case function_eq :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN1");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN1_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN1_param_value == NULL)
			  IN1_param_value = function_call_param_iterator.next();
			symbol_c *IN1_type_symbol = search_expression_type->get_type(IN1_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN1_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN1_type_symbol, last_type_symbol) : IN1_type_symbol ;
			
			
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					
					{
				
						symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_eq*/
	break;

/****
 *LT
 */
	case function_lt :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN1");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN1_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN1_param_value == NULL)
			  IN1_param_value = function_call_param_iterator.next();
			symbol_c *IN1_type_symbol = search_expression_type->get_type(IN1_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN1_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN1_type_symbol, last_type_symbol) : IN1_type_symbol ;
			
			
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					
					{
				
						symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_lt*/
	break;

/****
 *LE
 */
	case function_le :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN1");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN1_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN1_param_value == NULL)
			  IN1_param_value = function_call_param_iterator.next();
			symbol_c *IN1_type_symbol = search_expression_type->get_type(IN1_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN1_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN1_type_symbol, last_type_symbol) : IN1_type_symbol ;
			
			
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					
					{
				
						symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_le*/
	break;

/****
 *NE
 */
	case function_ne :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN1");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN1_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN1_param_value == NULL)
			  IN1_param_value = function_call_param_iterator.next();
			symbol_c *IN1_type_symbol = search_expression_type->get_type(IN1_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN1_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN1_type_symbol, last_type_symbol) : IN1_type_symbol ;
			
			
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					
					{
				
						symbol_c * return_type_symbol = &search_constant_type_c::bool_type_name;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_ne*/
	break;

/****
 *LEN
 */
	case function_len :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				symbol_c * return_type_symbol = &search_constant_type_c::int_type_name;
				return return_type_symbol;
				
			}
			
			ERROR;
		}
		
	}/*function_len*/
	break;

/****
 *LEFT
 */
	case function_left :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				{
					identifier_c param_name("L");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *L_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (L_param_value == NULL)
					  L_param_value = function_call_param_iterator.next();
					symbol_c *L_type_symbol = search_expression_type->get_type(L_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(L_type_symbol, last_type_symbol) ? search_expression_type->common_type(L_type_symbol, last_type_symbol) : L_type_symbol ;
					
					if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
					{
				
						symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_left*/
	break;

/****
 *RIGHT
 */
	case function_right :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				{
					identifier_c param_name("L");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *L_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (L_param_value == NULL)
					  L_param_value = function_call_param_iterator.next();
					symbol_c *L_type_symbol = search_expression_type->get_type(L_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(L_type_symbol, last_type_symbol) ? search_expression_type->common_type(L_type_symbol, last_type_symbol) : L_type_symbol ;
					
					if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
					{
				
						symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_right*/
	break;

/****
 *MID
 */
	case function_mid :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				{
					identifier_c param_name("L");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *L_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (L_param_value == NULL)
					  L_param_value = function_call_param_iterator.next();
					symbol_c *L_type_symbol = search_expression_type->get_type(L_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(L_type_symbol, last_type_symbol) ? search_expression_type->common_type(L_type_symbol, last_type_symbol) : L_type_symbol ;
					
					if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
					{
				
						{
							identifier_c param_name("P");
							/* Get the value from a foo(<param_name> = <param_value>) style call */
							symbol_c *P_param_value = function_call_param_iterator.search(&param_name);
							
							/* Get the value from a foo(<param_value>) style call */
							if (P_param_value == NULL)
							  P_param_value = function_call_param_iterator.next();
							symbol_c *P_type_symbol = search_expression_type->get_type(P_param_value);
							last_type_symbol = last_type_symbol && search_expression_type->is_same_type(P_type_symbol, last_type_symbol) ? search_expression_type->common_type(P_type_symbol, last_type_symbol) : P_type_symbol ;
							
							if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
							{
						
								symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
								return return_type_symbol;
								
							}
							
							ERROR;
						}
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_mid*/
	break;

/****
 *CONCAT
 */
	case function_concat :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN1");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN1_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN1_param_value == NULL)
			  IN1_param_value = function_call_param_iterator.next();
			symbol_c *IN1_type_symbol = search_expression_type->get_type(IN1_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN1_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN1_type_symbol, last_type_symbol) : IN1_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(date_type_name_c))
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					if (typeid(*last_type_symbol) == typeid(tod_type_name_c))
					{
				
						symbol_c * return_type_symbol = &search_constant_type_c::dt_type_name;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					if (typeid(*last_type_symbol) == typeid(string_type_name_c))
					{
				
						symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_concat*/
	break;

/****
 *INSERT
 */
	case function_insert :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN1");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN1_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN1_param_value == NULL)
			  IN1_param_value = function_call_param_iterator.next();
			symbol_c *IN1_type_symbol = search_expression_type->get_type(IN1_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN1_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN1_type_symbol, last_type_symbol) : IN1_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					if (typeid(*last_type_symbol) == typeid(string_type_name_c))
					{
				
						{
							identifier_c param_name("P");
							/* Get the value from a foo(<param_name> = <param_value>) style call */
							symbol_c *P_param_value = function_call_param_iterator.search(&param_name);
							
							/* Get the value from a foo(<param_value>) style call */
							if (P_param_value == NULL)
							  P_param_value = function_call_param_iterator.next();
							symbol_c *P_type_symbol = search_expression_type->get_type(P_param_value);
							last_type_symbol = last_type_symbol && search_expression_type->is_same_type(P_type_symbol, last_type_symbol) ? search_expression_type->common_type(P_type_symbol, last_type_symbol) : P_type_symbol ;
							
							if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
							{
						
								symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
								return return_type_symbol;
								
							}
							
							ERROR;
						}
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_insert*/
	break;

/****
 *DELETE
 */
	case function_delete :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN_param_value == NULL)
			  IN_param_value = function_call_param_iterator.next();
			symbol_c *IN_type_symbol = search_expression_type->get_type(IN_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN_type_symbol, last_type_symbol) : IN_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				{
					identifier_c param_name("L");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *L_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (L_param_value == NULL)
					  L_param_value = function_call_param_iterator.next();
					symbol_c *L_type_symbol = search_expression_type->get_type(L_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(L_type_symbol, last_type_symbol) ? search_expression_type->common_type(L_type_symbol, last_type_symbol) : L_type_symbol ;
					
					if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
					{
				
						{
							identifier_c param_name("P");
							/* Get the value from a foo(<param_name> = <param_value>) style call */
							symbol_c *P_param_value = function_call_param_iterator.search(&param_name);
							
							/* Get the value from a foo(<param_value>) style call */
							if (P_param_value == NULL)
							  P_param_value = function_call_param_iterator.next();
							symbol_c *P_type_symbol = search_expression_type->get_type(P_param_value);
							last_type_symbol = last_type_symbol && search_expression_type->is_same_type(P_type_symbol, last_type_symbol) ? search_expression_type->common_type(P_type_symbol, last_type_symbol) : P_type_symbol ;
							
							if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
							{
						
								symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
								return return_type_symbol;
								
							}
							
							ERROR;
						}
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_delete*/
	break;

/****
 *REPLACE
 */
	case function_replace :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN1");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN1_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN1_param_value == NULL)
			  IN1_param_value = function_call_param_iterator.next();
			symbol_c *IN1_type_symbol = search_expression_type->get_type(IN1_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN1_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN1_type_symbol, last_type_symbol) : IN1_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					if (typeid(*last_type_symbol) == typeid(string_type_name_c))
					{
				
						{
							identifier_c param_name("L");
							/* Get the value from a foo(<param_name> = <param_value>) style call */
							symbol_c *L_param_value = function_call_param_iterator.search(&param_name);
							
							/* Get the value from a foo(<param_value>) style call */
							if (L_param_value == NULL)
							  L_param_value = function_call_param_iterator.next();
							symbol_c *L_type_symbol = search_expression_type->get_type(L_param_value);
							last_type_symbol = last_type_symbol && search_expression_type->is_same_type(L_type_symbol, last_type_symbol) ? search_expression_type->common_type(L_type_symbol, last_type_symbol) : L_type_symbol ;
							
							if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
							{
						
								{
									identifier_c param_name("P");
									/* Get the value from a foo(<param_name> = <param_value>) style call */
									symbol_c *P_param_value = function_call_param_iterator.search(&param_name);
									
									/* Get the value from a foo(<param_value>) style call */
									if (P_param_value == NULL)
									  P_param_value = function_call_param_iterator.next();
									symbol_c *P_type_symbol = search_expression_type->get_type(P_param_value);
									last_type_symbol = last_type_symbol && search_expression_type->is_same_type(P_type_symbol, last_type_symbol) ? search_expression_type->common_type(P_type_symbol, last_type_symbol) : P_type_symbol ;
									
									if (typeid(*last_type_symbol) == typeid(uint_type_name_c))
									{
								
										symbol_c * return_type_symbol = &search_constant_type_c::string_type_name;
										return return_type_symbol;
										
									}
									
									ERROR;
								}
								
							}
							
							ERROR;
						}
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_replace*/
	break;

/****
 *FIND
 */
	case function_find :
	{
		symbol_c *last_type_symbol = NULL;

		{
			identifier_c param_name("IN1");
			/* Get the value from a foo(<param_name> = <param_value>) style call */
			symbol_c *IN1_param_value = function_call_param_iterator.search(&param_name);
			
			/* Get the value from a foo(<param_value>) style call */
			if (IN1_param_value == NULL)
			  IN1_param_value = function_call_param_iterator.next();
			symbol_c *IN1_type_symbol = search_expression_type->get_type(IN1_param_value);
			last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN1_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN1_type_symbol, last_type_symbol) : IN1_type_symbol ;
			
			if (typeid(*last_type_symbol) == typeid(string_type_name_c))
			{
		
				{
					identifier_c param_name("IN2");
					/* Get the value from a foo(<param_name> = <param_value>) style call */
					symbol_c *IN2_param_value = function_call_param_iterator.search(&param_name);
					
					/* Get the value from a foo(<param_value>) style call */
					if (IN2_param_value == NULL)
					  IN2_param_value = function_call_param_iterator.next();
					symbol_c *IN2_type_symbol = search_expression_type->get_type(IN2_param_value);
					last_type_symbol = last_type_symbol && search_expression_type->is_same_type(IN2_type_symbol, last_type_symbol) ? search_expression_type->common_type(IN2_type_symbol, last_type_symbol) : IN2_type_symbol ;
					
					if (typeid(*last_type_symbol) == typeid(string_type_name_c))
					{
				
						symbol_c * return_type_symbol = &search_constant_type_c::int_type_name;
						return return_type_symbol;
						
					}
					
					ERROR;
				}
				
			}
			
			ERROR;
		}
		
	}/*function_find*/
	break;

	case function_none :
	ERROR;
}
return NULL;