转 载 ： 最 近 公 司 一 个 项 目 需 要 将 数 据 库 进 行 一 次 迁 移 ， 从 oracle 到 mysql,网 上 资 料 甚 少 ， 现 将我 本 次 迁 移 过 程 中 所 遇 到 的 一 些 问 题 总 结 于 此 (主 要 是 存 储 过 程 的 迁 移 )， 希 望 能 给 自 己 做一 个 日 后 的 参 考 ， 如 果 有 幸 能 帮 助 到 大 家 更 好 。 -- mysql 中 没 有 包 的 概 念 ， 因 此 迁 移 的 时 候 将 存 储 过 程 命 名 为 '包 名 。存 储 过 程 名 '的格 式 mysql 存 储 过 程 格 式 ： DELIMITER $$ -- 分 隔 符 -- CREATE PROCEDURE([[IN |OUT ] 参 数 名 数 据 类 型 …]) ,IN 和 OUT 写 在 最 前面 ， 其 中 IN 可 以 省 略 CREATE PROCEDURE `pkg_ypgl.prc_ypsc`( prm_ypbm VARCHAR (20)， OUT prm_AppCode VARCHAR (20)， -- 程 序 执 行 代 码 OUT prm_ErrorMsg VARCHAR (100) -- 程 序 执 行 错 误 信 息 ) BEGIN /*变 量 定 义 */ DECLARE n_count DECIMAL (8) ; DECLARE done INT(10); /*设 置 游 标 结 束 标 志 */ DECLARE CONTINUE HANDLER FOR NOT FOUND SET done=1; -- 如 果 NOT FOUND,取 不 到 值 ， 则 将 done 赋 值 1,并 且 程 序 继 续 执 行 SET done=0; /*定 义 一个 区 块 lavel_error,逻 辑 错 误 处 理 */ label_error : BEGIN /*定 义 游 标 */ DECLARE cur_bdjl CURSOR FOR SELECT …… /*打 开 游 标 */ OPEN cur_bdjl ; REPEAT FETCH cur_bdjl INTO v_aaz001… IF NOT done THEN -- 如 果 结 束 标 志 done 为 0 则继续循环 …… END IF; /*结 束 循环，关闭游标 */ UNTIL done -- 直到 NOT FOUND END REPEAT ; CLOSE cur_bdjl ; SET prm_AppCode = 'noerror' ; -- 将 prm_AppCode 设为正确 SET prm_ErrorMsg = '' ; END; END$$ DELIMITER ; 数据类型： Oracle:varchar2 Mysql:varchar(20) (参数自设) Oracle:number() Mysql:decimal() Oracle:date Mysql:datetime 定 义变 量 ： Mysql 需 要 在 每 句 前 面 加 DECLARE 给 变 量 赋 值...
