APPS.PN_INDEX_HISTORY_LINES_PKG dependencies on PN_INDEX_HISTORY_LINES_PKG

Line 1: PACKAGE BODY pn_index_history_lines_pkg AS

1: PACKAGE BODY pn_index_history_lines_pkg AS
2: -- $Header: PNTINHLB.pls 115.6 2002/11/12 23:06:12 stripath ship $
3:
4: /*============================================================================+
5: | Copyright (c) 2001 Oracle Corporation

Line 71: --PNP_DEBUG_PKG.debug (' PN_INDEX_HISTORY_LINES_PKG.insert_row (+)');

67: l_return_status VARCHAR2 (30) := NULL;
68: l_rowid VARCHAR2 (18) := NULL;
69: BEGIN
70:
71: --PNP_DEBUG_PKG.debug (' PN_INDEX_HISTORY_LINES_PKG.insert_row (+)');
72: -- If no INDEX_LINE_ID is provided, get one from sequence
73: IF (x_index_line_id IS NULL) THEN
74: SELECT pn_index_history_lines_s.NEXTVAL
75: INTO x_index_line_id

Line 163: --PNP_DEBUG_PKG.debug (' PN_INDEX_HISTORY_LINES_PKG.insert_row (-)');

159: END IF;
160:
161: CLOSE c;
162:
163: --PNP_DEBUG_PKG.debug (' PN_INDEX_HISTORY_LINES_PKG.insert_row (-)');
164: END insert_row;
165:
166:
167: ------------------------------------------------------------------------

Line 205: --PNP_DEBUG_PKG.debug (' PN_INDEX_HISTORY_LINES_PKG.update_row (+)');

201: ) IS
202: l_return_status VARCHAR2 (30) := NULL;
203: BEGIN
204:
205: --PNP_DEBUG_PKG.debug (' PN_INDEX_HISTORY_LINES_PKG.update_row (+)');
206:
207: check_unq_index_line (l_return_status, x_index_id, x_index_line_id, x_index_date);
208:
209: IF (l_return_status IS NOT NULL) THEN

Line 248: --PNP_DEBUG_PKG.debug (' PN_INDEX_HISTORY_LINES_PKG.update_row (-)');

244: IF (SQL%NOTFOUND) THEN
245: RAISE NO_DATA_FOUND;
246: END IF;
247:
248: --PNP_DEBUG_PKG.debug (' PN_INDEX_HISTORY_LINES_PKG.update_row (-)');
249: END update_row;
250:
251:
252: ------------------------------------------------------------------------

Line 293: --PNP_DEBUG_PKG.debug (' PN_INDEX_HISTORY_LINES_PKG.lock_row (+)');

289:
290: tlinfo c1%ROWTYPE;
291: BEGIN
292:
293: --PNP_DEBUG_PKG.debug (' PN_INDEX_HISTORY_LINES_PKG.lock_row (+)');
294: OPEN c1;
295: FETCH c1 INTO tlinfo;
296:
297: IF (c1%NOTFOUND) THEN

Line 344: --PNP_DEBUG_PKG.debug (' PN_INDEX_HISTORY_LINES_PKG.lock_row (-)');

340: fnd_message.set_name ('FND', 'FORM_RECORD_CHANGED');
341: app_exception.raise_exception;
342: END IF;
343:
344: --PNP_DEBUG_PKG.debug (' PN_INDEX_HISTORY_LINES_PKG.lock_row (-)');
345: END lock_row;
346:
347:
348: ------------------------------------------------------------------------

Line 356: --PNP_DEBUG_PKG.debug (' PN_INDEX_HISTORY_LINES_PKG.delete_row (+)');

352: x_rowid IN VARCHAR2
353: ) IS
354: BEGIN
355:
356: --PNP_DEBUG_PKG.debug (' PN_INDEX_HISTORY_LINES_PKG.delete_row (+)');
357: DELETE FROM pn_index_history_lines
358: WHERE ROWID = x_rowid;
359:
360: IF (SQL%NOTFOUND) THEN

Line 364: --PNP_DEBUG_PKG.debug (' PN_INDEX_HISTORY_LINES_PKG.delete_row (-)');

360: IF (SQL%NOTFOUND) THEN
361: RAISE NO_DATA_FOUND;
362: END IF;
363:
364: --PNP_DEBUG_PKG.debug (' PN_INDEX_HISTORY_LINES_PKG.delete_row (-)');
365: END delete_row;
366:
367: PROCEDURE check_unq_index_line (
368: x_return_status IN OUT NOCOPY VARCHAR2

Line 394: END pn_index_history_lines_pkg;

390:
391: -- fnd_message.set_token ('MONTH', x_index_date);
392: x_return_status := 'E';
393: END check_unq_index_line;
394: END pn_index_history_lines_pkg;