select( x ) case (-1): return_value = 100; break; case 0: return_value = 200; break; default: return_value = 6; break; case 1: return_value = 300; break; case 2: return_value = 400; break; end return return_value;