(
  IN  p_pack VARCHAR(10),
  IN  p_component VARCHAR(8),
  IN  p_componentType VARCHAR(3)
)
DYNAMIC RESULT SETS 1
LANGUAGE SQL
BEGIN

                DECLARE v_pack VARCHAR(10);
                DECLARE v_component VARCHAR(8);
                DECLARE v_componentType VARCHAR(3);

	            BEGIN

					    DECLARE crs CURSOR WITH RETURN FOR	
						SELECT lib.sourceLib
						FROM ZMF_CM_Libraries lib
						     INNER JOIN ZMF_CM_Components comp ON comp.LibID = lib.id
						     INNER JOIN ZMF_CM_PackagesVsComponentsProperties prop ON prop.InternalIDComponent = comp.ID
						     INNER JOIN ZMF_CM_Packages pack ON pack.Id = prop.InternalIDPackage
						WHERE pack.package = v_pack
						      AND comp.ID IN
												(
												    SELECT comp.ID
												    FROM ZMF_CM_Components comp
												         INNER JOIN ZMF_CM_ComponentsTypes tp ON tp.ID = comp.typeid
												    WHERE comp.component = v_component
												          AND tp.componentType = v_componentType
												);
			
			

			            SET v_pack = p_pack;
			            SET v_component = p_component;
			            SET v_componentType = p_componentType;


                        OPEN crs;

                  END;
 END 
