DBA Data[Home] [Help]

APPS.M4U_UCC_UTILS dependencies on CLN_DEBUG_PUB

Line 144: cln_debug_pub.Add('M4U:----- Entering process_catalogue_item_status ------- ',2);

140:
141: l_day NUMBER;
142: BEGIN
143: IF (l_debug_level <= 2) THEN
144: cln_debug_pub.Add('M4U:----- Entering process_catalogue_item_status ------- ',2);
145: END IF;
146:
147: -- By Default, the status type is REGISTERED
148: x_catalogue_item_status := 'REGISTERED';

Line 156: cln_debug_pub.Add('Current Date -> '||l_current_date,1);

152: l_current_date := to_date(to_char(SYSDATE, 'YYYY-MM-DD'),'YYYY-MM-DD');
153: l_cancel_date := to_date(to_char(p_cancel_date, 'YYYY-MM-DD'),'YYYY-MM-DD');
154:
155: IF (l_debug_level <= 1) THEN
156: cln_debug_pub.Add('Current Date -> '||l_current_date,1);
157: cln_debug_pub.Add('Cancel Date -> '||l_cancel_date,1);
158: END IF;
159:
160: l_day := l_cancel_date - l_current_date;

Line 157: cln_debug_pub.Add('Cancel Date -> '||l_cancel_date,1);

153: l_cancel_date := to_date(to_char(p_cancel_date, 'YYYY-MM-DD'),'YYYY-MM-DD');
154:
155: IF (l_debug_level <= 1) THEN
156: cln_debug_pub.Add('Current Date -> '||l_current_date,1);
157: cln_debug_pub.Add('Cancel Date -> '||l_cancel_date,1);
158: END IF;
159:
160: l_day := l_cancel_date - l_current_date;
161: IF (l_debug_level <= 1) THEN

Line 162: cln_debug_pub.Add('Days Difference -> '||l_day,1);

158: END IF;
159:
160: l_day := l_cancel_date - l_current_date;
161: IF (l_debug_level <= 1) THEN
162: cln_debug_pub.Add('Days Difference -> '||l_day,1);
163: END IF;
164:
165: --IF (l_day = 0) THEN /*bug5368180*/
166: IF (l_day <= 0) THEN

Line 171: cln_debug_pub.Add('p_catalogue_item_status -> '||x_catalogue_item_status,1);

167: x_catalogue_item_status := 'CANCELED';
168: END IF;
169:
170: IF (l_debug_level <= 1) THEN
171: cln_debug_pub.Add('p_catalogue_item_status -> '||x_catalogue_item_status,1);
172: END IF;
173:
174:
175: IF (l_debug_level <= 2) THEN

Line 176: cln_debug_pub.Add('M4U:----- Exiting process_catalogue_item_status ------- ',2);

172: END IF;
173:
174:
175: IF (l_debug_level <= 2) THEN
176: cln_debug_pub.Add('M4U:----- Exiting process_catalogue_item_status ------- ',2);
177: END IF;
178:
179: RETURN;
180: END IF;

Line 188: cln_debug_pub.Add('Current Date -> '||l_current_date,1);

184: l_current_date := to_date(to_char(SYSDATE, 'YYYY-MM-DD'), 'YYYY-MM-DD');
185: l_discontinue_date := to_date(to_char(p_discontinue_date, 'YYYY-MM-DD'),'YYYY-MM-DD');
186:
187: IF (l_debug_level <= 1) THEN
188: cln_debug_pub.Add('Current Date -> '||l_current_date,1);
189: cln_debug_pub.Add('Discontinue Date -> '||l_discontinue_date,1);
190: END IF;
191:
192: l_day := l_discontinue_date - l_current_date;

Line 189: cln_debug_pub.Add('Discontinue Date -> '||l_discontinue_date,1);

185: l_discontinue_date := to_date(to_char(p_discontinue_date, 'YYYY-MM-DD'),'YYYY-MM-DD');
186:
187: IF (l_debug_level <= 1) THEN
188: cln_debug_pub.Add('Current Date -> '||l_current_date,1);
189: cln_debug_pub.Add('Discontinue Date -> '||l_discontinue_date,1);
190: END IF;
191:
192: l_day := l_discontinue_date - l_current_date;
193: IF (l_debug_level <= 1) THEN

