1: PACKAGE BODY gme_resource_txns_dbl AS
2: /* $Header: GMEVGRTB.pls 120.2 2005/07/12 12:35:43 snene noship $ */
3:
4: /* Global Variables */
5: g_table_name VARCHAR2 (80) DEFAULT 'GME_RESOURCE_TXNS';
1: PACKAGE BODY gme_resource_txns_dbl AS
2: /* $Header: GMEVGRTB.pls 120.2 2005/07/12 12:35:43 snene noship $ */
3:
4: /* Global Variables */
5: g_table_name VARCHAR2 (80) DEFAULT 'GME_RESOURCE_TXNS';
6:
7: /*============================================================================
8: | Copyright (c) 2001 Oracle Corporation
9: | TVP, Reading
42: |
43: | TYPE
44: | Private
45: | USAGE
46: | Insert_Row will insert a row in gme_resource_txns
47: |
48: |
49: | DESCRIPTION
50: | Insert_Row will insert a row in gme_resource_txns
46: | Insert_Row will insert a row in gme_resource_txns
47: |
48: |
49: | DESCRIPTION
50: | Insert_Row will insert a row in gme_resource_txns
51: |
52: |
53: |
54: | PARAMETERS
51: |
52: |
53: |
54: | PARAMETERS
55: | p_resource_txns IN gme_resource_txns%ROWTYPE
56: | x_resource_txns IN OUT NOCOPY gme_resource_txns%ROWTYPE
57: |
58: | RETURNS
59: | BOOLEAN
52: |
53: |
54: | PARAMETERS
55: | p_resource_txns IN gme_resource_txns%ROWTYPE
56: | x_resource_txns IN OUT NOCOPY gme_resource_txns%ROWTYPE
57: |
58: | RETURNS
59: | BOOLEAN
60: | HISTORY
67: +=============================================================================
68: Api end of comments
69: */
70: FUNCTION insert_row (
71: p_resource_txns IN gme_resource_txns%ROWTYPE
72: ,x_resource_txns IN OUT NOCOPY gme_resource_txns%ROWTYPE)
73: RETURN BOOLEAN
74: IS
75: BEGIN
68: Api end of comments
69: */
70: FUNCTION insert_row (
71: p_resource_txns IN gme_resource_txns%ROWTYPE
72: ,x_resource_txns IN OUT NOCOPY gme_resource_txns%ROWTYPE)
73: RETURN BOOLEAN
74: IS
75: BEGIN
76: x_resource_txns := p_resource_txns;
74: IS
75: BEGIN
76: x_resource_txns := p_resource_txns;
77:
78: INSERT INTO gme_resource_txns
79: (poc_trans_id
80: ,organization_id
81: ,doc_type, doc_id
82: ,line_type, line_id
176: |
177: | TYPE
178: | Private
179: | USAGE
180: | Fetch_Row will fetch a row in gme_resource_txns
181: |
182: |
183: | DESCRIPTION
184: | Fetch_Row will fetch a row in gme_resource_txns
180: | Fetch_Row will fetch a row in gme_resource_txns
181: |
182: |
183: | DESCRIPTION
184: | Fetch_Row will fetch a row in gme_resource_txns
185: |
186: |
187: |
188: | PARAMETERS
185: |
186: |
187: |
188: | PARAMETERS
189: | p_resource_txns IN gme_resource_txns%ROWTYPE
190: | x_resource_txns IN OUT NOCOPY gme_resource_txns%ROWTYPE
191: |
192: | RETURNS
193: | BOOLEAN
186: |
187: |
188: | PARAMETERS
189: | p_resource_txns IN gme_resource_txns%ROWTYPE
190: | x_resource_txns IN OUT NOCOPY gme_resource_txns%ROWTYPE
191: |
192: | RETURNS
193: | BOOLEAN
194: | HISTORY
201: +=============================================================================
202: Api end of comments
203: */
204: FUNCTION fetch_row (
205: p_resource_txns IN gme_resource_txns%ROWTYPE
206: ,x_resource_txns IN OUT NOCOPY gme_resource_txns%ROWTYPE)
207: RETURN BOOLEAN
208: IS
209: BEGIN
202: Api end of comments
203: */
204: FUNCTION fetch_row (
205: p_resource_txns IN gme_resource_txns%ROWTYPE
206: ,x_resource_txns IN OUT NOCOPY gme_resource_txns%ROWTYPE)
207: RETURN BOOLEAN
208: IS
209: BEGIN
210: IF p_resource_txns.poc_trans_id IS NOT NULL THEN
285: ,x_resource_txns.request_id
286: ,x_resource_txns.program_update_date
287: --10-AUG-04 Rishi Varma B3818266/3759970
288: , x_resource_txns.reverse_id
289: FROM gme_resource_txns
290: WHERE poc_trans_id = p_resource_txns.poc_trans_id;
291: ELSE
292: gme_common_pvt.log_message ('GME_NO_KEYS'
293: ,'TABLE_NAME'
315: |
316: | TYPE
317: | Private
318: | USAGE
319: | Delete_Row will delete a row in gme_resource_txns
320: |
321: |
322: | DESCRIPTION
323: | Delete_Row will delete a row in gme_resource_txns
319: | Delete_Row will delete a row in gme_resource_txns
320: |
321: |
322: | DESCRIPTION
323: | Delete_Row will delete a row in gme_resource_txns
324: |
325: |
326: |
327: | PARAMETERS
324: |
325: |
326: |
327: | PARAMETERS
328: | p_resource_txns IN gme_resource_txns%ROWTYPE
329: |
330: | RETURNS
331: | BOOLEAN
332: | HISTORY
336: |
337: +=============================================================================
338: Api end of comments
339: */
340: FUNCTION delete_row (p_resource_txns IN gme_resource_txns%ROWTYPE)
341: RETURN BOOLEAN
342: IS
343: l_dummy NUMBER := 0;
344: locked_by_other_user EXCEPTION;
346: BEGIN
347: IF p_resource_txns.poc_trans_id IS NOT NULL THEN
348: SELECT 1
349: INTO l_dummy
350: FROM gme_resource_txns
351: WHERE poc_trans_id = p_resource_txns.poc_trans_id
352: FOR UPDATE NOWAIT;
353:
354: DELETE FROM gme_resource_txns
350: FROM gme_resource_txns
351: WHERE poc_trans_id = p_resource_txns.poc_trans_id
352: FOR UPDATE NOWAIT;
353:
354: DELETE FROM gme_resource_txns
355: WHERE poc_trans_id = p_resource_txns.poc_trans_id;
356: ELSE
357: gme_common_pvt.log_message ('GME_NO_KEYS'
358: ,'TABLE_NAME'
410: |
411: | TYPE
412: | Private
413: | USAGE
414: | Update_Row will update a row in gme_resource_txns
415: |
416: |
417: | DESCRIPTION
418: | Update_Row will update a row in gme_resource_txns
414: | Update_Row will update a row in gme_resource_txns
415: |
416: |
417: | DESCRIPTION
418: | Update_Row will update a row in gme_resource_txns
419: |
420: |
421: |
422: | PARAMETERS
419: |
420: |
421: |
422: | PARAMETERS
423: | p_resource_txns IN gme_resource_txns%ROWTYPE
424: |
425: | RETURNS
426: | BOOLEAN
427: | HISTORY
434: |
435: +=============================================================================
436: Api end of comments
437: */
438: FUNCTION update_row (p_resource_txns IN gme_resource_txns%ROWTYPE)
439: RETURN BOOLEAN
440: IS
441: l_dummy NUMBER := 0;
442: locked_by_other_user EXCEPTION;
444: BEGIN
445: IF p_resource_txns.poc_trans_id IS NOT NULL THEN
446: SELECT 1
447: INTO l_dummy
448: FROM gme_resource_txns
449: WHERE poc_trans_id = p_resource_txns.poc_trans_id
450: FOR UPDATE NOWAIT;
451:
452: UPDATE gme_resource_txns
448: FROM gme_resource_txns
449: WHERE poc_trans_id = p_resource_txns.poc_trans_id
450: FOR UPDATE NOWAIT;
451:
452: UPDATE gme_resource_txns
453: SET organization_id = p_resource_txns.organization_id
454: ,doc_type = p_resource_txns.doc_type
455: ,doc_id = p_resource_txns.doc_id
456: ,line_type = p_resource_txns.line_type
572: |
573: | TYPE
574: | Private
575: | USAGE
576: | Lock_Row will lock a row in gme_resource_txns
577: |
578: |
579: | DESCRIPTION
580: | Lock_Row will lock a row in gme_resource_txns
576: | Lock_Row will lock a row in gme_resource_txns
577: |
578: |
579: | DESCRIPTION
580: | Lock_Row will lock a row in gme_resource_txns
581: |
582: |
583: |
584: | PARAMETERS
581: |
582: |
583: |
584: | PARAMETERS
585: | p_resource_txns IN gme_resource_txns%ROWTYPE
586: |
587: | RETURNS
588: | BOOLEAN
589: | HISTORY
593: |
594: +=============================================================================
595: Api end of comments
596: */
597: FUNCTION lock_row (p_resource_txns IN gme_resource_txns%ROWTYPE)
598: RETURN BOOLEAN
599: IS
600: l_dummy NUMBER;
601: BEGIN
601: BEGIN
602: IF p_resource_txns.poc_trans_id IS NOT NULL THEN
603: SELECT 1
604: INTO l_dummy
605: FROM gme_resource_txns
606: WHERE poc_trans_id = p_resource_txns.poc_trans_id
607: FOR UPDATE NOWAIT;
608: END IF;
609:
620: RETURN FALSE;
621: WHEN OTHERS THEN
622: RETURN FALSE;
623: END lock_row;
624: END gme_resource_txns_dbl;