PACKAGE BODY: APPS.CS_SR_FUL_AMV_PKG

Source

1 PACKAGE BODY CS_SR_FUL_AMV_PKG  as
2 /* $Header: cssruplb.pls 115.3 2001/04/30 11:48:31 pkm ship        $ */
3 
4 -- ------------------------------------------------------
5 -- Update jtf_amv_attachment tables
6 -- ------------------------------------------------------
7   PROCEDURE Update_AMV(p_file_id in Number)
8   IS
9 
10   BEGIN
11       UPDATE JTF_AMV_ATTACHMENTS
12 	    SET FILE_ID = p_file_id
13       WHERE ATTACHMENT_USED_BY_ID = 1000;
14 
15       UPDATE FND_LOBS
16         SET FILE_NAME = 'SRseed.html'
17      WHERE  FILE_ID = p_file_id;
18 
19       COMMIT WORK;
20 
21   EXCEPTION
22     WHEN NO_DATA_FOUND THEN
23           null;
24    -- message
25     WHEN OTHERS THEN
26 	    null;
27    -- message
28 
29   END Update_AMV;
30 
31 END CS_SR_FUL_AMV_PKG;