DBA Data[Home] [Help]

APPS.OE_GSA_UTIL dependencies on OE_DEBUG_PUB

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

15: l_gsa_enabled_flag VARCHAR2(1):= 'N';
16: l_gsa_indicator_flag VARCHAR2(1):= 'N';
17: l_gsa_passed_flag VARCHAR2(1):= 'Y';
18: --
19: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
20: --
21: BEGIN
22:
23: IF l_debug_level > 0 THEN

Line 24: oe_debug_pub.add( 'INSIDE CHECK_GSA_MAIN' ) ;

20: --
21: BEGIN
22:
23: IF l_debug_level > 0 THEN
24: oe_debug_pub.add( 'INSIDE CHECK_GSA_MAIN' ) ;
25: END IF;
26:
27: /* -----------------------------------------------------------------------
28: Function Check_GSA_Enabled checks if GSA verification is enabled or

Line 36: oe_debug_pub.add( 'GSA_ENABLED = Y' ) ;

32:
33: IF l_gsa_enabled_flag = 'Y' THEN
34: BEGIN
35: IF l_debug_level > 0 THEN
36: oe_debug_pub.add( 'GSA_ENABLED = Y' ) ;
37: END IF;
38: l_gsa_indicator_flag := 'N';
39:
40: /* -----------------------------------------------------------------------

Line 47: oe_debug_pub.add( 'GSA_INDICATOR = Y' ) ;

43: ------------------------------------------------------------------------*/
44: l_gsa_indicator_flag := Check_GSA_Indicator (p_line_rec);
45: IF l_gsa_indicator_flag = 'Y' THEN
46: IF l_debug_level > 0 THEN
47: oe_debug_pub.add( 'GSA_INDICATOR = Y' ) ;
48: END IF;
49:
50: /* -----------------------------------------------------------------------
51: For now, we have commented out nocopy the part in the following line where

Line 62: oe_debug_pub.add( 'GSA_INDICATOR = N' ) ;

58: /* l_gsa_passed_flag := Check_GSA_Customer (p_line_rec); */
59: null;
60: ELSE
61: IF l_debug_level > 0 THEN
62: oe_debug_pub.add( 'GSA_INDICATOR = N' ) ;
63: END IF;
64: /* -----------------------------------------------------------------------
65: Function Check_NonGSA_Customer checks for the price offered to a
66: GSA customer against the price entered in the order for a NonGSA customer

Line 76: oe_debug_pub.add( 'GSA_PASSED = Y' ) ;

72: END IF;
73:
74: IF l_gsa_passed_flag = 'Y' THEN
75: IF l_debug_level > 0 THEN
76: oe_debug_pub.add( 'GSA_PASSED = Y' ) ;
77: END IF;
78: x_resultout := 'COMPLETE:AP_PASS';
79: ELSE
80: IF l_debug_level > 0 THEN

Line 81: oe_debug_pub.add( 'GSA_PASSED = N' ) ;

77: END IF;
78: x_resultout := 'COMPLETE:AP_PASS';
79: ELSE
80: IF l_debug_level > 0 THEN
81: oe_debug_pub.add( 'GSA_PASSED = N' ) ;
82: END IF;
83: x_resultout := 'COMPLETE:AP_FAIL';
84: END IF;
85:

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

92: (p_line_rec IN OE_Order_Pub.Line_Rec_Type) RETURN VARCHAR2
93: IS
94: l_profile_option_value VARCHAR2(1):= 'N';
95: --
96: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
97: --
98: BEGIN
99:
100: IF l_debug_level > 0 THEN

Line 101: oe_debug_pub.add( 'INSIDE GSA_ENABLED' ) ;

97: --
98: BEGIN
99:
100: IF l_debug_level > 0 THEN
101: oe_debug_pub.add( 'INSIDE GSA_ENABLED' ) ;
102: END IF;
103:
104: l_profile_option_value := 'N';
105: l_profile_option_value := FND_PROFILE.value ('QP_VERIFY_GSA');

Line 114: oe_debug_pub.add( 'INSIDE NO-DATA-FOUND EXCEPTION' ) ;

110: EXCEPTION
111:
112: WHEN NO_DATA_FOUND THEN
113: IF l_debug_level > 0 THEN
114: oe_debug_pub.add( 'INSIDE NO-DATA-FOUND EXCEPTION' ) ;
115: END IF;
116: l_profile_option_value := 'N';
117:
118: WHEN OTHERS THEN

Line 121: oe_debug_pub.add( 'INSIDE OTHERS EXCEPTION' ) ;

117:
118: WHEN OTHERS THEN
119: -- Unexpected error
120: IF l_debug_level > 0 THEN
121: oe_debug_pub.add( 'INSIDE OTHERS EXCEPTION' ) ;
122: END IF;
123: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
124: THEN
125: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME ,

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

136: l_site_use_id NUMBER;
137: l_customer_id NUMBER;
138: l_gsa_flag VARCHAR2(1):= 'N';
139: --
140: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
141: --
142: BEGIN
143:
144:

Line 147: oe_debug_pub.add( 'INSIDE GSA_INDICATOR_CUSTOMER' , 5 ) ;

143:
144:
145: BEGIN
146: IF l_debug_level > 0 THEN
147: oe_debug_pub.add( 'INSIDE GSA_INDICATOR_CUSTOMER' , 5 ) ;
148: END IF;
149:
150: /* SELECT NVL(GSA_INDICATOR,'N')
151: INTO l_gsa_flag

Line 167: oe_debug_pub.add( 'GSA_FLAG VALUE1:'||L_GSA_FLAG , 5 ) ;

163: SUBSTRB(USERENV('CLIENT_INFO'), 1,10))),-99)) =
164: NVL(TO_NUMBER(DECODE( SUBSTRB(USERENV('CLIENT_INFO'),1,1), ' ',NULL,
165: SUBSTRB(USERENV('CLIENT_INFO'),1,10))), -99); */
166: IF l_debug_level > 0 THEN
167: oe_debug_pub.add( 'GSA_FLAG VALUE1:'||L_GSA_FLAG , 5 ) ;
168: END IF;
169: --added the above select and assignment statement to fix bug 1738379 End
170:
171: EXCEPTION

