Hi when i did as u said. i am getting following error.
Error number -9:
DMS-E-GENERAL, A general exception has occurred during operation 'execute'.
ORA-06550: line 1, column 7:
PLS-00201: identifier 'Pk_TEST.PR_GET_DTS_PORTFOLIO' must be declared
ORA-06550: line 1, column 7:
PL/SQL: Statement ignored
here is my package.
CREATE OR REPLACE PACKAGE Pk_TEST AS
TYPE ref_pf1 is record(
c1 cre_portfolio_dim.CRE_PORTFOLIO_KEY%type,
c2 deal_dim.DEAL_KEY%type,
c3 investment_dim.INVESTMENT_KEY%type,
c4 property_dim.PROPERTY_KEY%type,
c5 time_dim.time_key%type);
TYPE ref_pf IS REF CURSOR return ref_pf1;
PROCEDURE pr_get_DTS_PORTFOLIO ( p_in_portfolio_id IN Number,
p_in_time_key IN Number,
p_out_err OUT VARCHAR2,
p_out_pf OUT ref_pf
);
END Pk_TEST;
/
CREATE OR REPLACE PACKAGE BODY Pk_TEST AS
--===============================================================================================================================
-- PROCEDURE: PR_GET_START_END_DATE
-- PURPOSE : THIS PROCEDURE RETURNS START AND END DATE OF THE PERIOD IN WHICH THE SUPPLIED P_IN_DT DATE FALLS. IF P_IN_DT IS NOT
-- WEEKEND DATE, P_OUT_DT RETURNS IMMEDIATE PRIOR WEEKEND DATE. START AND END DATE WILL BE BASED ON P_OUT_DT.
--===============================================================================================================================
PROCEDURE pr_get_DTS_PORTFOLIO(p_in_portfolio_id IN Number,
p_in_time_key IN Number,
p_out_err OUT VARCHAR2,
p_out_pf OUT ref_pf)
IS
BEGIN
OPEN p_out_pf FOR
SELECT CRE_PORTFOLIO_KEY,
DIF.DEAL_KEY,
PIF.INVESTMENT_KEY,
DPF.PROPERTY_KEY,
DIF.TIME_KEY
FROM PORTFOLIO_INVESTMENT_FACT PIF,
DEAL_INVESTMENT_FACT DIF,
PR_DEAL_PROP_FACT DPF,
INVESTMENT_PROPERTY_FACT IPF
WHERE PIF.CRE_PORTFOLIO_KEY = p_in_portfolio_id
AND PIF.TIME_KEY = p_in_time_key
AND PIF.INVESTMENT_KEY = DIF.INVESTMENT_KEY
AND DIF.DEAL_KEY = DPF.DEAL_KEY
AND DPF.PROPERTY_KEY = IPF.PROPERTY_KEY
AND DIF.TIME_KEY = PIF.TIME_KEY
AND DPF.TIME_KEY = PIF.TIME_KEY
AND IPF.TIME_KEY = PIF.TIME_KEY ;
p_out_err := NULL;
EXCEPTION
WHEN NO_DATA_FOUND THEN
p_out_err := 'GEN_NDF' ;
RETURN;
WHEN OTHERS THEN
p_out_err := 'DB ERROR OTHERS' ;
RETURN;
END pr_get_DTS_PORTFOLIO;
END Pk_TEST;
/
and here is what i have written in impromptu
call Pk_TEST.PR_GET_DTS_PORTFOLIO (?p_in_portfolio_id? , ?p_in_time_key? )
please tell me where i am doing wrong...
Thanks