oracle 游标简单案例

oracle? 游标简单案例

一.案例：

DECLARE
IDO NUMBER;
DABH VARCHAR2(50 CHAR);
t_count int(1);
CURSOR TJ_CURSOR IS SELECT IDO,DABH FROM ZLP_PERSONAL_INFO_115;
BEGIN
OPEN TJ_CURSOR;
LOOP
FETCH TJ_CURSOR INTO IDO,DABH;
SELECT  count(*) into t_count  FROM TJ_TJJL_115 t WHERE GRID=IDO;
IF t_count=0
THEN
  DBMS_OUTPUT.PUT_LINE(IDO);
UPDATE  ZLP_PERSONAL_INFO_115 SET HBSAG=3 where DABH=DABH;
ELSE
UPDATE ZLP_PERSONAL_INFO_115 SET HBSAG=(SELECT HBSAG FROM TJ_TJJL_115 WHERE GRID=IDO) WHERE DABH=DABH;
  END IF;
END LOOP;
CLOSE TJ_CURSOR;
END;

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!