[Home] [Help]
PACKAGE BODY: APPS.IBE_SH_QUOTE_ACCESS_PKG
Source
1 PACKAGE BODY IBE_SH_QUOTE_ACCESS_PKG as
2 /* $Header: IBEVSCSB.pls 115.3 2003/01/30 03:29:33 mannamra ship $ */
3
4 G_PKG_NAME CONSTANT VARCHAR2(30) := 'IBE_SH_QUOTE_ACCESS_PVT';
5
6 PROCEDURE Insert_Row
7 (
8 p_quote_sharee_id IN NUMBER := FND_API.G_MISS_NUM,
9 p_request_id IN NUMBER := FND_API.G_MISS_NUM,
10 p_program_application_id IN NUMBER := FND_API.G_MISS_NUM,
11 p_program_id IN NUMBER := FND_API.G_MISS_NUM,
12 p_program_update_date IN DATE := FND_API.G_MISS_DATE,
13 p_object_version_number IN NUMBER := FND_API.G_MISS_NUM,
14 p_created_by IN NUMBER := FND_GLOBAL.USER_ID,
15 p_creation_date IN DATE := SYSDATE ,
16 p_last_updated_by IN NUMBER := FND_GLOBAL.USER_ID,
17 p_last_update_date IN DATE := SYSDATE ,
18 p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
19 p_quote_header_id IN NUMBER := FND_API.G_MISS_NUM,
20 p_quote_sharee_number IN NUMBER := FND_API.G_MISS_NUM,
21 p_update_privilege_type_code IN VARCHAR2 := FND_API.G_MISS_CHAR,
22 p_security_group_id IN NUMBER := FND_API.G_MISS_NUM,
23 p_party_id IN NUMBER := FND_API.G_MISS_NUM,
24 p_cust_account_id IN NUMBER := FND_API.G_MISS_NUM,
25 p_start_date_active IN DATE := SYSDATE ,
26 p_end_date_active IN DATE := FND_API.G_MISS_DATE,
27 p_recipient_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
28 p_contact_point_id IN NUMBER := FND_API.G_MISS_NUM
29 )
30 IS
31
32 BEGIN
33
34 INSERT INTO IBE_SH_QUOTE_ACCESS (
35 QUOTE_SHAREE_ID ,
36 REQUEST_ID ,
37 PROGRAM_APPLICATION_ID ,
38 PROGRAM_ID ,
39 PROGRAM_UPDATE_DATE ,
40 OBJECT_VERSION_NUMBER ,
41 CREATED_BY ,
42 CREATION_DATE ,
43 LAST_UPDATED_BY ,
44 LAST_UPDATE_DATE ,
45 LAST_UPDATE_LOGIN ,
46 QUOTE_HEADER_ID ,
47 QUOTE_SHAREE_NUMBER ,
48 UPDATE_PRIVILEGE_TYPE_CODE,
49 SECURITY_GROUP_ID ,
50 PARTY_ID ,
51 CUST_ACCOUNT_ID ,
52 START_DATE_ACTIVE ,
53 END_DATE_ACTIVE ,
54 RECIPIENT_NAME ,
55 CONTACT_POINT_ID
56
57 ) VALUES (
58
59 DECODE(p_quote_sharee_id ,FND_API.G_MISS_NUM,NULL,p_quote_sharee_id),
60 DECODE(p_REQUEST_ID ,FND_API.G_MISS_NUM,NULL,p_REQUEST_ID),
61 DECODE(p_PROGRAM_APPLICATION_ID ,FND_API.G_MISS_NUM,NULL,p_PROGRAM_APPLICATION_ID),
62 DECODE(p_PROGRAM_ID ,FND_API.G_MISS_NUM,NULL,p_PROGRAM_ID),
63 DECODE(p_PROGRAM_UPDATE_DATE ,FND_API.G_MISS_DATE,NULL,p_PROGRAM_UPDATE_DATE),
64 DECODE(p_OBJECT_VERSION_NUMBER ,FND_API.G_MISS_NUM,NULL,p_OBJECT_VERSION_NUMBER),
65 DECODE(p_CREATED_BY ,FND_API.G_MISS_NUM,NULL,p_CREATED_BY),
66 DECODE(p_CREATION_DATE ,FND_API.G_MISS_DATE,NULL,p_CREATION_DATE),
67 DECODE(p_LAST_UPDATED_BY ,FND_API.G_MISS_NUM,NULL,p_LAST_UPDATED_BY),
68 DECODE(p_LAST_UPDATE_DATE ,FND_API.G_MISS_DATE,NULL,p_LAST_UPDATE_DATE),
69 DECODE(p_LAST_UPDATE_LOGIN ,FND_API.G_MISS_NUM,NULL,p_LAST_UPDATE_LOGIN),
70 DECODE(p_QUOTE_HEADER_ID ,FND_API.G_MISS_NUM,NULL,p_QUOTE_HEADER_ID),
71 DECODE(p_QUOTE_SHAREE_NUMBER ,FND_API.G_MISS_NUM,NULL,p_QUOTE_SHAREE_NUMBER),
72 DECODE(p_UPDATE_PRIVILEGE_TYPE_CODE ,FND_API.G_MISS_CHAR,NULL,p_UPDATE_PRIVILEGE_TYPE_CODE),
73 DECODE(p_SECURITY_GROUP_ID ,FND_API.G_MISS_NUM,NULL,p_SECURITY_GROUP_ID),
74 DECODE(p_PARTY_ID ,FND_API.G_MISS_NUM,NULL,p_PARTY_ID),
75 DECODE(p_CUST_ACCOUNT_ID ,FND_API.G_MISS_NUM,NULL,p_CUST_ACCOUNT_ID),
76 DECODE(p_START_DATE_ACTIVE ,FND_API.G_MISS_DATE,NULL,p_START_DATE_ACTIVE),
77 DECODE(p_END_DATE_ACTIVE ,FND_API.G_MISS_DATE,NULL,p_END_DATE_ACTIVE),
78 DECODE(p_RECIPIENT_NAME ,FND_API.G_MISS_CHAR,NULL,p_RECIPIENT_NAME),
79 DECODE(p_CONTACT_POINT_ID ,FND_API.G_MISS_NUM,NULL,p_CONTACT_POINT_ID)
80 );
81
82 /* p_REQUEST_ID ,
83 p_PROGRAM_APPLICATION_ID ,
84 p_PROGRAM_ID ,
85 p_PROGRAM_UPDATE_DATE ,
86 p_OBJECT_VERSION_NUMBER ,
87 p_CREATED_BY ,
88 p_CREATION_DATE ,
89 p_LAST_UPDATED_BY ,
90 p_LAST_UPDATE_DATE ,
91 p_LAST_UPDATE_LOGIN ,
92 p_QUOTE_HEADER_ID ,
93 p_QUOTE_SHAREE_NUMBER ,
94 p_UPDATE_PRIVILEGE_TYPE_CODE ,
95 p_SECURITY_GROUP_ID ,
96 p_PARTY_ID ,
97 p_CUST_ACCOUNT_ID ,
98 p_START_DATE_ACTIVE ,
99 p_END_DATE_ACTIVE ,
100 p_RECIPIENT_NAME ,
101 p_CONTACT_POINT_ID
102 );*/
103
104
105 END Insert_Row;
106
107
108 PROCEDURE Update_Row
109 (
110 p_QUOTE_SHAREE_ID IN NUMBER := FND_API.G_MISS_NUM,
111 p_REQUEST_ID IN NUMBER := FND_API.G_MISS_NUM,
112 p_PROGRAM_APPLICATION_ID IN NUMBER := FND_API.G_MISS_NUM,
113 p_PROGRAM_ID IN NUMBER := FND_API.G_MISS_NUM,
114 p_PROGRAM_UPDATE_DATE IN DATE := FND_API.G_MISS_DATE,
115 p_OBJECT_VERSION_NUMBER IN NUMBER := FND_API.G_MISS_NUM,
116 p_CREATED_BY IN NUMBER := FND_API.G_MISS_NUM,
117 p_CREATION_DATE IN DATE := FND_API.G_MISS_DATE,
118 p_LAST_UPDATED_BY IN NUMBER := FND_GLOBAL.USER_ID,
119 p_LAST_UPDATE_DATE IN DATE := SYSDATE,
120 p_LAST_UPDATE_LOGIN IN NUMBER := FND_API.G_MISS_NUM,
121 p_QUOTE_HEADER_ID IN NUMBER := FND_API.G_MISS_NUM,
122 p_QUOTE_SHAREE_NUMBER IN NUMBER := FND_API.G_MISS_NUM,
123 p_UPDATE_PRIVILEGE_TYPE_CODE IN VARCHAR2 := FND_API.G_MISS_CHAR,
124 p_SECURITY_GROUP_ID IN NUMBER := FND_API.G_MISS_NUM,
125 p_PARTY_ID IN NUMBER := FND_API.G_MISS_NUM,
126 p_CUST_ACCOUNT_ID IN NUMBER := FND_API.G_MISS_NUM,
127 p_START_DATE_ACTIVE IN DATE := FND_API.G_MISS_DATE,
128 p_END_DATE_ACTIVE IN DATE := FND_API.G_MISS_DATE,
129 p_RECIPIENT_NAME IN VARCHAR2 := FND_API.G_MISS_CHAR,
130 p_CONTACT_POINT_ID IN NUMBER := FND_API.G_MISS_NUM
131 )
132 IS
133
134 BEGIN
135
136 UPDATE IBE_SH_QUOTE_ACCESS
137 SET
138 -- QUOTE_SHAREE_ID = decode(p_QUOTE_SHAREE_ID,FND_API.G_MISS_NUM,QUOTE_SHAREE_ID, p_QUOTE_SHAREE_ID),
139 REQUEST_ID = decode(p_REQUEST_ID,FND_API.G_MISS_NUM,REQUEST_ID, p_REQUEST_ID),
140 PROGRAM_APPLICATION_ID = decode(p_PROGRAM_APPLICATION_ID,FND_API.G_MISS_NUM,PROGRAM_APPLICATION_ID,
141 p_PROGRAM_APPLICATION_ID),
142 PROGRAM_ID = decode(p_PROGRAM_ID,FND_API.G_MISS_NUM,PROGRAM_ID, p_PROGRAM_ID),
143 PROGRAM_UPDATE_DATE = decode(p_PROGRAM_UPDATE_DATE,FND_API.G_MISS_DATE,PROGRAM_UPDATE_DATE,
144 p_PROGRAM_UPDATE_DATE),
145 OBJECT_VERSION_NUMBER = decode(p_OBJECT_VERSION_NUMBER,FND_API.G_MISS_NUM,OBJECT_VERSION_NUMBER,
146 p_OBJECT_VERSION_NUMBER),
147 CREATED_BY = decode(p_CREATED_BY,FND_API.G_MISS_NUM,CREATED_BY, p_CREATED_BY),
148 CREATION_DATE = decode(p_CREATION_DATE,FND_API.G_MISS_DATE,CREATION_DATE, p_CREATION_DATE),
149 LAST_UPDATED_BY = decode(p_LAST_UPDATED_BY,FND_API.G_MISS_NUM,LAST_UPDATED_BY, p_LAST_UPDATED_BY),
150 LAST_UPDATE_DATE = decode(p_LAST_UPDATE_DATE,FND_API.G_MISS_DATE,LAST_UPDATE_DATE, p_LAST_UPDATE_DATE),
151 LAST_UPDATE_LOGIN = decode(p_LAST_UPDATE_LOGIN,FND_API.G_MISS_NUM,LAST_UPDATE_LOGIN, p_LAST_UPDATE_LOGIN),
152 QUOTE_HEADER_ID = decode(p_QUOTE_HEADER_ID,FND_API.G_MISS_NUM,QUOTE_HEADER_ID, p_QUOTE_HEADER_ID),
153 QUOTE_SHAREE_NUMBER = decode(p_QUOTE_SHAREE_NUMBER,FND_API.G_MISS_NUM,QUOTE_SHAREE_NUMBER,
154 p_QUOTE_SHAREE_NUMBER),
155 UPDATE_PRIVILEGE_TYPE_CODE = decode(p_UPDATE_PRIVILEGE_TYPE_CODE,FND_API.G_MISS_CHAR,UPDATE_PRIVILEGE_TYPE_CODE,
156 p_UPDATE_PRIVILEGE_TYPE_CODE),
157 SECURITY_GROUP_ID = decode(p_SECURITY_GROUP_ID,FND_API.G_MISS_NUM,SECURITY_GROUP_ID, p_SECURITY_GROUP_ID),
158 PARTY_ID = decode(p_PARTY_ID,FND_API.G_MISS_NUM,PARTY_ID, p_PARTY_ID),
159 CUST_ACCOUNT_ID = decode(p_CUST_ACCOUNT_ID,FND_API.G_MISS_NUM,CUST_ACCOUNT_ID, p_CUST_ACCOUNT_ID),
160 START_DATE_ACTIVE = decode(p_START_DATE_ACTIVE,FND_API.G_MISS_DATE,START_DATE_ACTIVE, p_START_DATE_ACTIVE),
161 END_DATE_ACTIVE = decode(p_END_DATE_ACTIVE,FND_API.G_MISS_DATE,END_DATE_ACTIVE, p_END_DATE_ACTIVE),
162 RECIPIENT_NAME = decode(p_RECIPIENT_NAME,FND_API.G_MISS_CHAR,RECIPIENT_NAME, p_RECIPIENT_NAME),
163 CONTACT_POINT_ID = decode(p_CONTACT_POINT_ID,FND_API.G_MISS_NUM,CONTACT_POINT_ID, p_CONTACT_POINT_ID)
164
165 WHERE
166 /* quote_header_id = p_quote_header_id
167 and party_id = p_party_id
168 and cust_account_id = p_cust_account_id;*/
169 quote_sharee_id = p_quote_sharee_id;
170
171 IF (SQL%NOTFOUND) THEN
172 RAISE NO_DATA_FOUND;
173 END IF;
174
175 END Update_Row;
176
177 PROCEDURE Delete_Row
178 (
179 p_quote_header_id IN NUMBER,
180 p_party_id IN NUMBER,
181 p_cust_account_id IN NUMBER
182 )
183 IS
184
185 BEGIN
186
187 DELETE FROM IBE_SH_QUOTE_ACCESS
188 WHERE quote_header_id = p_quote_header_id
189 and party_id = p_party_id
190 and cust_account_id = p_cust_account_id;
191
192 IF (SQL%NOTFOUND) THEN
193 RAISE NO_DATA_FOUND;
194 END IF;
195
196 END Delete_Row;
197
198
199
200 END IBE_SH_QUOTE_ACCESS_PKG;