38: P_ATTRIBUTE14 in VARCHAR2,
39: P_ATTRIBUTE15 in VARCHAR2
40: ) is
41:
42: cursor C is select ROWID from CSD_BULLETINS_B
43: where BULLETIN_ID = PX_BULLETIN_ID
44: ;
45:
46: begin
48: select CSD_BULLETINS_S1.nextval
49: into PX_BULLETIN_ID
50: from dual;
51:
52: insert into CSD_BULLETINS_B (
53: BULLETIN_ID,
54: OBJECT_VERSION_NUMBER,
55: CREATION_DATE,
56: CREATED_BY,
162: P_OBJECT_VERSION_NUMBER in NUMBER
163: ) is
164: cursor c is select
165: OBJECT_VERSION_NUMBER
166: from CSD_BULLETINS_B
167: where BULLETIN_ID = P_BULLETIN_ID
168: for update of BULLETIN_ID nowait;
169: recinfo c%rowtype;
170:
240: P_ATTRIBUTE14 in VARCHAR2,
241: P_ATTRIBUTE15 in VARCHAR2
242: ) is
243: begin
244: update CSD_BULLETINS_B set
245: OBJECT_VERSION_NUMBER = decode( P_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, NULL, NULL, OBJECT_VERSION_NUMBER, P_OBJECT_VERSION_NUMBER)
246: ,CREATED_BY = decode( P_CREATED_BY, FND_API.G_MISS_NUM, NULL, NULL, CREATED_BY, P_CREATED_BY)
247: ,CREATION_DATE = decode( P_CREATION_DATE, FND_API.G_MISS_DATE, NULL, NULL, CREATION_DATE, P_CREATION_DATE)
248: ,LAST_UPDATED_BY = decode( P_LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL, NULL, LAST_UPDATED_BY, P_LAST_UPDATED_BY)
310: if (sql%notfound) then
311: raise no_data_found;
312: end if;
313:
314: delete from CSD_BULLETINS_B
315: where BULLETIN_ID = P_BULLETIN_ID;
316:
317: if (sql%notfound) then
318: raise no_data_found;
324: begin
325: delete from CSD_BULLETINS_TL T
326: where not exists
327: (select NULL
328: from CSD_BULLETINS_B B
329: where B.BULLETIN_ID = T.BULLETIN_ID
330: );
331:
332: update CSD_BULLETINS_TL T set (