Oracle学习（九）存过、游标、RECORD整合

原创

mb669f68a154662 2024-07-27 12:33:41 博主文章分类：Oracle ©著作权

©著作权归作者所有：来自51CTO博客作者mb669f68a154662的原创作品，请联系作者获取转载授权，否则将追究法律责任

一、代码

/*1.定义存过*/
CREATE OR REPLACE 
PROCEDURE PRO_RE_USER_ORD_GOODS(
--NOW_DATE格式：YYYYMMDD 如：20190801（此时统计的是2019年7月31日的数据）
NOW_DATE IN VARCHAR2
) 
IS

    /*2.定义变量 START*/
    --定义RECORD型记录类型；
    TYPE T_RECORD IS RECORD (
        GOODS_CODE VARCHAR2 (64),
        GOODS_NAME VARCHAR2 (64)
    ) ; 
    --定义返回结果集接收的变量，类型为T_RECORD；
　　PS：这里也可以不用record,直接指定V_ROWRESUT为%rowtype类型
    V_ROWRESUT T_RECORD ; 
    --定义主键
    PID VARCHAR2 (256) ;
    /*2.定义变量 end*/


        /*3.定义游标，执行查询结果集操作 START*/
        CURSOR CUR_RE_USER_ORD_GOODS
        IS
                --查询语句开始
                SELECT
                        A .GOODS_CODE,
                        B.GOODS_NAME
                FROM
                        (
                            SELECT
                                    ORD.GOODS_CODE
                            FROM
                                    ORDER_INFO ORD
                            GROUP BY
                                    ORD.GOODS_CODE
                        ) A
                LEFT JOIN GOODS_INFO B ON A .GOODS_CODE = B.GOODS_CODE ;
                --查询语句结束
        /*3.定义游标，执行查询结果集操作 END*/

        /*4.打开并循环游标，进行数据操作 START*/
        BEGIN
            OPEN CUR_RE_USER_ORD_GOODS;                          --打开游标；
            LOOP                                                 --开始执行循环，遍历查询结果集表；
                FETCH CUR_RE_USER_ORD_GOODS INTO V_ROWRESUT;       --循环游标并赋值给结构体变量；
                EXIT WHEN CUR_RE_USER_ORD_GOODS %NOTFOUND;         --如果游标遍历完成，就退出循环；

                --获取 UUID 并赋值给 PID 变量；
                SELECT SYS_GUID() INTO PID FROM DUAL;
             
                --插入“订购商品记录表” 开始
                INSERT INTO RE_USER_ORD_GOODS (
                    ID,
                    GOODS_CODE,
                    GOODS_NAME,
                    CREATE_TIME
                )VALUES(
                    PID,
                    V_ROWRESUT.GOODS_CODE,
                    V_ROWRESUT.GOODS_NAME,
                    SYSDATE
                );
                --插入“订购商品记录表” 结束

            END LOOP;                                           --结束循环；
            CLOSE CUR_RE_USER_ORD_GOODS;                        --关闭游标；
            COMMIT;                                             --提交 INSERT 操作；
        END;
        /*4.打开并循环游标，进行数据操作 END*/