query:
	CALL /* RESULTSET_SAME_DATA_IN_EVERY_ROW */ { 'proc_'.$prng->int(1,3) } ( @inout1 ) |
	ddl;

ddl:
	{ $function_name = 'func_'.$prng->int(1,3) ; return undef } CREATE FUNCTION $function_name (in1 INTEGER) RETURNS INTEGER RETURN _digit |
	table_ddl |
	{ $procedure_name = 'proc_'.$prng->int(1,3) ; return undef } CREATE PROCEDURE $procedure_name (INOUT inout1 INT) BEGIN SELECT COUNT(DISTINCT { 'func_'.$prng->int(1,3) } ( _field ) ) INTO inout1 FROM selectable_object ; END;

table_ddl:
	{ $table_name = 'table_'.$prng->int(1,3) ; return undef } CREATE TABLE $table_name ( `col_int` INTEGER, `col_int_key` INTEGER, KEY (`col_int_key`) ) SELECT /* RESULTSET_SAME_DATA_IN_EVERY_ROW */ { 'func_'.$prng->int(1,3) } ( _field ) AS f1 FROM selectable_object;

selectable_object:
	_table |
	{ $table_name = 'table_'.$prng->int(1,3) ; return undef } $table_name;