62: WHEN OTHERS THEN
63: IF ( GET_REGION_ID%ISOPEN) THEN
64: CLOSE GET_REGION_ID;
65: END IF;
66: FTE_UTIL_PKG.Write_LogFile('GET_NEXT_REGION_ID', 'UNEXPECTED ERROR',sqlerrm);
67: RAISE;
68: END GET_NEXT_REGION_ID;
69:
70: --_______________________________________________________________________________________--
97: l_module_name CONSTANT VARCHAR2(100) := 'FTE.PLSQL.' || G_PKG_NAME || '.GET_ZONE_ID';
98:
99: BEGIN
100:
101: FTE_UTIL_PKG.Enter_Debug(l_module_name);
102: FTE_UTIL_PKG.Write_LogFile(l_module_name,'p_zone_name',p_zone_name);
103:
104: OPEN GET_ZONE_ID(p_zone_name);
105: FETCH GET_ZONE_ID INTO l_zone_id;
98:
99: BEGIN
100:
101: FTE_UTIL_PKG.Enter_Debug(l_module_name);
102: FTE_UTIL_PKG.Write_LogFile(l_module_name,'p_zone_name',p_zone_name);
103:
104: OPEN GET_ZONE_ID(p_zone_name);
105: FETCH GET_ZONE_ID INTO l_zone_id;
106: CLOSE GET_ZONE_ID;
105: FETCH GET_ZONE_ID INTO l_zone_id;
106: CLOSE GET_ZONE_ID;
107:
108: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
109: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'l_zone_id', l_zone_id);
110: END IF;
111:
112: FTE_UTIL_PKG.Exit_Debug(l_module_name);
113: RETURN l_zone_id;
108: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
109: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'l_zone_id', l_zone_id);
110: END IF;
111:
112: FTE_UTIL_PKG.Exit_Debug(l_module_name);
113: RETURN l_zone_id;
114:
115: EXCEPTION
116: WHEN OTHERS THEN
113: RETURN l_zone_id;
114:
115: EXCEPTION
116: WHEN OTHERS THEN
117: FTE_UTIL_PKG.Exit_Debug(l_module_name);
118: FTE_UTIL_PKG.Write_LogFile(l_module_name,'UNEXPECTED ERROR in GET_ZONE_ID',sqlerrm);
119: RAISE;
120: END GET_ZONE_ID;
121:
114:
115: EXCEPTION
116: WHEN OTHERS THEN
117: FTE_UTIL_PKG.Exit_Debug(l_module_name);
118: FTE_UTIL_PKG.Write_LogFile(l_module_name,'UNEXPECTED ERROR in GET_ZONE_ID',sqlerrm);
119: RAISE;
120: END GET_ZONE_ID;
121:
122:
149: l_module_name CONSTANT VARCHAR2(100) := 'FTE.PLSQL.' || G_PKG_NAME || '.ADD_ZONE';
150:
151: BEGIN
152:
153: FTE_UTIL_PKG.Enter_Debug(l_module_name);
154:
155: IF ( p_validate_flag ) THEN
156: l_zone_id := FTE_REGION_ZONE_LOADER.GET_ZONE_ID(p_zone_name);
157: END IF;
160:
161: l_zone_id := GET_NEXT_REGION_ID;
162:
163: IF ( FTE_BULKLOAD_PKG.g_debug_on ) THEN
164: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'l_zone_id', l_zone_id);
165: END IF;
166:
167: IF (l_zone_id = -1) THEN
168: RETURN l_zone_id;
202: SYSDATE,
203: G_USER_ID);
204: END IF;
205:
206: FTE_UTIL_PKG.Exit_Debug(l_module_name);
207: RETURN l_zone_id;
208:
209: EXCEPTION
210: WHEN OTHERS THEN
208:
209: EXCEPTION
210: WHEN OTHERS THEN
211: l_zone_id := -1;
212: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'UNEXPECTED ERROR', SQLERRM);
213: FTE_UTIL_PKG.Exit_Debug(l_module_name);
214: RETURN l_zone_id;
215: END ADD_ZONE;
216:
209: EXCEPTION
210: WHEN OTHERS THEN
211: l_zone_id := -1;
212: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'UNEXPECTED ERROR', SQLERRM);
213: FTE_UTIL_PKG.Exit_Debug(l_module_name);
214: RETURN l_zone_id;
215: END ADD_ZONE;
216:
217: --_______________________________________________________________________________________--
244: l_module_name CONSTANT VARCHAR2(100) := 'FTE.PLSQL.' || G_PKG_NAME || '.GET_REGION_ID';
245:
246: BEGIN
247:
248: FTE_UTIL_PKG.Enter_Debug(l_module_name);
249:
250: l_country := p_region_info.COUNTRY;
251: l_city := p_region_info.CITY;
252: l_state := p_region_info.STATE;
292: p_interface_flag => 'N',
293: p_search_flag => 'Y',
294: x_region_info => x_region_info);
295:
296: FTE_UTIL_PKG.Exit_Debug(l_module_name);
297: RETURN x_region_info.region_id;
298:
299: EXCEPTION
300: WHEN OTHERS THEN
297: RETURN x_region_info.region_id;
298:
299: EXCEPTION
300: WHEN OTHERS THEN
301: FTE_UTIL_PKG.Write_LogFile(l_module_name,'UNEXPECTED ERROR', sqlerrm);
302: FTE_UTIL_PKG.Exit_Debug(l_module_name);
303: END GET_REGION_ID;
304:
305:
298:
299: EXCEPTION
300: WHEN OTHERS THEN
301: FTE_UTIL_PKG.Write_LogFile(l_module_name,'UNEXPECTED ERROR', sqlerrm);
302: FTE_UTIL_PKG.Exit_Debug(l_module_name);
303: END GET_REGION_ID;
304:
305:
306: --_______________________________________________________________________________________--
334: l_module_name CONSTANT VARCHAR2(100) := 'FTE.PLSQL.' || G_PKG_NAME || '.GET_REGION_ID';
335:
336: BEGIN
337:
338: FTE_UTIL_PKG.Enter_Debug(l_module_name);
339:
340: l_country := p_region_info.COUNTRY;
341: l_city := p_region_info.CITY;
342: l_state := p_region_info.STATE;
380: p_search_flag => 'Y',
381: p_recursively_flag => 'Y',
382: x_region_id => x_region_id);
383:
384: FTE_UTIL_PKG.Exit_Debug(l_module_name);
385:
386: RETURN x_region_id;
387:
388: EXCEPTION
386: RETURN x_region_id;
387:
388: EXCEPTION
389: WHEN OTHERS THEN
390: FTE_UTIL_PKG.Write_LogFile(l_module_name,'UNEXPECTED ERROR', sqlerrm);
391: FTE_UTIL_PKG.Exit_Debug(l_module_name);
392: END GET_REGION_ID;
393:
394: --_______________________________________________________________________________________--
387:
388: EXCEPTION
389: WHEN OTHERS THEN
390: FTE_UTIL_PKG.Write_LogFile(l_module_name,'UNEXPECTED ERROR', sqlerrm);
391: FTE_UTIL_PKG.Exit_Debug(l_module_name);
392: END GET_REGION_ID;
393:
394: --_______________________________________________________________________________________--
395: --
443: l_module_name CONSTANT VARCHAR2(100) := 'FTE.PLSQL.' || G_PKG_NAME || '.INSERT_PARTY_REGION';
444:
445: BEGIN
446:
447: FTE_UTIL_PKG.Enter_Debug(l_module_name);
448: IF (p_validate_flag) THEN
449: OPEN GET_PARTY_REGION_ID;
450: FETCH GET_PARTY_REGION_ID INTO l_party_region_id;
451: CLOSE GET_PARTY_REGION_ID;
450: FETCH GET_PARTY_REGION_ID INTO l_party_region_id;
451: CLOSE GET_PARTY_REGION_ID;
452:
453: IF (l_party_region_id <> -1 ) THEN
454: FTE_UTIL_PKG.Exit_Debug(l_module_name);
455: RETURN l_party_region_id;
456: END IF;
457: END IF;
458:
501: IF (SQL%ROWCOUNT < 0) THEN
502: l_party_region_id := -1;
503: END IF;
504:
505: FTE_UTIL_PKG.Exit_Debug(l_module_name);
506: RETURN l_party_region_id;
507:
508: EXCEPTION
509: WHEN OTHERS THEN
515: IF (GET_PARTY_REGION_ID%ISOPEN) THEN
516: CLOSE GET_PARTY_REGION_ID;
517: END IF;
518:
519: FTE_UTIL_PKG.Write_LogFile(l_module_name,'UNEXPECTED ERROR', sqlerrm);
520: FTE_UTIL_PKG.Exit_Debug(l_module_name);
521:
522: END INSERT_PARTY_REGION;
523:
516: CLOSE GET_PARTY_REGION_ID;
517: END IF;
518:
519: FTE_UTIL_PKG.Write_LogFile(l_module_name,'UNEXPECTED ERROR', sqlerrm);
520: FTE_UTIL_PKG.Exit_Debug(l_module_name);
521:
522: END INSERT_PARTY_REGION;
523:
524: --_______________________________________________________________________________________--
556:
557: l_module_name CONSTANT VARCHAR2(100) := 'FTE.PLSQL.' || G_PKG_NAME || '.PROCESS_ZONE';
558:
559: BEGIN
560: FTE_UTIL_PKG.Enter_Debug(l_module_name);
561: x_status := -1;
562:
563: --+
564: -- Validate the column names
583: p_region_id => l_region_id,
584: x_status => x_status,
585: x_error_msg => x_error_msg);
586: IF (x_status <> -1) THEN
587: FTE_UTIL_PKG.Write_LogFile(l_module_name,'FTE_VALIDATION_PKG.VALIDATE_ZONE returned with error ', x_error_msg);
588: FTE_UTIL_PKG.Exit_Debug(l_module_name);
589: RETURN;
590: END IF;
591:
584: x_status => x_status,
585: x_error_msg => x_error_msg);
586: IF (x_status <> -1) THEN
587: FTE_UTIL_PKG.Write_LogFile(l_module_name,'FTE_VALIDATION_PKG.VALIDATE_ZONE returned with error ', x_error_msg);
588: FTE_UTIL_PKG.Exit_Debug(l_module_name);
589: RETURN;
590: END IF;
591:
592: IF ( FTE_BULKLOAD_PKG.g_debug_on ) THEN
589: RETURN;
590: END IF;
591:
592: IF ( FTE_BULKLOAD_PKG.g_debug_on ) THEN
593: FTE_UTIL_PKG.Write_LogFile(l_module_name, ' l_zone_id', l_zone_id);
594: FTE_UTIL_PKG.Write_LogFile(l_module_name, ' l_region_id', l_region_id);
595: END IF;
596:
597: IF (l_zone_id = -1) THEN
590: END IF;
591:
592: IF ( FTE_BULKLOAD_PKG.g_debug_on ) THEN
593: FTE_UTIL_PKG.Write_LogFile(l_module_name, ' l_zone_id', l_zone_id);
594: FTE_UTIL_PKG.Write_LogFile(l_module_name, ' l_region_id', l_region_id);
595: END IF;
596:
597: IF (l_zone_id = -1) THEN
598:
598:
599: l_zone_id := ADD_ZONE(l_zone_name, FALSE, -1, p_region_type);
600:
601: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
602: FTE_UTIL_PKG.Write_LogFile(l_module_name, ' l_zone_id', l_zone_id);
603: END IF;
604:
605: END IF;
606:
604:
605: END IF;
606:
607: IF (l_zone_id = -1) THEN
608: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'Unable to create new Zone');
609: RETURN;
610: END IF;
611:
612: WSH_REGIONS_PKG.UPDATE_ZONE_REGION(p_insert_type => 'INSERT',
629: x_status => x_status,
630: x_error_msg => x_error_msg);
631:
632: IF (x_status = 2) THEN
633: FTE_UTIL_PKG.Write_LogFile(l_module_name,'WSH_REGIONS_PKG.UPDATE_ZONE_REGION returned with error',x_error_msg);
634: FTE_UTIL_PKG.Exit_Debug(l_module_name);
635: RETURN;
636: END IF;
637:
630: x_error_msg => x_error_msg);
631:
632: IF (x_status = 2) THEN
633: FTE_UTIL_PKG.Write_LogFile(l_module_name,'WSH_REGIONS_PKG.UPDATE_ZONE_REGION returned with error',x_error_msg);
634: FTE_UTIL_PKG.Exit_Debug(l_module_name);
635: RETURN;
636: END IF;
637:
638: IF (x_error_msg IS NOT NULL) THEN
636: END IF;
637:
638: IF (x_error_msg IS NOT NULL) THEN
639: IF (x_error_msg = 'WSH_REGION_NOT_FOUND') THEN
640: FTE_UTIL_PKG.Write_OutFile('FTE__REGION_NOT_FOUND', 'C', p_line_number);
641: FTE_UTIL_PKG.Exit_Debug(l_module_name);
642: RETURN;
643: ELSIF (x_error_msg = 'WSH_REGION_EXISTS_IN_ZONE') THEN
644: FTE_UTIL_PKG.Write_OutFile('FTE_REGION_EXISTS_IN_ZONE', 'D', p_line_number);
637:
638: IF (x_error_msg IS NOT NULL) THEN
639: IF (x_error_msg = 'WSH_REGION_NOT_FOUND') THEN
640: FTE_UTIL_PKG.Write_OutFile('FTE__REGION_NOT_FOUND', 'C', p_line_number);
641: FTE_UTIL_PKG.Exit_Debug(l_module_name);
642: RETURN;
643: ELSIF (x_error_msg = 'WSH_REGION_EXISTS_IN_ZONE') THEN
644: FTE_UTIL_PKG.Write_OutFile('FTE_REGION_EXISTS_IN_ZONE', 'D', p_line_number);
645: FTE_UTIL_PKG.Exit_Debug(l_module_name);
640: FTE_UTIL_PKG.Write_OutFile('FTE__REGION_NOT_FOUND', 'C', p_line_number);
641: FTE_UTIL_PKG.Exit_Debug(l_module_name);
642: RETURN;
643: ELSIF (x_error_msg = 'WSH_REGION_EXISTS_IN_ZONE') THEN
644: FTE_UTIL_PKG.Write_OutFile('FTE_REGION_EXISTS_IN_ZONE', 'D', p_line_number);
645: FTE_UTIL_PKG.Exit_Debug(l_module_name);
646: RETURN;
647: ELSIF (x_error_msg <> 'WSH_SAME_REGION_IN_ZONE') THEN
648: FTE_UTIL_PKG.Write_OutFile('FTE_SAME_REGION_IN_ZONE', 'D', p_line_number);
641: FTE_UTIL_PKG.Exit_Debug(l_module_name);
642: RETURN;
643: ELSIF (x_error_msg = 'WSH_REGION_EXISTS_IN_ZONE') THEN
644: FTE_UTIL_PKG.Write_OutFile('FTE_REGION_EXISTS_IN_ZONE', 'D', p_line_number);
645: FTE_UTIL_PKG.Exit_Debug(l_module_name);
646: RETURN;
647: ELSIF (x_error_msg <> 'WSH_SAME_REGION_IN_ZONE') THEN
648: FTE_UTIL_PKG.Write_OutFile('FTE_SAME_REGION_IN_ZONE', 'D', p_line_number);
649: FTE_UTIL_PKG.Exit_Debug(l_module_name);
644: FTE_UTIL_PKG.Write_OutFile('FTE_REGION_EXISTS_IN_ZONE', 'D', p_line_number);
645: FTE_UTIL_PKG.Exit_Debug(l_module_name);
646: RETURN;
647: ELSIF (x_error_msg <> 'WSH_SAME_REGION_IN_ZONE') THEN
648: FTE_UTIL_PKG.Write_OutFile('FTE_SAME_REGION_IN_ZONE', 'D', p_line_number);
649: FTE_UTIL_PKG.Exit_Debug(l_module_name);
650: RETURN;
651: ELSE -- ignore error FTE_SAME_REGION_IN_ZONE
652: x_status := -1;
645: FTE_UTIL_PKG.Exit_Debug(l_module_name);
646: RETURN;
647: ELSIF (x_error_msg <> 'WSH_SAME_REGION_IN_ZONE') THEN
648: FTE_UTIL_PKG.Write_OutFile('FTE_SAME_REGION_IN_ZONE', 'D', p_line_number);
649: FTE_UTIL_PKG.Exit_Debug(l_module_name);
650: RETURN;
651: ELSE -- ignore error FTE_SAME_REGION_IN_ZONE
652: x_status := -1;
653: END IF;
655: x_status := -1;
656: END IF;
657: END LOOP;
658:
659: FTE_UTIL_PKG.Exit_Debug(l_module_name);
660:
661: EXCEPTION
662: WHEN OTHERS THEN
663: x_status := 2;
660:
661: EXCEPTION
662: WHEN OTHERS THEN
663: x_status := 2;
664: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'UNEXPECTED ERROR', SQLERRM);
665: FTE_UTIL_PKG.Exit_Debug(l_module_name);
666:
667: END PROCESS_ZONE;
668:
661: EXCEPTION
662: WHEN OTHERS THEN
663: x_status := 2;
664: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'UNEXPECTED ERROR', SQLERRM);
665: FTE_UTIL_PKG.Exit_Debug(l_module_name);
666:
667: END PROCESS_ZONE;
668:
669:
715: l_module_name CONSTANT VARCHAR2(100) := 'FTE.PLSQL.' || G_PKG_NAME || '.PROCESS_REGION';
716:
717: BEGIN
718:
719: FTE_UTIL_PKG.Enter_Debug(l_module_name);
720: x_status := -1;
721:
722: FTE_VALIDATION_PKG.VALIDATE_COLUMNS(p_keys => p_block_header,
723: p_type => l_type,
737: p_line_number => p_line_number + i + 1,
738: x_status => x_status,
739: x_error_msg => x_error_msg);
740: IF (x_status <> -1) THEN
741: FTE_UTIL_PKG.Write_LogFile(l_module_name,'FTE_VALIDATION_PKG.VALIDATE_ACTION failed');
742: FTE_UTIL_PKG.Exit_Debug(l_module_name);
743: RETURN;
744: END IF;
745:
738: x_status => x_status,
739: x_error_msg => x_error_msg);
740: IF (x_status <> -1) THEN
741: FTE_UTIL_PKG.Write_LogFile(l_module_name,'FTE_VALIDATION_PKG.VALIDATE_ACTION failed');
742: FTE_UTIL_PKG.Exit_Debug(l_module_name);
743: RETURN;
744: END IF;
745:
746: IF (l_action = 'ADD') THEN
749: FETCH GET_INTERFACE_REGION_ID INTO l_interface_region_id;
750: CLOSE GET_INTERFACE_REGION_ID;
751:
752: L_REGION_ID(i) := l_interface_region_id;
753: L_COUNTRY_CODE(i):= FTE_UTIL_PKG.GET_DATA('COUNTRY_CODE', l_values);
754: L_STATE_CODE(i) := FTE_UTIL_PKG.GET_DATA('STATE_CODE', l_values);
755: L_CITY_CODE(i) := FTE_UTIL_PKG.GET_DATA('CITY_CODE', l_values);
756:
757: L_LANGUAGE(i) := NVL(USERENV('LANG'),'US');
750: CLOSE GET_INTERFACE_REGION_ID;
751:
752: L_REGION_ID(i) := l_interface_region_id;
753: L_COUNTRY_CODE(i):= FTE_UTIL_PKG.GET_DATA('COUNTRY_CODE', l_values);
754: L_STATE_CODE(i) := FTE_UTIL_PKG.GET_DATA('STATE_CODE', l_values);
755: L_CITY_CODE(i) := FTE_UTIL_PKG.GET_DATA('CITY_CODE', l_values);
756:
757: L_LANGUAGE(i) := NVL(USERENV('LANG'),'US');
758: L_COUNTRY(i) := FTE_UTIL_PKG.GET_DATA('COUNTRY', l_values);
751:
752: L_REGION_ID(i) := l_interface_region_id;
753: L_COUNTRY_CODE(i):= FTE_UTIL_PKG.GET_DATA('COUNTRY_CODE', l_values);
754: L_STATE_CODE(i) := FTE_UTIL_PKG.GET_DATA('STATE_CODE', l_values);
755: L_CITY_CODE(i) := FTE_UTIL_PKG.GET_DATA('CITY_CODE', l_values);
756:
757: L_LANGUAGE(i) := NVL(USERENV('LANG'),'US');
758: L_COUNTRY(i) := FTE_UTIL_PKG.GET_DATA('COUNTRY', l_values);
759: L_STATE(i) := FTE_UTIL_PKG.GET_DATA('STATE', l_values);
754: L_STATE_CODE(i) := FTE_UTIL_PKG.GET_DATA('STATE_CODE', l_values);
755: L_CITY_CODE(i) := FTE_UTIL_PKG.GET_DATA('CITY_CODE', l_values);
756:
757: L_LANGUAGE(i) := NVL(USERENV('LANG'),'US');
758: L_COUNTRY(i) := FTE_UTIL_PKG.GET_DATA('COUNTRY', l_values);
759: L_STATE(i) := FTE_UTIL_PKG.GET_DATA('STATE', l_values);
760: L_CITY(i) := FTE_UTIL_PKG.GET_DATA('CITY', l_values);
761: L_POSTAL_CODE_FROM(i) := FTE_UTIL_PKG.GET_DATA('POSTAL_CODE_FROM', l_values);
762: L_POSTAL_CODE_TO(i) := FTE_UTIL_PKG.GET_DATA('POSTAL_CODE_TO', l_values);
755: L_CITY_CODE(i) := FTE_UTIL_PKG.GET_DATA('CITY_CODE', l_values);
756:
757: L_LANGUAGE(i) := NVL(USERENV('LANG'),'US');
758: L_COUNTRY(i) := FTE_UTIL_PKG.GET_DATA('COUNTRY', l_values);
759: L_STATE(i) := FTE_UTIL_PKG.GET_DATA('STATE', l_values);
760: L_CITY(i) := FTE_UTIL_PKG.GET_DATA('CITY', l_values);
761: L_POSTAL_CODE_FROM(i) := FTE_UTIL_PKG.GET_DATA('POSTAL_CODE_FROM', l_values);
762: L_POSTAL_CODE_TO(i) := FTE_UTIL_PKG.GET_DATA('POSTAL_CODE_TO', l_values);
763:
756:
757: L_LANGUAGE(i) := NVL(USERENV('LANG'),'US');
758: L_COUNTRY(i) := FTE_UTIL_PKG.GET_DATA('COUNTRY', l_values);
759: L_STATE(i) := FTE_UTIL_PKG.GET_DATA('STATE', l_values);
760: L_CITY(i) := FTE_UTIL_PKG.GET_DATA('CITY', l_values);
761: L_POSTAL_CODE_FROM(i) := FTE_UTIL_PKG.GET_DATA('POSTAL_CODE_FROM', l_values);
762: L_POSTAL_CODE_TO(i) := FTE_UTIL_PKG.GET_DATA('POSTAL_CODE_TO', l_values);
763:
764: END IF;
757: L_LANGUAGE(i) := NVL(USERENV('LANG'),'US');
758: L_COUNTRY(i) := FTE_UTIL_PKG.GET_DATA('COUNTRY', l_values);
759: L_STATE(i) := FTE_UTIL_PKG.GET_DATA('STATE', l_values);
760: L_CITY(i) := FTE_UTIL_PKG.GET_DATA('CITY', l_values);
761: L_POSTAL_CODE_FROM(i) := FTE_UTIL_PKG.GET_DATA('POSTAL_CODE_FROM', l_values);
762: L_POSTAL_CODE_TO(i) := FTE_UTIL_PKG.GET_DATA('POSTAL_CODE_TO', l_values);
763:
764: END IF;
765:
758: L_COUNTRY(i) := FTE_UTIL_PKG.GET_DATA('COUNTRY', l_values);
759: L_STATE(i) := FTE_UTIL_PKG.GET_DATA('STATE', l_values);
760: L_CITY(i) := FTE_UTIL_PKG.GET_DATA('CITY', l_values);
761: L_POSTAL_CODE_FROM(i) := FTE_UTIL_PKG.GET_DATA('POSTAL_CODE_FROM', l_values);
762: L_POSTAL_CODE_TO(i) := FTE_UTIL_PKG.GET_DATA('POSTAL_CODE_TO', l_values);
763:
764: END IF;
765:
766: END LOOP;
826: description => null,
827: start_time => null,
828: sub_request => false);
829: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
830: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_request_id',l_request_id);
831: END IF;
832:
833: EXCEPTION
834: WHEN OTHERS THEN
836: IF (GET_INTERFACE_REGION_ID%ISOPEN) THEN
837: CLOSE GET_INTERFACE_REGION_ID;
838: END IF;
839:
840: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'UNEXPECTED ERROR', SQLERRM);
841: FTE_UTIL_PKG.Exit_Debug(l_module_name);
842:
843: END PROCESS_REGION;
844:
837: CLOSE GET_INTERFACE_REGION_ID;
838: END IF;
839:
840: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'UNEXPECTED ERROR', SQLERRM);
841: FTE_UTIL_PKG.Exit_Debug(l_module_name);
842:
843: END PROCESS_REGION;
844:
845: --_______________________________________________________________________________________--
867:
868: l_module_name CONSTANT VARCHAR2(100) := 'FTE.PLSQL.' || G_PKG_NAME || '.PROCESS_DATA';
869:
870: BEGIN
871: FTE_UTIL_PKG.Enter_Debug(l_module_name);
872: x_status := -1;
873:
874: IF(FTE_BULKLOAD_PKG.g_debug_on) THEN
875: FTE_UTIL_PKG.Write_LogFile(l_module_name,'p_type', p_type);
871: FTE_UTIL_PKG.Enter_Debug(l_module_name);
872: x_status := -1;
873:
874: IF(FTE_BULKLOAD_PKG.g_debug_on) THEN
875: FTE_UTIL_PKG.Write_LogFile(l_module_name,'p_type', p_type);
876: END IF;
877:
878: IF (p_type = 'ZONE') THEN
879:
893: x_error_msg => x_error_msg);
894: ELSE
895:
896: x_status := 2;
897: FTE_UTIL_PKG.Write_LogFile(l_module_name,'Invalid Type',p_type);
898: FTE_UTIL_PKG.Exit_Debug(l_module_name);
899: RETURN;
900:
901: END IF;
894: ELSE
895:
896: x_status := 2;
897: FTE_UTIL_PKG.Write_LogFile(l_module_name,'Invalid Type',p_type);
898: FTE_UTIL_PKG.Exit_Debug(l_module_name);
899: RETURN;
900:
901: END IF;
902:
900:
901: END IF;
902:
903: IF( x_status <> -1) THEN
904: FTE_UTIL_PKG.Write_LogFile(l_module_name,'Error occured in process zone');
905: END IF;
906:
907: FTE_UTIL_PKG.Exit_Debug(l_module_name);
908:
903: IF( x_status <> -1) THEN
904: FTE_UTIL_PKG.Write_LogFile(l_module_name,'Error occured in process zone');
905: END IF;
906:
907: FTE_UTIL_PKG.Exit_Debug(l_module_name);
908:
909: EXCEPTION
910: WHEN OTHERS THEN
911: x_status := 2;
908:
909: EXCEPTION
910: WHEN OTHERS THEN
911: x_status := 2;
912: FTE_UTIL_PKG.Write_LogFile(l_module_name,'UNEXPECTED ERROR OCCURED', sqlerrm);
913: FTE_UTIL_PKG.Exit_Debug(l_module_name);
914: END PROCESS_DATA;
915:
916: END FTE_REGION_ZONE_LOADER;
909: EXCEPTION
910: WHEN OTHERS THEN
911: x_status := 2;
912: FTE_UTIL_PKG.Write_LogFile(l_module_name,'UNEXPECTED ERROR OCCURED', sqlerrm);
913: FTE_UTIL_PKG.Exit_Debug(l_module_name);
914: END PROCESS_DATA;
915:
916: END FTE_REGION_ZONE_LOADER;