DBA Data[Home] [Help]

APPS.IRC_LOCATION_UTILITY dependencies on HR_UTILITY

Line 43: hr_utility.set_location(' Entering: ' || l_proc, 10);

39: return_string_array utl_http.html_pieces;
40: max_pieces binary_integer:=16;
41: l_proc varchar2(72) := g_package||'address2geocodexml';
42: BEGIN
43: hr_utility.set_location(' Entering: ' || l_proc, 10);
44: -- construct us_form2
45: us_form2 := ' 46: IF name IS not NULL THEN
47: us_form2 := us_form2 || 'name="' || removeInvalidChars(name) || '" ';

Line 62: hr_utility.set_location(l_proc, 20);

58: IF zip_code IS not null THEN
59: us_form2 := us_form2 || 'zip_code="' || removeInvalidChars(zip_code) || '" ';
60: END IF;
61: us_form2 := us_form2 || '/>';
62: hr_utility.set_location(l_proc, 20);
63: -- construct XML request
64: xml_request := '' ||
65: '' ||
66: ' ' ||

Line 93: hr_utility.set_location(l_proc, 30);

89: xml_request := replace(xml_request, '=', '%3D');
90: xml_request := replace(xml_request, '+', '%2B');
91: xml_request := replace(xml_request, '$', '%24');
92: xml_request := replace(xml_request, ',', '%2C');
93: hr_utility.set_location(l_proc, 30);
94:
95: -- construct URL
96: geocoder_host:=fnd_profile.value('IRC_GEOCODE_HOST');
97:

Line 112: hr_utility.set_location('Leaving :'||l_proc, 40);

108: return_string:=return_string||return_string_array(j);
109: end loop;
110: return return_string;
111:
112: hr_utility.set_location('Leaving :'||l_proc, 40);
113: end address2geocodexml;
114: -- -------------------------------------------------------------------------
115: -- |-------------------------< address2geocodexml >------------------------|
116: -- -------------------------------------------------------------------------

Line 140: hr_utility.set_location(' Entering: ' || l_proc, 10);

136: return_string_array utl_http.html_pieces;
137: max_pieces binary_integer:=16;
138: l_proc varchar2(72) := g_package||'address2geocodexml';
139: BEGIN
140: hr_utility.set_location(' Entering: ' || l_proc, 10);
141: -- construct gdf_form
142: gdf_form := ' 143: IF name IS not NULL THEN
144: gdf_form := gdf_form || 'name="' || removeInvalidChars(name) || '" ';

Line 174: hr_utility.set_location(l_proc, 20);

170: IF postal_addon_code IS not null THEN
171: gdf_form := gdf_form || 'postal_addon_code="' || removeInvalidChars(postal_addon_code) || '" ';
172: END IF;
173: gdf_form := gdf_form || '/>';
174: hr_utility.set_location(l_proc, 20);
175: -- construct XML request
176: xml_request := '' ||
177: '' ||
178: ' ' ||

Line 204: hr_utility.set_location(l_proc, 30);

200: xml_request := replace(xml_request, '=', '%3D');
201: xml_request := replace(xml_request, '+', '%2B');
202: xml_request := replace(xml_request, '$', '%24');
203: xml_request := replace(xml_request, ',', '%2C');
204: hr_utility.set_location(l_proc, 30);
205:
206: -- construct URL
207: geocoder_host:=fnd_profile.value('IRC_GEOCODE_HOST');
208:

Line 222: hr_utility.set_location('Leaving :'||l_proc, 40);

218: return_string:=return_string||return_string_array(j);
219: end loop;
220: return return_string;
221:
222: hr_utility.set_location('Leaving :'||l_proc, 40);
223: end address2geocodexml;
224: -- -------------------------------------------------------------------------
225: -- |-----------------------------< address2xml >---------------------------|
226: -- -------------------------------------------------------------------------

Line 246: hr_utility.set_location(' Entering: ' || l_proc, 10);

