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