DBA Data[Home] [Help]

APPS.OE_DBI_UTIL dependencies on OE_DEBUG_PUB

Line 29: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

25: from oe_order_lines_all
26: where header_id = p_header_id;
27:
28: --
29: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
30: --
31: TYPE line_index_tbl IS TABLE OF VARCHAR2(1)
32: INDEX BY VARCHAR2(40);
33: l_line_index_tbl line_index_tbl;

Line 53: oe_debug_pub.add( 'ENTERING UPDATE_DBI API' , 1 ) ;

49:
50: BEGIN
51:
52: IF l_debug_level > 0 THEN
53: oe_debug_pub.add( 'ENTERING UPDATE_DBI API' , 1 ) ;
54: END IF;
55: x_return_status := FND_API.G_RET_STS_SUCCESS;
56:
57: l_set_of_books_rec := OE_ORDER_CACHE.LOAD_SET_OF_BOOKS;

Line 62: oe_debug_pub.add( 'SET_OF_BOOKS_ID= '|| L_SET_OF_BOOKS_ID , 1 ) ;

58: l_set_of_books_id := l_set_of_books_rec.set_of_books_id;
59: l_currency_code := l_set_of_books_rec.currency_code;
60:
61: IF (l_set_of_books_id IS NULL) OR (l_currency_code IS NULL) THEN
62: oe_debug_pub.add( 'SET_OF_BOOKS_ID= '|| L_SET_OF_BOOKS_ID , 1 ) ;
63: oe_debug_pub.add( 'CURRENCY_CODE= '|| L_CURRENCY_CODE , 1 ) ;
64: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
65: END IF;
66:

Line 63: oe_debug_pub.add( 'CURRENCY_CODE= '|| L_CURRENCY_CODE , 1 ) ;

59: l_currency_code := l_set_of_books_rec.currency_code;
60:
61: IF (l_set_of_books_id IS NULL) OR (l_currency_code IS NULL) THEN
62: oe_debug_pub.add( 'SET_OF_BOOKS_ID= '|| L_SET_OF_BOOKS_ID , 1 ) ;
63: oe_debug_pub.add( 'CURRENCY_CODE= '|| L_CURRENCY_CODE , 1 ) ;
64: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
65: END IF;
66:
67:

Line 77: oe_debug_pub.add( 'SOMETHING IN THE HEADER CHANGED' ) ;

73: THEN
74:
75: /* Some field in the header is changed and no line level changes */
76: IF l_debug_level > 0 THEN
77: oe_debug_pub.add( 'SOMETHING IN THE HEADER CHANGED' ) ;
78: END IF;
79: l_header_id := oe_order_util.g_header_rec.header_id;
80: IF l_debug_level > 0 THEN
81: oe_debug_pub.add( 'JPN: HEADER ID' || L_HEADER_ID ) ;

Line 81: oe_debug_pub.add( 'JPN: HEADER ID' || L_HEADER_ID ) ;

