[英]ORA-00933: SQL command not properly ended in stored procedure
create or replace PROCEDURE SEC_YIELD_DOD_COMPARE_RPT(
-- IN parameters
reportingDate IN DATE,
P_PORTFOLIO_ID IN NUMERIC,
HOLDING_SECURITY_ID_PARAM IN VARCHAR2,
derYieldCalcEngineCd IN VARCHAR2,
-- OUT for INSTRUMENT
INSTRUMENT_CUR OUT SYS_REFCURSOR,
-- OUT for PORTFOLIO
PORTFOLIO_CUR OUT SYS_REFCURSOR )
AS
instrument_sids instrument_sids_table := instrument_sids_table();
portfolio_sids portfolio_sids_table := portfolio_sids_table();
queryPortfolio VARCHAR2(1500);
queryInstrument VARCHAR2(1500);
queryComplement VARCHAR2(1500);
BEGIN
queryPortfolio:=' SELECT PORTFOLIO_SIDS_RECORD( c1, c2, c3 )
FROM
(SELECT PHS.PORTFOLIO_SID AS c1,
NULL AS c2,
PHS.TRADABLE_ENTITY_SID AS c3
FROM PORTFOLIO_HOLDING_SNAPSHOT PHS
INNER JOIN PORTFOLIO P
ON P.PORTFOLIO_SID = PHS.PORTFOLIO_SID
INNER JOIN TRADABLE_ENTITY TE
ON PHS.TRADABLE_ENTITY_SID = TE.TRADABLE_ENTITY_SID
INNER JOIN INSTRUMENT I
ON TE.INSTRUMENT_SID = I.INSTRUMENT_SID
INNER JOIN TRADABLE_ENTITY_SNAPSHOT TES
ON TE.TRADABLE_ENTITY_SID = TES.TRADABLE_ENTITY_SID
WHERE PHS.REPORTING_DT=:1
AND TES.REPORTING_DT=:2
AND P.CALCULATE_SEC_YIELD_IND = ''Y'')';
queryInstrument:='SELECT INSTRUMENT_SIDS_RECORD(INSTRUMENT_SID, TRADABLE_ENTITY_SID)
FROM
( SELECT DISTINCT TE.INSTRUMENT_SID,
TE.TRADABLE_ENTITY_SID
FROM TRADABLE_ENTITY TE
INNER JOIN PORTFOLIO_HOLDING_SNAPSHOT PHS
ON PHS.TRADABLE_ENTITY_SID = TE.TRADABLE_ENTITY_SID
INNER JOIN PORTFOLIO P
ON PHS.PORTFOLIO_SID = P.PORTFOLIO_SID
INNER JOIN INSTRUMENT I
ON TE.INSTRUMENT_SID = I.INSTRUMENT_SID
INNER JOIN TRADABLE_ENTITY_SNAPSHOT TES
ON TE.TRADABLE_ENTITY_SID = TES.TRADABLE_ENTITY_SID
WHERE P.CALCULATE_SEC_YIELD_IND = ''Y''
AND PHS.REPORTING_DT = :1
AND TES.REPORTING_DT = :2)';
-- Populate instrument IDs --
IF P_PORTFOLIO_ID IS NOT NULL THEN
IF HOLDING_SECURITY_ID_PARAM IS NOT NULL THEN
IF derYieldCalcEngineCd IS NOT NULL THEN
-- P_PORTFOLIO_ID AND HOLDING_SECURITY_ID_PARAM AND derYieldCalcEngineCd
queryComplement:=' AND P.PORTFOLIO_ID=:3 AND PHS.HOLDING_SECURITY_ID =:4 AND TES.DER_YIELD_CALC_ENGINE_CD = :5';
queryPortfolio := queryPortfolio || queryComplement;
queryInstrument := queryInstrument || queryComplement;
EXECUTE IMMEDIATE queryPortfolio BULK COLLECT INTO PORTFOLIO_SIDS USING reportingDate,reportingDate,P_PORTFOLIO_ID, HOLDING_SECURITY_ID_PARAM, derYieldCalcEngineCd;
EXECUTE IMMEDIATE queryInstrument BULK COLLECT INTO INSTRUMENT_SIDS USING reportingDate,reportingDate,P_PORTFOLIO_ID, HOLDING_SECURITY_ID_PARAM, derYieldCalcEngineCd;
ELSE
-- P_PORTFOLIO_ID AND HOLDING_SECURITY_ID_PARAM
queryComplement:=' AND P.PORTFOLIO_ID=:3 AND PHS.HOLDING_SECURITY_ID =:4';
queryPortfolio := queryPortfolio || queryComplement;
queryInstrument := queryInstrument || queryComplement;
EXECUTE IMMEDIATE queryPortfolio BULK COLLECT INTO PORTFOLIO_SIDS USING reportingDate,reportingDate,P_PORTFOLIO_ID, HOLDING_SECURITY_ID_PARAM;
EXECUTE IMMEDIATE queryInstrument BULK COLLECT INTO INSTRUMENT_SIDS USING reportingDate,reportingDate,P_PORTFOLIO_ID, HOLDING_SECURITY_ID_PARAM;
END IF;
ELSE
IF derYieldCalcEngineCd IS NOT NULL THEN
-- P_PORTFOLIO_ID AND derYieldCalcEngineCd
queryComplement:=' AND P.PORTFOLIO_ID=:3 AND TES.DER_YIELD_CALC_ENGINE_CD = :4';
queryPortfolio := queryPortfolio || queryComplement;
queryInstrument := queryInstrument || queryComplement;
EXECUTE IMMEDIATE queryPortfolio BULK COLLECT INTO PORTFOLIO_SIDS USING reportingDate,reportingDate,P_PORTFOLIO_ID, derYieldCalcEngineCd;
EXECUTE IMMEDIATE queryInstrument BULK COLLECT INTO INSTRUMENT_SIDS USING reportingDate,reportingDate,P_PORTFOLIO_ID, derYieldCalcEngineCd;
ELSE
-- reportingDate, P_PORTFOLIO_ID
queryComplement:=' AND P.PORTFOLIO_ID=:3';
queryPortfolio := queryPortfolio || queryComplement;
queryInstrument := queryInstrument || queryComplement;
EXECUTE IMMEDIATE queryPortfolio BULK COLLECT INTO PORTFOLIO_SIDS USING reportingDate,reportingDate,P_PORTFOLIO_ID;
EXECUTE IMMEDIATE queryInstrument BULK COLLECT INTO INSTRUMENT_SIDS USING reportingDate,reportingDate,P_PORTFOLIO_ID;
END IF;
END IF;
ELSE
--FUND NUMBER IS NULL
IF HOLDING_SECURITY_ID_PARAM IS NOT NULL THEN
IF derYieldCalcEngineCd IS NOT NULL THEN
--HOLDING_SECURITY_ID_PARAM and derYieldCalcEngineCd , NO FUND NUMBER
queryComplement:=' AND PHS.HOLDING_SECURITY_ID =:3 AND TES.DER_YIELD_CALC_ENGINE_CD = :4';
queryPortfolio := queryPortfolio || queryComplement;
queryInstrument := queryInstrument || queryComplement;
EXECUTE IMMEDIATE queryPortfolio BULK COLLECT INTO PORTFOLIO_SIDS USING reportingDate,reportingDate, HOLDING_SECURITY_ID_PARAM, derYieldCalcEngineCd;
EXECUTE IMMEDIATE queryInstrument BULK COLLECT INTO INSTRUMENT_SIDS USING reportingDate,reportingDate, HOLDING_SECURITY_ID_PARAM, derYieldCalcEngineCd;
ELSE
--ONLY HOLDING_SECURITY_ID_PARAM
queryComplement:=' AND PHS.HOLDING_SECURITY_ID =:3 ';
queryPortfolio := queryPortfolio || queryComplement;
queryInstrument := queryInstrument || queryComplement;
EXECUTE IMMEDIATE queryPortfolio BULK COLLECT INTO PORTFOLIO_SIDS USING reportingDate,reportingDate, HOLDING_SECURITY_ID_PARAM;
EXECUTE IMMEDIATE queryInstrument BULK COLLECT INTO INSTRUMENT_SIDS USING reportingDate,reportingDate, HOLDING_SECURITY_ID_PARAM;
END IF;
ELSE
--ONLY derYieldCalcEngineCd
IF derYieldCalcEngineCd IS NOT NULL THEN
queryComplement:=' AND TES.DER_YIELD_CALC_ENGINE_CD = :3';
queryPortfolio := queryPortfolio || queryComplement;
queryInstrument := queryInstrument || queryComplement;
EXECUTE IMMEDIATE queryPortfolio BULK COLLECT INTO PORTFOLIO_SIDS USING reportingDate,reportingDate, derYieldCalcEngineCd;
EXECUTE IMMEDIATE queryInstrument BULK COLLECT INTO INSTRUMENT_SIDS USING reportingDate,reportingDate, derYieldCalcEngineCd;
ELSE
-- ONLY reportingDate
EXECUTE IMMEDIATE queryPortfolio BULK COLLECT INTO PORTFOLIO_SIDS USING reportingDate,reportingDate;
EXECUTE IMMEDIATE queryInstrument BULK COLLECT INTO INSTRUMENT_SIDS USING reportingDate,reportingDate;
END IF;
END IF;
END IF;
当我执行此存储过程时,向我显示ORA-00933:SQL命令未正确结束ORA-06512:在“ FAYAODSDEV01.SEC_YIELD_DOD_COMPARE_RPT”的第112行ORA-06512:在第14行。
没有任何一行缺少分号或其他任何语法内容。 我怀疑问题出在字符串queryPortfolio或queryInstrument中。
但是,我无法弄清楚确切的问题在哪里。
由于某种原因,它提到的是行号14。
有什么想法吗? 提前致谢。
create or replace PROCEDURE SEC_YIELD_DOD_COMPARE_RPT(
-- IN parameters
reportingDate IN DATE,
P_PORTFOLIO_ID IN NUMERIC,
HOLDING_SECURITY_ID_PARAM IN VARCHAR2,
derYieldCalcEngineCd IN VARCHAR2,
-- OUT for INSTRUMENT
INSTRUMENT_CUR OUT SYS_REFCURSOR,
-- OUT for PORTFOLIO
PORTFOLIO_CUR OUT SYS_REFCURSOR )
AS
instrument_sids instrument_sids_table := instrument_sids_table();
portfolio_sids portfolio_sids_table := portfolio_sids_table();
queryPortfolio VARCHAR2(1500);
queryInstrument VARCHAR2(1500);
queryComplement VARCHAR2(1500);
BEGIN
queryPortfolio:='SELECT PORTFOLIO_SIDS_RECORD( c1, c2, c3 )
FROM
(SELECT PHS.PORTFOLIO_SID AS c1,
NULL AS c2,
PHS.TRADABLE_ENTITY_SID AS c3
FROM PORTFOLIO_HOLDING_SNAPSHOT PHS
INNER JOIN PORTFOLIO P
ON P.PORTFOLIO_SID = PHS.PORTFOLIO_SID
INNER JOIN TRADABLE_ENTITY TE
ON PHS.TRADABLE_ENTITY_SID = TE.TRADABLE_ENTITY_SID
INNER JOIN INSTRUMENT I
ON TE.INSTRUMENT_SID = I.INSTRUMENT_SID
INNER JOIN TRADABLE_ENTITY_SNAPSHOT TES
ON TE.TRADABLE_ENTITY_SID = TES.TRADABLE_ENTITY_SID
WHERE PHS.REPORTING_DT=:1
AND TES.REPORTING_DT=:2
AND P.CALCULATE_SEC_YIELD_IND = ''Y'')';
queryInstrument:='SELECT INSTRUMENT_SIDS_RECORD(INSTRUMENT_SID, TRADABLE_ENTITY_SID)
FROM
( SELECT DISTINCT TE.INSTRUMENT_SID,
TE.TRADABLE_ENTITY_SID
FROM TRADABLE_ENTITY TE
INNER JOIN PORTFOLIO_HOLDING_SNAPSHOT PHS
ON PHS.TRADABLE_ENTITY_SID = TE.TRADABLE_ENTITY_SID
INNER JOIN PORTFOLIO P
ON PHS.PORTFOLIO_SID = P.PORTFOLIO_SID
INNER JOIN INSTRUMENT I
ON TE.INSTRUMENT_SID = I.INSTRUMENT_SID
INNER JOIN TRADABLE_ENTITY_SNAPSHOT TES
ON TE.TRADABLE_ENTITY_SID = TES.TRADABLE_ENTITY_SID
WHERE P.CALCULATE_SEC_YIELD_IND = ''Y''
AND PHS.REPORTING_DT = :1
AND TES.REPORTING_DT = :2)';
-- Populate instrument IDs --
IF P_PORTFOLIO_ID IS NOT NULL THEN
IF HOLDING_SECURITY_ID_PARAM IS NOT NULL THEN
IF derYieldCalcEngineCd IS NOT NULL THEN
-- P_PORTFOLIO_ID AND HOLDING_SECURITY_ID_PARAM AND derYieldCalcEngineCd
queryComplement:=' AND P.PORTFOLIO_ID=:3 AND PHS.HOLDING_SECURITY_ID =:4 AND TES.DER_YIELD_CALC_ENGINE_CD = :5';
queryPortfolio := queryPortfolio || queryComplement;
queryInstrument := queryInstrument || queryComplement;
EXECUTE IMMEDIATE queryPortfolio BULK COLLECT INTO PORTFOLIO_SIDS USING reportingDate,reportingDate,P_PORTFOLIO_ID, HOLDING_SECURITY_ID_PARAM, derYieldCalcEngineCd;
EXECUTE IMMEDIATE queryInstrument BULK COLLECT INTO INSTRUMENT_SIDS USING reportingDate,reportingDate,P_PORTFOLIO_ID, HOLDING_SECURITY_ID_PARAM, derYieldCalcEngineCd;
ELSE
-- P_PORTFOLIO_ID AND HOLDING_SECURITY_ID_PARAM
queryComplement:=' AND P.PORTFOLIO_ID=:3 AND PHS.HOLDING_SECURITY_ID =:4';
queryPortfolio := queryPortfolio || queryComplement;
queryInstrument := queryInstrument || queryComplement;
EXECUTE IMMEDIATE queryPortfolio BULK COLLECT INTO PORTFOLIO_SIDS USING reportingDate,reportingDate,P_PORTFOLIO_ID, HOLDING_SECURITY_ID_PARAM;
EXECUTE IMMEDIATE queryInstrument BULK COLLECT INTO INSTRUMENT_SIDS USING reportingDate,reportingDate,P_PORTFOLIO_ID, HOLDING_SECURITY_ID_PARAM;
END IF;
ELSE
IF derYieldCalcEngineCd IS NOT NULL THEN
-- P_PORTFOLIO_ID AND derYieldCalcEngineCd
queryComplement:=' AND P.PORTFOLIO_ID=:3 AND TES.DER_YIELD_CALC_ENGINE_CD = :4';
queryPortfolio := queryPortfolio || queryComplement;
queryInstrument := queryInstrument || queryComplement;
EXECUTE IMMEDIATE queryPortfolio BULK COLLECT INTO PORTFOLIO_SIDS USING reportingDate,reportingDate,P_PORTFOLIO_ID, derYieldCalcEngineCd;
EXECUTE IMMEDIATE queryInstrument BULK COLLECT INTO INSTRUMENT_SIDS USING reportingDate,reportingDate,P_PORTFOLIO_ID, derYieldCalcEngineCd;
ELSE
-- reportingDate, P_PORTFOLIO_ID
queryComplement:=' AND P.PORTFOLIO_ID=:3';
queryPortfolio := queryPortfolio || queryComplement;
queryInstrument := queryInstrument || queryComplement;
EXECUTE IMMEDIATE queryPortfolio BULK COLLECT INTO PORTFOLIO_SIDS USING reportingDate,reportingDate,P_PORTFOLIO_ID;
EXECUTE IMMEDIATE queryInstrument BULK COLLECT INTO INSTRUMENT_SIDS USING reportingDate,reportingDate,P_PORTFOLIO_ID;
END IF;
END IF;
ELSE
--FUND NUMBER IS NULL
IF HOLDING_SECURITY_ID_PARAM IS NOT NULL THEN
IF derYieldCalcEngineCd IS NOT NULL THEN
--HOLDING_SECURITY_ID_PARAM and derYieldCalcEngineCd , NO FUND NUMBER
queryComplement:=' AND PHS.HOLDING_SECURITY_ID =:3 AND TES.DER_YIELD_CALC_ENGINE_CD = :4';
queryPortfolio := queryPortfolio || queryComplement;
queryInstrument := queryInstrument || queryComplement;
EXECUTE IMMEDIATE queryPortfolio BULK COLLECT INTO PORTFOLIO_SIDS USING reportingDate,reportingDate, HOLDING_SECURITY_ID_PARAM, derYieldCalcEngineCd;
EXECUTE IMMEDIATE queryInstrument BULK COLLECT INTO INSTRUMENT_SIDS USING reportingDate,reportingDate, HOLDING_SECURITY_ID_PARAM, derYieldCalcEngineCd;
ELSE
--ONLY HOLDING_SECURITY_ID_PARAM
queryComplement:=' AND PHS.HOLDING_SECURITY_ID =:3 ';
queryPortfolio := queryPortfolio || queryComplement;
queryInstrument := queryInstrument || queryComplement;
EXECUTE IMMEDIATE queryPortfolio BULK COLLECT INTO PORTFOLIO_SIDS USING reportingDate,reportingDate, HOLDING_SECURITY_ID_PARAM;
EXECUTE IMMEDIATE queryInstrument BULK COLLECT INTO INSTRUMENT_SIDS USING reportingDate,reportingDate, HOLDING_SECURITY_ID_PARAM;
END IF;
ELSE
--ONLY derYieldCalcEngineCd
IF derYieldCalcEngineCd IS NOT NULL THEN
queryComplement:=' AND TES.DER_YIELD_CALC_ENGINE_CD = :3';
queryPortfolio := queryPortfolio || queryComplement;
queryInstrument := queryInstrument || queryComplement;
EXECUTE IMMEDIATE queryPortfolio BULK COLLECT INTO PORTFOLIO_SIDS USING reportingDate,reportingDate, derYieldCalcEngineCd;
EXECUTE IMMEDIATE queryInstrument BULK COLLECT INTO INSTRUMENT_SIDS USING reportingDate,reportingDate, derYieldCalcEngineCd;
ELSE
-- ONLY reportingDate
EXECUTE IMMEDIATE queryPortfolio BULK COLLECT INTO PORTFOLIO_SIDS USING reportingDate,reportingDate;
EXECUTE IMMEDIATE queryInstrument BULK COLLECT INTO INSTRUMENT_SIDS USING reportingDate,reportingDate;
END IF;
END IF;
END IF;
结束;
尝试上面的代码。
您忘记添加END;
在程序结束时。
我已经补充了。
它一定会为您提供帮助。
对于我们来说,远程调试您动态生成的SQL是不可能的。 这是您必须自己解决的问题。
动态SQL很难编码和调试。 主要问题是它将编译错误转换为运行时错误。 但是,由于该语句是动态的,因此在找到该错误之前,没有深入研究的源头。
但是,您可以通过检测代码来简化操作。 放入一些trace语句,最好仅记录到表或文件中,但如果有,则使用dbms_output.put_line()
。 记录下一个分支。 记录生成的SQL语句。 甚至记录正在运行的参数。
拥有足够的信息来理解问题至少是解决方案的百分之五十。
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.