同時使用兩個光標

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_LOCATION％ROWTYPE; BEGIN IF NOT TXM_COM_LOCATION％ISOPEN THEN OPEN TXM_COM_LOCATION;萬一; LOOP FETCH TXM_COM_LOCATION INTO TMP_TXM;退出時TXM_COM_LOCATION％NOTFOUND;如果不是TX_COM_LOCATION％ISOPEN，那麼打開TXCOM_LOCATION;萬一; LOOP FETCH TX_COM_LOCATION INTO TMP_TX;退出時TX_COM_LOCATION％NOTFOUND; BEGIN NULL; - 用INSERT語句替換NULL END; END LOOP; END LOOP;承諾;結束; END COM_LOCATION_TXM;

Answer 2

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 ;