242: unformatted_form VARCHAR2(32767);
243: xml_request VARCHAR2(32767);
244: l_proc varchar2(72) := g_package||'address2xml';
245: BEGIN
246: hr_utility.set_location(' Entering: ' || l_proc, 10);
247: -- construct unformatted_form
248: unformatted_form := ' 249: IF country IS not NULL THEN
250: unformatted_form := unformatted_form || 'country="' || removeInvalidChars(country) || '" ';

Line 284: hr_utility.set_location(l_proc, 20);

280: unformatted_form := ' '
281: ||''
282: ||unformatted_form
283: ||'
';
284: hr_utility.set_location(l_proc, 20);
285: return unformatted_form;
286: end address2xml;
287: -- -------------------------------------------------------------------------
288: -- |-------------------------< address2geocodexml >------------------------|

Line 313: hr_utility.set_location(' Entering: ' || l_proc, 10);

309: return_string_array utl_http.html_pieces;
310: max_pieces binary_integer:=16;
311: l_proc varchar2(72) := g_package||'address2geocodexml';
312: BEGIN
313: hr_utility.set_location(' Entering: ' || l_proc, 10);
314: -- construct unformatted_form
315: unformatted_form :=address2xml(address_line1 => address_line1
316: ,address_line2 => address_line2
317: ,address_line3 => address_line3

Line 326: hr_utility.set_location(l_proc, 20);

322: ,address_line8 => address_line8
323: ,address_line9 => address_line9
324: ,country => country);
325:
326: hr_utility.set_location(l_proc, 20);
327: -- construct XML request
328: xml_request := '' ||
329: '' ||
330: ' ' ||

Line 351: hr_utility.set_location(l_proc, 30);

347: xml_request := replace(xml_request, '=', '%3D');
348: xml_request := replace(xml_request, '+', '%2B');
349: xml_request := replace(xml_request, '$', '%24');
350: xml_request := replace(xml_request, ',', '%2C');
351: hr_utility.set_location(l_proc, 30);
352: -- construct URL
353: geocoder_host:=fnd_profile.value('IRC_GEOCODE_HOST');
354:
355: url := geocoder_host ||

Line 368: hr_utility.set_location('Leaving :'||l_proc, 40);

364: return_string:=return_string||return_string_array(j);
365: end loop;
366: return return_string;
367:
368: hr_utility.set_location('Leaving :'||l_proc, 40);
369: end address2geocodexml;
370: --
371: -- -------------------------------------------------------------------------
372: -- |---------------------------< process_return_xml >----------------------|

Line 388: hr_utility.set_location(' Entering: '||l_proc, 10);

384: l_latitude number;
385: l_proc varchar2(72) := g_package||'process_return_xml';
386: begin
387:
388: hr_utility.set_location(' Entering: '||l_proc, 10);
389: parser:=xmlparser.newParser;
390: xmlparser.parseBuffer(parser,xml_response);
391: address_doc:=xmlparser.getDocument(parser);
392: xmlparser.freeParser(parser);

Line 393: hr_utility.set_location(l_proc, 20);

389: parser:=xmlparser.newParser;
390: xmlparser.parseBuffer(parser,xml_response);
391: address_doc:=xmlparser.getDocument(parser);
392: xmlparser.freeParser(parser);
393: hr_utility.set_location(l_proc, 20);
394: match_nodes:=xslprocessor.selectNodes(xmldom.makeNode(address_doc),'/geocode_response/geocode/match');
395: if xmldom.getlength(match_nodes)>0 then
396: hr_utility.set_location(l_proc, 30);
397: match_node :=xmldom.item(match_nodes,0);

Line 396: hr_utility.set_location(l_proc, 30);

392: xmlparser.freeParser(parser);
393: hr_utility.set_location(l_proc, 20);
394: match_nodes:=xslprocessor.selectNodes(xmldom.makeNode(address_doc),'/geocode_response/geocode/match');
395: if xmldom.getlength(match_nodes)>0 then
396: hr_utility.set_location(l_proc, 30);
397: match_node :=xmldom.item(match_nodes,0);
398: xslprocessor.valueOf(match_node,'@longitude',l_longitude);
399: xslprocessor.valueOf(match_node,'@latitude',l_latitude);
400: end if;