Line 194: cln_debug_pub.Add('Days Difference -> '||l_day,1);

190: END IF;
191:
192: l_day := l_discontinue_date - l_current_date;
193: IF (l_debug_level <= 1) THEN
194: cln_debug_pub.Add('Days Difference -> '||l_day,1);
195: END IF;
196:
197: --IF (l_day = 0) THEN /*bug5368180*/
198: IF (l_day <= 0) THEN

Line 203: cln_debug_pub.Add('p_catalogue_item_status -> '||x_catalogue_item_status,1);

199: x_catalogue_item_status := 'DISCONTINUED';
200: END IF;
201:
202: IF (l_debug_level <= 1) THEN
203: cln_debug_pub.Add('p_catalogue_item_status -> '||x_catalogue_item_status,1);
204: END IF;
205:
206:
207: IF (l_debug_level <= 2) THEN

Line 208: cln_debug_pub.Add('M4U:----- Exiting process_catalogue_item_status ------- ',2);

204: END IF;
205:
206:
207: IF (l_debug_level <= 2) THEN
208: cln_debug_pub.Add('M4U:----- Exiting process_catalogue_item_status ------- ',2);
209: END IF;
210:
211: RETURN;
212: END IF;

Line 216: cln_debug_pub.Add('M4U:----- Exiting process_catalogue_item_status ERROR------- ',6);

212: END IF;
213: EXCEPTION
214: WHEN OTHERS THEN
215: IF (l_debug_level <= 6) THEN
216: cln_debug_pub.Add('M4U:----- Exiting process_catalogue_item_status ERROR------- ',6);
217: END IF;
218:
219: raise ;
220: END process_catalogue_item_status;

Line 262: cln_debug_pub.Add('M4U:----- Entering format_industry_ext_string ------- ',2);

258: strlength NUMBER;
259: industry_var VARCHAR2(3);
260: BEGIN
261: IF (l_debug_level <= 2) THEN
262: cln_debug_pub.Add('M4U:----- Entering format_industry_ext_string ------- ',2);
263: END IF;
264:
265: IF (l_debug_level <= 1) THEN
266: cln_debug_pub.Add('Industry Column value = '||p_industry_column,1);

Line 266: cln_debug_pub.Add('Industry Column value = '||p_industry_column,1);

262: cln_debug_pub.Add('M4U:----- Entering format_industry_ext_string ------- ',2);
263: END IF;
264:
265: IF (l_debug_level <= 1) THEN
266: cln_debug_pub.Add('Industry Column value = '||p_industry_column,1);
267: END IF;
268:
269: IF(p_industry_column IS NULL) THEN
270: IF (l_debug_level <= 1) THEN

Line 271: cln_debug_pub.Add('Industry Column value is null',1);

267: END IF;
268:
269: IF(p_industry_column IS NULL) THEN
270: IF (l_debug_level <= 1) THEN
271: cln_debug_pub.Add('Industry Column value is null',1);
272: END IF;
273: RETURN;
274: END IF;
275:

Line 278: cln_debug_pub.Add('Length of the Industry Column String '||strlength,1);

274: END IF;
275:
276: strlength := length(p_industry_column);
277: IF (l_debug_level <= 1) THEN
278: cln_debug_pub.Add('Length of the Industry Column String '||strlength,1);
279: END IF;
280:
281: countchk := 1;
282:

Line 287: cln_debug_pub.Add('Industry Ext Variable - '||industry_var,1);

283: LOOP
284: industry_var :=substr(p_industry_column,countchk,1);
285:
286: IF (l_debug_level <= 1) THEN
287: cln_debug_pub.Add('Industry Ext Variable - '||industry_var,1);
288: END IF;
289:
290: IF ( industry_var ='f')THEN
291: IF(length(x_mutiple_industry_ext) <>0) THEN

Line 298: cln_debug_pub.Add('Industry Ext value - '||x_mutiple_industry_ext,1);

