[Home] [Help]
PACKAGE BODY: APPS.OKS_DEFAULTS_PVT
Source
1 PACKAGE BODY OKS_DEFAULTS_PVT AS
2 /* $Header: OKSCCDTB.pls 120.0 2005/05/25 18:15:20 appldev noship $ */
3
4 G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
5 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKS_DEFAULTS_PVT';
6 G_CHILD_RECORD_FOUND CONSTANT varchar2(200) := 'OKC_CHILD_RECORD_FOUND';
7 G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_PARENT_TABLE_TOKEN;
8 G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_CHILD_TABLE_TOKEN;
9
10 -- Start of comments
11 --
12 -- Procedure Name : create_defaults
13 -- Description :
14 -- Business Rules :
15 -- Parameters :
16 -- Version : 1.0
17 -- End of comments
18 procedure Insert_defaults(p_api_version IN NUMBER,
19 p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
20 x_return_status OUT NOCOPY VARCHAR2,
21 x_msg_count OUT NOCOPY NUMBER,
22 x_msg_data OUT NOCOPY VARCHAR2,
23 p_cdtv_rec IN cdtv_rec_type,
24 X_cdtv_rec OUT NOCOPY cdtv_rec_type) is
25 begin
26 oks_cdt_pvt.insert_row(p_api_version => p_api_version,
27 p_init_msg_list => p_init_msg_list,
28 x_return_status => x_return_status,
29 x_msg_count => x_msg_count,
30 x_msg_data => x_msg_data,
31 p_cdtv_rec => p_cdtv_rec,
32 x_cdtv_rec => x_cdtv_rec);
33
34 --V
35 if (x_return_status <> OKC_API.G_RET_STS_SUCCESS) then
36 return;
37 end if;
38 end Insert_defaults;
39
40 -- Start of comments
41 --
42 -- Procedure Name : update_defaults
43 -- Description :
44 -- Business Rules :
45 -- Parameters :
46 -- Version : 1.0
47 -- End of comments
48 procedure update_defaults(p_api_version IN NUMBER,
49 p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
50 x_return_status OUT NOCOPY VARCHAR2,
51 x_msg_count OUT NOCOPY NUMBER,
52 x_msg_data OUT NOCOPY VARCHAR2,
53 p_cdtv_rec IN cdtv_rec_type,
54 x_cdtv_rec OUT NOCOPY cdtv_rec_type) is
55 --V
56 --V
57 begin
58 oks_cdt_pvt.update_row(p_api_version => p_api_version,
59 p_init_msg_list => p_init_msg_list,
60 x_return_status => x_return_status,
61 x_msg_count => x_msg_count,
62 x_msg_data => x_msg_data,
63 p_cdtv_rec => p_cdtv_rec,
64 x_cdtv_rec => x_cdtv_rec);
65 --V
66 if (x_return_status <> OKC_API.G_RET_STS_SUCCESS) then
67 return;
68 end if;
69 end update_defaults;
70
71 -- Start of comments
72 --
73 -- Procedure Name : delete_defaults
74 -- Description :
75 -- Business Rules :
76 -- Parameters :
77 -- Version : 1.0
78 -- End of comments
79 procedure delete_defaults(p_api_version IN NUMBER,
80 p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
81 x_return_status OUT NOCOPY VARCHAR2,
82 x_msg_count OUT NOCOPY NUMBER,
83 x_msg_data OUT NOCOPY VARCHAR2,
84 p_cdtv_rec IN cdtv_rec_type) is
85 begin
86 oks_cdt_pvt.delete_row(p_api_version => p_api_version,
87 p_init_msg_list => p_init_msg_list,
88 x_return_status => x_return_status,
89 x_msg_count => x_msg_count,
90 x_msg_data => x_msg_data,
91 p_cdtv_rec => p_cdtv_rec);
92 --V
93 if (x_return_status <> OKC_API.G_RET_STS_SUCCESS) then
94 return;
95 end if;
96 exception
97 WHEN OTHERS THEN
98 NULL;
99 end delete_defaults;
100
101 -- Start of comments
102 --
103 -- Procedure Name : lock_defaults
104 -- Description :
105 -- Business Rules :
106 -- Parameters :
107 -- Version : 1.0
108 -- End of comments
109 procedure lock_defaults(p_api_version IN NUMBER,
110 p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
111 x_return_status OUT NOCOPY VARCHAR2,
112 x_msg_count OUT NOCOPY NUMBER,
113 x_msg_data OUT NOCOPY VARCHAR2,
114 p_cdtv_rec IN cdtv_rec_type) is
115 begin
116 oks_cdt_pvt.lock_row(p_api_version => p_api_version,
117 p_init_msg_list => p_init_msg_list,
118 x_return_status => x_return_status,
119 x_msg_count => x_msg_count,
120 x_msg_data => x_msg_data,
121 p_cdtv_rec => p_cdtv_rec);
122 end lock_defaults;
123
124 -- Start of comments
125 --
126 -- Procedure Name : validate_defaults
127 -- Description :
128 -- Business Rules :
129 -- Parameters :
130 -- Version : 1.0
131 -- End of comments
132 procedure validate_defaults(p_api_version IN NUMBER,
133 p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
134 x_return_status OUT NOCOPY VARCHAR2,
135 x_msg_count OUT NOCOPY NUMBER,
136 x_msg_data OUT NOCOPY VARCHAR2,
137 p_cdtv_rec IN cdtv_rec_type) is
138 begin
139 oks_cdt_pvt.validate_row(p_api_version => p_api_version,
140 p_init_msg_list => p_init_msg_list,
141 x_return_status => x_return_status,
142 x_msg_count => x_msg_count,
143 x_msg_data => x_msg_data,
144 p_cdtv_rec => p_cdtv_rec);
145 end validate_defaults;
146
147 end OKS_defaults_PVT;