1: Package Body ASO_SUP_TEMPLATE_SCOPE_PKG AS
2: /* $Header: asosptsb.pls 120.1 2005/06/29 12:38:28 appldev ship $*/
3:
4: /* procedure to insert INSERT_ROW */
5:
41: IS
42:
43: cursor c is
44: select ROWID
45: from ASO_SUP_TEMPLATE_SCOPE
46: where TEMPLATE_SCOPE_ID = PX_TEMPLATE_SCOPE_ID ;
47:
48: cursor CU_TEMPLATE_SCOPE_ID IS
49: select aso_sup_tmpl_scope_s.NEXTVAL from sys.dual;
56: CLOSE CU_TEMPLATE_SCOPE_ID;
57:
58: END IF;
59:
60: insert into ASO_SUP_TEMPLATE_SCOPE (
61: TEMPLATE_SCOPE_ID,
62: TEMPLATE_ID,
63: SCOPE_TYPE,
64: SCOPE_VALUE,
171: IS
172:
173: Begin
174:
175: update ASO_SUP_TEMPLATE_SCOPE
176: set
177: TEMPLATE_ID = P_TEMPLATE_ID,
178: SCOPE_TYPE = P_SCOPE_TYPE,
179: SCOPE_VALUE = P_SCOPE_VALUE,
221: IS
222:
223: Begin
224:
225: delete from ASO_SUP_TEMPLATE_SCOPE
226: where TEMPLATE_SCOPE_ID = P_TEMPLATE_SCOPE_ID;
227:
228: if (sql%notfound) then
229: raise no_data_found;
293: ATTRIBUTE13 ,
294: ATTRIBUTE14 ,
295: ATTRIBUTE15
296:
297: from ASO_SUP_TEMPLATE_SCOPE a
298: where a.TEMPLATE_SCOPE_ID = P_TEMPLATE_SCOPE_ID
299: for update of a.TEMPLATE_SCOPE_ID nowait;
300:
301: recinfo i_csr%rowtype;
389:
390: End Lock_Row;
391:
392:
393: END; -- Package Body ASO_SUP_TEMPLATE_SCOPE_PKG