294:
295: x_mutiple_industry_ext := x_mutiple_industry_ext||'fmcg';
296:
297: IF (l_debug_level <= 1) THEN
298: cln_debug_pub.Add('Industry Ext value - '||x_mutiple_industry_ext,1);
299: END IF;
300: END IF;
301:
302: IF ( industry_var ='h')THEN

Line 310: cln_debug_pub.Add('Industry Ext value - '||x_mutiple_industry_ext,1);

306:
307: x_mutiple_industry_ext := x_mutiple_industry_ext||'hardlines';
308:
309: IF (l_debug_level <= 1) THEN
310: cln_debug_pub.Add('Industry Ext value - '||x_mutiple_industry_ext,1);
311: END IF;
312: END IF;
313:
314: IF ( industry_var ='s')THEN

Line 321: cln_debug_pub.Add('Industry Ext value - '||x_mutiple_industry_ext,1);

317: END IF;
318:
319: x_mutiple_industry_ext := x_mutiple_industry_ext||'sbdh';
320: IF (l_debug_level <= 1) THEN
321: cln_debug_pub.Add('Industry Ext value - '||x_mutiple_industry_ext,1);
322: END IF;
323: END IF;
324:
325: countchk := countchk+2;

Line 327: cln_debug_pub.Add('Count Check'||countchk,1);

323: END IF;
324:
325: countchk := countchk+2;
326: IF (l_debug_level <= 1) THEN
327: cln_debug_pub.Add('Count Check'||countchk,1);
328: END IF;
329: EXIT WHEN countchk > strlength;
330: END LOOP;
331:

Line 333: cln_debug_pub.Add('M4U:----- Exiting format_industry_ext_string ------- ',2);

329: EXIT WHEN countchk > strlength;
330: END LOOP;
331:
332: IF (l_debug_level <= 2) THEN
333: cln_debug_pub.Add('M4U:----- Exiting format_industry_ext_string ------- ',2);
334: END IF;
335:
336: EXCEPTION
337: WHEN OTHERS THEN

Line 339: cln_debug_pub.Add('M4U:----- Exiting format_industry_ext_string ERROR------- ',6);

335:
336: EXCEPTION
337: WHEN OTHERS THEN
338: IF (l_debug_level <= 6) THEN
339: cln_debug_pub.Add('M4U:----- Exiting format_industry_ext_string ERROR------- ',6);
340: END IF;
341:
342: raise ;
343: END format_industry_ext_string;

Line 362: cln_debug_pub.Add('M4U:----- Entering validate_checkdigit_gtin ------- ',2);

358: l_error_msg VARCHAR2(200);
359:
360: BEGIN
361: IF (l_debug_level <= 2) THEN
362: cln_debug_pub.Add('M4U:----- Entering validate_checkdigit_gtin ------- ',2);
363: END IF;
364:
365: l_checkDigit:= TO_NUMBER(SUBSTR(p_gtin,14,1 ));
366:

Line 368: cln_debug_pub.Add('M4U: Checksum Attached : '||l_checkDigit,1);

364:
365: l_checkDigit:= TO_NUMBER(SUBSTR(p_gtin,14,1 ));
366:
367: IF (l_debug_level <= 1) THEN
368: cln_debug_pub.Add('M4U: Checksum Attached : '||l_checkDigit,1);
369: END IF;
370:
371:
372: l_right_sum := TO_NUMBER(SUBSTR(p_gtin,1,1 ))+

Line 380: cln_debug_pub.Add('M4U: Sum Of Odd Numbers: '||l_right_sum,1);

376: TO_NUMBER(SUBSTR(p_gtin,9,1 ))+
377: TO_NUMBER(SUBSTR(p_gtin,11,1 ))+
378: TO_NUMBER(SUBSTR(p_gtin,13,1 ));
379: IF (l_debug_level <= 1) THEN
380: cln_debug_pub.Add('M4U: Sum Of Odd Numbers: '||l_right_sum,1);
381: END IF;
382:
383:
384: l_left_sum := TO_NUMBER(SUBSTR(p_gtin,2,1 ))+

Line 392: cln_debug_pub.Add('M4U: Sum Of Even Numbers: '||l_left_sum,1);

