DBA Data[Home] [Help]

PACKAGE: APPS.OKL_ACN_PVT

Source


1 Package OKL_ACN_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLSACNS.pls 115.5 2002/12/20 00:03:43 gkadarka noship $ */
3   ---------------------------------------------------------------------------
4   -- GLOBAL DATASTRUCTURES
5   ---------------------------------------------------------------------------
6   TYPE acn_rec_type IS RECORD (
7     id                             NUMBER := OKC_API.G_MISS_NUM,
8     sequence_number                NUMBER := OKC_API.G_MISS_NUM,
9     acd_id                         NUMBER := OKC_API.G_MISS_NUM,
10     ctp_code                       OKL_ASSET_CNDTN_LNS_B.CTP_CODE%TYPE := OKC_API.G_MISS_CHAR,
11     cdn_code                       OKL_ASSET_CNDTN_LNS_B.CDN_CODE%TYPE := OKC_API.G_MISS_CHAR,
12     dty_code                       OKL_ASSET_CNDTN_LNS_B.DTY_CODE%TYPE := OKC_API.G_MISS_CHAR,
13     acs_code                       OKL_ASSET_CNDTN_LNS_B.ACS_CODE%TYPE := OKC_API.G_MISS_CHAR,
14     isq_id                         NUMBER := OKC_API.G_MISS_NUM,
15     pzt_id                         NUMBER := OKC_API.G_MISS_NUM,
16     rpc_id                         NUMBER := OKC_API.G_MISS_NUM,
17     estimated_repair_cost          NUMBER := OKC_API.G_MISS_NUM,
18     actual_repair_cost             NUMBER := OKC_API.G_MISS_NUM,
19     object_version_number          NUMBER := OKC_API.G_MISS_NUM,
20     approved_by                    NUMBER := OKC_API.G_MISS_NUM,
21     approved_yn                    OKL_ASSET_CNDTN_LNS_B.APPROVED_YN%TYPE := OKC_API.G_MISS_CHAR,
22     date_approved                  OKL_ASSET_CNDTN_LNS_B.DATE_APPROVED%TYPE := OKC_API.G_MISS_DATE,
23     date_reported                  OKL_ASSET_CNDTN_LNS_B.DATE_REPORTED%TYPE := OKC_API.G_MISS_DATE,
24     org_id                         NUMBER := OKC_API.G_MISS_NUM,
25     request_id                     NUMBER := OKC_API.G_MISS_NUM,
26     program_application_id         NUMBER := OKC_API.G_MISS_NUM,
27     program_id                     NUMBER := OKC_API.G_MISS_NUM,
28     program_update_date            OKL_ASSET_CNDTN_LNS_B.PROGRAM_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE,
29     attribute_category             OKL_ASSET_CNDTN_LNS_B.ATTRIBUTE_CATEGORY%TYPE := OKC_API.G_MISS_CHAR,
30     attribute1                     OKL_ASSET_CNDTN_LNS_B.ATTRIBUTE1%TYPE := OKC_API.G_MISS_CHAR,
31     attribute2                     OKL_ASSET_CNDTN_LNS_B.ATTRIBUTE2%TYPE := OKC_API.G_MISS_CHAR,
32     attribute3                     OKL_ASSET_CNDTN_LNS_B.ATTRIBUTE3%TYPE := OKC_API.G_MISS_CHAR,
33     attribute4                     OKL_ASSET_CNDTN_LNS_B.ATTRIBUTE4%TYPE := OKC_API.G_MISS_CHAR,
34     attribute5                     OKL_ASSET_CNDTN_LNS_B.ATTRIBUTE5%TYPE := OKC_API.G_MISS_CHAR,
35     attribute6                     OKL_ASSET_CNDTN_LNS_B.ATTRIBUTE6%TYPE := OKC_API.G_MISS_CHAR,
36     attribute7                     OKL_ASSET_CNDTN_LNS_B.ATTRIBUTE7%TYPE := OKC_API.G_MISS_CHAR,
37     attribute8                     OKL_ASSET_CNDTN_LNS_B.ATTRIBUTE8%TYPE := OKC_API.G_MISS_CHAR,
38     attribute9                     OKL_ASSET_CNDTN_LNS_B.ATTRIBUTE9%TYPE := OKC_API.G_MISS_CHAR,
39     attribute10                    OKL_ASSET_CNDTN_LNS_B.ATTRIBUTE10%TYPE := OKC_API.G_MISS_CHAR,
40     attribute11                    OKL_ASSET_CNDTN_LNS_B.ATTRIBUTE11%TYPE := OKC_API.G_MISS_CHAR,
41     attribute12                    OKL_ASSET_CNDTN_LNS_B.ATTRIBUTE12%TYPE := OKC_API.G_MISS_CHAR,
42     attribute13                    OKL_ASSET_CNDTN_LNS_B.ATTRIBUTE13%TYPE := OKC_API.G_MISS_CHAR,
43     attribute14                    OKL_ASSET_CNDTN_LNS_B.ATTRIBUTE14%TYPE := OKC_API.G_MISS_CHAR,
44     attribute15                    OKL_ASSET_CNDTN_LNS_B.ATTRIBUTE15%TYPE := OKC_API.G_MISS_CHAR,
45     created_by                     NUMBER := OKC_API.G_MISS_NUM,
46     creation_date                  OKL_ASSET_CNDTN_LNS_B.CREATION_DATE%TYPE := OKC_API.G_MISS_DATE,
47     last_updated_by                NUMBER := OKC_API.G_MISS_NUM,
48     last_update_date               OKL_ASSET_CNDTN_LNS_B.LAST_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE,
49     last_update_login              NUMBER := OKC_API.G_MISS_NUM,
50   -- RABHUPAT - 2667636 - Start
51     currency_code                  OKL_ASSET_CNDTN_LNS_B.CURRENCY_CODE%TYPE := OKC_API.G_MISS_CHAR,
52     currency_conversion_code       OKL_ASSET_CNDTN_LNS_B.CURRENCY_CONVERSION_CODE%TYPE := OKC_API.G_MISS_CHAR,
53     currency_conversion_type       OKL_ASSET_CNDTN_LNS_B.CURRENCY_CONVERSION_TYPE%TYPE := OKC_API.G_MISS_CHAR,
54     currency_conversion_rate       OKL_ASSET_CNDTN_LNS_B.CURRENCY_CONVERSION_RATE%TYPE := OKC_API.G_MISS_NUM,
55     currency_conversion_date       OKL_ASSET_CNDTN_LNS_B.CURRENCY_CONVERSION_DATE%TYPE := OKC_API.G_MISS_DATE);
56   --RABHUPAT - 2667636 - End
57   g_miss_acn_rec                          acn_rec_type;
58   TYPE acn_tbl_type IS TABLE OF acn_rec_type
59         INDEX BY BINARY_INTEGER;
60   TYPE OklAssetCndtnLnsTlRecType IS RECORD (
61     id                             NUMBER := OKC_API.G_MISS_NUM,
62     language                       OKL_ASSET_CNDTN_LNS_TL.LANGUAGE%TYPE := OKC_API.G_MISS_CHAR,
63     source_lang                    OKL_ASSET_CNDTN_LNS_TL.SOURCE_LANG%TYPE := OKC_API.G_MISS_CHAR,
64     sfwt_flag                      OKL_ASSET_CNDTN_LNS_TL.SFWT_FLAG%TYPE := OKC_API.G_MISS_CHAR,
65     damage_description             OKL_ASSET_CNDTN_LNS_TL.DAMAGE_DESCRIPTION%TYPE := OKC_API.G_MISS_CHAR,
66     claim_description              OKL_ASSET_CNDTN_LNS_TL.CLAIM_DESCRIPTION%TYPE := OKC_API.G_MISS_CHAR,
67     recommended_repair             OKL_ASSET_CNDTN_LNS_TL.RECOMMENDED_REPAIR%TYPE := OKC_API.G_MISS_CHAR,
68     part_name                      OKL_ASSET_CNDTN_LNS_TL.PART_NAME%TYPE := OKC_API.G_MISS_CHAR,
69     created_by                     NUMBER := OKC_API.G_MISS_NUM,
70     creation_date                  OKL_ASSET_CNDTN_LNS_TL.CREATION_DATE%TYPE := OKC_API.G_MISS_DATE,
71     last_updated_by                NUMBER := OKC_API.G_MISS_NUM,
72     last_update_date               OKL_ASSET_CNDTN_LNS_TL.LAST_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE,
73     last_update_login              NUMBER := OKC_API.G_MISS_NUM);
74   GMissOklAssetCndtnLnsTlRec              OklAssetCndtnLnsTlRecType;
75   TYPE OklAssetCndtnLnsTlTblType IS TABLE OF OklAssetCndtnLnsTlRecType
76         INDEX BY BINARY_INTEGER;
77   TYPE acnv_rec_type IS RECORD (
78     id                             NUMBER := OKC_API.G_MISS_NUM,
79     object_version_number          NUMBER := OKC_API.G_MISS_NUM,
80     sfwt_flag                      OKL_ASSET_CNDTN_LNS_V.SFWT_FLAG%TYPE := OKC_API.G_MISS_CHAR,
81     ctp_code                       OKL_ASSET_CNDTN_LNS_V.CTP_CODE%TYPE := OKC_API.G_MISS_CHAR,
82     dty_code                       OKL_ASSET_CNDTN_LNS_V.DTY_CODE%TYPE := OKC_API.G_MISS_CHAR,
83     cdn_code                       OKL_ASSET_CNDTN_LNS_V.CDN_CODE%TYPE := OKC_API.G_MISS_CHAR,
84     acs_code                       OKL_ASSET_CNDTN_LNS_V.ACS_CODE%TYPE := OKC_API.G_MISS_CHAR,
85     isq_id                         NUMBER := OKC_API.G_MISS_NUM,
86     pzt_id                         NUMBER := OKC_API.G_MISS_NUM,
87     acd_id                         NUMBER := OKC_API.G_MISS_NUM,
88     rpc_id                         NUMBER := OKC_API.G_MISS_NUM,
89     sequence_number                NUMBER := OKC_API.G_MISS_NUM,
90     damage_description             OKL_ASSET_CNDTN_LNS_V.DAMAGE_DESCRIPTION%TYPE := OKC_API.G_MISS_CHAR,
91     claim_description              OKL_ASSET_CNDTN_LNS_V.CLAIM_DESCRIPTION%TYPE := OKC_API.G_MISS_CHAR,
92     estimated_repair_cost          NUMBER := OKC_API.G_MISS_NUM,
93     actual_repair_cost             NUMBER := OKC_API.G_MISS_NUM,
94     approved_by                    NUMBER := OKC_API.G_MISS_NUM,
95     approved_yn                    OKL_ASSET_CNDTN_LNS_V.APPROVED_YN%TYPE := OKC_API.G_MISS_CHAR,
96     date_approved                  OKL_ASSET_CNDTN_LNS_V.DATE_APPROVED%TYPE := OKC_API.G_MISS_DATE,
97     date_reported                  OKL_ASSET_CNDTN_LNS_V.DATE_REPORTED%TYPE := OKC_API.G_MISS_DATE,
98     recommended_repair             OKL_ASSET_CNDTN_LNS_V.RECOMMENDED_REPAIR%TYPE := OKC_API.G_MISS_CHAR,
99     part_name                      OKL_ASSET_CNDTN_LNS_V.PART_NAME%TYPE := OKC_API.G_MISS_CHAR,
100     attribute_category             OKL_ASSET_CNDTN_LNS_V.ATTRIBUTE_CATEGORY%TYPE := OKC_API.G_MISS_CHAR,
101     attribute1                     OKL_ASSET_CNDTN_LNS_V.ATTRIBUTE1%TYPE := OKC_API.G_MISS_CHAR,
102     attribute2                     OKL_ASSET_CNDTN_LNS_V.ATTRIBUTE2%TYPE := OKC_API.G_MISS_CHAR,
103     attribute3                     OKL_ASSET_CNDTN_LNS_V.ATTRIBUTE3%TYPE := OKC_API.G_MISS_CHAR,
104     attribute4                     OKL_ASSET_CNDTN_LNS_V.ATTRIBUTE4%TYPE := OKC_API.G_MISS_CHAR,
105     attribute5                     OKL_ASSET_CNDTN_LNS_V.ATTRIBUTE5%TYPE := OKC_API.G_MISS_CHAR,
106     attribute6                     OKL_ASSET_CNDTN_LNS_V.ATTRIBUTE6%TYPE := OKC_API.G_MISS_CHAR,
107     attribute7                     OKL_ASSET_CNDTN_LNS_V.ATTRIBUTE7%TYPE := OKC_API.G_MISS_CHAR,
108     attribute8                     OKL_ASSET_CNDTN_LNS_V.ATTRIBUTE8%TYPE := OKC_API.G_MISS_CHAR,
109     attribute9                     OKL_ASSET_CNDTN_LNS_V.ATTRIBUTE9%TYPE := OKC_API.G_MISS_CHAR,
110     attribute10                    OKL_ASSET_CNDTN_LNS_V.ATTRIBUTE10%TYPE := OKC_API.G_MISS_CHAR,
111     attribute11                    OKL_ASSET_CNDTN_LNS_V.ATTRIBUTE11%TYPE := OKC_API.G_MISS_CHAR,
112     attribute12                    OKL_ASSET_CNDTN_LNS_V.ATTRIBUTE12%TYPE := OKC_API.G_MISS_CHAR,
113     attribute13                    OKL_ASSET_CNDTN_LNS_V.ATTRIBUTE13%TYPE := OKC_API.G_MISS_CHAR,
114     attribute14                    OKL_ASSET_CNDTN_LNS_V.ATTRIBUTE14%TYPE := OKC_API.G_MISS_CHAR,
115     attribute15                    OKL_ASSET_CNDTN_LNS_V.ATTRIBUTE15%TYPE := OKC_API.G_MISS_CHAR,
116     org_id                         NUMBER := OKC_API.G_MISS_NUM,
117     request_id                     NUMBER := OKC_API.G_MISS_NUM,
118     program_application_id         NUMBER := OKC_API.G_MISS_NUM,
119     program_id                     NUMBER := OKC_API.G_MISS_NUM,
120     program_update_date            OKL_ASSET_CNDTN_LNS_V.PROGRAM_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE,
121     created_by                     NUMBER := OKC_API.G_MISS_NUM,
122     creation_date                  OKL_ASSET_CNDTN_LNS_V.CREATION_DATE%TYPE := OKC_API.G_MISS_DATE,
123     last_updated_by                NUMBER := OKC_API.G_MISS_NUM,
124     last_update_date               OKL_ASSET_CNDTN_LNS_V.LAST_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE,
125     last_update_login              NUMBER := OKC_API.G_MISS_NUM,
126   -- RABHUPAT - 2667636 - Start
127     currency_code                  OKL_ASSET_CNDTN_LNS_V.CURRENCY_CODE%TYPE := OKC_API.G_MISS_CHAR,
128     currency_conversion_code       OKL_ASSET_CNDTN_LNS_V.CURRENCY_CONVERSION_CODE%TYPE := OKC_API.G_MISS_CHAR,
129     currency_conversion_type       OKL_ASSET_CNDTN_LNS_V.CURRENCY_CONVERSION_TYPE%TYPE := OKC_API.G_MISS_CHAR,
130     currency_conversion_rate       OKL_ASSET_CNDTN_LNS_V.CURRENCY_CONVERSION_RATE%TYPE := OKC_API.G_MISS_NUM,
131     currency_conversion_date       OKL_ASSET_CNDTN_LNS_V.CURRENCY_CONVERSION_DATE%TYPE := OKC_API.G_MISS_DATE);
132   -- RABHUPAT - 2667636 - End
133   g_miss_acnv_rec                         acnv_rec_type;
134   TYPE acnv_tbl_type IS TABLE OF acnv_rec_type
135         INDEX BY BINARY_INTEGER;
136   ---------------------------------------------------------------------------
137   -- GLOBAL MESSAGE CONSTANTS
138   ---------------------------------------------------------------------------
139   G_FND_APP			CONSTANT VARCHAR2(200) := OKC_API.G_FND_APP;
140   G_FORM_UNABLE_TO_RESERVE_REC	CONSTANT VARCHAR2(200) := OKC_API.G_FORM_UNABLE_TO_RESERVE_REC;
141   G_FORM_RECORD_DELETED		CONSTANT VARCHAR2(200) := OKC_API.G_FORM_RECORD_DELETED;
142   G_FORM_RECORD_CHANGED		CONSTANT VARCHAR2(200) := OKC_API.G_FORM_RECORD_CHANGED;
143   G_RECORD_LOGICALLY_DELETED	CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_LOGICALLY_DELETED;
144   G_REQUIRED_VALUE		CONSTANT VARCHAR2(200) := OKC_API.G_REQUIRED_VALUE;
145   G_INVALID_VALUE			CONSTANT VARCHAR2(200) := OKC_API.G_INVALID_VALUE;
146   G_COL_NAME_TOKEN		CONSTANT VARCHAR2(200) := OKC_API.G_COL_NAME_TOKEN;
147   G_PARENT_TABLE_TOKEN		CONSTANT VARCHAR2(200) := OKC_API.G_PARENT_TABLE_TOKEN;
148   G_CHILD_TABLE_TOKEN		CONSTANT VARCHAR2(200) := OKC_API.G_CHILD_TABLE_TOKEN;
149   ---------------------------------------------------------------------------
150   -- GLOBAL VARIABLES
151   ---------------------------------------------------------------------------
152   G_PKG_NAME			CONSTANT VARCHAR2(200) := 'OKL_ACN_PVT';
153   G_APP_NAME			CONSTANT VARCHAR2(3)   :=  OKC_API.G_APP_NAME;
154   ---------------------------------------------------------------------------
155   -- Procedures and Functions
156   ---------------------------------------------------------------------------
157 
158   PROCEDURE qc;
159   PROCEDURE change_version;
160   PROCEDURE api_copy;
161   PROCEDURE add_language;
162   PROCEDURE insert_row(
163     p_api_version                  IN NUMBER,
164     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
165     x_return_status                OUT NOCOPY VARCHAR2,
166     x_msg_count                    OUT NOCOPY NUMBER,
167     x_msg_data                     OUT NOCOPY VARCHAR2,
168     p_acnv_rec                     IN acnv_rec_type,
169     x_acnv_rec                     OUT NOCOPY acnv_rec_type);
170 
171   PROCEDURE insert_row(
172     p_api_version                  IN NUMBER,
173     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
174     x_return_status                OUT NOCOPY VARCHAR2,
175     x_msg_count                    OUT NOCOPY NUMBER,
176     x_msg_data                     OUT NOCOPY VARCHAR2,
177     p_acnv_tbl                     IN acnv_tbl_type,
178     x_acnv_tbl                     OUT NOCOPY acnv_tbl_type);
179 
180   PROCEDURE lock_row(
181     p_api_version                  IN NUMBER,
182     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
183     x_return_status                OUT NOCOPY VARCHAR2,
184     x_msg_count                    OUT NOCOPY NUMBER,
185     x_msg_data                     OUT NOCOPY VARCHAR2,
186     p_acnv_rec                     IN acnv_rec_type);
187 
188   PROCEDURE lock_row(
189     p_api_version                  IN NUMBER,
190     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
191     x_return_status                OUT NOCOPY VARCHAR2,
192     x_msg_count                    OUT NOCOPY NUMBER,
193     x_msg_data                     OUT NOCOPY VARCHAR2,
194     p_acnv_tbl                     IN acnv_tbl_type);
195 
196   PROCEDURE update_row(
197     p_api_version                  IN NUMBER,
198     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
199     x_return_status                OUT NOCOPY VARCHAR2,
200     x_msg_count                    OUT NOCOPY NUMBER,
201     x_msg_data                     OUT NOCOPY VARCHAR2,
202     p_acnv_rec                     IN acnv_rec_type,
203     x_acnv_rec                     OUT NOCOPY acnv_rec_type);
204 
205   PROCEDURE update_row(
206     p_api_version                  IN NUMBER,
207     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
208     x_return_status                OUT NOCOPY VARCHAR2,
209     x_msg_count                    OUT NOCOPY NUMBER,
210     x_msg_data                     OUT NOCOPY VARCHAR2,
211     p_acnv_tbl                     IN acnv_tbl_type,
212     x_acnv_tbl                     OUT NOCOPY acnv_tbl_type);
213 
214   PROCEDURE delete_row(
215     p_api_version                  IN NUMBER,
216     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
217     x_return_status                OUT NOCOPY VARCHAR2,
218     x_msg_count                    OUT NOCOPY NUMBER,
219     x_msg_data                     OUT NOCOPY VARCHAR2,
220     p_acnv_rec                     IN acnv_rec_type);
221 
222   PROCEDURE delete_row(
223     p_api_version                  IN NUMBER,
224     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
225     x_return_status                OUT NOCOPY VARCHAR2,
226     x_msg_count                    OUT NOCOPY NUMBER,
227     x_msg_data                     OUT NOCOPY VARCHAR2,
228     p_acnv_tbl                     IN acnv_tbl_type);
229 
230   PROCEDURE validate_row(
231     p_api_version                  IN NUMBER,
232     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
233     x_return_status                OUT NOCOPY VARCHAR2,
234     x_msg_count                    OUT NOCOPY NUMBER,
235     x_msg_data                     OUT NOCOPY VARCHAR2,
236     p_acnv_rec                     IN acnv_rec_type);
237 
238   PROCEDURE validate_row(
239     p_api_version                  IN NUMBER,
240     p_init_msg_list                IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
241     x_return_status                OUT NOCOPY VARCHAR2,
242     x_msg_count                    OUT NOCOPY NUMBER,
243     x_msg_data                     OUT NOCOPY VARCHAR2,
244     p_acnv_tbl                     IN acnv_tbl_type);
245 
246 END OKL_ACN_PVT;