使用两个游标时出错

Question

使用两个光标时出错

[Error] PLS-00103 (45: 48): PLS-00103: Encountered the symbol 
        "TX_COM_LOCATION" when expecting one of the following:

       := . ( @ % ;
    The symbol ":=" was substituted for 
    "TX_COM_LOCATION" to continue.

请帮忙

Answer 1

CREATE OR REPLACE PROCEDURE COM_LOCATION_TXM 
IS
BEGIN 
DECLARE CURSOR TXM_COM_LOCATION IS SELECT col1,col2,col3 from TBL_SAR_SALAS_1 A; 
CURSOR TX_COM_LOCATION is select col1,col2,col3 from TBL_LOCALES B; 
TMP_TXM TXM_COM_LOCATION%ROWTYPE; 
TMP_TXM TX_COM_COCATION%ROWTYPE;
Begin
IF NOT TXM_COM_LOCATION%ISOPEN 
THEN OPEN TXM_COM_LOCATION; 
END IF; 
FETCH TXM_COM_LOCATION INTO TMP_TXM;
EXIT
WHEN TXM_COM_LOCATION%NOTFOUND;

IF NOT TX_COM_LOCATION%ISOPEN 
THEN 
OPEN TXCOM_LOCATION;
END IF;
LOOP FETCH TX_COM_LOCATION INTO TMP_TX; EXIT WHEN TX_COM_LOCATION%NOTFOUND;
BEGIN Insert statement() 
END; 
END LOOP; 
END LOOP; 
commit; 
END; 
END COM_LOCATION_TXM ; 

Answer 2

检查一下：

创建或替换过程 COM_LOCATION_TXM 开始声明 CURSOR TXM_COM_LOCATION 是从 TBL_SAR_SALAS_1 A 中选择 col1、col2、col3； CURSOR TX_COM_LOCATION 是从 TBL_LOCALES B 中选择 col1、col2、col3； TMP_TXM TXM_COM_LOCATION%ROWTYPE； TMP_TXM TX_COM_LOCATION%ROWTYPE； BEGIN IF NOT TXM_COM_LOCATION%ISOPEN THEN OPEN TXM_COM_LOCATION;万一;循环获取 TXM_COM_LOCATION 到 TMP_TXM； TXM_COM_LOCATION%NOTFOUND 时退出；如果不是 TX_COM_LOCATION%ISOPEN，则打开 TXCOM_LOCATION；万一; LOOP FETCH TX_COM_LOCATION INTO TMP_TX； TX_COM_LOCATION%NOTFOUND 时退出；开始空； -- 用 INSERT 语句结束替换 NULL；结束循环；结束循环；犯罪;结尾; END COM_LOCATION_TXM；