388: TO_NUMBER(SUBSTR(p_gtin,10,1 ))+
389: TO_NUMBER(SUBSTR(p_gtin,12,1 ));
390:
391: IF (l_debug_level <= 1) THEN
392: cln_debug_pub.Add('M4U: Sum Of Even Numbers: '||l_left_sum,1);
393: END IF;
394:
395: l_con_sum := l_right_sum*3 + l_left_sum;
396: IF (l_debug_level <= 1) THEN

Line 397: cln_debug_pub.Add('M4U: consolidated sum : '||l_con_sum,1);

393: END IF;
394:
395: l_con_sum := l_right_sum*3 + l_left_sum;
396: IF (l_debug_level <= 1) THEN
397: cln_debug_pub.Add('M4U: consolidated sum : '||l_con_sum,1);
398: END IF;
399:
400: l_remainder := Mod(l_con_sum,10);
401: IF (l_debug_level <= 1) THEN

Line 402: cln_debug_pub.Add('M4U: Remainder : '||l_remainder,1);

398: END IF;
399:
400: l_remainder := Mod(l_con_sum,10);
401: IF (l_debug_level <= 1) THEN
402: cln_debug_pub.Add('M4U: Remainder : '||l_remainder,1);
403: END IF;
404:
405: IF (l_remainder = 0) THEN
406: l_remainder := 10;

Line 411: cln_debug_pub.Add('M4U: Calculated Checksum: '||l_calculatedCheckDigit,1);

407: END IF;
408:
409: l_calculatedCheckDigit := 10 - l_remainder;
410: IF (l_debug_level <= 1) THEN
411: cln_debug_pub.Add('M4U: Calculated Checksum: '||l_calculatedCheckDigit,1);
412: END IF;
413:
414: IF (l_checkDigit <> l_calculatedCheckDigit) THEN
415: IF (l_debug_level <= 1) THEN

Line 416: cln_debug_pub.Add('M4U: Incorrect Checksum',1);

412: END IF;
413:
414: IF (l_checkDigit <> l_calculatedCheckDigit) THEN
415: IF (l_debug_level <= 1) THEN
416: cln_debug_pub.Add('M4U: Incorrect Checksum',1);
417: cln_debug_pub.Add('------- Exiting validate_checkdigit_gtin - ',1);
418: END IF;
419:
420: RETURN FALSE;

Line 417: cln_debug_pub.Add('------- Exiting validate_checkdigit_gtin - ',1);

413:
414: IF (l_checkDigit <> l_calculatedCheckDigit) THEN
415: IF (l_debug_level <= 1) THEN
416: cln_debug_pub.Add('M4U: Incorrect Checksum',1);
417: cln_debug_pub.Add('------- Exiting validate_checkdigit_gtin - ',1);
418: END IF;
419:
420: RETURN FALSE;
421: END IF;

Line 424: cln_debug_pub.Add('------- Exiting validate_checkdigit_gtin --------- ',2);

420: RETURN FALSE;
421: END IF;
422:
423: IF (l_debug_level <= 2) THEN
424: cln_debug_pub.Add('------- Exiting validate_checkdigit_gtin --------- ',2);
425: END IF;
426:
427: RETURN TRUE;
428: EXCEPTION

Line 434: cln_debug_pub.Add(' :: '||l_error_code||' :: '||l_error_msg,5);

430: l_error_code :=SQLCODE;
431: l_error_msg :=SQLERRM;
432:
433: IF (l_debug_level <= 5) THEN
434: cln_debug_pub.Add(' :: '||l_error_code||' :: '||l_error_msg,5);
435: END IF;
436:
437: IF (l_debug_level <= 2) THEN
438: cln_debug_pub.Add('------- Exiting validate_checkdigit_gtin - Exception --------- ',2);

Line 438: cln_debug_pub.Add('------- Exiting validate_checkdigit_gtin - Exception --------- ',2);

434: cln_debug_pub.Add(' :: '||l_error_code||' :: '||l_error_msg,5);
435: END IF;
436:
437: IF (l_debug_level <= 2) THEN
438: cln_debug_pub.Add('------- Exiting validate_checkdigit_gtin - Exception --------- ',2);
439: END IF;
440: RETURN FALSE;
441: END;
442:

