[Home] [Help]
1: Package Body ASO_SUP_TMPL_SECT_MAP_PKG AS
2: /* $Header: asospteb.pls 120.1 2005/06/29 12:38:14 appldev ship $*/
3:
4: /* procedure to insert INSERT_ROW */
5:
40: IS
41:
42: cursor c is
43: select ROWID
44: from ASO_SUP_TMPL_SECT_MAP
45: where TEMPLATE_SECTION_MAP_ID = PX_TEMPLATE_SECTION_MAP_ID ;
46:
47: cursor CU_TEMPLATE_SECTION_MAP_ID IS
48: select ASO_SUP_TMPL_SECT_MAP_S.NEXTVAL from sys.dual;
44: from ASO_SUP_TMPL_SECT_MAP
45: where TEMPLATE_SECTION_MAP_ID = PX_TEMPLATE_SECTION_MAP_ID ;
46:
47: cursor CU_TEMPLATE_SECTION_MAP_ID IS
48: select ASO_SUP_TMPL_SECT_MAP_S.NEXTVAL from sys.dual;
49:
50: Begin
51:
52: IF (PX_TEMPLATE_SECTION_MAP_ID IS NULL) OR (PX_TEMPLATE_SECTION_MAP_ID = FND_API.G_MISS_NUM) THEN
55: CLOSE CU_TEMPLATE_SECTION_MAP_ID;
56:
57: END IF;
58:
59: insert into ASO_SUP_TMPL_SECT_MAP (
60: TEMPLATE_SECTION_MAP_ID,
61: TEMPLATE_ID,
62: SECTION_ID ,
63: DISPLAY_SEQUENCE,
170: IS
171:
172: Begin
173:
174: update ASO_SUP_TMPL_SECT_MAP
175: set
176: TEMPLATE_ID = P_TEMPLATE_ID,
177: SECTION_ID = P_SECTION_ID,
178: DISPLAY_SEQUENCE = P_DISPLAY_SEQUENCE,
220: IS
221:
222: Begin
223:
224: delete from ASO_SUP_TMPL_SECT_MAP
225: where TEMPLATE_SECTION_MAP_ID = P_TEMPLATE_SECTION_MAP_ID;
226:
227: if (sql%notfound) then
228: raise no_data_found;
292: ATTRIBUTE13 ,
293: ATTRIBUTE14 ,
294: ATTRIBUTE15
295:
296: from ASO_SUP_TMPL_SECT_MAP a
297: where a.TEMPLATE_SECTION_MAP_ID = P_TEMPLATE_SECTION_MAP_ID
298: for update of a.TEMPLATE_SECTION_MAP_ID nowait;
299:
300: recinfo i_csr%rowtype;
389: End Lock_Row;
390:
391:
392:
393: END; -- Package Body ASO_SUP_TMPL_SECT_MAP_PKG