1 PACKAGE OKL_PROCESS_STREAMS_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLRPSRS.pls 120.5 2005/11/23 11:21:52 kthiruva noship $ */
3 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKL_CONTRACTS_UNEXPECTED_ERROR';
4 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'OKL_SQLERRM';
5 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'OKL_SQLCODE';
6 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_PROCESS_STREAMS_PVT' ;
7 G_APP_NAME CONSTANT VARCHAR2(3) := Okl_Api.G_APP_NAME;
8 G_FALSE CONSTANT VARCHAR2(1) := OKL_API.G_FALSE;
9 G_EXC_NAME_ERROR CONSTANT VARCHAR2(50) := 'OKL_API.G_RET_STS_ERROR';
10 G_EXC_NAME_UNEXP_ERROR CONSTANT VARCHAR2(50) := 'OKL_API.G_RET_STS_UNEXP_ERROR';
11 G_EXC_NAME_OTHERS CONSTANT VARCHAR2(6) := 'OTHERS';
12 G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
13 G_RET_STS_ERROR CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_ERROR;
14 G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_UNEXP_ERROR;
15 G_EXCEPTION_HALT_PROCESSING EXCEPTION;
16 G_EXCEPTION_ERROR EXCEPTION;
17 G_EXCEPTION_UNEXPECTED_ERROR EXCEPTION;
18 G_EXCEPTION_EXCEPTION_DATA EXCEPTION;
19 -- The value for this constant is from FND LOOKUPs where Lookup Type = OKL_STREAM_GENERATOR
20 G_STREAM_GENERATOR CONSTANT VARCHAR2(4) := 'STMP';
21 G_STREAM_GENERATOR_MANL CONSTANT VARCHAR2(4) := 'MANL';
22 -- by default the Activity of a stream is 'Working';
23 G_STREAM_ACTIVITY_WORK CONSTANT VARCHAR2(4) := 'WORK';
24 G_STREAM_ACTIVITY_HIST CONSTANT VARCHAR2(4) := 'HIST';
25 -- by deafult a stream is inactive
26 G_STREAM_ACTIVE_YN CONSTANT VARCHAR2(3) := 'N';
27 -- message name defined in FND MESSAGES for NO STREAM DATA FOUND
28 G_NO_STREAM_DATA_MSG_NAME CONSTANT VARCHAR2(40) := 'OKL_STREAMS_INTERFACE_NO_DATA';
29 G_EXCEPTION_DATA_MSG_NAME CONSTANT VARCHAR2(40) := 'OKL_STRMS_INTR_EXCEPTION_DATA';
30 -- New line chanracter
31 G_NEW_LINE CONSTANT VARCHAR2(40) := FND_GLOBAL.NEWLINE;
32 --smahapat 11/10/02 multi-gaap - addition
33 G_PURPOSE_CODE_REPORT VARCHAR2(10) := 'REPORT';
34 SUBTYPE selv_tbl_type IS Okl_Streams_Pub.selv_tbl_type;
35 SUBTYPE stmv_rec_type IS Okl_Streams_Pub.stmv_rec_type;
36 SUBTYPE stmv_tbl_type IS Okl_Streams_Pub.stmv_tbl_type;
37 SUBTYPE sirv_rec_type IS okl_sir_pvt.sirv_rec_type;
38 SUBTYPE LOG_MSG_TBL_TYPE IS OKL_STREAMS_UTIL.LOG_MSG_TBL;
39 SUBTYPE srlv_tbl_type IS okl_srl_pvt.okl_sif_ret_levels_v_tbl_type;
40 --SUBTYPE siyv_tbl_type IS okl_srl_pvt.siyv_tbl_type;
41 SUBTYPE trqv_rec_type IS okl_trq_pvt.trqv_rec_type;
42 SUBTYPE pdtv_rec_type IS okl_setupproducts_pvt.pdtv_rec_type;
43 SUBTYPE pdt_param_rec_type IS okl_setupproducts_pvt.pdt_parameters_rec_type;
44 -- for Principal Paydown
45 SUBTYPE payment_rec_type IS okl_cs_principal_paydown_pvt.payment_rec_type;
46 SUBTYPE payment_tbl_type IS okl_cs_principal_paydown_pvt.payment_tbl_type;
47
48 TYPE yields_rec_type IS RECORD (
49 yield_name OKL_SIF_YIELDS.YIELD_NAME%TYPE ,-- := OKC_API.G_MISS_CHAR,
50 -- effective_pre_tax_yield OKL_SIF_RETS_V.EFFECTIVE_PRE_TAX_YIELD%TYPE := OKC_API.G_MISS_NUM,
51 -- effective_after_tax_yield OKL_SIF_RETS_V.EFFECTIVE_AFTER_TAX_YIELD%TYPE := OKC_API.G_MISS_NUM,
52 -- nominal_pre_tax_yield OKL_SIF_RETS_V.NOMINAL_PRE_TAX_YIELD%TYPE := OKC_API.G_MISS_NUM,
53 -- nominal_after_tax_yield OKL_SIF_RETS_V.NOMINAL_AFTER_TAX_YIELD%TYPE := OKC_API.G_MISS_NUM,
54 value OKL_SIF_RETS_V.EFFECTIVE_PRE_TAX_YIELD%TYPE := OKC_API.G_MISS_NUM,
55 implicit_interest_rate OKL_SIF_RETS_V.IMPLICIT_INTEREST_RATE%TYPE := OKC_API.G_MISS_NUM,
56 method OKL_SIF_YIELDS_V.METHOD%TYPE := OKC_API.G_MISS_CHAR,
57 array_type OKL_SIF_YIELDS_V.ARRAY_TYPE%TYPE := OKC_API.G_MISS_CHAR,
58 roe_type OKL_SIF_YIELDS_V.ROE_TYPE%TYPE := OKC_API.G_MISS_CHAR,
59 roe_base OKL_SIF_YIELDS_V.ROE_BASE%TYPE := OKC_API.G_MISS_CHAR,
60 compounded_method OKL_SIF_YIELDS_V.COMPOUNDED_METHOD%TYPE := OKC_API.G_MISS_CHAR,
61 target_value NUMBER := OKC_API.G_MISS_NUM,
62 index_number NUMBER := OKC_API.G_MISS_NUM,
63 nominal_yn OKL_SIF_YIELDS_V.NOMINAL_YN%TYPE := OKC_API.G_MISS_CHAR,
64 pre_tax_yn OKL_SIF_YIELDS_V.PRE_TAX_YN%TYPE := OKC_API.G_MISS_CHAR);
65 TYPE yields_tbl_type IS TABLE OF yields_rec_type INDEX BY BINARY_INTEGER;
66 -- 04/29/2002 , MVASUDEV
67 G_MSG_TYPE CONSTANT VARCHAR2(3) := 'XML';
68 G_MSG_STD CONSTANT VARCHAR2(3) := 'W3C';
69 G_PROTOCOL_TYPE CONSTANT VARCHAR2(4) := 'http';
70 G_PROTOCOL_ADDRESS CONSTANT VARCHAR2(100) := 'http://www.oracle.com';
71 G_INBOUND_QUEUE CONSTANT VARCHAR2(11) := 'ECX_INBOUND';
72 G_TRANSACTION_QUEUE CONSTANT VARCHAR2(15) := 'ECX_TRANSACTION';
73 -- INFO:
74 -- This Procedure gets the STREAMS from RETURN INTERFACE TABLES and insert into OKL STREAMS TABLE
75 -- Updates Yields at Contract Header and Updates Transaction Status in Interface Tables
76 -- END INFO
77 PROCEDURE PROCESS_STREAM_RESULTS(p_api_version IN NUMBER
78 ,p_init_msg_list IN VARCHAR2
79 ,p_transaction_number IN NUMBER
80 ,x_return_status OUT NOCOPY VARCHAR2
81 ,x_msg_count OUT NOCOPY NUMBER
82 ,x_msg_data OUT NOCOPY VARCHAR2);
83 PROCEDURE PROCESS_REST_STRM_RESLTS(p_api_version IN NUMBER
84 ,p_init_msg_list IN VARCHAR2
85 ,p_transaction_number IN NUMBER
86 ,x_return_status OUT NOCOPY VARCHAR2
87 ,x_msg_count OUT NOCOPY NUMBER
88 ,x_msg_data OUT NOCOPY VARCHAR2);
89 -- INFO:
90 -- This Procedure updates the SAY_CODE of existing Streams for a Contract to HISTORY from WORKING
91 -- END INFO
92 PROCEDURE UPDATE_STREAMS_ACTIVITY(p_api_version IN NUMBER
93 ,p_init_msg_list IN VARCHAR2
94 ,x_return_status OUT NOCOPY VARCHAR2
95 ,x_msg_count OUT NOCOPY NUMBER
96 ,x_msg_data OUT NOCOPY VARCHAR2
97 ,p_khr_id IN NUMBER);
98 FUNCTION calculate_present_value(p_future_amount IN NUMBER,
99 p_discount_rate IN NUMBER,
100 p_periods_per_year IN NUMBER,
101 p_total_periods IN NUMBER) RETURN NUMBER;
102 -- INFO:
103 -- This Procedure creates Service Line Streams;
104 -- END INFO
105 PROCEDURE GEN_SERV_MAIN_LINE_STRMS(p_api_version IN NUMBER
106 ,p_init_msg_list IN VARCHAR2
107 ,p_khr_id IN NUMBER
108 ,p_transaction_number IN NUMBER
109 ,p_reporting_streams IN VARCHAR2
110 ,x_return_status OUT NOCOPY VARCHAR2
111 ,x_msg_count OUT NOCOPY NUMBER
112 ,x_msg_data OUT NOCOPY VARCHAR2);
113 PROCEDURE PROCESS_RENW_STRM_RESLTS(p_api_version IN NUMBER
114 ,p_init_msg_list IN VARCHAR2
115 ,p_transaction_number IN NUMBER
116 ,x_return_status OUT NOCOPY VARCHAR2
117 ,x_msg_count OUT NOCOPY NUMBER
118 ,x_msg_data OUT NOCOPY VARCHAR2);
119 PROCEDURE PROCESS_QUOT_STRM_RESLTS(p_api_version IN NUMBER
120 ,p_init_msg_list IN VARCHAR2
121 ,p_transaction_number IN NUMBER
122 ,x_return_status OUT NOCOPY VARCHAR2
123 ,x_msg_count OUT NOCOPY NUMBER
124 ,x_msg_data OUT NOCOPY VARCHAR2);
125 PROCEDURE PROCESS_VIRP_STRM_RESLTS(p_api_version IN NUMBER
126 ,p_init_msg_list IN VARCHAR2
127 ,p_transaction_number IN NUMBER
128 ,x_return_status OUT NOCOPY VARCHAR2
129 ,x_msg_count OUT NOCOPY NUMBER
130 ,x_msg_data OUT NOCOPY VARCHAR2);
131 PROCEDURE ENQUEUE_MESSAGE( p_transaction_type IN varchar2,
132 p_transaction_subtype IN varchar2,
133 p_doc_number IN varchar2,
134 p_prc_eng_url IN VARCHAR2,
135 x_return_status OUT NOCOPY varchar2);
136 END OKL_PROCESS_STREAMS_PVT;