Line 459: cln_debug_pub.Add('M4U:----- Entering validate_checkdigit_gln ------- ',2);

455: l_error_msg VARCHAR2(200);
456:
457: BEGIN
458: IF (l_debug_level <= 2) THEN
459: cln_debug_pub.Add('M4U:----- Entering validate_checkdigit_gln ------- ',2);
460: END IF;
461:
462: l_checkDigit:= TO_NUMBER(SUBSTR(p_gln,13,1 ));
463: IF (l_debug_level <= 1) THEN

Line 464: cln_debug_pub.Add('M4U: Checksum Attached : '||l_checkDigit,1);

460: END IF;
461:
462: l_checkDigit:= TO_NUMBER(SUBSTR(p_gln,13,1 ));
463: IF (l_debug_level <= 1) THEN
464: cln_debug_pub.Add('M4U: Checksum Attached : '||l_checkDigit,1);
465: END IF;
466:
467:
468: l_left_sum := TO_NUMBER(SUBSTR(p_gln,1,1 ))+

Line 476: cln_debug_pub.Add('M4U: Sum Of Odd Numbers: '||l_right_sum,1);

472: TO_NUMBER(SUBSTR(p_gln,9,1 ))+
473: TO_NUMBER(SUBSTR(p_gln,11,1 ));
474:
475: IF (l_debug_level <= 1) THEN
476: cln_debug_pub.Add('M4U: Sum Of Odd Numbers: '||l_right_sum,1);
477: END IF;
478:
479:
480: l_right_sum := TO_NUMBER(SUBSTR(p_gln,2,1 ))+

Line 487: cln_debug_pub.Add('M4U: Sum Of Even Numbers: '||l_left_sum,1);

483: TO_NUMBER(SUBSTR(p_gln,8,1 ))+
484: TO_NUMBER(SUBSTR(p_gln,10,1 ))+
485: TO_NUMBER(SUBSTR(p_gln,12,1 ));
486: IF (l_debug_level <= 1) THEN
487: cln_debug_pub.Add('M4U: Sum Of Even Numbers: '||l_left_sum,1);
488: END IF;
489:
490: l_con_sum := l_right_sum*3 + l_left_sum;
491: IF (l_debug_level <= 1) THEN

Line 492: cln_debug_pub.Add('M4U: consolidated sum : '||l_con_sum,1);

488: END IF;
489:
490: l_con_sum := l_right_sum*3 + l_left_sum;
491: IF (l_debug_level <= 1) THEN
492: cln_debug_pub.Add('M4U: consolidated sum : '||l_con_sum,1);
493: END IF;
494:
495: l_remainder := Mod(l_con_sum,10);
496: IF (l_debug_level <= 1) THEN

Line 497: cln_debug_pub.Add('M4U: Remainder : '||l_remainder,1);

493: END IF;
494:
495: l_remainder := Mod(l_con_sum,10);
496: IF (l_debug_level <= 1) THEN
497: cln_debug_pub.Add('M4U: Remainder : '||l_remainder,1);
498: END IF;
499:
500: if (l_remainder = 0) then
501: l_remainder := 10;

Line 506: cln_debug_pub.Add('M4U: Calculated Checksum: '||l_calculatedCheckDigit,1);

502: end if;
503:
504: l_calculatedCheckDigit := 10 - l_remainder;
505: IF (l_debug_level <= 1) THEN
506: cln_debug_pub.Add('M4U: Calculated Checksum: '||l_calculatedCheckDigit,1);
507: END IF;
508:
509: IF (l_checkDigit <> l_calculatedCheckDigit) THEN
510: IF (l_debug_level <= 1) THEN

Line 511: cln_debug_pub.Add('M4U: Incorrect Checksum',1);

507: END IF;
508:
509: IF (l_checkDigit <> l_calculatedCheckDigit) THEN
510: IF (l_debug_level <= 1) THEN
511: cln_debug_pub.Add('M4U: Incorrect Checksum',1);
512: cln_debug_pub.Add('------- Exiting validate_checkdigit_gln - ',1);
513: END IF;
514: return FALSE;
515: END IF;

