 			ELSE
 			
 				UPDATE	programs_manager_schema.organization_level
-				   SET	parent_level_name = (SELECT _in_data ->> 'parent_level_name')::text,
-						organization_level_name = _organization_level_name,
+				   SET	organization_level_name = (SELECT _in_data ->> 'organization_level_name')::text,
 						organization_level_display_name = (SELECT _in_data ->> 'organization_level_display_name')::text,
 						organization_level_description = (SELECT _in_data ->> 'organization_level_description')::text,
-						is_root_level = (SELECT _in_data ->> 'is_root_level')::BOOLEAN,
 						parent_level_id = _parent_level_id,
 						is_root_level = (SELECT _in_data ->> 'is_root_level')::BOOLEAN,
 						organization_id = _organization_id,
 						datetime_level_changed  = LOCALTIMESTAMP (0),
 						changing_user_login = (SELECT _in_data ->> 'changing_user_login')::text
-				WHERE	organization_level_id = _organization_level_id2
+				WHERE	organization_level_id = (SELECT _in_data ->> 'organization_level_id')::uuid
 				;
 				
-				_message := 'The level named ' || _organization_level_name || ' has been updated.';
+				_message := 'The level with the organization_level_id ' || (SELECT _in_data ->> 'organization_level_id')::text || ' has been updated.';
 				
 				_out_json :=  (SELECT json_build_object(
 									'result_indicator', 'Succees',
 									'message', _message,
-									'organization_level_id', _organization_level_id2,
+									'organization_level_id', _organization_level_id,
 									'organization_level_name', (SELECT _in_data ->> 'organization_level_name')::text,
 									'organization_level_display_name', (SELECT _in_data ->> 'organization_level_display_name')::text,
 									'organization_level_description',  (SELECT _in_data ->> 'organization_level_description')::text,


	_in_data:	
	{
		organization_level_name:
		organization_level_display_name:
		organization_level_description:
		parent_level_name:  
		is_root_level:	-- boolean
		organization_name:
		changing_user_login:
		enter_or_update:
	}

			
		ELSIF _enter_update = 'Update' THEN 
		
			_organization_level_name := (	SELECT
						organization_level_name
					FROM	programs_manager_schema.organization_level
					WHERE	organization_level_id = (SELECT _in_data ->> 'organization_level_id')::uuid
					);
		
			IF _organization_level_name IS NULL THEN  -- name DOESN'T exist
			
				_message := (SELECT  'No organizational level with the organization_level_id ' || (SELECT _in_data ->> 'organization_level_id')::text || ' exists  so this update CAN NOT be completed, please resubmit with different data.') ;
				_out_json :=  (SELECT json_build_object(
						'result_indicator', 'Failure',
						'message', _message,
