eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PV_LOCATOR dependencies on FND_MSG_PUB

Line 167: FND_MSG_PUB.initialize;

163:
164: -- Initialize message list if p_init_msg_list is set to TRUE.
165: IF FND_API.to_Boolean( p_init_msg_list )
166: THEN
167: FND_MSG_PUB.initialize;
168: END IF;
169:
170: -- Debug Message
171: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

Line 171: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

167: FND_MSG_PUB.initialize;
168: END IF;
169:
170: -- Debug Message
171: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
172:
173: Debug(
174: p_msg_string => 'In ' || l_api_name
175: );

Line 209: Set_Error_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,

205: if(l_customer_geocode_object IS NULL) then
206:
207: --raise_application_error(-20502, 'In ' || l_api_name || ' customer address geocode object is null');
208:
209: Set_Error_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
210: p_msg_name => 'PV_LOCATOR_CUST_ADDR_INVALID',
211: p_token1 => null,
212: p_token1_value => null,
213: p_token2 => null,

Line 248: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

244: ,x_msg_data => x_msg_data
245: );
246:
247:
248: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
249: Debug( p_msg_string => 'Success String from FormWhere ' || x_return_status);
250: Debug( p_msg_string => 'msg_data String from FormWhere ' || x_msg_data);
251: END IF;
252:

Line 255: -- IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN

251: END IF;
252:
253:
254: -- FOR i in 1..ceil((length(p_sql_query)/100)) LOOP
255: -- IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
256: -- debug(substr(p_sql_query, (i-1)*100+1, 100));
257: -- END IF;
258: -- l_msg_data:=l_msg_data || substr(p_sql_query, (i-1)*100+1, 100);
259: -- END LOOP;

Line 261: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN

257: -- END IF;
258: -- l_msg_data:=l_msg_data || substr(p_sql_query, (i-1)*100+1, 100);
259: -- END LOOP;
260:
261: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
262: debug('# Partners from form_where_clause:::' || x_matched_id.COUNT );
263: END IF;
264:
265: l_msg_data:=l_msg_data || '# Partners from form_where_clause:::' || x_matched_id.COUNT ;

Line 269: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

265: l_msg_data:=l_msg_data || '# Partners from form_where_clause:::' || x_matched_id.COUNT ;
266:
267: IF ( x_matched_id.COUNT <> 0 ) THEN
268:
269: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
270: Debug(p_msg_string => 'Before opening cursor...');
271: END IF;
272:
273: OPEN l_parties_cursor(l_customer_geocode_object

Line 279: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

275: ,x_matched_id
276: ,p_distance
277: ,p_customer_city);
278:
279: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
280: --Debug(p_msg_string => 'Values sent to cursor...'||l_customer_geocode_object );
281: Debug(p_msg_string => 'Values sent to cursor...'||p_distance_unit );
282: FOR ccc in 1..x_matched_id.COUNT LOOP
283: Debug(p_msg_string => 'Values sent to cursor...'||x_matched_id(ccc) );

Line 292: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

288: END IF;
289:
290:
291: LOOP
292: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
293: Debug(p_msg_string => 'Inside Loop...');
294: END IF;
295:
296: FETCH l_parties_cursor into l_partner_rec;

Line 311: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

307: l_partner_tbl(l_counter).COUNTRY := l_partner_rec.country;
308: l_partner_tbl(l_counter).POSTAL_CODE := l_partner_rec.postal_code;
309: l_partner_tbl(l_counter).distance := l_partner_rec.distance;
310:
311: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
312: Debug(p_msg_string => ':::Distance values:::'||l_partner_rec.DISTANCE);
313: END IF;
314:
315: END LOOP;

Line 321: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

317: CLOSE l_parties_cursor;
318:
319: END IF; -- END IF FOR x_matched_id_COUNT being non zero
320:
321: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
322: Debug(
323: p_msg_string => 'Total No. Of Partners before sending to e_location: ' || l_partner_tbl.count
324: );
325: END IF;

Line 331: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

327: l_msg_data:=l_msg_data || 'Total No. Of Partners before sending to e_location: ' || l_partner_tbl.count;
328:
329: l_skip_server := fnd_profile.value('PV_LOCATOR_DO_SKIP_SERVER');
330:
331: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
332: Debug(p_msg_string => 'Do we SKIP E-Location???: ' || l_skip_server);
333: END IF;
334:
335:

Line 371: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

367: x_partner_tbl(i) := l_return_partner_tbl(i).party_relation_id;
368: x_distance_tbl(i) := l_return_partner_tbl(i).distance;
369: END LOOP;
370:
371: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
372: Debug(p_msg_string => 'Total No. Of Partners after getting response form e_location: ' || x_partner_tbl.count);
373: END IF;
374:
375: l_msg_data:=l_msg_data ||'Total No. Of Partners after getting response form e_location: ' || x_partner_tbl.count;

Line 378: FND_MSG_PUB.Count_And_Get

374:
375: l_msg_data:=l_msg_data ||'Total No. Of Partners after getting response form e_location: ' || x_partner_tbl.count;
376:
377: -- Standard call to get message count and if count is 1, get message info.
378: FND_MSG_PUB.Count_And_Get
379: (
380: p_count => x_msg_count,
381: p_data => x_msg_data
382: );

Line 392: fnd_msg_pub.Count_And_Get

388:
389: WHEN FND_API.G_EXC_ERROR THEN
390:
391: x_return_status := FND_API.G_RET_STS_ERROR ;
392: fnd_msg_pub.Count_And_Get
393: (
394: p_encoded => FND_API.G_TRUE,
395: p_count => x_msg_count,
396: p_data => x_msg_data

Line 402: fnd_msg_pub.Count_And_Get

398:
399: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
400:
401: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
402: fnd_msg_pub.Count_And_Get
403: (
404: p_encoded => FND_API.G_TRUE,
405: p_count => x_msg_count,
406: p_data => x_msg_data

Line 412: --FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);

408:
409: WHEN OTHERS THEN
410:
411: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
412: --FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
413: fnd_msg_pub.Count_And_Get
414: (
415: p_encoded => FND_API.G_TRUE,
416: p_count => x_msg_count,

Line 413: fnd_msg_pub.Count_And_Get

409: WHEN OTHERS THEN
410:
411: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
412: --FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
413: fnd_msg_pub.Count_And_Get
414: (
415: p_encoded => FND_API.G_TRUE,
416: p_count => x_msg_count,
417: p_data => x_msg_data

Line 530: FND_MSG_PUB.initialize;

526:
527: -- Initialize message list if p_init_msg_list is set to TRUE.
528: IF FND_API.to_Boolean( p_init_msg_list )
529: THEN
530: FND_MSG_PUB.initialize;
531: END IF;
532:
533: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
534: Debug(

Line 533: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

529: THEN
530: FND_MSG_PUB.initialize;
531: END IF;
532:
533: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
534: Debug(
535: p_msg_string => '........................................................... '
536: );
537: END IF;

Line 538: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

534: Debug(
535: p_msg_string => '........................................................... '
536: );
537: END IF;
538: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
539: Debug(
540: p_msg_string => 'START OF PV_LOCATOR.GET_PARTNERS() '
541: );
542: END IF;

Line 546: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

542: END IF;
543:
544:
545: -- Debug Message
546: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
547: Debug(
548: p_msg_string => 'In ' || l_api_name
549: );
550: END IF;

Line 575: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

571: else
572: l_distance_unit:=p_distance_unit;
573: end if;
574:
575: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
576: Debug(
577: p_msg_string => 'Distance unit::::' || l_distance_unit
578:
579: );

Line 585: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

581:
582: -- getting geocode object for customer
583: if(p_customer_address.LOCATION_ID is not null) then
584: -- dbms_output.put_line('Location id is not null');
585: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
586: Debug(
587: p_msg_string => 'Location Id::::' || p_customer_address.LOCATION_ID
588:
589: );

Line 604: Set_Error_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,

600:
601:
602: if(p_partner_tbl IS NULL) then
603: --raise_application_error(-20506, ' partner id table received is null' || ' in ' || l_api_name );
604: Set_Error_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
605: p_msg_name => 'PV_LOCATOR_NO_PARTNERS',
606: p_token1 => null,
607: p_token1_value => null,
608: p_token2 => null,

Line 631: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

627: x_partner_tbl.extend;
628: x_distance_tbl.extend;
629: x_partner_tbl(i):=p_partner_tbl(i);
630: --x_distance_tbl(i) := l_return_final_partner_tbl(i).distance;
631: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
632: Debug(
633: p_msg_string => 'id: ' || x_partner_tbl(i) || ' Distance: ' || x_distance_tbl(i)
634: );
635: END IF;

Line 653: Set_Error_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,

649:
650: if(l_customer_geocode_object IS NULL) then
651:
652: --raise_application_error(-20504, ' customer geocode object is null' || ' in ' || l_api_name );
653: Set_Error_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
654: p_msg_name => 'PV_LOCATOR_CUST_ADDR_INVALID',
655: p_token1 => null,
656: p_token1_value => null,
657: p_token2 => null,

Line 666: Set_Error_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,

662:
663: if(l_customer_geocode_object IS NOT NULL and l_customer_geocode_object.sdo_point.x IS NULL) then
664:
665: --raise_application_error(-20505, 'The customer does not have a valid address' );
666: Set_Error_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
667: p_msg_name => 'PV_LOCATOR_CUST_ADDR_INVALID',
668: p_token1 => null,
669: p_token1_value => null,
670: p_token2 => null,

Line 795: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

791:
792: l_string := l_query;
793: loop
794: exit when l_string is null;
795: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
796: Debug(
797: p_msg_string => substr( l_string, 1, 200 )
798: );
799: END IF;

Line 831: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

827: CLOSE l_parties_cursor;
828:
829:
830: --dbms_output.put_line('no of partners before sending eLocation' || l_partner_tbl.count || ' distance' || p_distance || 'unit' || l_distance_unit || 'no' || p_max_no_partners);
831: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
832: Debug(
833: p_msg_string => 'Total No. Of Partners before sending to e_location: ' || l_partner_tbl.count
834: );
835: END IF;

Line 837: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

833: p_msg_string => 'Total No. Of Partners before sending to e_location: ' || l_partner_tbl.count
834: );
835: END IF;
836:
837: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
838: Debug(
839: p_msg_string => 'Skipping e_location server?? ' || l_skip_server
840: );
841: END IF;

Line 847: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

843: -- if skip server profile value is set to true, we need to skip the server and return results
844: -- based on the radial distances.
845: if(upper(l_skip_server) = 'Y') then
846:
847: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
848: Debug(
849: p_msg_string => 'Returning partners with out calling Get_Partners_From_ELocation'
850: );
851: END IF;

Line 868: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

864: END LOOP;
865:
866:
867: elsif(l_partner_tbl.count <>0) then
868: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
869: Debug(
870: p_msg_string => 'Before calling Get_Partners_From_ELocation'
871: );
872: END IF;

Line 896: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

892:
893: else
894: l_return_final_partner_tbl := l_partner_tbl;
895: end if;
896: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
897: Debug(
898: p_msg_string => 'Total No. Of Partnersafter getting from e_location: ' || l_return_final_partner_tbl.count
899: );
900: END IF;

Line 901: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

897: Debug(
898: p_msg_string => 'Total No. Of Partnersafter getting from e_location: ' || l_return_final_partner_tbl.count
899: );
900: END IF;
901: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
902: Debug(
903: p_msg_string => 'Partners List after getting from eLocation...
904: ::::'
905: );

Line 916: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

912: x_partner_tbl.extend;
913: x_distance_tbl.extend;
914: x_partner_tbl(i):=l_return_final_partner_tbl(i).party_relation_id;
915: x_distance_tbl(i) := l_return_final_partner_tbl(i).distance;
916: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
917: Debug(
918: p_msg_string => 'id: ' || x_partner_tbl(i) || ' Distance: ' || x_distance_tbl(i)
919: );
920: END IF;

Line 928: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

924:
925:
926:
927: --dbms_output.put_line('no of patners returned' || l_return_final_partner_tbl.count);
928: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
929: Debug(
930: p_msg_string => 'END OF PV_LOCATOR.GET_PARTNERS() '
931: );
932: END IF;

Line 933: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

929: Debug(
930: p_msg_string => 'END OF PV_LOCATOR.GET_PARTNERS() '
931: );
932: END IF;
933: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
934: Debug(
935: p_msg_string => '........................................................... '
936: );
937: END IF;

Line 941: FND_MSG_PUB.Count_And_Get

937: END IF;
938:
939:
940: -- Standard call to get message count and if count is 1, get message info.
941: FND_MSG_PUB.Count_And_Get
942: (
943: p_count => x_msg_count,
944: p_data => x_msg_data
945: );

Line 952: fnd_msg_pub.Count_And_Get

948:
949: WHEN FND_API.G_EXC_ERROR THEN
950:
951: x_return_status := FND_API.G_RET_STS_ERROR ;
952: fnd_msg_pub.Count_And_Get
953: (
954: p_encoded => FND_API.G_TRUE,
955: p_count => x_msg_count,
956: p_data => x_msg_data

Line 963: fnd_msg_pub.Count_And_Get

959: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
960:
961: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
962:
963: fnd_msg_pub.Count_And_Get
964: (
965: p_encoded => FND_API.G_TRUE,
966: p_count => x_msg_count,
967: p_data => x_msg_data

Line 973: --FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);

969:
970: WHEN OTHERS THEN
971:
972: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
973: --FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
974: --Debug(SQLCODE || ':::' || SQLERRM);
975: fnd_msg_pub.Count_And_Get
976: (
977: p_encoded => FND_API.G_TRUE,

Line 975: fnd_msg_pub.Count_And_Get

971:
972: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
973: --FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
974: --Debug(SQLCODE || ':::' || SQLERRM);
975: fnd_msg_pub.Count_And_Get
976: (
977: p_encoded => FND_API.G_TRUE,
978: p_count => x_msg_count,
979: p_data => x_msg_data

Line 1067: FND_MSG_PUB.initialize;

1063:
1064: -- Initialize message list if p_init_msg_list is set to TRUE.
1065: IF FND_API.to_Boolean( p_init_msg_list )
1066: THEN
1067: FND_MSG_PUB.initialize;
1068: END IF;
1069: -- Debug Message
1070: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
1071: Debug(

Line 1070: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

1066: THEN
1067: FND_MSG_PUB.initialize;
1068: END IF;
1069: -- Debug Message
1070: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
1071: Debug(
1072: p_msg_string => 'In ' || l_api_name
1073: );
1074: END IF;

Line 1086: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

1082: l_sort_by_distance := 'true';
1083: else
1084: l_sort_by_distance := 'false';
1085: end if;
1086: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
1087: Debug(
1088: p_msg_string => 'Sort By Distance::::::::::::: ' || l_sort_by_distance
1089: );
1090: END IF;

Line 1108: Set_Error_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,

1104:
1105:
1106: if(p_partner_tbl IS NULL) then
1107: --raise_application_error(-20508, 'In ' || l_api_name || ' partner address table is null');
1108: Set_Error_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
1109: p_msg_name => 'PV_LOCATOR_PARTNERS_NONE',
1110: p_token1 => null,
1111: p_token1_value => null,
1112: p_token2 => null,

Line 1179: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

1175: partner_xml ||
1176: ' ';
1177:
1178: --dbms_output.put_line('in elocation call after xml request');
1179: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
1180: Debug(
1181: p_msg_string => 'XML REQUEST: **************'
1182: );
1183: END IF;

Line 1190: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

1186: --printing xml_request
1187: l_string := xml_request;
1188: loop
1189: exit when l_string is null;
1190: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
1191: Debug(
1192: p_msg_string => substr( l_string, 1, 200 )
1193: );
1194: END IF;

Line 1213: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

1209: x_msg_data => x_msg_data
1210: );
1211:
1212: -- dbms_output.put_line('got the response..');
1213: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
1214: Debug(
1215: p_msg_string => 'XML RESPONSE: **************'
1216: );
1217: END IF;

Line 1223: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

1219: --printing xml_response
1220: l_string := xml_response;
1221: loop
1222: exit when l_string is null;
1223: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
1224: Debug(
1225: p_msg_string => substr( l_string, 1, 200 )
1226: );
1227: END IF;

Line 1236: Set_Error_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,

1232:
1233: --what if xml_response is null
1234: if (xml_response is null) then
1235: --raise_application_error(-20516, 'In ' || l_api_name || ' Server is not available. Sever may be down right now. Try after some time.');
1236: Set_Error_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
1237: p_msg_name => 'PV_LOCATOR_SERVICE_UNAVAILABLE',
1238: p_token1 => null,
1239: p_token1_value => null,
1240: p_token2 => null,

Line 1261: Set_Error_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,

1257: INSTR(xml_response,' Error parsing',1, 1) <> 0 ) THEN
1258:
1259: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1260: --raise_application_error(-20509, ' eLocation Server is not available' || 'in ' || l_api_name );
1261: Set_Error_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
1262: p_msg_name => 'PV_LOCATOR_SERVICE_UNAVAILABLE',
1263: p_token1 => null,
1264: p_token1_value => null,
1265: p_token2 => null,

Line 1305: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

1301: EXIT when INSTR(xml_response, 'router_error id', 1, 1) =0 ;
1302:
1303: --First find location for id and then find location for " if id exists.
1304: l_partyid_loc := INSTR(xml_response, 'router_error id', 1, 1);
1305: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
1306: Debug( p_msg_string => 'partner with invalid geocode (Geometry)' || l_partyid_loc );
1307: END IF;
1308: IF l_partyid_loc = 0 THEN
1309: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 1311: Set_Error_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,

1307: END IF;
1308: IF l_partyid_loc = 0 THEN
1309: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1310: --raise_application_error(-20510,' eLocation Server is not available' || 'in ' || l_api_name);
1311: Set_Error_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
1312: p_msg_name => 'PV_LOCATOR_SERVICE_UNAVAILABLE',
1313: p_token1 => null,
1314: p_token1_value => null,
1315: p_token2 => null,

Line 1335: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

1331: --at this point, check l_party_id
1332: --if l_party_id is 1, that means error comes at geocoding customer address which is start address.
1333: -- then eLocation server, will not return any party ids with distances.
1334: --So we need to handle this seperately in manual matching case where p_distance is null and p_max_no_partners is null
1335: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
1336: Debug( p_msg_string => 'partner with invalid geocode (Geometry):party_id:' || l_party_id );
1337: END IF;
1338: --if p_distance is null and p_max_no_partners is null, then only we have to return partners with null distance
1339: -- so checking here

Line 1344: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

1340: if (p_distance is null and p_max_no_partners is null) then
1341: --add partner_id to partner table and null to distance table
1342: if (l_partner_count >= l_max_no_partners) then
1343:
1344: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
1345: Debug(
1346: p_msg_string => 'max_no_of_partners reached ...exiting..' ||l_api_name
1347: );
1348: END IF;

Line 1356: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

1352: -- then eLocation server, will not return any party ids with distances.
1353: --So we need to handle this seperately in manual matching case where p_distance is null and p_max_no_partners is null
1354:
1355: elsif (l_party_id=1) then
1356: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
1357: Debug( p_msg_string => 'Customer address (start address) is not geocodable, Change customer address and try again' );
1358: END IF;
1359:
1360:

Line 1403: Set_Error_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,

1399:
1400: IF l_partyid_loc = 0 THEN
1401: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1402: --raise_application_error(-20510,' eLocation Server is not available' || 'in ' || l_api_name);
1403: Set_Error_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
1404: p_msg_name => 'PV_LOCATOR_SERVICE_UNAVAILABLE',
1405: p_token1 => null,
1406: p_token1_value => null,
1407: p_token2 => null,

Line 1429: Set_Error_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,

1425:
1426: IF l_distance_loc = 0 THEN
1427: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1428: --raise_application_error(-20511, ' eLocation Server is not available' || 'in ' || l_api_name );
1429: Set_Error_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
1430: p_msg_name => 'PV_LOCATOR_SERVICE_UNAVAILABLE',
1431: p_token1 => null,
1432: p_token1_value => null,
1433: p_token2 => null,

Line 1456: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN

1452:
1453: if (l_partner_count >= l_max_no_partners) then
1454:
1455:
1456: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
1457: Debug(
1458: p_msg_string => 'max_no_of_partners reached ...exiting..' ||l_api_name
1459: );
1460: END IF;

Line 1487: FND_MSG_PUB.Count_And_Get

1483: -- dbms_output.put_line('size of l_partner Table is ' || l_partner_tbl.count);
1484:
1485: --************************************************
1486: -- Standard call to get message count and if count is 1, get message info.
1487: FND_MSG_PUB.Count_And_Get
1488: (
1489: p_count => x_msg_count,
1490: p_data => x_msg_data
1491: );

Line 1499: fnd_msg_pub.Count_And_Get

1495:
1496: WHEN FND_API.G_EXC_ERROR THEN
1497:
1498: x_return_status := FND_API.G_RET_STS_ERROR ;
1499: fnd_msg_pub.Count_And_Get
1500: (
1501: p_encoded => FND_API.G_TRUE,
1502: p_count => x_msg_count,
1503: p_data => x_msg_data

Line 1509: fnd_msg_pub.Count_And_Get

1505:
1506: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1507:
1508: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1509: fnd_msg_pub.Count_And_Get
1510: (
1511: p_encoded => FND_API.G_TRUE,
1512: p_count => x_msg_count,
1513: p_data => x_msg_data

Line 1519: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);

1515:
1516: WHEN OTHERS THEN
1517:
1518: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1519: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1520: fnd_msg_pub.Count_And_Get
1521: (
1522: p_encoded => FND_API.G_TRUE,
1523: p_count => x_msg_count,

Line 1520: fnd_msg_pub.Count_And_Get

1516: WHEN OTHERS THEN
1517:
1518: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1519: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1520: fnd_msg_pub.Count_And_Get
1521: (
1522: p_encoded => FND_API.G_TRUE,
1523: p_count => x_msg_count,
1524: p_data => x_msg_data

Line 1574: Set_Error_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,

1570: -- Extract latitude
1571: latitude_loc := INSTR(xml_response, 'latitude', 1, 1);
1572: IF latitude_loc = 0 THEN
1573: --raise_application_error(-20512, 'latitude is missing');
1574: Set_Error_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
1575: p_msg_name => 'PV_LOCATOR_CUST_ADDR_INVALID',
1576: p_token1 => null,
1577: p_token1_value => null,
1578: p_token2 => null,

Line 1598: Set_Error_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,

1594: -- Extract longitude
1595: longitude_loc := INSTR(xml_response, 'longitude', 1, 1);
1596: IF longitude_loc = 0 THEN
1597: --raise_application_error(-20513, 'longitude is missing');
1598: Set_Error_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
1599: p_msg_name => 'PV_LOCATOR_CUST_ADDR_INVALID',
1600: p_token1 => null,
1601: p_token1_value => null,
1602: p_token2 => null,

Line 1821: FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1817:
1818: BEGIN
1819:
1820: IF
1821: FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1822: THEN
1823: FND_MESSAGE.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1824: FND_MESSAGE.Set_Token('TEXT', p_msg_string);
1825: FND_MSG_PUB.Add;

Line 1825: FND_MSG_PUB.Add;

1821: FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1822: THEN
1823: FND_MESSAGE.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1824: FND_MESSAGE.Set_Token('TEXT', p_msg_string);
1825: FND_MSG_PUB.Add;
1826: END IF;
1827: END Debug;
1828: -- =================================End of Debug================================
1829:

Line 1859: IF FND_MSG_PUB.Check_Msg_Level(p_msg_level) THEN

1855: p_token3_value IN VARCHAR2 := NULL
1856: )
1857: IS
1858: BEGIN
1859: IF FND_MSG_PUB.Check_Msg_Level(p_msg_level) THEN
1860: FND_MESSAGE.Set_Name('PV', p_msg_name);
1861:
1862: IF (p_token1 IS NOT NULL) THEN
1863: FND_MESSAGE.Set_Token(p_token1, p_token1_value);

Line 1874: FND_MSG_PUB.Add;

1870: IF (p_token3 IS NOT NULL) THEN
1871: FND_MESSAGE.Set_Token(p_token3, p_token3_value);
1872: END IF;
1873:
1874: FND_MSG_PUB.Add;
1875: END IF;
1876: END Set_Error_Message;
1877: -- ==============================End of Set_Error_Message==============================
1878: