USE parts; DROP PROCEDURE IF EXISTS parts.p_dog_calc_command; DELIMITER // CREATE PROCEDURE parts.p_dog_calc_command ( IN a_guid BINARY(36) , IN a_id_user INT , IN a_get_all_command_category BIT , IN a_get_inactive_command_category BIT , IN a_ids_command_category TEXT , IN a_names_command_category TEXT , IN a_get_all_command BIT , IN a_get_inactive_command BIT , IN a_ids_command TEXT , IN a_names_command TEXT , IN a_show_errors BIT , IN a_debug BIT ) BEGIN DECLARE v_can_view BIT; DECLARE v_code_type_error_bad_data VARCHAR(100); DECLARE v_code_type_error_no_permission VARCHAR(100); DECLARE v_has_filter_command_id BIT; DECLARE v_has_filter_command_name BIT; DECLARE v_has_filter_command_category_id BIT; DECLARE v_has_filter_command_category_name BIT; DECLARE v_id_minimum INT; DECLARE v_id_permission_dog_view INT; DECLARE v_id_type_error_bad_data INT; DECLARE v_id_type_error_no_permission INT; DECLARE v_time_start TIMESTAMP(6); DECLARE exit handler for SQLEXCEPTION BEGIN GET DIAGNOSTICS CONDITION 1 @sqlstate = RETURNED_SQLSTATE , @errno = MYSQL_ERRNO , @text = MESSAGE_TEXT ; ROLLBACK; CREATE TEMPORARY TABLE IF NOT EXISTS tmp_Msg_Error_Calc_Command ( id_error INT NOT NULL PRIMARY KEY AUTO_INCREMENT , id_type INT NULL , code VARCHAR(100) NOT NULL , msg VARCHAR(4000) NOT NULL ); INSERT INTO tmp_Msg_Error_Calc_Command ( id_type , code , msg ) SELECT MET.id_type , @errno , @text FROM parts.CORE_Msg_Error_Type MET WHERE MET.code = 'MYSQL_ERROR' ; SELECT t_ERROR.id_error , t_ERROR.id_type , t_ERROR.code , ERROR_TYPE.name , ERROR_TYPE.description , ERROR_TYPE.is_breaking_error , ERROR_TYPE.background_colour , ERROR_TYPE.text_colour , t_ERROR.msg FROM tmp_Msg_Error_Calc_Command t_ERROR INNER JOIN parts.CORE_Msg_Error_Type ERROR_TYPE ON t_ERROR.id_type = ERROR_TYPE.id_type ; DROP TABLE IF EXISTS tmp_Msg_Error_Calc_Command; END; SET v_time_start := CURRENT_TIMESTAMP(6); SET v_code_type_error_bad_data := 'BAD_DATA'; SET v_code_type_error_no_permission := 'NO_PERMISSION'; SET v_id_type_error_bad_data := (SELECT ERROR_TYPE.id_type FROM parts.CORE_Msg_Error_Type ERROR_TYPE WHERE ERROR_TYPE.code = v_code_type_error_bad_data LIMIT 1); SET v_id_type_error_no_permission := (SELECT ERROR_TYPE.id_type FROM parts.CORE_Msg_Error_Type ERROR_TYPE WHERE ERROR_TYPE.code = v_code_type_error_no_permission LIMIT 1); SET v_id_permission_dog_view := (SELECT PERMISSION.id_permission FROM parts.DOG_Permission PERMISSION WHERE PERMISSION.code = 'DOG_VIEW' LIMIT 1); CALL parts.p_core_validate_guid ( a_guid ); SET a_id_user := IFNULL(a_id_user, 0); SET a_get_all_command_category := IFNULL(a_get_all_command_category, 0); SET a_get_inactive_command_category := IFNULL(a_get_inactive_command_category, 0); SET a_ids_command_category := TRIM(IFNULL(a_ids_command_category, '')); SET a_names_command_category := TRIM(IFNULL(a_names_command_category, '')); SET a_get_all_command := IFNULL(a_get_all_command, 0); SET a_get_inactive_command := IFNULL(a_get_inactive_command, 0); SET a_ids_command := TRIM(IFNULL(a_ids_command, '')); SET a_names_command := TRIM(IFNULL(a_names_command, '')); SET a_show_errors := IFNULL(a_show_errors, 0); SET a_debug := IFNULL(a_debug, 0); IF a_debug = 1 THEN SELECT a_guid , a_id_user , a_get_all_command_category , a_get_inactive_command_category , a_ids_command_category , a_names_command_category , a_get_all_command , a_get_inactive_command , a_ids_command , a_names_command , a_show_errors , a_debug ; SELECT v_id_type_error_bad_data , v_id_type_error_no_permission , v_id_permission_dog_view , v_time_start ; END IF; DROP TEMPORARY TABLE IF EXISTS tmp_Split_Name_Calc_Command; DROP TEMPORARY TABLE IF EXISTS tmp_Split_Id_Calc_Command; DROP TEMPORARY TABLE IF EXISTS tmp_Msg_Error_Calc_Command; DROP TEMPORARY TABLE IF EXISTS tmp_Command_Calc_Command; CREATE TEMPORARY TABLE tmp_Command_Calc_Command_Category ( id_command_category INT NOT NULL ); CREATE TEMPORARY TABLE tmp_Command_Calc_Command ( id_command INT NOT NULL , id_command_category INT NOT NULL ); CREATE TEMPORARY TABLE IF NOT EXISTS tmp_Msg_Error_Calc_Command ( id_error INT NOT NULL PRIMARY KEY AUTO_INCREMENT , id_type INT NULL , code VARCHAR(100) NOT NULL , msg VARCHAR(4000) NOT NULL ); CREATE TEMPORARY TABLE IF NOT EXISTS tmp_Split_Id_Calc_Command ( substring VARCHAR(4000) NOT NULL , as_int INT NULL ); DELETE FROM tmp_Split_Id_Calc_Command; CREATE TEMPORARY TABLE IF NOT EXISTS tmp_Split_Name_Calc_Command ( substring VARCHAR(4000) NOT NULL , as_int INT NULL ); DELETE FROM tmp_Split_Name_Calc_Command; SET v_has_filter_command_category_id = CASE WHEN a_ids_command_category = '' THEN 0 ELSE 1 END; SET v_has_filter_command_category_name = CASE WHEN a_names_command_category = '' THEN 0 ELSE 1 END; SET v_has_filter_command_id = CASE WHEN a_ids_command = '' THEN 0 ELSE 1 END; SET v_has_filter_command_name = CASE WHEN a_names_command = '' THEN 0 ELSE 1 END; -- Command Categories IF v_has_filter_command_category_id = 1 THEN CALL parts.p_core_split(a_guid, a_ids_command_category, ',', a_debug); INSERT INTO tmp_Split_Id_Calc_Command ( substring , as_int ) SELECT SPLIT_T.substring , CONVERT(SPLIT_T.substring, DECIMAL(10,0)) AS as_int FROM parts.CORE_Split_Temp SPLIT_T WHERE SPLIT_T.GUID = a_guid AND IFNULL(SPLIT_T.substring, '') <> '' ; CALL parts.p_core_clear_split( a_guid ); END IF; IF v_has_filter_command_category_name = 1 THEN CALL parts.p_core_split(a_guid, a_names_command_category, ',', a_debug); INSERT INTO tmp_Split_Name_Calc_Command ( substring , as_int ) SELECT SPLIT_T.substring , CONVERT(SPLIT_T.substring, DECIMAL(10,0)) AS as_int FROM parts.CORE_Split_Temp SPLIT_T WHERE SPLIT_T.GUID = a_guid AND IFNULL(SPLIT_T.substring, '') <> '' ; CALL parts.p_core_clear_split( a_guid ); END IF; IF NOT EXISTS (SELECT * FROM tmp_Msg_Error_Calc_Command t_ERROR INNER JOIN parts.CORE_Msg_Error_Type ERROR_TYPE ON t_ERROR.id_type = ERROR_TYPE.id_type WHERE ERROR_TYPE.is_breaking_error = 1 LIMIT 1) THEN IF EXISTS ( SELECT * FROM tmp_Split_Id_Calc_Command t_SPLIT_ID LEFT JOIN parts.DOG_Command_Category COMMAND_CATEGORY ON t_SPLIT_ID.as_int = COMMAND_CATEGORY.id_command_category WHERE ISNULL(t_SPLIT_ID.as_int) OR ISNULL(COMMAND_CATEGORY.id_command_category) OR ( COMMAND_CATEGORY.active = 0 AND a_get_inactive_command_category = 0 ) ) THEN INSERT INTO tmp_Msg_Error_Calc_Command ( id_type , code , msg ) SELECT v_id_type_error_bad_data , v_code_type_error_bad_data , CONCAT('Invalid or inactive Command IDs: ', IFNULL(GROUP_CONCAT(t_SPLIT_ID.substring SEPARATOR ', '), 'NULL')) FROM tmp_Split_Id_Calc_Command t_SPLIT_ID LEFT JOIN parts.DOG_Command_Category COMMAND_CATEGORY ON t_SPLIT_ID.as_int = COMMAND_CATEGORY.id_command_category WHERE ISNULL(t_SPLIT_ID.as_int) OR ISNULL(COMMAND_CATEGORY.id_command_category) OR ( COMMAND_CATEGORY.active = 0 AND a_get_inactive_command_category = 0 ) ; /* Don't error on names not found ELSEIF EXISTS ( SELECT * FROM tmp_Split t_SPLIT LEFT JOIN parts.DOG_Command_Category COMMAND_CATEGORY ON t_SPLIT.as_int = COMMAND_CATEGORY.id_command_category WHERE ISNULL(t_SPLIT.as_int) OR ISNULL(COMMAND_CATEGORY.id_command_category) OR ( COMMAND_CATEGORY.active = 0 AND a_get_inactive_command_category = 0 ) ) THEN INSERT INTO tmp_Msg_Error_Calc_Command ( id_type , code , msg ) SELECT v_id_type_error_bad_data , v_code_type_error_bad_data , CONCAT('Invalid or inactive Command IDs: ', IFNULL(GROUP_CONCAT(t_SPLIT.substring SEPARATOR ', '), 'NULL')) FROM tmp_Split t_SPLIT LEFT JOIN parts.DOG_Command_Category COMMAND_CATEGORY ON t_SPLIT.as_int = COMMAND_CATEGORY.id_command_category WHERE ISNULL(t_SPLIT.as_int) OR ISNULL(COMMAND_CATEGORY.id_command_category) OR ( COMMAND_CATEGORY.active = 0 AND a_get_inactive_command_category = 0 ) ; */ ELSE INSERT INTO tmp_Command_Calc_Command_Category ( id_command_category ) WITH Command_Category_Id_Filter AS ( SELECT COMMAND_CATEGORY.id_command_category FROM tmp_Split_Id_Calc_Command t_SPLIT_ID RIGHT JOIN parts.DOG_Command_Category COMMAND_CATEGORY ON t_SPLIT_ID.as_int = COMMAND_CATEGORY.id_command_category WHERE t_SPLIT_ID.as_int IS NOT NULL ) , Command_Category_Name_Filter AS ( SELECT COMMAND_CATEGORY.id_command_category FROM tmp_Split_Name_Calc_Command t_SPLIT_NAME RIGHT JOIN parts.DOG_Command_Category COMMAND_CATEGORY ON COMMAND_CATEGORY.name LIKE CONCAT('%', t_SPLIT_NAME.substring, '%') WHERE t_SPLIT_NAME.substring IS NOT NULL AND t_SPLIT_NAME.substring <> '' ) , Command_Category_Filters AS ( SELECT DISTINCT COMMAND_CATEGORY_COMBINED.id_command_category FROM ( SELECT COMMAND_CATEGORY_ID_FILTER.id_command_category FROM Command_Category_Id_Filter COMMAND_CATEGORY_ID_FILTER UNION SELECT COMMAND_CATEGORY_NAME_FILTER.id_command_category FROM Command_Category_Name_Filter COMMAND_CATEGORY_NAME_FILTER ) COMMAND_CATEGORY_COMBINED ) SELECT COMMAND_CATEGORY.id_command_category FROM parts.DOG_Command_Category COMMAND_CATEGORY LEFT JOIN Command_Category_Filters COMMAND_CATEGORY_FILTERS ON COMMAND_CATEGORY.id_command_category = COMMAND_CATEGORY_FILTERS.id_command_category WHERE ( a_get_all_command_category = 1 OR ( ( v_has_filter_command_category_id = 1 OR v_has_filter_command_category_name = 1 ) AND COMMAND_CATEGORY_FILTERS.id_command_category IS NOT NULL ) ) AND ( a_get_inactive_command_category = 1 OR COMMAND_CATEGORY.active = 1 ) ; END IF; END IF; DELETE FROM tmp_Split_Id_Calc_Command; DELETE FROM tmp_Split_Name_Calc_Command; -- Commands IF v_has_filter_command_id = 1 THEN CALL parts.p_core_split(a_guid, a_ids_command, ',', a_debug); INSERT INTO tmp_Split_Id_Calc_Command ( substring , as_int ) SELECT SPLIT_T.substring , CONVERT(SPLIT_T.substring, DECIMAL(10,0)) AS as_int FROM parts.CORE_Split_Temp SPLIT_T WHERE SPLIT_T.GUID = a_guid AND IFNULL(SPLIT_T.substring, '') <> '' ; CALL parts.p_core_clear_split( a_guid ); END IF; IF v_has_filter_command_name = 1 THEN CALL parts.p_core_split(a_guid, a_names_command, ',', a_debug); INSERT INTO tmp_Split_Name_Calc_Command ( substring , as_int ) SELECT SPLIT_T.substring , CONVERT(SPLIT_T.substring, DECIMAL(10,0)) AS as_int FROM parts.CORE_Split_Temp SPLIT_T WHERE SPLIT_T.GUID = a_guid AND IFNULL(SPLIT_T.substring, '') <> '' ; CALL parts.p_core_clear_split( a_guid ); END IF; IF NOT EXISTS (SELECT * FROM tmp_Msg_Error_Calc_Command t_ERROR INNER JOIN parts.CORE_Msg_Error_Type ERROR_TYPE ON t_ERROR.id_type = ERROR_TYPE.id_type WHERE ERROR_TYPE.is_breaking_error = 1 LIMIT 1) THEN IF EXISTS ( SELECT * FROM tmp_Split_Id_Calc_Command t_SPLIT_ID LEFT JOIN parts.DOG_Command COMMAND ON t_SPLIT_ID.as_int = COMMAND.id_command WHERE ISNULL(t_SPLIT_ID.as_int) OR ISNULL(COMMAND.id_command) OR ( COMMAND.active = 0 AND a_get_inactive_command = 0 ) ) THEN INSERT INTO tmp_Msg_Error_Calc_Command ( id_type , code , msg ) SELECT v_id_type_error_bad_data , v_code_type_error_bad_data , CONCAT('Invalid or inactive Command IDs: ', IFNULL(GROUP_CONCAT(t_SPLIT_ID.substring SEPARATOR ', '), 'NULL')) FROM tmp_Split_Id_Calc_Command t_SPLIT_ID LEFT JOIN parts.DOG_Command COMMAND ON t_SPLIT_ID.as_int = COMMAND.id_command WHERE ISNULL(t_SPLIT_ID.as_int) OR ISNULL(COMMAND.id_command) OR ( COMMAND.active = 0 AND a_get_inactive_command = 0 ) ; /* Don't error on names not found ELSEIF EXISTS ( SELECT * FROM tmp_Split t_SPLIT LEFT JOIN parts.DOG_Command COMMAND ON t_SPLIT.as_int = COMMAND.id_command WHERE ISNULL(t_SPLIT.as_int) OR ISNULL(COMMAND.id_command) OR ( COMMAND.active = 0 AND a_get_inactive_command = 0 ) ) THEN INSERT INTO tmp_Msg_Error_Calc_Command ( id_type , code , msg ) SELECT v_id_type_error_bad_data , v_code_type_error_bad_data , CONCAT('Invalid or inactive Command IDs: ', IFNULL(GROUP_CONCAT(t_SPLIT.substring SEPARATOR ', '), 'NULL')) FROM tmp_Split t_SPLIT LEFT JOIN parts.DOG_Command COMMAND ON t_SPLIT.as_int = COMMAND.id_command WHERE ISNULL(t_SPLIT.as_int) OR ISNULL(COMMAND.id_command) OR ( COMMAND.active = 0 AND a_get_inactive_command = 0 ) ; */ ELSE INSERT INTO tmp_Command_Calc_Command ( id_command , id_command_category ) WITH Command_Id_Filter AS ( SELECT COMMAND.id_command FROM tmp_Split_Id_Calc_Command t_SPLIT_ID RIGHT JOIN parts.DOG_Command COMMAND ON t_SPLIT_ID.as_int = COMMAND.id_command WHERE t_SPLIT_ID.as_int IS NOT NULL ) , Command_Name_Filter AS ( SELECT COMMAND.id_command FROM tmp_Split_Name_Calc_Command t_SPLIT_NAME RIGHT JOIN parts.DOG_Command COMMAND ON COMMAND.name LIKE CONCAT('%', t_SPLIT_NAME.substring, '%') WHERE t_SPLIT_NAME.substring IS NOT NULL AND t_SPLIT_NAME.substring <> '' ) , Command_Filters AS ( SELECT DISTINCT COMMAND_COMBINED.id_command FROM ( SELECT COMMAND_ID_FILTER.id_command FROM Command_Id_Filter COMMAND_ID_FILTER UNION SELECT COMMAND_NAME_FILTER.id_command FROM Command_Name_Filter COMMAND_NAME_FILTER ) COMMAND_COMBINED ) SELECT COMMAND.id_command , COMMAND.id_command_category FROM parts.DOG_Command COMMAND INNER JOIN tmp_Command_Calc_Command_Category t_COMMAND_CATEGORY ON COMMAND.id_command_category = t_COMMAND_CATEGORY.id_command_category LEFT JOIN Command_Filters COMMAND_FILTERS ON COMMAND.id_command = COMMAND_FILTERS.id_command WHERE ( a_get_all_command = 1 OR ( ( v_has_filter_command_id = 1 OR v_has_filter_command_name = 1 ) AND COMMAND_FILTERS.id_command IS NOT NULL ) ) AND ( a_get_inactive_command = 1 OR COMMAND.active = 1 ) ; END IF; END IF; DELETE FROM tmp_Split_Id_Calc_Command; DELETE FROM tmp_Split_Name_Calc_Command; -- Permissions IF a_debug = 1 THEN SELECT a_guid , a_id_user , FALSE -- a_get_inactive_user , v_id_permission_dog_view , 0 -- a_debug ; END IF; CALL parts.p_dog_calc_user( a_guid , a_id_user , FALSE -- a_get_inactive_user , v_id_permission_dog_view , 0 -- a_debug ); SELECT IFNULL(CALC_USER_T.has_access, 0) INTO v_can_view FROM parts.DOG_Calc_User_Temp CALC_USER_T WHERE CALC_USER_T.GUID = a_guid LIMIT 1 ; IF a_debug = 1 THEN SELECT v_can_view; END IF; IF (v_can_view = 0) THEN DELETE t_ME FROM tmp_Msg_Error_Calc_Command t_ME WHERE t_ME.id_type <> v_id_type_error_no_permission ; INSERT INTO tmp_Msg_Error_Calc_Command ( id_type , code , msg ) VALUES ( v_id_type_error_no_permission , v_code_type_error_no_permission , 'You do not have permission to view Dogs and Commands.' ) ; END IF; CALL parts.p_dog_clear_calc_user( a_guid , 0 -- a_debug ); IF EXISTS(SELECT * FROM tmp_Msg_Error_Calc_Command t_ERROR INNER JOIN parts.CORE_Msg_Error_Type ERROR_TYPE ON t_ERROR.id_type = ERROR_TYPE.id_type WHERE ERROR_TYPE.is_breaking_error = 1 LIMIT 1) THEN IF a_debug = 1 THEN SELECT * FROM tmp_Command_Calc_Command; END IF; DELETE FROM tmp_Command_Calc_Command; END IF; -- Outputs START TRANSACTION; -- Command Categories INSERT INTO parts.DOG_Command_Category_Temp ( guid , id_command_category , code , name , active ) SELECT a_guid , t_COMMAND_CATEGORY.id_command_category , COMMAND_CATEGORY.code , COMMAND_CATEGORY.name , COMMAND_CATEGORY.active FROM parts.DOG_Command_Category COMMAND_CATEGORY INNER JOIN tmp_Command_Calc_Command_Category t_COMMAND_CATEGORY ON COMMAND_CATEGORY.id_command_category = t_COMMAND_CATEGORY.id_command_category ; -- Commands INSERT INTO parts.DOG_Command_Temp ( guid , id_command , id_command_category , name , hand_signal_default_description , can_have_button , notes , active ) SELECT a_guid , t_COMMAND.id_command , t_COMMAND_CATEGORY.id_command_category , COMMAND.name , COMMAND.hand_signal_default_description , COMMAND.can_have_button , COMMAND.notes , COMMAND.active FROM parts.DOG_Command COMMAND INNER JOIN tmp_Command_Calc_Command t_COMMAND ON COMMAND.id_command = t_COMMAND.id_command INNER JOIN tmp_Command_Calc_Command_Category t_COMMAND_CATEGORY ON t_COMMAND.id_command_category = t_COMMAND_CATEGORY.id_command_category ; COMMIT; -- Errors SELECT t_ERROR.id_error , t_ERROR.id_type , t_ERROR.code , ERROR_TYPE.name , ERROR_TYPE.description , ERROR_TYPE.is_breaking_error , ERROR_TYPE.background_colour , ERROR_TYPE.text_colour , t_ERROR.msg FROM tmp_Msg_Error_Calc_Command t_ERROR INNER JOIN parts.CORE_Msg_Error_Type ERROR_TYPE ON t_ERROR.id_type = ERROR_TYPE.id_type ; IF a_debug = 1 AND v_can_view = 1 THEN SELECT * FROM tmp_Command_Calc_Command; END IF; DROP TEMPORARY TABLE IF EXISTS tmp_Split_Name_Calc_Command; DROP TEMPORARY TABLE IF EXISTS tmp_Split_Id_Calc_Command; DROP TEMPORARY TABLE IF EXISTS tmp_Msg_Error_Calc_Command; DROP TEMPORARY TABLE IF EXISTS tmp_Command_Calc_Command; IF a_debug = 1 THEN CALL parts.p_core_debug_timing_reporting ( v_time_start ); END IF; END // DELIMITER ; /* CALL parts.p_dog_calc_command ( 'slips ' -- a_guid , 1 -- 'auth0|6582b95c895d09a70ba10fef', -- a_id_user , 1 -- a_get_all_command_category , 0 -- a_get_inactive_command_category , '' -- a_ids_command_category , '' -- a_names_command_category , 1 -- a_get_all_command , 0 -- a_get_inactive_command , '' -- a_ids_command , '' -- a_names_command , 1 -- a_show_errors , 1 -- a_debug ); SELECT * FROM parts.DOG_Command_Temp ; CALL parts.p_dog_clear_calc_command ( 'slips ' -- a_guid , 1 -- debug ); */