Line 402: hr_utility.set_location(l_proc, 40);

398: xslprocessor.valueOf(match_node,'@longitude',l_longitude);
399: xslprocessor.valueOf(match_node,'@latitude',l_latitude);
400: end if;
401: xmldom.freeDocument(address_doc);
402: hr_utility.set_location(l_proc, 40);
403: if (l_longitude is not null and l_latitude is not null) then
404: RETURN MDSYS.SDO_GEOMETRY(2001
405: ,8307
406: ,MDSYS.SDO_POINT_TYPE

Line 418: hr_utility.set_location(l_proc, 50);

414: end if;
415: exception
416: when others then
417: begin
418: hr_utility.set_location(l_proc, 50);
419: xmldom.freeDocument(address_doc);
420: return null;
421: exception
422: when others then

Line 443: hr_utility.set_location('Entering :'||l_proc, 10);

439: AS
440: xml_response VARCHAR2(32767);
441: l_proc varchar2(72) := g_package||'address2geometry';
442: BEGIN
443: hr_utility.set_location('Entering :'||l_proc, 10);
444: -- Get xml geocode response string
445: xml_response := irc_location_utility.address2geocodexml
446: (name => name
447: ,street => street

Line 475: hr_utility.set_location('Entering :'||l_proc, 10);

471: i number;
472: xml_response VARCHAR2(32767);
473: l_proc varchar2(72) := g_package||'address2geometry';
474: BEGIN
475: hr_utility.set_location('Entering :'||l_proc, 10);
476: -- Get xml geocode response string
477: xml_response := irc_location_utility.address2geocodexml
478: (name => name
479: ,street => street

Line 490: hr_utility.set_location(substr(xml_response,i,70),20);

486: ,postal_code => postal_code
487: ,postal_addon_code => postal_addon_code);
488: /*i:=0;
489: while (i 490: hr_utility.set_location(substr(xml_response,i,70),20);
491: i:=i+70;
492: end loop;*/
493: return irc_location_utility.process_return_xml(xml_response);
494: end address2geometry;

Line 517: hr_utility.set_location('Entering :'||l_proc, 10);

513: i number;
514: xml_response VARCHAR2(32767);
515: l_proc varchar2(72) := g_package||'address2geometry';
516: BEGIN
517: hr_utility.set_location('Entering :'||l_proc, 10);
518: -- Get xml geocode response string
519: xml_response := irc_location_utility.address2geocodexml
520: (address_line1 => address_line1
521: ,address_line2 => address_line2

Line 532: hr_utility.set_location(substr(xml_response,i,70),20);

528: ,address_line9 => address_line9
529: ,country => country);
530: /*i:=0;
531: while (i 532: hr_utility.set_location(substr(xml_response,i,70),20);
533: i:=i+70;
534: end loop;*/
535: return irc_location_utility.process_return_xml(xml_response);
536: end address2geometry;

Line 583: hr_utility.set_location('Entering process_addresses :', 100);

579: max_pieces binary_integer:=16;
580: --+
581: procedure process_addresses is
582: begin
583: hr_utility.set_location('Entering process_addresses :', 100);
584: xml_response:= ''
585: || ''
586: || ''
587: || address_list

Line 610: hr_utility.set_location('Length of url '||lengthb(url), 110);

606: --+ construct URL
607: url := fnd_profile.value('IRC_GEOCODE_HOST')
608: || '?xml_request='
609: || xml_response;
610: hr_utility.set_location('Length of url '||lengthb(url), 110);
611: return_string_array :=
612: irc_xml_util.http_get_pieces(url => url
613: ,max_pieces => max_pieces);
614: hr_utility.set_location('recieved the response ', 120);

Line 614: hr_utility.set_location('recieved the response ', 120);

610: hr_utility.set_location('Length of url '||lengthb(url), 110);
611: return_string_array :=
612: irc_xml_util.http_get_pieces(url => url
613: ,max_pieces => max_pieces);
614: hr_utility.set_location('recieved the response ', 120);
615: return_string := null;
616: for j in return_string_array.first .. return_string_array.last loop
617: return_string := return_string || return_string_array(j);
618: end loop;

Line 626: hr_utility.set_location(xslprocessor.valueOf(geocode_node,'@match_count')||' for line '||j,130);

622: geocode_nodes := xslprocessor.selectNodes(xmldom.makeNode(address_doc),'/geocode_response/geocode');
623: if xmldom.getLength(geocode_nodes) > 0 then
624: for j in 1 .. xmldom.getLength(geocode_nodes) loop
625: geocode_node := xmldom.item(geocode_nodes,j-1);
626: hr_utility.set_location(xslprocessor.valueOf(geocode_node,'@match_count')||' for line '||j,130);
627: if to_number(xslprocessor.valueOf(geocode_node,'@match_count'))>0 then
628: match_node :=xslprocessor.selectSingleNode(geocode_node,'match');
629: longitude(first_line+j) :=xslprocessor.valueOf(match_node,'@longitude');
630: latitude(first_line+j) :=xslprocessor.valueOf(match_node,'@latitude');

Line 633: hr_utility.set_location('Geometry found for address_id :'||address_id(first_line+j) ,140);

629: longitude(first_line+j) :=xslprocessor.valueOf(match_node,'@longitude');
630: latitude(first_line+j) :=xslprocessor.valueOf(match_node,'@latitude');
631: if latitude(first_line+j) is not null and longitude(first_line+j) is not null then
632: l_success:=l_success+1;
633: hr_utility.set_location('Geometry found for address_id :'||address_id(first_line+j) ,140);
634: hr_utility.set_location('Longitude :'||longitude(first_line+j) ,141);
635: hr_utility.set_location('Latitude :'||latitude(first_line+j) ,142);
636: end if;
637: else

Line 634: hr_utility.set_location('Longitude :'||longitude(first_line+j) ,141);

630: latitude(first_line+j) :=xslprocessor.valueOf(match_node,'@latitude');
631: if latitude(first_line+j) is not null and longitude(first_line+j) is not null then
632: l_success:=l_success+1;
633: hr_utility.set_location('Geometry found for address_id :'||address_id(first_line+j) ,140);
634: hr_utility.set_location('Longitude :'||longitude(first_line+j) ,141);
635: hr_utility.set_location('Latitude :'||latitude(first_line+j) ,142);
636: end if;
637: else
638: hr_utility.set_location('Geometry not found for address_id :'||address_id(first_line+j) ,150);

Line 635: hr_utility.set_location('Latitude :'||latitude(first_line+j) ,142);

631: if latitude(first_line+j) is not null and longitude(first_line+j) is not null then
632: l_success:=l_success+1;
633: hr_utility.set_location('Geometry found for address_id :'||address_id(first_line+j) ,140);
634: hr_utility.set_location('Longitude :'||longitude(first_line+j) ,141);
635: hr_utility.set_location('Latitude :'||latitude(first_line+j) ,142);
636: end if;
637: else
638: hr_utility.set_location('Geometry not found for address_id :'||address_id(first_line+j) ,150);
639: end if;

Line 638: hr_utility.set_location('Geometry not found for address_id :'||address_id(first_line+j) ,150);

634: hr_utility.set_location('Longitude :'||longitude(first_line+j) ,141);
635: hr_utility.set_location('Latitude :'||latitude(first_line+j) ,142);
636: end if;
637: else
638: hr_utility.set_location('Geometry not found for address_id :'||address_id(first_line+j) ,150);
639: end if;
640: end loop;
641: else
642: geocode_node := xslprocessor.selectSingleNode(xmldom.makeNode(address_doc),'/component_error');

Line 644: hr_utility.set_location('ERROR thrown from geocode host',155);

640: end loop;
641: else
642: geocode_node := xslprocessor.selectSingleNode(xmldom.makeNode(address_doc),'/component_error');
643: errorMsg := xslprocessor.valueOf(geocode_node,'/component_error');
644: hr_utility.set_location('ERROR thrown from geocode host',155);
645: hr_utility.set_location(substrb(substrb(errorMsg,1,instrb(errorMsg,fnd_global.local_chr(10))-1),1,80),160);
646: end if;
647: xmldom.freeDocument(address_doc);
648: EXCEPTION

Line 645: hr_utility.set_location(substrb(substrb(errorMsg,1,instrb(errorMsg,fnd_global.local_chr(10))-1),1,80),160);

641: else
642: geocode_node := xslprocessor.selectSingleNode(xmldom.makeNode(address_doc),'/component_error');
643: errorMsg := xslprocessor.valueOf(geocode_node,'/component_error');
644: hr_utility.set_location('ERROR thrown from geocode host',155);
645: hr_utility.set_location(substrb(substrb(errorMsg,1,instrb(errorMsg,fnd_global.local_chr(10))-1),1,80),160);
646: end if;
647: xmldom.freeDocument(address_doc);
648: EXCEPTION
649: when OTHERS then

Line 651: hr_utility.set_location('Unexpected error in elocation response processing',194);

647: xmldom.freeDocument(address_doc);
648: EXCEPTION
649: when OTHERS then
650: xmldom.freeDocument(address_doc);
651: hr_utility.set_location('Unexpected error in elocation response processing',194);
652: hr_utility.set_location('Unexpected error :'||SQLERRM,195);
653: hr_utility.set_location('Unexpected error :'||SQLCODE,196);
654: END;
655: --+

Line 652: hr_utility.set_location('Unexpected error :'||SQLERRM,195);

648: EXCEPTION
649: when OTHERS then
650: xmldom.freeDocument(address_doc);
651: hr_utility.set_location('Unexpected error in elocation response processing',194);
652: hr_utility.set_location('Unexpected error :'||SQLERRM,195);
653: hr_utility.set_location('Unexpected error :'||SQLCODE,196);
654: END;
655: --+
656: hr_utility.set_location('Leaving process_addresses :',170);

Line 653: hr_utility.set_location('Unexpected error :'||SQLCODE,196);

649: when OTHERS then
650: xmldom.freeDocument(address_doc);
651: hr_utility.set_location('Unexpected error in elocation response processing',194);
652: hr_utility.set_location('Unexpected error :'||SQLERRM,195);
653: hr_utility.set_location('Unexpected error :'||SQLCODE,196);
654: END;
655: --+
656: hr_utility.set_location('Leaving process_addresses :',170);
657: exception

Line 656: hr_utility.set_location('Leaving process_addresses :',170);

652: hr_utility.set_location('Unexpected error :'||SQLERRM,195);
653: hr_utility.set_location('Unexpected error :'||SQLCODE,196);
654: END;
655: --+
656: hr_utility.set_location('Leaving process_addresses :',170);
657: exception
658: when others then
659: --this is a bulk process, so ignore errors and move on
660: hr_utility.set_location('Unexpected error in address processing',197);

Line 660: hr_utility.set_location('Unexpected error in address processing',197);

656: hr_utility.set_location('Leaving process_addresses :',170);
657: exception
658: when others then
659: --this is a bulk process, so ignore errors and move on
660: hr_utility.set_location('Unexpected error in address processing',197);
661: hr_utility.set_location('Unexpected error :'||SQLERRM,198);
662: hr_utility.set_location('Unexpected error :'||SQLCODE,199);
663: end process_addresses;
664: BEGIN

Line 661: hr_utility.set_location('Unexpected error :'||SQLERRM,198);

657: exception
658: when others then
659: --this is a bulk process, so ignore errors and move on
660: hr_utility.set_location('Unexpected error in address processing',197);
661: hr_utility.set_location('Unexpected error :'||SQLERRM,198);
662: hr_utility.set_location('Unexpected error :'||SQLCODE,199);
663: end process_addresses;
664: BEGIN
665: hr_utility.set_location('Entering :'||l_proc, 10);

Line 662: hr_utility.set_location('Unexpected error :'||SQLCODE,199);

658: when others then
659: --this is a bulk process, so ignore errors and move on
660: hr_utility.set_location('Unexpected error in address processing',197);
661: hr_utility.set_location('Unexpected error :'||SQLERRM,198);
662: hr_utility.set_location('Unexpected error :'||SQLCODE,199);
663: end process_addresses;
664: BEGIN
665: hr_utility.set_location('Entering :'||l_proc, 10);
666: first_line := 0;

Line 665: hr_utility.set_location('Entering :'||l_proc, 10);

661: hr_utility.set_location('Unexpected error :'||SQLERRM,198);
662: hr_utility.set_location('Unexpected error :'||SQLCODE,199);
663: end process_addresses;
664: BEGIN
665: hr_utility.set_location('Entering :'||l_proc, 10);
666: first_line := 0;
667: parser := xmlparser.newParser;
668: for i in address_id.first..address_id.last loop
669: longitude(i):= null;

Line 683: hr_utility.set_location('count of address_id :'||address_id.count,20);

679: ,address_line7 =>address_line7(i)
680: ,address_line8 =>address_line8(i)
681: ,address_line9 =>address_line9(i)
682: ,country =>country(i));
683: hr_utility.set_location('count of address_id :'||address_id.count,20);
684: address_list := address_string;
685: first_line := i-1;
686: process_addresses();
687: end loop;

Line 693: hr_utility.set_location('Leaving :'||l_proc, 45);

689: success := l_success;
690: failure := address_id.count - l_success;
691: xmlparser.freeParser(parser);
692: --+
693: hr_utility.set_location('Leaving :'||l_proc, 45);
694: exception
695: when others then
696: -- this is a bulk process, so ignore errors and move on
697: xmlparser.freeParser(parser);

Line 698: hr_utility.set_location('Unexpected error in bulk processing',50);

694: exception
695: when others then
696: -- this is a bulk process, so ignore errors and move on
697: xmlparser.freeParser(parser);
698: hr_utility.set_location('Unexpected error in bulk processing',50);
699: hr_utility.set_location('Unexpected error :'||SQLERRM,55);
700: hr_utility.set_location('Unexpected error :'||SQLCODE,56);
701: end bulk_address2geometry;
702: --

Line 699: hr_utility.set_location('Unexpected error :'||SQLERRM,55);

695: when others then
696: -- this is a bulk process, so ignore errors and move on
697: xmlparser.freeParser(parser);
698: hr_utility.set_location('Unexpected error in bulk processing',50);
699: hr_utility.set_location('Unexpected error :'||SQLERRM,55);
700: hr_utility.set_location('Unexpected error :'||SQLCODE,56);
701: end bulk_address2geometry;
702: --
703: -- -------------------------------------------------------------------------

Line 700: hr_utility.set_location('Unexpected error :'||SQLCODE,56);

696: -- this is a bulk process, so ignore errors and move on
697: xmlparser.freeParser(parser);
698: hr_utility.set_location('Unexpected error in bulk processing',50);
699: hr_utility.set_location('Unexpected error :'||SQLERRM,55);
700: hr_utility.set_location('Unexpected error :'||SQLCODE,56);
701: end bulk_address2geometry;
702: --
703: -- -------------------------------------------------------------------------
704: -- |---------------------------< address2full >------------------------|

Line 742: hr_utility.set_location('Entering :'||l_proc, 10);

738: l_longitude number;
739: l_latitude number;
740: l_match_count varchar2(255);
741: BEGIN
742: hr_utility.set_location('Entering :'||l_proc, 10);
743: -- Get xml geocode response string
744: xml_response := irc_location_utility.address2geocodexml
745: (address_line1 => address_line1
746: ,address_line2 => address_line2

Line 757: hr_utility.set_location(substr(xml_response,i,70),20);

753: ,address_line9 => address_line9
754: ,country => country);
755: /* i:=0;
756: while (i 757: hr_utility.set_location(substr(xml_response,i,70),20);
758: i:=i+70;
759: end loop;*/
760: parser:=xmlparser.newParser;
761: xmlparser.parseBuffer(parser,xml_response);