Line 175: oe_debug_pub.add( 'INSIDE NO-DATA-FOUND EXCEPTION 1' , 5 ) ;

171: EXCEPTION
172:
173: WHEN NO_DATA_FOUND THEN
174: IF l_debug_level > 0 THEN
175: oe_debug_pub.add( 'INSIDE NO-DATA-FOUND EXCEPTION 1' , 5 ) ;
176: END IF;
177: l_gsa_flag := 'N';
178:
179: WHEN OTHERS THEN

Line 182: oe_debug_pub.add( 'INSIDE OTHERS EXCEPTION' ) ;

178:
179: WHEN OTHERS THEN
180: -- Unexpected error
181: IF l_debug_level > 0 THEN
182: oe_debug_pub.add( 'INSIDE OTHERS EXCEPTION' ) ;
183: END IF;
184: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
185: THEN
186: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME ,

Line 195: oe_debug_pub.add( 'INSIDE GSA_INDICATOR_SITE' , 5 ) ;

191:
192: IF l_gsa_flag = 'N' THEN
193: BEGIN
194: IF l_debug_level > 0 THEN
195: oe_debug_pub.add( 'INSIDE GSA_INDICATOR_SITE' , 5 ) ;
196: END IF;
197: --commented to fix bug 1738379
198: /* SELECT NVL(GSA_INDICATOR,'N')
199: INTO l_gsa_flag

Line 211: oe_debug_pub.add( 'GSA_FLAG VALUE2:'||L_GSA_FLAG , 5 ) ;

207: from hz_parties hp,hz_cust_accounts hca
208: where hp.party_id = hca.party_id
209: and hca.cust_account_id = l_customer_id ;
210: IF l_debug_level > 0 THEN
211: oe_debug_pub.add( 'GSA_FLAG VALUE2:'||L_GSA_FLAG , 5 ) ;
212: END IF;
213: --added the above select and assignment statement to fix bug 1738379 End
214:
215: EXCEPTION

Line 219: oe_debug_pub.add( 'INSIDE NO-DATA-FOUND EXCEPTION 2' , 5 ) ;

215: EXCEPTION
216:
217: WHEN NO_DATA_FOUND THEN
218: IF l_debug_level > 0 THEN
219: oe_debug_pub.add( 'INSIDE NO-DATA-FOUND EXCEPTION 2' , 5 ) ;
220: END IF;
221: l_gsa_flag := 'N';
222:
223: WHEN OTHERS THEN

Line 227: oe_debug_pub.add( 'INSIDE OTHERS EXCEPTION' ) ;

223: WHEN OTHERS THEN
224: l_gsa_flag := 'N';
225: -- Unexpected error
226: IF l_debug_level > 0 THEN
227: oe_debug_pub.add( 'INSIDE OTHERS EXCEPTION' ) ;
228: END IF;
229: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
230: THEN
231: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME ,

Line 238: oe_debug_pub.add( 'GSA_FLAG VALUE 3:'||L_GSA_FLAG , 5 ) ;

234: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
235: END;
236: END IF;
237: IF l_debug_level > 0 THEN
238: oe_debug_pub.add( 'GSA_FLAG VALUE 3:'||L_GSA_FLAG , 5 ) ;
239: END IF;
240:
241: RETURN l_gsa_flag;
242:

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

252: l_gsa_count NUMBER := 0;
253: l_gsa_passed_flag VARCHAR2(1) := 'Y';
254:
255: --
256: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
257: --
258: BEGIN
259: -- l_gsa_count stores the number of GSA prices less than the
260: -- unit selling price of the NonGSA customer.

Line 263: oe_debug_pub.add( 'INSIDE CHECK_NONGSA_CUSTOMER' ) ;

259: -- l_gsa_count stores the number of GSA prices less than the
260: -- unit selling price of the NonGSA customer.
261:
262: IF l_debug_level > 0 THEN
263: oe_debug_pub.add( 'INSIDE CHECK_NONGSA_CUSTOMER' ) ;
264: END IF;
265: l_gsa_count := 0;
266: l_gsa_count := Get_GSA_Count (p_line_rec);
267: IF l_gsa_count > 0 THEN

Line 270: oe_debug_pub.add( 'GSA_COUNT >0' ) ;

266: l_gsa_count := Get_GSA_Count (p_line_rec);
267: IF l_gsa_count > 0 THEN
268: l_gsa_passed_flag := 'N';
269: IF l_debug_level > 0 THEN
270: oe_debug_pub.add( 'GSA_COUNT >0' ) ;
271: END IF;
272: ELSE
273: l_gsa_passed_flag := 'Y';
274: IF l_debug_level > 0 THEN

Line 275: oe_debug_pub.add( 'GSA_COUNT = 0' ) ;

271: END IF;
272: ELSE
273: l_gsa_passed_flag := 'Y';
274: IF l_debug_level > 0 THEN
275: oe_debug_pub.add( 'GSA_COUNT = 0' ) ;
276: END IF;
277: END IF;
278:
279: RETURN l_gsa_passed_flag;

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

295: l_inventory_item_id NUMBER;
296: l_pricing_date DATE;
297:
298: --
299: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
300: --
301: BEGIN
302: l_unit_selling_price := p_line_rec.unit_selling_price;
303: l_pricing_quantity := p_line_rec.pricing_quantity;

Line 313: oe_debug_pub.add( 'INSIDE GSA_COUNT' ) ;

309: -- The select statement checks to see the maximum GSA discount price for the
310: -- inventory item that is being priced from the Sales Order line.
311: --
312: IF l_debug_level > 0 THEN
313: oe_debug_pub.add( 'INSIDE GSA_COUNT' ) ;
314: END IF;
315:
316: SELECT count(*)
317: INTO l_gsa_count

Line 352: oe_debug_pub.add( 'INSIDE NO-DATA-FOUND EXCEPTION' ) ;

348:
349: WHEN NO_DATA_FOUND THEN
350: l_gsa_count := 0;
351: IF l_debug_level > 0 THEN
352: oe_debug_pub.add( 'INSIDE NO-DATA-FOUND EXCEPTION' ) ;
353: END IF;
354:
355: WHEN OTHERS THEN
356: -- Unexpected error

Line 358: oe_debug_pub.add( 'INSIDE OTHERS EXCEPTION' ) ;

354:
355: WHEN OTHERS THEN
356: -- Unexpected error
357: IF l_debug_level > 0 THEN
358: oe_debug_pub.add( 'INSIDE OTHERS EXCEPTION' ) ;
359: END IF;
360: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
361: THEN
362: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME ,

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

376: l_nongsa_count NUMBER := 0;
377: l_gsa_passed_flag VARCHAR2(1) := 'Y';
378:
379: --
380: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
381: --
382: BEGIN
383: -- l_gsa_count stores the number of NonGSA prices less than the
384: -- unit selling price of the GSA customer.

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

404: l_pricing_quantity NUMBER;
405: l_price_list_id NUMBER;
406: l_pricing_date DATE;
407: --
408: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
409: --
410: BEGIN
411:
412: l_unit_selling_price := p_line_rec.unit_selling_price;

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

466: FUNCTION Get_Hold_id(hold NUMBER) RETURN NUMBER
467: IS
468: x_hold_id NUMBER :=0;
469: --
470: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
471: --
472: BEGIN
473:
474: SELECT OE_HOLD_definitions.HOLD_ID

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

488: IS
489: x_source_id NUMBER :=0;
490: l_header_id NUMBER;
491: --
492: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
493: --
494: BEGIN
495: l_header_id := header_id;
496:

Line 509: oe_debug_pub.add( 'FAILED IN GET_SOURCE_ID' ) ;

505:
506: EXCEPTION
507: WHEN OTHERS THEN
508: IF l_debug_level > 0 THEN
509: oe_debug_pub.add( 'FAILED IN GET_SOURCE_ID' ) ;
510: END IF;
511: RETURN 0;
512: END Get_Source_id;
513:

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

523: l_line_id NUMBER:=0;
524: l_program_application_id NUMBER :=0;
525: l_program_id NUMBER :=0;
526: --
527: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
528: --
529: BEGIN
530: l_header_id := p_line_rec.header_id;
531: l_line_id := p_line_rec.line_id;