[Home] [Help]
PACKAGE: APPS.OKC_PAC_PVT
Source
1 Package OKC_PAC_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKCSPACS.pls 120.0 2005/05/25 18:54:36 appldev noship $ */
3 ---------------------------------------------------------------------------
4 -- GLOBAL DATASTRUCTURES
5 ---------------------------------------------------------------------------
6 TYPE pac_rec_type IS RECORD (
7 id NUMBER := OKC_API.G_MISS_NUM,
8 pat_id NUMBER := OKC_API.G_MISS_NUM,
9 pat_id_from NUMBER := OKC_API.G_MISS_NUM,
10 bsl_id NUMBER := OKC_API.G_MISS_NUM,
11 cle_id NUMBER := OKC_API.G_MISS_NUM,
12 bcl_id NUMBER := OKC_API.G_MISS_NUM,
13 created_by NUMBER := OKC_API.G_MISS_NUM,
14 creation_date OKC_PRICE_ADJ_ASSOCS.CREATION_DATE%TYPE := OKC_API.G_MISS_DATE,
15 last_updated_by NUMBER := OKC_API.G_MISS_NUM,
16 last_update_date OKC_PRICE_ADJ_ASSOCS.LAST_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE,
17 last_update_login NUMBER := OKC_API.G_MISS_NUM,
18 program_application_id NUMBER := OKC_API.G_MISS_NUM,
19 program_id NUMBER := OKC_API.G_MISS_NUM,
20 program_update_date OKC_PRICE_ADJ_ASSOCS.PROGRAM_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE,
21 request_id NUMBER := OKC_API.G_MISS_NUM,
22 object_version_number NUMBER := OKC_API.G_MISS_NUM);
23 g_miss_pac_rec pac_rec_type;
24 TYPE pac_tbl_type IS TABLE OF pac_rec_type
25 INDEX BY BINARY_INTEGER;
26 TYPE pacv_rec_type IS RECORD (
27 id NUMBER := OKC_API.G_MISS_NUM,
28 pat_id NUMBER := OKC_API.G_MISS_NUM,
29 pat_id_from NUMBER := OKC_API.G_MISS_NUM,
30 bsl_id NUMBER := OKC_API.G_MISS_NUM,
31 cle_id NUMBER := OKC_API.G_MISS_NUM,
32 bcl_id NUMBER := OKC_API.G_MISS_NUM,
33 created_by NUMBER := OKC_API.G_MISS_NUM,
34 creation_date OKC_PRICE_ADJ_ASSOCS_V.CREATION_DATE%TYPE := OKC_API.G_MISS_DATE,
35 last_updated_by NUMBER := OKC_API.G_MISS_NUM,
36 last_update_date OKC_PRICE_ADJ_ASSOCS_V.LAST_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE,
37 last_update_login NUMBER := OKC_API.G_MISS_NUM,
38 program_application_id NUMBER := OKC_API.G_MISS_NUM,
39 program_id NUMBER := OKC_API.G_MISS_NUM,
40 program_update_date OKC_PRICE_ADJ_ASSOCS_V.PROGRAM_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE,
41 request_id NUMBER := OKC_API.G_MISS_NUM,
42 object_version_number NUMBER := OKC_API.G_MISS_NUM );
43 g_miss_pacv_rec pacv_rec_type;
44 TYPE pacv_tbl_type IS TABLE OF pacv_rec_type
45 INDEX BY BINARY_INTEGER;
46 ---------------------------------------------------------------------------
47 -- GLOBAL MESSAGE CONSTANTS
48 ---------------------------------------------------------------------------
49 G_FND_APP CONSTANT VARCHAR2(200) := OKC_API.G_FND_APP;
50 G_FORM_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKC_API.G_FORM_UNABLE_TO_RESERVE_REC;
51 G_FORM_RECORD_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_FORM_RECORD_DELETED;
52 G_FORM_RECORD_CHANGED CONSTANT VARCHAR2(200) := OKC_API.G_FORM_RECORD_CHANGED;
53 G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_LOGICALLY_DELETED;
54 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_REQUIRED_VALUE;
55 G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_INVALID_VALUE;
56 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_COL_NAME_TOKEN;
57 G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_PARENT_TABLE_TOKEN;
58 G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_CHILD_TABLE_TOKEN;
59 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKC_CONTRACTS_UNEXP_ERROR';
60 G_FOREIGN_KEY_ERROR CONSTANT VARCHAR2(200) := 'OKC_CONTRACTS_FK_ERROR';
61 G_UNIQUE_KEY_ERROR CONSTANT VARCHAR2(200) := 'OKC_CONTRACTS_UNIQUE_KEY_ERROR';
62 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLerrm';
63 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLcode';
64 G_UPPERCASE_REQUIRED CONSTANT VARCHAR2(200) := 'OKC_CONTRACTS_UPPERCASE_REQD';
65
66 ---------------------------------------------------------------------------
67 -- GLOBAL EXCEPTION
68 ---------------------------------------------------------------------------
69 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
70
71 ---------------------------------------------------------------------------
72 -- GLOBAL VARIABLES
73 ---------------------------------------------------------------------------
74 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKCPAC_PVT';
75 G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
76 ---------------------------------------------------------------------------
77 -- Procedures and Functions
78 ---------------------------------------------------------------------------
79
80 PROCEDURE qc;
81 PROCEDURE change_version;
82 PROCEDURE api_copy;
83 PROCEDURE insert_row(
84 p_api_version IN NUMBER,
85 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
86 x_return_status OUT NOCOPY VARCHAR2,
87 x_msg_count OUT NOCOPY NUMBER,
88 x_msg_data OUT NOCOPY VARCHAR2,
89 p_pacv_rec IN pacv_rec_type,
90 x_pacv_rec OUT NOCOPY pacv_rec_type);
91
92 PROCEDURE insert_row(
93 p_api_version IN NUMBER,
94 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
95 x_return_status OUT NOCOPY VARCHAR2,
96 x_msg_count OUT NOCOPY NUMBER,
97 x_msg_data OUT NOCOPY VARCHAR2,
98 p_pacv_tbl IN pacv_tbl_type,
99 x_pacv_tbl OUT NOCOPY pacv_tbl_type);
100
101 PROCEDURE lock_row(
102 p_api_version IN NUMBER,
103 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
104 x_return_status OUT NOCOPY VARCHAR2,
105 x_msg_count OUT NOCOPY NUMBER,
106 x_msg_data OUT NOCOPY VARCHAR2,
107 p_pacv_rec IN pacv_rec_type);
108
109 PROCEDURE lock_row(
110 p_api_version IN NUMBER,
111 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
112 x_return_status OUT NOCOPY VARCHAR2,
113 x_msg_count OUT NOCOPY NUMBER,
114 x_msg_data OUT NOCOPY VARCHAR2,
115 p_pacv_tbl IN pacv_tbl_type);
116
117 PROCEDURE update_row(
118 p_api_version IN NUMBER,
119 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
120 x_return_status OUT NOCOPY VARCHAR2,
121 x_msg_count OUT NOCOPY NUMBER,
122 x_msg_data OUT NOCOPY VARCHAR2,
123 p_pacv_rec IN pacv_rec_type,
124 x_pacv_rec OUT NOCOPY pacv_rec_type);
125
126 PROCEDURE update_row(
127 p_api_version IN NUMBER,
128 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
129 x_return_status OUT NOCOPY VARCHAR2,
130 x_msg_count OUT NOCOPY NUMBER,
131 x_msg_data OUT NOCOPY VARCHAR2,
132 p_pacv_tbl IN pacv_tbl_type,
133 x_pacv_tbl OUT NOCOPY pacv_tbl_type);
134
135 PROCEDURE delete_row(
136 p_api_version IN NUMBER,
137 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
138 x_return_status OUT NOCOPY VARCHAR2,
139 x_msg_count OUT NOCOPY NUMBER,
140 x_msg_data OUT NOCOPY VARCHAR2,
141 p_pacv_rec IN pacv_rec_type);
142
143 PROCEDURE delete_row(
144 p_api_version IN NUMBER,
145 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
146 x_return_status OUT NOCOPY VARCHAR2,
147 x_msg_count OUT NOCOPY NUMBER,
148 x_msg_data OUT NOCOPY VARCHAR2,
149 p_pacv_tbl IN pacv_tbl_type);
150
151 PROCEDURE validate_row(
152 p_api_version IN NUMBER,
153 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
154 x_return_status OUT NOCOPY VARCHAR2,
155 x_msg_count OUT NOCOPY NUMBER,
156 x_msg_data OUT NOCOPY VARCHAR2,
157 p_pacv_rec IN pacv_rec_type);
158
159 PROCEDURE validate_row(
160 p_api_version IN NUMBER,
161 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
162 x_return_status OUT NOCOPY VARCHAR2,
163 x_msg_count OUT NOCOPY NUMBER,
164 x_msg_data OUT NOCOPY VARCHAR2,
165 p_pacv_tbl IN pacv_tbl_type);
166
167
168 FUNCTION create_version(
169 p_chr_id IN NUMBER,
170 p_major_version IN NUMBER) RETURN VARCHAR2;
171
172 FUNCTION restore_version(
173 p_chr_id IN NUMBER,
174 p_major_version IN NUMBER) RETURN VARCHAR2;
175
176
177
178 END OKC_PAC_PVT;