[Home] [Help]
1 PACKAGE BODY PA_AGREEMENT_TYPES_PUB as
2 /* $Header: PAXATPBB.pls 120.1 2005/08/05 00:52:59 rgandhi noship $ */
3
4
5 PROCEDURE Insert_Row(X_Agreement_Type VARCHAR2,
6 X_Last_Update_Date DATE,
7 X_Last_Updated_By NUMBER,
8 X_Creation_Date DATE,
9 X_Created_By NUMBER,
10 X_Last_Update_Login NUMBER,
11 X_Revenue_Limit_Flag VARCHAR2,
12 X_Start_Date_Active DATE,
13 X_End_Date_Active DATE,
14 X_Description VARCHAR2,
15 X_Term_Id NUMBER,
16 X_Attribute_Category VARCHAR2,
17 X_Attribute1 VARCHAR2,
18 X_Attribute2 VARCHAR2,
19 X_Attribute3 VARCHAR2,
20 X_Attribute4 VARCHAR2,
21 X_Attribute5 VARCHAR2,
22 X_Attribute6 VARCHAR2,
23 X_Attribute7 VARCHAR2,
24 X_Attribute8 VARCHAR2,
25 X_Attribute9 VARCHAR2,
26 X_Attribute10 VARCHAR2,
27 X_Attribute11 VARCHAR2,
28 X_Attribute12 VARCHAR2,
29 X_Attribute13 VARCHAR2,
30 X_Attribute14 VARCHAR2,
31 X_Attribute15 VARCHAR2,
32 X_return_status OUT NOCOPY VARCHAR2,/*file.sql.39*/
33 X_msg_count OUT NOCOPY NUMBER,/*File.sql.39*/
34 X_msg_data OUT NOCOPY VARCHAR2 /*File.sql.39*/
35 )
36 IS
37 BEGIN
38
39 PA_AGREEMENT_TYPES_PKG.Insert_Row(
40 X_Agreement_Type => X_Agreement_Type ,
41 X_Last_Update_Date => X_Last_Update_Date ,
42 X_Last_Updated_By => X_Last_Updated_By ,
43 X_Creation_Date => X_Creation_Date ,
44 X_Created_By => X_Created_By ,
45 X_Last_Update_Login => X_Last_Update_Login ,
46 X_Revenue_Limit_Flag => X_Revenue_Limit_Flag ,
47 X_Start_Date_Active => X_Start_Date_Active ,
48 X_End_Date_Active => X_End_Date_Active ,
49 X_Description => X_Description ,
50 X_Term_Id => X_Term_Id ,
51 X_Attribute_Category => X_Attribute_Category ,
52 X_Attribute1 => X_Attribute1 ,
53 X_Attribute2 => X_Attribute2 ,
54 X_Attribute3 => X_Attribute3 ,
55 X_Attribute4 => X_Attribute4 ,
56 X_Attribute5 => X_Attribute5 ,
57 X_Attribute6 => X_Attribute6 ,
58 X_Attribute7 => X_Attribute7 ,
59 X_Attribute8 => X_Attribute8 ,
60 X_Attribute9 => X_Attribute9 ,
61 X_Attribute10 => X_Attribute10 ,
62 X_Attribute11 => X_Attribute11 ,
63 X_Attribute12 => X_Attribute12 ,
64 X_Attribute13 => X_Attribute13 ,
65 X_Attribute14 => X_Attribute14 ,
66 X_Attribute15 => X_Attribute15 ,
67 X_return_status => X_return_status ,
68 X_msg_count => X_msg_count ,
69 X_msg_data => X_msg_data
70 );
71
72 EXCEPTION
73 WHEN OTHERS THEN
74 X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
75 X_msg_count := 1;
76 X_msg_data := SQLERRM;
77
78 FND_MSG_PUB.add_exc_msg
79 ( p_pkg_name => 'PA_AGREEMENT_TYPES_PUB' ,
80 p_procedure_name => 'Insert_Row');
81
82 END ;
83
84 PROCEDURE Lock_Row(X_Agreement_Type VARCHAR2,
85 X_Last_Update_Date DATE,
86 X_Last_Updated_By NUMBER,
87 X_Creation_Date DATE,
88 X_Created_By NUMBER,
89 X_Last_Update_Login NUMBER,
90 X_Revenue_Limit_Flag VARCHAR2,
91 X_Start_Date_Active DATE,
92 X_End_Date_Active DATE,
93 X_Description VARCHAR2,
94 X_Term_Id NUMBER,
95 X_Attribute_Category VARCHAR2,
96 X_Attribute1 VARCHAR2,
97 X_Attribute2 VARCHAR2,
98 X_Attribute3 VARCHAR2,
99 X_Attribute4 VARCHAR2,
100 X_Attribute5 VARCHAR2,
101 X_Attribute6 VARCHAR2,
102 X_Attribute7 VARCHAR2,
103 X_Attribute8 VARCHAR2,
104 X_Attribute9 VARCHAR2,
105 X_Attribute10 VARCHAR2,
106 X_Attribute11 VARCHAR2,
107 X_Attribute12 VARCHAR2,
108 X_Attribute13 VARCHAR2,
109 X_Attribute14 VARCHAR2,
110 X_Attribute15 VARCHAR2,
111 X_return_status OUT NOCOPY VARCHAR2,/*File.sql.39*/
112 X_msg_count OUT NOCOPY NUMBER,/*File.sql.39*/
113 X_msg_data OUT NOCOPY VARCHAR2/*File.sql.39*/
114 )
115 IS
116 BEGIN
117 PA_AGREEMENT_TYPES_PKG.Lock_Row(
118 X_Agreement_Type => X_Agreement_Type ,
119 X_Last_Update_Date => X_Last_Update_Date ,
120 X_Last_Updated_By => X_Last_Updated_By ,
121 X_Creation_Date => X_Creation_Date ,
122 X_Created_By => X_Created_By ,
123 X_Last_Update_Login => X_Last_Update_Login ,
124 X_Revenue_Limit_Flag => X_Revenue_Limit_Flag ,
125 X_Start_Date_Active => X_Start_Date_Active ,
126 X_End_Date_Active => X_End_Date_Active ,
127 X_Description => X_Description ,
128 X_Term_Id => X_Term_Id ,
129 X_Attribute_Category => X_Attribute_Category ,
130 X_Attribute1 => X_Attribute1 ,
131 X_Attribute2 => X_Attribute2 ,
132 X_Attribute3 => X_Attribute3 ,
133 X_Attribute4 => X_Attribute4 ,
134 X_Attribute5 => X_Attribute5 ,
135 X_Attribute6 => X_Attribute6 ,
136 X_Attribute7 => X_Attribute7 ,
137 X_Attribute8 => X_Attribute8 ,
138 X_Attribute9 => X_Attribute9 ,
139 X_Attribute10 => X_Attribute10 ,
140 X_Attribute11 => X_Attribute11 ,
141 X_Attribute12 => X_Attribute12 ,
142 X_Attribute13 => X_Attribute13 ,
143 X_Attribute14 => X_Attribute14 ,
144 X_Attribute15 => X_Attribute15 ,
145 X_return_status => X_return_status ,
146 X_msg_count => X_msg_count ,
147 X_msg_data => X_msg_data
148 );
149
150 EXCEPTION
151 WHEN OTHERS THEN
152 X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
153 X_msg_count := 1;
154 X_msg_data := SQLERRM;
155
156 FND_MSG_PUB.add_exc_msg
157 ( p_pkg_name => 'PA_AGREEMENT_TYPES_PUB' ,
158 p_procedure_name => 'Lock_Row');
159
160 END ;
161
162 PROCEDURE Update_Row(X_Agreement_Type VARCHAR2,
163 X_Last_Update_Date DATE,
164 X_Last_Updated_By NUMBER,
165 X_Creation_Date DATE,
166 X_Created_By NUMBER,
167 X_Last_Update_Login NUMBER,
168 X_Revenue_Limit_Flag VARCHAR2,
169 X_Start_Date_Active DATE,
170 X_End_Date_Active DATE,
171 X_Description VARCHAR2,
172 X_Term_Id NUMBER,
173 X_Attribute_Category VARCHAR2,
174 X_Attribute1 VARCHAR2,
175 X_Attribute2 VARCHAR2,
179 X_Attribute6 VARCHAR2,
176 X_Attribute3 VARCHAR2,
177 X_Attribute4 VARCHAR2,
178 X_Attribute5 VARCHAR2,
180 X_Attribute7 VARCHAR2,
181 X_Attribute8 VARCHAR2,
182 X_Attribute9 VARCHAR2,
183 X_Attribute10 VARCHAR2,
184 X_Attribute11 VARCHAR2,
185 X_Attribute12 VARCHAR2,
186 X_Attribute13 VARCHAR2,
187 X_Attribute14 VARCHAR2,
188 X_Attribute15 VARCHAR2,
189 X_return_status OUT NOCOPY VARCHAR2,/*File.sql.39*/
190 X_msg_count OUT NOCOPY NUMBER,/*File.sql.39*/
191 X_msg_data OUT NOCOPY VARCHAR2/*File.sql.39*/
192 )
193 IS
194 BEGIN
195 PA_AGREEMENT_TYPES_PKG.Update_Row(
196 X_Agreement_Type => X_Agreement_Type ,
197 X_Last_Update_Date => X_Last_Update_Date ,
198 X_Last_Updated_By => X_Last_Updated_By ,
199 X_Creation_Date => X_Creation_Date ,
200 X_Created_By => X_Created_By ,
201 X_Last_Update_Login => X_Last_Update_Login ,
202 X_Revenue_Limit_Flag => X_Revenue_Limit_Flag ,
203 X_Start_Date_Active => X_Start_Date_Active ,
204 X_End_Date_Active => X_End_Date_Active ,
205 X_Description => X_Description ,
206 X_Term_Id => X_Term_Id ,
207 X_Attribute_Category => X_Attribute_Category ,
208 X_Attribute1 => X_Attribute1 ,
209 X_Attribute2 => X_Attribute2 ,
210 X_Attribute3 => X_Attribute3 ,
211 X_Attribute4 => X_Attribute4 ,
212 X_Attribute5 => X_Attribute5 ,
213 X_Attribute6 => X_Attribute6 ,
214 X_Attribute7 => X_Attribute7 ,
215 X_Attribute8 => X_Attribute8 ,
216 X_Attribute9 => X_Attribute9 ,
217 X_Attribute10 => X_Attribute10 ,
218 X_Attribute11 => X_Attribute11 ,
219 X_Attribute12 => X_Attribute12 ,
220 X_Attribute13 => X_Attribute13 ,
221 X_Attribute14 => X_Attribute14 ,
222 X_Attribute15 => X_Attribute15 ,
223 X_return_status => X_return_status ,
224 X_msg_count => X_msg_count ,
225 X_msg_data => X_msg_data
226 );
227
228 EXCEPTION
229 WHEN OTHERS THEN
230 X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
231 X_msg_count := 1;
232 X_msg_data := SQLERRM;
233
234 FND_MSG_PUB.add_exc_msg
235 ( p_pkg_name => 'PA_AGREEMENT_TYPES_PUB' ,
236 p_procedure_name => 'Insert_Row');
237 END;
238 END PA_AGREEMENT_TYPES_PUB;|
|
|
|