Line 512: cln_debug_pub.Add('------- Exiting validate_checkdigit_gln - ',1);

508:
509: IF (l_checkDigit <> l_calculatedCheckDigit) THEN
510: IF (l_debug_level <= 1) THEN
511: cln_debug_pub.Add('M4U: Incorrect Checksum',1);
512: cln_debug_pub.Add('------- Exiting validate_checkdigit_gln - ',1);
513: END IF;
514: return FALSE;
515: END IF;
516:

Line 518: cln_debug_pub.Add('------- Exiting validate_checkdigit_gln --------- ',2);

514: return FALSE;
515: END IF;
516:
517: IF (l_debug_level <= 2) THEN
518: cln_debug_pub.Add('------- Exiting validate_checkdigit_gln --------- ',2);
519: END IF;
520:
521: return TRUE;
522: EXCEPTION

Line 528: cln_debug_pub.Add(' :: '||l_error_code||' :: '||l_error_msg,5);

524: l_error_code :=SQLCODE;
525: l_error_msg :=SQLERRM;
526:
527: IF (l_debug_level <= 5) THEN
528: cln_debug_pub.Add(' :: '||l_error_code||' :: '||l_error_msg,5);
529: END IF;
530:
531: IF (l_debug_level <= 2) THEN
532: cln_debug_pub.Add('------- Exiting validate_checkdigit_gln - Exception --------- ',2);

Line 532: cln_debug_pub.Add('------- Exiting validate_checkdigit_gln - Exception --------- ',2);

528: cln_debug_pub.Add(' :: '||l_error_code||' :: '||l_error_msg,5);
529: END IF;
530:
531: IF (l_debug_level <= 2) THEN
532: cln_debug_pub.Add('------- Exiting validate_checkdigit_gln - Exception --------- ',2);
533: END IF;
534: RETURN FALSE;
535: END;
536:

Line 561: cln_debug_pub.Add('M4U:----- Entering validate_uccnet_attr ------- ',2);

557: l_error_msg VARCHAR2(200);
558: BEGIN
559:
560: IF (l_debug_Level <= 2) THEN
561: cln_debug_pub.Add('M4U:----- Entering validate_uccnet_attr ------- ',2);
562: END IF;
563:
564: -- Parameters received
565: IF (l_Debug_Level <= 1) THEN

Line 566: cln_debug_pub.Add('++++ PARAMETERS RECEIVED +++ ',1);

562: END IF;
563:
564: -- Parameters received
565: IF (l_Debug_Level <= 1) THEN
566: cln_debug_pub.Add('++++ PARAMETERS RECEIVED +++ ',1);
567: cln_debug_pub.Add('p_attr_type - '||p_attr_type,1);
568: cln_debug_pub.Add('p_attr_value - '||p_attr_value,1);
569: cln_debug_pub.Add('==============================',1);
570: END IF;

Line 567: cln_debug_pub.Add('p_attr_type - '||p_attr_type,1);

563:
564: -- Parameters received
565: IF (l_Debug_Level <= 1) THEN
566: cln_debug_pub.Add('++++ PARAMETERS RECEIVED +++ ',1);
567: cln_debug_pub.Add('p_attr_type - '||p_attr_type,1);
568: cln_debug_pub.Add('p_attr_value - '||p_attr_value,1);
569: cln_debug_pub.Add('==============================',1);
570: END IF;
571:

Line 568: cln_debug_pub.Add('p_attr_value - '||p_attr_value,1);

564: -- Parameters received
565: IF (l_Debug_Level <= 1) THEN
566: cln_debug_pub.Add('++++ PARAMETERS RECEIVED +++ ',1);
567: cln_debug_pub.Add('p_attr_type - '||p_attr_type,1);
568: cln_debug_pub.Add('p_attr_value - '||p_attr_value,1);
569: cln_debug_pub.Add('==============================',1);
570: END IF;
571:
572: IF (p_attr_type = 'GLN') THEN

Line 569: cln_debug_pub.Add('==============================',1);

