PL/SQL -在声明游标时出现其他游标填充的表时出错

Question

在尝试创建一个使用调用其他两个游标后填充的表的游标时，Oracle引发了ORA-00942异常表或视图不存在。我试着初始化表，但是它没有改变任何东西.

其想法是从一个表中恢复买入价格( tsc.achvte='A)和卖出价格( tsc.achvte='V')，将结果存储在两个不同的表中，并在最后将它们连接起来。

有人有什么建议吗？也许是一种更简单、更有效的方法？

提前感谢！

DECLARE

CURSOR cursorA IS
    SELECT pro.codpro as CodeProduit,
            pro.nompro as NomProduit,
            tsc.prxtar as PrixAchat
    FROM pro
    INNER JOIN tsc ON pro.codpro=tsc.codpro
    WHERE tsc.achvte='A';
TYPE tableA IS TABLE OF cursorA%ROWTYPE;
tabA tableA:=tableA();

CURSOR cursorV IS
    SELECT pro.codpro as CodeProduit,
            pro.nompro as NomProduit,
            tsc.prxtar as PrixVente
    FROM pro
    INNER JOIN tsc ON pro.codpro=tsc.codpro
    WHERE tsc.achvte='V';
TYPE tableV IS TABLE OF cursorV%ROWTYPE;
tabV tableV:=tableV();

CURSOR cursorAV IS
    SELECT tabA.CodeProduit,
            tabA.NomProduit,
            tabA.PrixAchat,
            tabV.PrixVente
    FROM tabA
    INNER JOIN tabV ON tabA.CodeProduit=tabV.CodeProduit;
                   -- AND tabA.NomProduit=tabB.NomProduit;
TYPE tableAV IS TABLE OF cursorAV%ROWTYPE;
tableauDesPrix tableAV:=tableAV();

BEGIN
OPEN cursorA;
FETCH cursorA BULK COLLECT INTO tabA;
CLOSE cursorA;

OPEN cursorV;
FETCH cursorV BULK COLLECT INTO tabV;
CLOSE cursorV;

OPEN cursorAV;
FETCH cursorAV BULK COLLECT INTO tableauDesPrix;
CLOSE cursorAV;

END;

Answer 1

“有人有什么建议吗?也许是一种更简单、更有效的方法？”

为什么不写两次加入PRO到TSC的SELECT语句呢？

SELECT pro.codpro  as CodeProduit,
       pro.nompro  as NomProduit,
       tsca.prxtar as PrixAchat,
       tscv.prxtar as PrixVente
FROM       pro
INNER JOIN tsc tsca ON pro.codpro = tsca.codpro
INNER JOIN tsc tscv ON pro.codpro = tscv.codpro
WHERE tsca.achvte = 'A'
AND   tscv.achvte = 'V';

SQL被优化为联接。只要有可能，在普通的旧SQL中做任何事情都是更有效的。(在某些情况下，我们可以选择在PL/SQL中做一些事情，尽管我们可以在SQL中这样做，但在这里不行。)

Answer 2

不能将游标名称用作上一个游标(cursorAV)中的表名。

但是，我认为您可以使用以下单个查询来实现这一点：

SELECT PRO.CODPRO    AS CODEPRODUIT,
       PRO.NOMPRO,
       TSCA.PRXTAR   AS PRIXACHAT,
       TSCV.PRXTAR   AS PRIXVENTE
  FROM PRO
 INNER JOIN TSCA
ON PRO.CODPRO = TSCA.CODPRO
 INNER JOIN TSCV
ON PRO.CODPRO = TSCV.CODPRO
 WHERE TSCA.ACHVTE = 'A'
   AND TSCV.ACHVTE = 'V';