[Home] [Help]
PACKAGE: APPS.OKL_OPI_PVT
Source
1 PACKAGE OKL_OPI_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLROPIS.pls 120.1 2005/10/30 04:35:26 appldev noship $ */
3 ---------------------------------------------------------------------------
4 -- GLOBAL DATASTRUCTURES
5 ---------------------------------------------------------------------------
6 -- Sub type Open Interface records
7 subtype oinv_rec_type is okl_oin_pvt.oinv_rec_type;
8 subtype oinv_tbl_type is okl_oin_pvt.oinv_tbl_type;
9
10 subtype oipv_rec_type is okl_oip_pvt.oipv_rec_type;
11 subtype oipv_tbl_type is okl_oip_pvt.oipv_tbl_type;
12
13 subtype iohv_rec_type is iex_ioh_pvt.iohv_rec_type;
14 subtype iohv_tbl_type is iex_ioh_pvt.iohv_tbl_type;
15
16 subtype oiav_rec_type is okl_oia_pvt.oiav_rec_type;
17 subtype oiav_tbl_type is okl_oia_pvt.oiav_tbl_type;
18
19 TYPE party_rec_type IS RECORD (
20 party_id HZ_PARTIES.PARTY_ID%TYPE
21 ,party_name HZ_PARTIES.PARTY_NAME%TYPE
22 ,party_type HZ_PARTIES.PARTY_TYPE%TYPE
23 ,date_of_birth HZ_PERSON_PROFILES.DATE_OF_BIRTH%TYPE
24 ,place_of_birth HZ_PERSON_PROFILES.PLACE_OF_BIRTH%TYPE
25 ,person_identifier HZ_PERSON_PROFILES.PERSON_IDENTIFIER%TYPE
26 ,person_iden_type HZ_PERSON_PROFILES.PERSON_IDEN_TYPE%TYPE
27 ,country HZ_LOCATIONS.COUNTRY%TYPE
28 ,address1 HZ_LOCATIONS.ADDRESS3%TYPE
29 ,address2 HZ_LOCATIONS.ADDRESS2%TYPE
30 ,address3 HZ_LOCATIONS.ADDRESS1%TYPE
31 ,address4 HZ_LOCATIONS.ADDRESS4%TYPE
32 ,city HZ_LOCATIONS.CITY%TYPE
33 ,postal_code HZ_LOCATIONS.POSTAL_CODE%TYPE
34 ,state HZ_LOCATIONS.STATE%TYPE
35 ,province HZ_LOCATIONS.PROVINCE%TYPE
36 ,county HZ_LOCATIONS.COUNTY%TYPE
37 ,po_box_number HZ_LOCATIONS.PO_BOX_NUMBER%TYPE
38 ,house_number HZ_LOCATIONS.HOUSE_NUMBER%TYPE
39 ,street_suffix HZ_LOCATIONS.STREET_SUFFIX%TYPE
40 ,apartment_number HZ_LOCATIONS.APARTMENT_NUMBER%TYPE
41 ,street HZ_LOCATIONS.STREET%TYPE
42 ,rural_route_number HZ_LOCATIONS.RURAL_ROUTE_NUMBER%TYPE
43 ,street_number HZ_LOCATIONS.STREET_NUMBER%TYPE
44 ,building HZ_LOCATIONS.BUILDING%TYPE
45 ,floor HZ_LOCATIONS.FLOOR%TYPE
46 ,suite HZ_LOCATIONS.SUITE%TYPE
47 ,room HZ_LOCATIONS.ROOM%TYPE
48 ,postal_plus4_code HZ_LOCATIONS.POSTAL_PLUS4_CODE%TYPE
49 ,phone_country_code HZ_CONTACT_POINTS.PHONE_COUNTRY_CODE%TYPE
50 ,phone_area_code HZ_CONTACT_POINTS.PHONE_AREA_CODE%TYPE
51 ,phone_number HZ_CONTACT_POINTS.PHONE_NUMBER%TYPE
52 ,phone_extension HZ_CONTACT_POINTS.PHONE_EXTENSION%TYPE);
53
54 TYPE party_tbl_type IS TABLE OF party_rec_type
55 INDEX BY BINARY_INTEGER;
56
57 TYPE contract_rec_type IS RECORD (
58 khr_id OKC_K_HEADERS_V.ID%TYPE
59 ,contract_number OKC_K_HEADERS_V.CONTRACT_NUMBER%TYPE
60 ,contract_type OKC_K_HEADERS_V.SCS_CODE%TYPE
61 ,contract_status OKC_K_HEADERS_V.STS_CODE%TYPE
62 ,original_amount OKL_OPEN_INT.ORIGINAL_AMOUNT%TYPE
63 ,start_date OKC_K_HEADERS_V.START_DATE%TYPE
64 ,close_date OKC_K_HEADERS_V.END_DATE%TYPE
65 ,term_duration OKL_K_HEADERS.TERM_DURATION%TYPE
66 ,monthly_payment_amount OKL_OPEN_INT.MONTHLY_PAYMENT_AMOUNT%TYPE
67 ,last_payment_date OKL_OPEN_INT.LAST_PAYMENT_DATE%TYPE
68 ,delinquency_occurance_date OKL_OPEN_INT.DELINQUENCY_OCCURANCE_DATE%TYPE
69 ,past_due_amount OKL_OPEN_INT.PAST_DUE_AMOUNT%TYPE
70 ,remaining_amount OKL_OPEN_INT.REMAINING_AMOUNT%TYPE
71 ,credit_indicator OKL_OPEN_INT.CREDIT_INDICATOR%TYPE
72 ,org_id OKL_OPEN_INT.ORG_ID%TYPE);
73
74 ---------------------------------------------------------------------------
75 -- GLOBAL MESSAGE CONSTANTS
76 ---------------------------------------------------------------------------
77 G_FND_APP CONSTANT VARCHAR2(200) := Okc_Api.G_FND_APP;
78 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := 'OKL_REQUIRED_VALUE';
79 G_INVALID_VALUE CONSTANT VARCHAR2(200) := Okc_Api.G_INVALID_VALUE;
80 G_INVALID_PARTY CONSTANT VARCHAR2(200) := 'OKL_INVALID_PARTY';
81 G_INVALID_CONTRACT CONSTANT VARCHAR2(200) := 'OKL_INVALID_CONTRACT';
82 G_INVALID_CASE CONSTANT VARCHAR2(200) := 'OKL_INVALID_CASE';
83 G_INVALID_ACTION_STATUS CONSTANT VARCHAR2(200) := 'INVALID_ACTION_STATUS';
84 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := 'COL_NAME';
85 G_COL_NAME1_TOKEN CONSTANT VARCHAR2(200) := 'COL_NAME1';
86 G_COL_NAME2_TOKEN CONSTANT VARCHAR2(200) := 'COL_NAME2';
87 G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := 'PARENT_TABLE';
88 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKL_CONTRACTS_UNEXPECTED_ERROR';
89 G_NO_PARENT_RECORD CONSTANT VARCHAR2(200) := 'OKL_PARENT_RECORD';
90 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'OKL_SQLERRM';
91 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'OKL_SQLCODE';
92 ---------------------------------------------------------------------------
93 -- GLOBAL VARIABLES
94 ---------------------------------------------------------------------------
95 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_OPI_PVT';
96 G_APP_NAME CONSTANT VARCHAR2(3) := 'OKL';
97
98 ---------------------------------------------------------------------------
99 -- GLOBAL EXCEPTION
100 ---------------------------------------------------------------------------
101 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
102 ---------------------------------------------------------------------------
103 -- Procedures and Functions
104 ---------------------------------------------------------------------------
105
106 PROCEDURE qc;
107 PROCEDURE change_version;
108 PROCEDURE api_copy;
109
110 PROCEDURE insert_pending_int(
111 p_api_version IN NUMBER,
112 p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
113 p_contract_id IN NUMBER,
114 x_oinv_rec OUT NOCOPY oinv_rec_type,
115 x_return_status OUT NOCOPY VARCHAR2,
116 x_msg_count OUT NOCOPY NUMBER,
117 x_msg_data OUT NOCOPY VARCHAR2);
118
119
120 PROCEDURE process_pending_int(
121 p_api_version IN NUMBER,
122 p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
123 p_oinv_rec IN oinv_rec_type,
124 p_iohv_rec IN iohv_rec_type,
125 x_oinv_rec OUT NOCOPY oinv_rec_type,
126 x_return_status OUT NOCOPY VARCHAR2,
127 x_msg_count OUT NOCOPY NUMBER,
128 x_msg_data OUT NOCOPY VARCHAR2);
129
130 PROCEDURE process_pending_asset(
131 p_api_version IN NUMBER,
132 p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
133 p_iohv_rec IN iohv_rec_type,
134 x_return_status OUT NOCOPY VARCHAR2,
135 x_msg_count OUT NOCOPY NUMBER,
136 x_msg_data OUT NOCOPY VARCHAR2);
137
138 /*
139 PROCEDURE report_all_credit_bureau(
140 errbuf OUT NOCOPY VARCHAR2,
141 retcode OUT NOCOPY NUMBER);
142 */
143
144 PROCEDURE get_party(
145 p_contract_id IN NUMBER,
146 x_party_rec OUT NOCOPY party_rec_type,
147 x_return_status OUT NOCOPY VARCHAR2);
148
149 PROCEDURE get_guarantor(
150 p_contract_id IN NUMBER,
151 x_party_tbl OUT NOCOPY party_tbl_type,
152 x_return_status OUT NOCOPY VARCHAR2);
153
154 PROCEDURE get_case(
155 p_contract_id IN NUMBER,
156 x_cas_id OUT NOCOPY NUMBER,
157 x_case_number OUT NOCOPY VARCHAR2,
158 x_return_status OUT NOCOPY VARCHAR2);
159
160 PROCEDURE get_contract(
161 p_contract_id IN NUMBER,
162 x_contract_rec OUT NOCOPY contract_rec_type,
163 x_return_status OUT NOCOPY VARCHAR2);
164
165 PROCEDURE get_contract_payment_info(
166 p_contract_rec IN contract_rec_type,
167 x_contract_rec OUT NOCOPY contract_rec_type,
168 x_return_status OUT NOCOPY VARCHAR2);
169
170 PROCEDURE get_case_owner(
171 p_cas_id IN NUMBER,
172 x_owner_resource_id OUT NOCOPY NUMBER,
173 x_resource_name OUT NOCOPY VARCHAR2,
174 x_resource_phone OUT NOCOPY VARCHAR2,
175 x_resource_email OUT NOCOPY VARCHAR2,
176 x_return_status OUT NOCOPY VARCHAR2);
177
178 PROCEDURE get_assets(
179 p_contract_id IN NUMBER,
180 x_oiav_tbl OUT NOCOPY oiav_tbl_type,
181 x_return_status OUT NOCOPY VARCHAR2);
182
183 --------------------------------------------------
184 -----------API SPEC ------------------------------
185 --------------------------------------------------
186 -- Procedure to merge parties
187 PROCEDURE OKL_OPEN_INT_PARTY_MERGE(
188 p_entity_name IN VARCHAR2,
189 p_from_id IN NUMBER,
190 x_to_id OUT NOCOPY NUMBER,
191 p_from_fk_id IN NUMBER,
192 p_to_fk_id IN NUMBER,
193 p_parent_entity_name IN VARCHAR2,
194 p_batch_id IN NUMBER,
195 p_batch_party_id IN NUMBER,
196 x_return_status OUT NOCOPY VARCHAR2);
197
198 END OKL_OPI_PVT;