565: IF (l_Debug_Level <= 1) THEN
566: cln_debug_pub.Add('++++ PARAMETERS RECEIVED +++ ',1);
567: cln_debug_pub.Add('p_attr_type - '||p_attr_type,1);
568: cln_debug_pub.Add('p_attr_value - '||p_attr_value,1);
569: cln_debug_pub.Add('==============================',1);
570: END IF;
571:
572: IF (p_attr_type = 'GLN') THEN
573: l_msg_data := 'Validation Failed: GLN should be 13 length digits';

Line 643: cln_debug_pub.Add('Target Mkt Check - '||p_attr_value,1);

639:
640: IF (p_attr_type = 'TRGMKT') THEN
641: -- Parameters received
642: IF (l_Debug_Level <= 1) THEN
643: cln_debug_pub.Add('Target Mkt Check - '||p_attr_value,1);
644: END IF;
645:
646:
647: l_msg_data := 'Validation Failed: Target Market should be 1-3 digits';

Line 664: cln_debug_pub.Add(l_msg_data,4);

660: EXCEPTION
661: WHEN FND_API.G_EXC_ERROR THEN
662: x_return_status := FND_API.G_RET_STS_ERROR ;
663: IF (l_Debug_Level <= 4) THEN
664: cln_debug_pub.Add(l_msg_data,4);
665: cln_debug_pub.Add('------- Exiting validate_uccnet_attr API --------- ',2);
666: END IF;
667:
668: return FALSE;

Line 665: cln_debug_pub.Add('------- Exiting validate_uccnet_attr API --------- ',2);

661: WHEN FND_API.G_EXC_ERROR THEN
662: x_return_status := FND_API.G_RET_STS_ERROR ;
663: IF (l_Debug_Level <= 4) THEN
664: cln_debug_pub.Add(l_msg_data,4);
665: cln_debug_pub.Add('------- Exiting validate_uccnet_attr API --------- ',2);
666: END IF;
667:
668: return FALSE;
669: WHEN OTHERS THEN

Line 677: cln_debug_pub.Add(x_msg_data,5);

673: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
674: x_msg_data :=l_error_code||' : '||l_error_msg||' : '||x_msg_data;
675:
676: IF (l_Debug_Level <= 5) THEN
677: cln_debug_pub.Add(x_msg_data,5);
678: END IF;
679:
680: IF (l_Debug_Level <= 2) THEN
681: cln_debug_pub.Add('------- Exiting validate_uccnet_attr - Exception --------- ',2);

Line 681: cln_debug_pub.Add('------- Exiting validate_uccnet_attr - Exception --------- ',2);

677: cln_debug_pub.Add(x_msg_data,5);
678: END IF;
679:
680: IF (l_Debug_Level <= 2) THEN
681: cln_debug_pub.Add('------- Exiting validate_uccnet_attr - Exception --------- ',2);
682: END IF;
683:
684: Return false;
685:

Line 695: cln_debug_pub.Add('... Initialization for UTILS package ...',1);

691: /* Package initialization. */
692: l_debug_level := to_number(nvl(fnd_profile.value('CLN_DEBUG_LEVEL'), '5'));
693:
694: IF (l_Debug_Level <= 1) THEN
695: cln_debug_pub.Add('... Initialization for UTILS package ...',1);
696: END IF;
697:
698: SELECT to_char(e.party_id), to_char(e.party_site_id)
699: INTO g_party_id, g_party_site_id

Line 707: cln_debug_pub.Add('Party ID set as '||g_party_id,1);

703: AND UPPER(e.party_type) = UPPER(c_party_type)
704: AND UPPER(h.location_code) = UPPER(c_party_site_name);
705:
706: IF (l_Debug_Level <= 1) THEN
707: cln_debug_pub.Add('Party ID set as '||g_party_id,1);
708: cln_debug_pub.Add('Party Site ID set as '||g_party_site_id,1);
709: END IF;
710:
711: IF (l_Debug_Level <= 1) THEN

Line 708: cln_debug_pub.Add('Party Site ID set as '||g_party_site_id,1);

