[Home] [Help]
1: PACKAGE BODY JA_CN_DFF_ASSIGNMENTS_PKG AS
2: --$Header: JACNDFAB.pls 120.1.12000000.1 2007/08/13 14:09:30 qzhao noship $
3: --+=======================================================================+
4: --| Copyright (c) 2006 Oracle Corporation |
5: --| Redwood Shores, CA, USA |
9: --| JACNDFAB.pls |
10: --| |
11: --| DESCRIPTION |
12: --| This package provides table handers for |
13: --| table JA_CN_DFF_ASSIGNMENTS, these handlers |
14: --| will be called by 'DFF Assignments' form to operate data in table|
15: --| JA_CN_DFF_ASSIGNMENTS |
16: --| |
17: --| PROCEDURE LIST |
11: --| DESCRIPTION |
12: --| This package provides table handers for |
13: --| table JA_CN_DFF_ASSIGNMENTS, these handlers |
14: --| will be called by 'DFF Assignments' form to operate data in table|
15: --| JA_CN_DFF_ASSIGNMENTS |
16: --| |
17: --| PROCEDURE LIST |
18: --| PROCEDURE Insert_Row |
19: --| PROCEDURE Update_Row |
22: --| HISTORY |
23: --| 2006/03/01 Jackey Li Created |
24: --+======================================================================*/
25:
26: G_MODULE_PREFIX VARCHAR2(50) := 'ja.pl/sql.JA_CN_DFF_ASSIGNMENTS_PKG';
27: --==========================================================================
28: -- PROCEDURE NAME:
29: --
30: -- Insert_Row Public
31: --
32: -- DESCRIPTION:
33: --
34: -- This procedure is to insert data that are passed in by parameters into
35: -- table JA_CN_DFF_ASSIGNMENTS to create a new record
36: --
37: -- PARAMETERS:
38: -- In: p_application_id Application ID
39: -- p_dff_name Descriptive Flexfield Name
78: l_proc_level NUMBER := FND_LOG.Level_Procedure;
79:
80: CURSOR C IS
81: SELECT ROWID
82: FROM JA_CN_DFF_ASSIGNMENTS
83: WHERE DFF_TITLE_CODE = p_dff_title_code;
84:
85: BEGIN
86:
90: G_MODULE_PREFIX || '.' || l_procedure_name || '.begin',
91: 'Enter procedure');
92: END IF; --( l_proc_level >= l_dbg_level)
93:
94: --Insert data into table JA_CN_DFF_ASSIGNMENTS
95: INSERT INTO JA_CN_DFF_ASSIGNMENTS
96: (application_id
97: ,descriptive_flexfield_name
98: ,dff_title_code
91: 'Enter procedure');
92: END IF; --( l_proc_level >= l_dbg_level)
93:
94: --Insert data into table JA_CN_DFF_ASSIGNMENTS
95: INSERT INTO JA_CN_DFF_ASSIGNMENTS
96: (application_id
97: ,descriptive_flexfield_name
98: ,dff_title_code
99: ,context_code
149: -- Update_Row Public
150: --
151: -- DESCRIPTION:
152: --
153: -- This procedure is used to update data in table JA_CN_DFF_ASSIGNMENTS
154: -- according to parameters passed in
155: --
156: -- PARAMETERS:
157: -- In: p_application_id Application ID
203: G_MODULE_PREFIX || '.' || l_procedure_name || '.begin',
204: 'Enter procedure');
205: END IF; --( l_proc_level >= l_dbg_level)
206:
207: --Update data on table JA_CN_DFF_ASSIGNMENTS
208: UPDATE JA_CN_DFF_ASSIGNMENTS
209: SET application_id = p_application_id,
210: descriptive_flexfield_name = p_dff_name,
211: dff_title_code = p_dff_title_code,
204: 'Enter procedure');
205: END IF; --( l_proc_level >= l_dbg_level)
206:
207: --Update data on table JA_CN_DFF_ASSIGNMENTS
208: UPDATE JA_CN_DFF_ASSIGNMENTS
209: SET application_id = p_application_id,
210: descriptive_flexfield_name = p_dff_name,
211: dff_title_code = p_dff_title_code,
212: context_code = p_context_code,
240: --
241: -- DESCRIPTION:
242: --
243: -- This procedure is used to implement lock on row level on table
244: -- JA_CN_DFF_ASSIGNMENTS
245: --
246: -- PARAMETERS:
247: -- In: p_application_id Application ID
248: -- p_dff_name Descriptive Flexfield Name
286: l_proc_level NUMBER := FND_LOG.Level_Procedure;
287:
288: CURSOR c IS
289: SELECT *
290: FROM JA_CN_DFF_ASSIGNMENTS
291: WHERE ROWID = p_row_id
292: FOR UPDATE OF dff_title_code NOWAIT;
293:
294: recinfo c%ROWTYPE;
344: 'Exit procedure');
345: END IF; --( l_proc_level >= l_dbg_level)
346: END Lock_Row;
347:
348: END JA_CN_DFF_ASSIGNMENTS_PKG;