77: oe_debug_pub.add( 'SOMETHING IN THE HEADER CHANGED' ) ;
78: END IF;
79: l_header_id := oe_order_util.g_header_rec.header_id;
80: IF l_debug_level > 0 THEN
81: oe_debug_pub.add( 'JPN: HEADER ID' || L_HEADER_ID ) ;
82: END IF;
83: l_header_last_update_date := oe_order_util.g_header_rec.last_update_date;
84:
85: ELSIF (oe_order_util.g_header_scredit_tbl.count > 0 AND

Line 93: oe_debug_pub.add( 'SOMETHING IN THE HEADER sales credit CHANGED' ) ;

89: -- Some field in the header sales credit changed and no line level
90: -- changes
91:
92: IF l_debug_level > 0 THEN
93: oe_debug_pub.add( 'SOMETHING IN THE HEADER sales credit CHANGED' ) ;
94: END IF;
95: I := oe_order_util.g_old_header_scredit_tbl.FIRST;
96: l_header_id := oe_order_util.g_old_header_scredit_tbl(I).header_id;
97: IF l_debug_level > 0 THEN

Line 98: oe_debug_pub.add( 'JPN: HEADER ID' || L_HEADER_ID ) ;

94: END IF;
95: I := oe_order_util.g_old_header_scredit_tbl.FIRST;
96: l_header_id := oe_order_util.g_old_header_scredit_tbl(I).header_id;
97: IF l_debug_level > 0 THEN
98: oe_debug_pub.add( 'JPN: HEADER ID' || L_HEADER_ID ) ;
99: END IF;
100:
101: IF oe_order_util.g_header_scredit_tbl(I).last_update_date IS NULL THEN
102: l_header_last_update_date :=

Line 109: oe_debug_pub.add( 'LAST UPDATE DATE OLD=' || l_header_last_update_date ) ;

105: l_header_last_update_date :=
106: oe_order_util.g_header_scredit_tbl(I).last_update_date;
107: END IF;
108: IF l_debug_level > 0 THEN
109: oe_debug_pub.add( 'LAST UPDATE DATE OLD=' || l_header_last_update_date ) ;
110: END IF;
111:
112: ELSIF (oe_order_util.g_header_adj_tbl.count > 0 ) THEN
113:

Line 115: oe_debug_pub.add( 'SOMETHING IN THE HEADER ADJUSTMENTS CHANGED' ) ;

111:
112: ELSIF (oe_order_util.g_header_adj_tbl.count > 0 ) THEN
113:
114: IF l_debug_level > 0 THEN
115: oe_debug_pub.add( 'SOMETHING IN THE HEADER ADJUSTMENTS CHANGED' ) ;
116: END IF;
117: I := oe_order_util.g_header_adj_tbl.FIRST;
118: l_header_id := oe_order_util.g_header_adj_tbl(I).header_id;
119:

Line 121: oe_debug_pub.add( 'JPN: HEADER ID' || L_HEADER_ID ) ;

117: I := oe_order_util.g_header_adj_tbl.FIRST;
118: l_header_id := oe_order_util.g_header_adj_tbl(I).header_id;
119:
120: IF l_debug_level > 0 THEN
121: oe_debug_pub.add( 'JPN: HEADER ID' || L_HEADER_ID ) ;
122: END IF;
123:
124: l_header_last_update_date := oe_order_util.g_header_adj_tbl(I).last_update_date;
125:

Line 127: oe_debug_pub.add( 'LAST UPDATE DATE OLD=' || l_header_last_update_date ) ;

123:
124: l_header_last_update_date := oe_order_util.g_header_adj_tbl(I).last_update_date;
125:
126: IF l_debug_level > 0 THEN
127: oe_debug_pub.add( 'LAST UPDATE DATE OLD=' || l_header_last_update_date ) ;
128: END IF;
129:
130: END IF;
131:

Line 136: oe_debug_pub.add( 'Opening get_lines' ) ;

132: IF l_header_id IS NOT NULL THEN
133:
134: BEGIN
135: IF l_debug_level > 0 THEN
136: oe_debug_pub.add( 'Opening get_lines' ) ;
137: END IF;
138: OPEN get_lines(l_header_id);
139: FETCH get_lines BULK COLLECT INTO
140: l_dbi_rec.line_id,

Line 152: oe_debug_pub.add( 'There are no lines in this order' ) ;

148:
149: EXCEPTION
150: WHEN NO_DATA_FOUND THEN
151: IF l_debug_level > 0 THEN
152: oe_debug_pub.add( 'There are no lines in this order' ) ;
153: END IF;
154: -- Header has no lines.
155: RETURN;
156: END;

Line 174: oe_debug_pub.add( 'IN LINE HEADER_ID= '||L_HEADER_ID, 1 ) ;

170: I := oe_order_util.g_line_tbl.FIRST;
171: l_header_id := oe_order_util.g_old_line_tbl(I).header_id;
172:
173: IF l_debug_level > 0 THEN
174: oe_debug_pub.add( 'IN LINE HEADER_ID= '||L_HEADER_ID, 1 ) ;
175: END IF;
176: WHILE I IS NOT NULL LOOP
177: IF l_debug_level > 0 THEN
178: oe_debug_pub.add( 'LOOP INDEX='|| I , 1 ) ;

Line 178: oe_debug_pub.add( 'LOOP INDEX='|| I , 1 ) ;

174: oe_debug_pub.add( 'IN LINE HEADER_ID= '||L_HEADER_ID, 1 ) ;
175: END IF;
176: WHILE I IS NOT NULL LOOP
177: IF l_debug_level > 0 THEN
178: oe_debug_pub.add( 'LOOP INDEX='|| I , 1 ) ;
179: END IF;
180:
181: l_dbi_rec.line_id(j) :=oe_order_util.g_old_line_tbl(I).line_id;
182: l_dbi_rec.rec_exists_flag(j) := 'N';

Line 197: oe_debug_pub.add( 'LINE_ID= '||l_dbi_rec.line_id(j) ) ;

193: oe_order_util.g_line_tbl(I).last_update_date;
194: END IF;
195:
196: IF l_debug_level > 0 THEN
197: oe_debug_pub.add( 'LINE_ID= '||l_dbi_rec.line_id(j) ) ;
198: oe_debug_pub.add( 'LAST UPDATE DATE=' || l_dbi_rec.last_update_date(j) ) ;
199: oe_debug_pub.add( 'LINE TBL HEADER ID=' || L_HEADER_ID ) ;
200: oe_debug_pub.add( 'LINE TBL HEADER ID=' ||l_dbi_rec.header_id(j)); --bug 7319732,7347663
201: END IF;

Line 198: oe_debug_pub.add( 'LAST UPDATE DATE=' || l_dbi_rec.last_update_date(j) ) ;

194: END IF;
195:
196: IF l_debug_level > 0 THEN
197: oe_debug_pub.add( 'LINE_ID= '||l_dbi_rec.line_id(j) ) ;
198: oe_debug_pub.add( 'LAST UPDATE DATE=' || l_dbi_rec.last_update_date(j) ) ;
199: oe_debug_pub.add( 'LINE TBL HEADER ID=' || L_HEADER_ID ) ;
200: oe_debug_pub.add( 'LINE TBL HEADER ID=' ||l_dbi_rec.header_id(j)); --bug 7319732,7347663
201: END IF;
202: I := oe_order_util.g_line_tbl.NEXT(I);

Line 199: oe_debug_pub.add( 'LINE TBL HEADER ID=' || L_HEADER_ID ) ;

195:
196: IF l_debug_level > 0 THEN
197: oe_debug_pub.add( 'LINE_ID= '||l_dbi_rec.line_id(j) ) ;
198: oe_debug_pub.add( 'LAST UPDATE DATE=' || l_dbi_rec.last_update_date(j) ) ;
199: oe_debug_pub.add( 'LINE TBL HEADER ID=' || L_HEADER_ID ) ;
200: oe_debug_pub.add( 'LINE TBL HEADER ID=' ||l_dbi_rec.header_id(j)); --bug 7319732,7347663
201: END IF;
202: I := oe_order_util.g_line_tbl.NEXT(I);
203: j := j + 1;

Line 200: oe_debug_pub.add( 'LINE TBL HEADER ID=' ||l_dbi_rec.header_id(j)); --bug 7319732,7347663

196: IF l_debug_level > 0 THEN
197: oe_debug_pub.add( 'LINE_ID= '||l_dbi_rec.line_id(j) ) ;
198: oe_debug_pub.add( 'LAST UPDATE DATE=' || l_dbi_rec.last_update_date(j) ) ;
199: oe_debug_pub.add( 'LINE TBL HEADER ID=' || L_HEADER_ID ) ;
200: oe_debug_pub.add( 'LINE TBL HEADER ID=' ||l_dbi_rec.header_id(j)); --bug 7319732,7347663
201: END IF;
202: I := oe_order_util.g_line_tbl.NEXT(I);
203: j := j + 1;
204: END LOOP;

Line 218: oe_debug_pub.add( 'IN LINE SC HEADER_ID= '|| l_header_id, 1 ) ;

214:
215: I := oe_order_util.g_line_scredit_tbl.FIRST;
216: l_header_id := oe_order_util.g_old_line_scredit_tbl(I).header_id;
217: IF l_debug_level > 0 THEN
218: oe_debug_pub.add( 'IN LINE SC HEADER_ID= '|| l_header_id, 1 ) ;
219: END IF;
220:
221: WHILE I IS NOT NULL LOOP
222: IF l_debug_level > 0 THEN

Line 223: oe_debug_pub.add( 'LOOP INDEX='|| I , 1 ) ;

219: END IF;
220:
221: WHILE I IS NOT NULL LOOP
222: IF l_debug_level > 0 THEN
223: oe_debug_pub.add( 'LOOP INDEX='|| I , 1 ) ;
224: END IF;
225:
226: l_line_id :=oe_order_util.g_old_line_scredit_tbl(I).line_id;
227: IF NOT l_line_index_tbl.EXISTS(to_char(l_line_id)) THEN

Line 250: oe_debug_pub.add( 'LINE_ID= '||l_dbi_rec.line_id(j) ) ;

246: oe_order_util.g_line_scredit_tbl(I).last_update_date;
247:
248: END IF;
249: IF l_debug_level > 0 THEN
250: oe_debug_pub.add( 'LINE_ID= '||l_dbi_rec.line_id(j) ) ;
251: oe_debug_pub.add( 'LAST UPDATE DATE=' || l_dbi_rec.last_update_date(J) ) ;
252: END IF;
253: j := j + 1;
254:

Line 251: oe_debug_pub.add( 'LAST UPDATE DATE=' || l_dbi_rec.last_update_date(J) ) ;

247:
248: END IF;
249: IF l_debug_level > 0 THEN
250: oe_debug_pub.add( 'LINE_ID= '||l_dbi_rec.line_id(j) ) ;
251: oe_debug_pub.add( 'LAST UPDATE DATE=' || l_dbi_rec.last_update_date(J) ) ;
252: END IF;
253: j := j + 1;
254:
255: END IF;

Line 273: oe_debug_pub.add( 'IN LINE PRICE ADJUSTMENTS HEADER_ID= '|| l_header_id, 1 ) ;

269: I := oe_order_util.g_line_adj_tbl.FIRST;
270: l_header_id := oe_order_util.g_old_line_adj_tbl(I).header_id;
271:
272: IF l_debug_level > 0 THEN
273: oe_debug_pub.add( 'IN LINE PRICE ADJUSTMENTS HEADER_ID= '|| l_header_id, 1 ) ;
274: END IF;
275:
276: WHILE I IS NOT NULL LOOP
277: IF l_debug_level > 0 THEN

Line 278: oe_debug_pub.add( 'PA LOOP INDEX='|| I , 1 ) ;

274: END IF;
275:
276: WHILE I IS NOT NULL LOOP
277: IF l_debug_level > 0 THEN
278: oe_debug_pub.add( 'PA LOOP INDEX='|| I , 1 ) ;
279: END IF;
280: l_line_id :=oe_order_util.g_old_line_adj_tbl(I).line_id;
281:
282: IF NOT l_line_index_tbl.EXISTS(to_char(l_line_id)) THEN

Line 305: oe_debug_pub.add( 'LINE_ID= '||l_dbi_rec.line_id(j) ) ;

301: oe_order_util.g_line_adj_tbl(I).last_update_date;
302:
303: END IF;
304: IF l_debug_level > 0 THEN
305: oe_debug_pub.add( 'LINE_ID= '||l_dbi_rec.line_id(j) ) ;
306: oe_debug_pub.add( 'LAST UPDATE DATE=' || l_dbi_rec.last_update_date(J) ) ;
307: END IF;
308: j := j + 1;
309:

Line 306: oe_debug_pub.add( 'LAST UPDATE DATE=' || l_dbi_rec.last_update_date(J) ) ;

302:
303: END IF;
304: IF l_debug_level > 0 THEN
305: oe_debug_pub.add( 'LINE_ID= '||l_dbi_rec.line_id(j) ) ;
306: oe_debug_pub.add( 'LAST UPDATE DATE=' || l_dbi_rec.last_update_date(J) ) ;
307: END IF;
308: j := j + 1;
309:
310: END IF;

Line 327: oe_debug_pub.add(' Trying to lock the ONT_DBI_CHANGE_LOG');

323: FOR i IN l_dbi_rec.line_id.FIRST..l_dbi_rec.line_id.LAST LOOP
324:
325: BEGIN
326: IF l_debug_level > 0 THEN
327: oe_debug_pub.add(' Trying to lock the ONT_DBI_CHANGE_LOG');
328: END IF;
329:
330: -- Check if the record exists in ONT_DBI_CHANGE_LOG.
331: -- If yes then first take a lock on that record.

Line 346: oe_debug_pub.add(' Record does not exist');

342:
343: EXCEPTION
344: WHEN NO_DATA_FOUND THEN
345: IF l_debug_level > 0 THEN
346: oe_debug_pub.add(' Record does not exist');
347: END IF;
348: null;
349: WHEN TOO_MANY_ROWS THEN
350: IF l_debug_level > 0 THEN

Line 351: oe_debug_pub.add(' Multiple records exists');

347: END IF;
348: null;
349: WHEN TOO_MANY_ROWS THEN
350: IF l_debug_level > 0 THEN
351: oe_debug_pub.add(' Multiple records exists');
352: END IF;
353: l_dbi_rec.rec_exists_flag(i) := 'Y';
354: END;
355:

Line 366: oe_debug_pub.add(' Creating new record ' || j);

362: l_dbi_create_rec.line_id(j) := l_dbi_rec.line_id(i);
363: l_dbi_create_rec.last_update_date(j) := l_dbi_rec.last_update_date(i);
364: l_dbi_create_rec.header_id(j):=l_dbi_rec.header_id(i) ; ---bug 7319732,7347663
365: IF l_debug_level > 0 THEN
366: oe_debug_pub.add(' Creating new record ' || j);
367: oe_debug_pub.add(' Line_Id is ' || l_dbi_create_rec.line_id(j));
368: END IF;
369: END IF;
370:

Line 367: oe_debug_pub.add(' Line_Id is ' || l_dbi_create_rec.line_id(j));

363: l_dbi_create_rec.last_update_date(j) := l_dbi_rec.last_update_date(i);
364: l_dbi_create_rec.header_id(j):=l_dbi_rec.header_id(i) ; ---bug 7319732,7347663
365: IF l_debug_level > 0 THEN
366: oe_debug_pub.add(' Creating new record ' || j);
367: oe_debug_pub.add(' Line_Id is ' || l_dbi_create_rec.line_id(j));
368: END IF;
369: END IF;
370:
371: END LOOP;

Line 379: oe_debug_pub.add('Inserting new records ' || l_dbi_create_rec.line_id.COUNT );

375: IF l_dbi_create_rec.line_id.EXISTS(1) THEN
376: -- Create records in ONT_DBI_CHANGE_LOG
377: ---changed l_header_id to l_dbi_create_rec.header_id(j) --bug 7319732,7347663
378: IF l_debug_level > 0 THEN
379: oe_debug_pub.add('Inserting new records ' || l_dbi_create_rec.line_id.COUNT );
380: END IF;
381: FORALL i IN 1..l_dbi_create_rec.line_id.COUNT
382: INSERT INTO ONT_DBI_CHANGE_LOG
383: (HEADER_ID

Line 401: oe_debug_pub.add('Updating existing records '|| l_dbi_rec.line_id.COUNT );

397:
398: -- If all records are new then no need to execute UPDATE.
399: IF j <> l_dbi_rec.line_id.COUNT THEN
400: IF l_debug_level > 0 THEN
401: oe_debug_pub.add('Updating existing records '|| l_dbi_rec.line_id.COUNT );
402: END IF;
403:
404: FORALL i in 1..l_dbi_rec.line_id.COUNT
405: UPDATE ONT_DBI_CHANGE_LOG

Line 419: oe_debug_pub.add( 'NO DATA FOUND' , 1 ) ;

415:
416: EXCEPTION
417: WHEN NO_DATA_FOUND THEN
418: IF l_debug_level > 0 THEN
419: oe_debug_pub.add( 'NO DATA FOUND' , 1 ) ;
420: END IF;
421: x_return_status := FND_API.G_RET_STS_ERROR;
422: RAISE FND_API.G_EXC_ERROR;
423: WHEN OTHERS THEN

Line 425: oe_debug_pub.add( 'In Others of Update_DBI_Log' , 1 ) ;

421: x_return_status := FND_API.G_RET_STS_ERROR;
422: RAISE FND_API.G_EXC_ERROR;
423: WHEN OTHERS THEN
424: IF l_debug_level > 0 THEN
425: oe_debug_pub.add( 'In Others of Update_DBI_Log' , 1 ) ;
426: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
427: END IF;
428: IF OE_MSG_PUB.Check_MSg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
429: THEN

Line 426: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;

422: RAISE FND_API.G_EXC_ERROR;
423: WHEN OTHERS THEN
424: IF l_debug_level > 0 THEN
425: oe_debug_pub.add( 'In Others of Update_DBI_Log' , 1 ) ;
426: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
427: END IF;
428: IF OE_MSG_PUB.Check_MSg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
429: THEN
430: OE_MSG_PUB.Add_Exc_Msg