704: AND UPPER(h.location_code) = UPPER(c_party_site_name);
705:
706: IF (l_Debug_Level <= 1) THEN
707: cln_debug_pub.Add('Party ID set as '||g_party_id,1);
708: cln_debug_pub.Add('Party Site ID set as '||g_party_site_id,1);
709: END IF;
710:
711: IF (l_Debug_Level <= 1) THEN
712: cln_debug_pub.Add('Trading Partner Setup in the XML Gateway Defined',1);

Line 712: cln_debug_pub.Add('Trading Partner Setup in the XML Gateway Defined',1);

708: cln_debug_pub.Add('Party Site ID set as '||g_party_site_id,1);
709: END IF;
710:
711: IF (l_Debug_Level <= 1) THEN
712: cln_debug_pub.Add('Trading Partner Setup in the XML Gateway Defined',1);
713: END IF;
714:
715: SELECT name
716: INTO g_local_system

Line 721: cln_debug_pub.Add('Local System '||g_local_system,1);

717: FROM wf_systems
718: WHERE guid = wf_core.translate('WF_SYSTEM_GUID');
719:
720: IF (l_Debug_Level <= 1) THEN
721: cln_debug_pub.Add('Local System '||g_local_system,1);
722: cln_debug_pub.Add('wf_core.translate(WF_SYSTEM_GUID) returned normal data',1);
723: END IF;
724:
725: SELECT FND_PROFILE.VALUE('ORG_ID'),

Line 722: cln_debug_pub.Add('wf_core.translate(WF_SYSTEM_GUID) returned normal data',1);

718: WHERE guid = wf_core.translate('WF_SYSTEM_GUID');
719:
720: IF (l_Debug_Level <= 1) THEN
721: cln_debug_pub.Add('Local System '||g_local_system,1);
722: cln_debug_pub.Add('wf_core.translate(WF_SYSTEM_GUID) returned normal data',1);
723: END IF;
724:
725: SELECT FND_PROFILE.VALUE('ORG_ID'),
726: FND_PROFILE.VALUE('M4U_UCCNET_GLN'),

Line 732: cln_debug_pub.Add('Org ID -'||g_org_id,1);

728: INTO g_org_id,g_host_gln,g_supp_gln
729: FROM DUAL;
730:
731: IF (l_Debug_Level <= 1) THEN
732: cln_debug_pub.Add('Org ID -'||g_org_id,1);
733: cln_debug_pub.Add('Host GLN -'||g_host_gln,1);
734: cln_debug_pub.Add('Supplier GLN -'||g_supp_gln,1);
735: cln_debug_pub.Add('profile values set for M4U',1);
736: END IF;

Line 733: cln_debug_pub.Add('Host GLN -'||g_host_gln,1);

729: FROM DUAL;
730:
731: IF (l_Debug_Level <= 1) THEN
732: cln_debug_pub.Add('Org ID -'||g_org_id,1);
733: cln_debug_pub.Add('Host GLN -'||g_host_gln,1);
734: cln_debug_pub.Add('Supplier GLN -'||g_supp_gln,1);
735: cln_debug_pub.Add('profile values set for M4U',1);
736: END IF;
737: END m4u_ucc_utils;

Line 734: cln_debug_pub.Add('Supplier GLN -'||g_supp_gln,1);

730:
731: IF (l_Debug_Level <= 1) THEN
732: cln_debug_pub.Add('Org ID -'||g_org_id,1);
733: cln_debug_pub.Add('Host GLN -'||g_host_gln,1);
734: cln_debug_pub.Add('Supplier GLN -'||g_supp_gln,1);
735: cln_debug_pub.Add('profile values set for M4U',1);
736: END IF;
737: END m4u_ucc_utils;

Line 735: cln_debug_pub.Add('profile values set for M4U',1);

731: IF (l_Debug_Level <= 1) THEN
732: cln_debug_pub.Add('Org ID -'||g_org_id,1);
733: cln_debug_pub.Add('Host GLN -'||g_host_gln,1);
734: cln_debug_pub.Add('Supplier GLN -'||g_supp_gln,1);
735: cln_debug_pub.Add('profile values set for M4U',1);
736: END IF;
737: END m4u_ucc_utils;