1: PACKAGE BODY IGC_CC_MC_HEADERS_PKG as
2: /* $Header: IGCCMCHB.pls 120.3.12000000.1 2007/08/20 12:13:02 mbremkum ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30):= 'IGC_CC_MC_HEADERS_PKG';
5: g_debug_flag VARCHAR2(1) := 'N' ;
1: PACKAGE BODY IGC_CC_MC_HEADERS_PKG as
2: /* $Header: IGCCMCHB.pls 120.3.12000000.1 2007/08/20 12:13:02 mbremkum ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30):= 'IGC_CC_MC_HEADERS_PKG';
5: g_debug_flag VARCHAR2(1) := 'N' ;
6:
7: /* ================================================================================
8: PROCEDURE Insert_Row
16: X_return_status OUT NOCOPY VARCHAR2,
17: X_msg_count OUT NOCOPY NUMBER,
18: X_msg_data OUT NOCOPY VARCHAR2,
19: p_Rowid IN OUT NOCOPY VARCHAR2,
20: p_CC_Header_Id IGC_CC_MC_HEADERS.CC_Header_Id%TYPE,
21: p_Set_Of_Books_Id IGC_CC_MC_HEADERS.Set_Of_Books_Id%TYPE,
22: p_Conversion_Type IGC_CC_MC_HEADERS.Conversion_Type%TYPE,
23: p_Conversion_Date IGC_CC_MC_HEADERS.Conversion_Date%TYPE,
24: p_Conversion_Rate IGC_CC_MC_HEADERS.Conversion_Rate%TYPE
17: X_msg_count OUT NOCOPY NUMBER,
18: X_msg_data OUT NOCOPY VARCHAR2,
19: p_Rowid IN OUT NOCOPY VARCHAR2,
20: p_CC_Header_Id IGC_CC_MC_HEADERS.CC_Header_Id%TYPE,
21: p_Set_Of_Books_Id IGC_CC_MC_HEADERS.Set_Of_Books_Id%TYPE,
22: p_Conversion_Type IGC_CC_MC_HEADERS.Conversion_Type%TYPE,
23: p_Conversion_Date IGC_CC_MC_HEADERS.Conversion_Date%TYPE,
24: p_Conversion_Rate IGC_CC_MC_HEADERS.Conversion_Rate%TYPE
25: )
18: X_msg_data OUT NOCOPY VARCHAR2,
19: p_Rowid IN OUT NOCOPY VARCHAR2,
20: p_CC_Header_Id IGC_CC_MC_HEADERS.CC_Header_Id%TYPE,
21: p_Set_Of_Books_Id IGC_CC_MC_HEADERS.Set_Of_Books_Id%TYPE,
22: p_Conversion_Type IGC_CC_MC_HEADERS.Conversion_Type%TYPE,
23: p_Conversion_Date IGC_CC_MC_HEADERS.Conversion_Date%TYPE,
24: p_Conversion_Rate IGC_CC_MC_HEADERS.Conversion_Rate%TYPE
25: )
26:
19: p_Rowid IN OUT NOCOPY VARCHAR2,
20: p_CC_Header_Id IGC_CC_MC_HEADERS.CC_Header_Id%TYPE,
21: p_Set_Of_Books_Id IGC_CC_MC_HEADERS.Set_Of_Books_Id%TYPE,
22: p_Conversion_Type IGC_CC_MC_HEADERS.Conversion_Type%TYPE,
23: p_Conversion_Date IGC_CC_MC_HEADERS.Conversion_Date%TYPE,
24: p_Conversion_Rate IGC_CC_MC_HEADERS.Conversion_Rate%TYPE
25: )
26:
27:
20: p_CC_Header_Id IGC_CC_MC_HEADERS.CC_Header_Id%TYPE,
21: p_Set_Of_Books_Id IGC_CC_MC_HEADERS.Set_Of_Books_Id%TYPE,
22: p_Conversion_Type IGC_CC_MC_HEADERS.Conversion_Type%TYPE,
23: p_Conversion_Date IGC_CC_MC_HEADERS.Conversion_Date%TYPE,
24: p_Conversion_Rate IGC_CC_MC_HEADERS.Conversion_Rate%TYPE
25: )
26:
27:
28: IS
29:
30: l_api_name CONSTANT VARCHAR2(30) := 'Insert_Row';
31: l_api_version CONSTANT NUMBER := 1.0;
32:
33: CURSOR C IS SELECT Rowid FROM IGC_CC_MC_HEADERS
34: WHERE CC_Header_id = p_CC_Header_id;
35:
36: BEGIN
37:
51: END IF;
52:
53: X_return_status := FND_API.G_RET_STS_SUCCESS ;
54:
55: INSERT INTO IGC_CC_MC_HEADERS (
56: CC_Header_Id,
57: Set_Of_Books_Id,
58: Conversion_Type,
59: Conversion_Date,
125: X_return_status OUT NOCOPY VARCHAR2,
126: X_msg_count OUT NOCOPY NUMBER,
127: X_msg_data OUT NOCOPY VARCHAR2,
128: p_Rowid IN OUT NOCOPY VARCHAR2,
129: p_CC_Header_Id IGC_CC_MC_HEADERS.CC_Header_Id%TYPE,
130: p_Set_Of_Books_Id IGC_CC_MC_HEADERS.Set_Of_Books_Id%TYPE,
131: p_Conversion_Type IGC_CC_MC_HEADERS.Conversion_Type%TYPE,
132: p_Conversion_Date IGC_CC_MC_HEADERS.Conversion_Date%TYPE,
133: p_Conversion_Rate IGC_CC_MC_HEADERS.Conversion_Rate%TYPE,
126: X_msg_count OUT NOCOPY NUMBER,
127: X_msg_data OUT NOCOPY VARCHAR2,
128: p_Rowid IN OUT NOCOPY VARCHAR2,
129: p_CC_Header_Id IGC_CC_MC_HEADERS.CC_Header_Id%TYPE,
130: p_Set_Of_Books_Id IGC_CC_MC_HEADERS.Set_Of_Books_Id%TYPE,
131: p_Conversion_Type IGC_CC_MC_HEADERS.Conversion_Type%TYPE,
132: p_Conversion_Date IGC_CC_MC_HEADERS.Conversion_Date%TYPE,
133: p_Conversion_Rate IGC_CC_MC_HEADERS.Conversion_Rate%TYPE,
134: X_row_locked OUT NOCOPY VARCHAR2
127: X_msg_data OUT NOCOPY VARCHAR2,
128: p_Rowid IN OUT NOCOPY VARCHAR2,
129: p_CC_Header_Id IGC_CC_MC_HEADERS.CC_Header_Id%TYPE,
130: p_Set_Of_Books_Id IGC_CC_MC_HEADERS.Set_Of_Books_Id%TYPE,
131: p_Conversion_Type IGC_CC_MC_HEADERS.Conversion_Type%TYPE,
132: p_Conversion_Date IGC_CC_MC_HEADERS.Conversion_Date%TYPE,
133: p_Conversion_Rate IGC_CC_MC_HEADERS.Conversion_Rate%TYPE,
134: X_row_locked OUT NOCOPY VARCHAR2
135: ) IS
128: p_Rowid IN OUT NOCOPY VARCHAR2,
129: p_CC_Header_Id IGC_CC_MC_HEADERS.CC_Header_Id%TYPE,
130: p_Set_Of_Books_Id IGC_CC_MC_HEADERS.Set_Of_Books_Id%TYPE,
131: p_Conversion_Type IGC_CC_MC_HEADERS.Conversion_Type%TYPE,
132: p_Conversion_Date IGC_CC_MC_HEADERS.Conversion_Date%TYPE,
133: p_Conversion_Rate IGC_CC_MC_HEADERS.Conversion_Rate%TYPE,
134: X_row_locked OUT NOCOPY VARCHAR2
135: ) IS
136: l_api_name CONSTANT VARCHAR2(30) := 'Lock_Row';
129: p_CC_Header_Id IGC_CC_MC_HEADERS.CC_Header_Id%TYPE,
130: p_Set_Of_Books_Id IGC_CC_MC_HEADERS.Set_Of_Books_Id%TYPE,
131: p_Conversion_Type IGC_CC_MC_HEADERS.Conversion_Type%TYPE,
132: p_Conversion_Date IGC_CC_MC_HEADERS.Conversion_Date%TYPE,
133: p_Conversion_Rate IGC_CC_MC_HEADERS.Conversion_Rate%TYPE,
134: X_row_locked OUT NOCOPY VARCHAR2
135: ) IS
136: l_api_name CONSTANT VARCHAR2(30) := 'Lock_Row';
137: l_api_version CONSTANT NUMBER := 1.0;
138: Counter NUMBER;
139:
140: CURSOR C IS
141: SELECT *
142: FROM IGC_CC_MC_HEADERS
143: WHERE rowid = p_Rowid
144: FOR UPDATE of CC_Header_Id NOWAIT;
145: Recinfo C%ROWTYPE;
146: BEGIN
253: X_return_status OUT NOCOPY VARCHAR2,
254: X_msg_count OUT NOCOPY NUMBER,
255: X_msg_data OUT NOCOPY VARCHAR2,
256: p_Rowid IN OUT NOCOPY VARCHAR2,
257: p_CC_Header_Id IGC_CC_MC_HEADERS.CC_Header_Id%TYPE,
258: p_Set_Of_Books_Id IGC_CC_MC_HEADERS.Set_Of_Books_Id%TYPE,
259: p_Conversion_Type IGC_CC_MC_HEADERS.Conversion_Type%TYPE,
260: p_Conversion_Date IGC_CC_MC_HEADERS.Conversion_Date%TYPE,
261: p_Conversion_Rate IGC_CC_MC_HEADERS.Conversion_Rate%TYPE
254: X_msg_count OUT NOCOPY NUMBER,
255: X_msg_data OUT NOCOPY VARCHAR2,
256: p_Rowid IN OUT NOCOPY VARCHAR2,
257: p_CC_Header_Id IGC_CC_MC_HEADERS.CC_Header_Id%TYPE,
258: p_Set_Of_Books_Id IGC_CC_MC_HEADERS.Set_Of_Books_Id%TYPE,
259: p_Conversion_Type IGC_CC_MC_HEADERS.Conversion_Type%TYPE,
260: p_Conversion_Date IGC_CC_MC_HEADERS.Conversion_Date%TYPE,
261: p_Conversion_Rate IGC_CC_MC_HEADERS.Conversion_Rate%TYPE
262:
255: X_msg_data OUT NOCOPY VARCHAR2,
256: p_Rowid IN OUT NOCOPY VARCHAR2,
257: p_CC_Header_Id IGC_CC_MC_HEADERS.CC_Header_Id%TYPE,
258: p_Set_Of_Books_Id IGC_CC_MC_HEADERS.Set_Of_Books_Id%TYPE,
259: p_Conversion_Type IGC_CC_MC_HEADERS.Conversion_Type%TYPE,
260: p_Conversion_Date IGC_CC_MC_HEADERS.Conversion_Date%TYPE,
261: p_Conversion_Rate IGC_CC_MC_HEADERS.Conversion_Rate%TYPE
262:
263: ) IS
256: p_Rowid IN OUT NOCOPY VARCHAR2,
257: p_CC_Header_Id IGC_CC_MC_HEADERS.CC_Header_Id%TYPE,
258: p_Set_Of_Books_Id IGC_CC_MC_HEADERS.Set_Of_Books_Id%TYPE,
259: p_Conversion_Type IGC_CC_MC_HEADERS.Conversion_Type%TYPE,
260: p_Conversion_Date IGC_CC_MC_HEADERS.Conversion_Date%TYPE,
261: p_Conversion_Rate IGC_CC_MC_HEADERS.Conversion_Rate%TYPE
262:
263: ) IS
264:
257: p_CC_Header_Id IGC_CC_MC_HEADERS.CC_Header_Id%TYPE,
258: p_Set_Of_Books_Id IGC_CC_MC_HEADERS.Set_Of_Books_Id%TYPE,
259: p_Conversion_Type IGC_CC_MC_HEADERS.Conversion_Type%TYPE,
260: p_Conversion_Date IGC_CC_MC_HEADERS.Conversion_Date%TYPE,
261: p_Conversion_Rate IGC_CC_MC_HEADERS.Conversion_Rate%TYPE
262:
263: ) IS
264:
265: l_api_name CONSTANT VARCHAR2(30) := 'Update_Row';
283: END IF;
284:
285: X_return_status := FND_API.G_RET_STS_SUCCESS ;
286:
287: UPDATE IGC_CC_MC_HEADERS
288: SET
289: CC_Header_Id = p_CC_Header_Id,
290: Set_Of_Books_Id = p_Set_Of_Books_Id,
291: Conversion_Type = p_Conversion_Type,
376:
377: X_return_status := FND_API.G_RET_STS_SUCCESS ;
378:
379: DELETE
380: FROM IGC_CC_MC_HEADERS
381: WHERE rowid = p_Rowid;
382:
383: if (SQL%NOTFOUND) then
384: Raise NO_DATA_FOUND;
422:
423:
424: END Delete_Row;
425:
426: END IGC_CC_MC_HEADERS_PKG;