Oracle中使用游标循环从一张表中复制到另外一张表中，使用条件过滤掉无关数据

声明变量：

DECLARE
		id 						T_COMPANY.id%TYPE;
    name 					T_COMPANY.name%TYPE;
    COMP_CODE 		T_COMPANY.COMP_CODE%TYPE;
		TYPEID 				T_OUTSIDE_PROD_TYPE.ID%TYPE;
		TYPECODE 			T_OUTSIDE_PROD_TYPE.CODE%TYPE;
		V_Count 			NUMBER;

声明游标：

CURSOR source_cursor IS SELECT  id, name, COMP_CODE FROM T_COMPANY
     WHERE (COMP_CODE like'C%' or  COMP_CODE like'S%') 
    AND STATUS='1' AND COMP_CODE !='C017000004';

开启游标循环：

BEGIN
    OPEN source_cursor; 	--打开游标
    LOOP
        FETCH source_cursor INTO id, name, COMP_CODE;   --给变量赋值
        EXIT WHEN source_cursor%NOTFOUND;
				
				select count(1)  into V_Count from T_OUTSIDE_PROD_TYPE WHERE DEALER_CODE = COMP_CODE AND NAME = '日劳办';
				
				IF	V_Count>0 then 
				
					SELECT ID,CODE INTO TYPEID,TYPECODE FROM T_OUTSIDE_PROD_TYPE WHERE DEALER_CODE = COMP_CODE AND NAME = '日劳办'; --根据条件查询并赋值
					IF TYPEID is not null  THEN					--判断数据是否为空

						-- 具体的插入逻辑
						INSERT INTO T_OUTSIDE_PROD_TYPE_PRODUCT (ID, DEALER_CODE, OUTSIDE_PROD_TYPE_CODE, PROD_CODE, CREATED_DATE, CREATOR_ID, CREATOR_NAME, MODI_DATE, MODIFIER_ID, MODIFIER_NAME, DATA_SOURCE, PROD_ID, OUT_SIDE_PROD_CODE, OUT_SIDE_PROD_NAME, OUTSIDE_PROD_TYPE_ID)
						SELECT SEQ_OUTSIDE_PROD_TYPE_PRODUCT_ID.nextval, COMP_CODE, TYPECODE, PROD_CODE, sysdate, CREATOR_ID, CREATOR_NAME, MODI_DATE, MODIFIER_ID, MODIFIER_NAME, DATA_SOURCE, 
						PROD_ID, OUT_SIDE_PROD_CODE, OUT_SIDE_PROD_NAME, TYPEID
						FROM T_OUTSIDE_PROD_TYPE_PRODUCT WHERE 
						DEALER_CODE = 'Z017001001' AND OUTSIDE_PROD_TYPE_CODE = '240627-0323'; --日劳办

					else 
							DBMS_OUTPUT.PUT_LINE('TYPEID is null : '|| COMP_CODE);
					end if;
					
				else 
				 DBMS_OUTPUT.PUT_LINE(' 无分类数据的公司编码: '|| COMP_CODE);
				end if;
				
				
    END LOOP;
    CLOSE source_cursor;
    COMMIT;
END;