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.WSH_LOCATIONS_PKG dependencies on WSH_UTIL_CORE

Line 59: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;

55: l_flag VARCHAR2(1);
56:
57: BEGIN
58:
59: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
60:
61: -- need to hash this index
62: -- Key (for hash) : param1
63: l_hash_string := p_validate_rec.input_param1;

Line 149: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;

145: l_location location_rec_type;
146:
147: BEGIN
148:
149: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
150:
151: IF l_debug_on THEN
152: WSH_DEBUG_SV.push(l_module_name);
153: END IF;

Line 207: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN

203: END IF;
204:
205: END LOOP;
206:
207: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
208: x_error_msg := 'Error in WSH_GEOCODING.Get_Lat_Long_and_TimeZone ';
209: --x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
210: END IF;
211:

Line 209: --x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

205: END LOOP;
206:
207: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
208: x_error_msg := 'Error in WSH_GEOCODING.Get_Lat_Long_and_TimeZone ';
209: --x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
210: END IF;
211:
212: IF l_debug_on THEN
213: WSH_DEBUG_SV.pop(l_module_name);

Line 223: WSH_UTIL_CORE.printmsg(x_error_msg);

219: IF l_debug_on THEN
220: WSH_DEBUG_SV.logmsg(l_module_name, x_error_msg);
221: -- Bug 4775798
222: ELSE
223: WSH_UTIL_CORE.printmsg(x_error_msg);
224: END IF;
225: --x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
226: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
227:

Line 225: --x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

221: -- Bug 4775798
222: ELSE
223: WSH_UTIL_CORE.printmsg(x_error_msg);
224: END IF;
225: --x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
226: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
227:
228: IF l_debug_on THEN
229: WSH_DEBUG_SV.pop(l_module_name);

Line 226: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;

222: ELSE
223: WSH_UTIL_CORE.printmsg(x_error_msg);
224: END IF;
225: --x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
226: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
227:
228: IF l_debug_on THEN
229: WSH_DEBUG_SV.pop(l_module_name);
230: END IF;

Line 273: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;

269: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'UPDATE_GEOMETRIES';
270:
271: BEGIN
272:
273: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
274:
275: IF l_debug_on THEN
276: WSH_DEBUG_SV.push(l_module_name);
277: END IF;

Line 317: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;

313: WSH_DEBUG_SV.LogMsg(l_module_name,
314: 'Update Geometry failed for location id : ' || p_location_ids(k));
315: END IF;
316: x_error_msg := 'UNEXP. Error in Update Geometries: ' || sqlerrm;
317: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
318: END;
319: END IF;
320:
321: END IF;

Line 335: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;

331:
332: EXCEPTION
333: WHEN OTHERS THEN
334: x_error_msg := 'UNEXP. Error in Update Geometries: ' || sqlerrm;
335: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
336: IF l_debug_on THEN
337: WSH_DEBUG_SV.pop(l_module_name);
338: END IF;
339: --NULL;

Line 785: WSH_UTIL_CORE.Enable_Concurrent_Log_Print;

781: --
782: -- l_log_level := FND_PROFILE.VALUE('ONT_DEBUG_LEVEL');
783:
784: /*
785: WSH_UTIL_CORE.Enable_Concurrent_Log_Print;
786:
787: IF l_log_level IS NOT NULL THEN
788: WSH_UTIL_CORE.Set_Log_Level(l_log_level);
789: END IF;

Line 788: WSH_UTIL_CORE.Set_Log_Level(l_log_level);

784: /*
785: WSH_UTIL_CORE.Enable_Concurrent_Log_Print;
786:
787: IF l_log_level IS NOT NULL THEN
788: WSH_UTIL_CORE.Set_Log_Level(l_log_level);
789: END IF;
790: */
791: IF l_debug_on THEN
792: -- WSH_DEBUG_SV.logmsg(l_module_name,'In the procedure Process_Locations');

Line 795: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;

791: IF l_debug_on THEN
792: -- WSH_DEBUG_SV.logmsg(l_module_name,'In the procedure Process_Locations');
793: WSH_DEBUG_SV.logmsg(l_module_name,'Processing Locations between ' || p_from_location || ' and '|| p_to_location);
794: END IF;
795: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
796:
797: -- As a part of Bug 4995478 the derivation of ui_location_code is custom enabled.
798: -- Added Dummy call to check if customization is enabled --
799: WSH_CUSTOM_PUB.ui_location_code (

Line 921: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

917: x_Timezone_Tbl => pTimezoneTbl,
918: x_return_status => x_return_status,
919: x_error_msg => x_sqlerr);
920:
921: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
922: IF l_debug_on THEN
923: WSH_DEBUG_SV.logmsg(l_module_name,'Get_Missing_Timezones : ' || x_sqlerr);
924: END IF;
925: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

Line 925: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

921: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
922: IF l_debug_on THEN
923: WSH_DEBUG_SV.logmsg(l_module_name,'Get_Missing_Timezones : ' || x_sqlerr);
924: END IF;
925: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
926: END IF;
927:
928: Update_Locations(pUpdateLocationIdTbl,l_location_source_code,x_return_status);
929:

Line 930: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN

926: END IF;
927:
928: Update_Locations(pUpdateLocationIdTbl,l_location_source_code,x_return_status);
929:
930: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
931: IF l_debug_on THEN
932: WSH_DEBUG_SV.logmsg(l_module_name,'Error in Update_Locations ');
933: WSH_DEBUG_SV.pop(l_module_name);
934: END IF;

Line 935: --x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;

931: IF l_debug_on THEN
932: WSH_DEBUG_SV.logmsg(l_module_name,'Error in Update_Locations ');
933: WSH_DEBUG_SV.pop(l_module_name);
934: END IF;
935: --x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
936: return;
937: END IF;
938: IF l_debug_on THEN
939: WSH_DEBUG_SV.logmsg(l_module_name,'Successful in the update operation');

Line 947: (p_create_facilities IS NULL AND WSH_UTIL_CORE.Tp_Is_Installed = 'Y')) THEN

943: --'N' is the default for the parameter.
944: -- 1. If this procedure is explicitly called with 'Y', then we create facilities.
945: -- 2. If is NULL, then we create facilities only if TP is installed.
946: IF (UPPER(p_create_facilities) = 'Y' OR
947: (p_create_facilities IS NULL AND WSH_UTIL_CORE.Tp_Is_Installed = 'Y')) THEN
948: i := pUpdateLocationIdTbl.COUNT;
949: IF l_debug_on THEN
950: WSH_DEBUG_SV.logmsg(l_module_name,
951: 'Calling WSH_FACILITIES_INTEGRATION.CREATE_FACILITIES with ' ||i|| ' External locations.');

Line 961: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

957: p_site_names => pUpdateLocCodeTbl,
958: x_return_status => x_return_status,
959: x_error_msg => x_sqlerr);
960:
961: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
962: IF l_debug_on THEN
963: WSH_DEBUG_SV.logmsg(l_module_name,'Create Facilities: ' || x_sqlerr);
964: END IF;
965: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

Line 965: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

961: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
962: IF l_debug_on THEN
963: WSH_DEBUG_SV.logmsg(l_module_name,'Create Facilities: ' || x_sqlerr);
964: END IF;
965: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
966: END IF;
967:
968: EXCEPTION
969: WHEN OTHERS THEN

Line 973: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

969: WHEN OTHERS THEN
970: IF l_debug_on THEN
971: WSH_DEBUG_SV.logmsg(l_module_name,'UNEXP. EXCEPTION WHILE CREATING FACILITIES: ' || sqlerrm);
972: END IF;
973: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
974: END;
975: END IF;
976:
977: --If TP is installed, manually create a Geometry object from the latitude and longitude

Line 979: IF (WSH_UTIL_CORE.Tp_Is_Installed = 'Y') THEN

975: END IF;
976:
977: --If TP is installed, manually create a Geometry object from the latitude and longitude
978: -- and update the location with the geometry object.
979: IF (WSH_UTIL_CORE.Tp_Is_Installed = 'Y') THEN
980: BEGIN
981: Update_Geometries(p_location_ids => pUpdateLocationIdTbl,
982: p_latitudes => pLatitudeTbl,
983: p_longitudes => pLongitudeTbl,

Line 987: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

983: p_longitudes => pLongitudeTbl,
984: l_debug_on => l_debug_on,
985: x_return_status => x_return_status,
986: x_error_msg => x_sqlerr);
987: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
988: IF l_debug_on THEN
989: WSH_DEBUG_SV.logmsg(l_module_name,'Update_Geometries : ' || x_sqlerr);
990: END IF;
991: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

Line 991: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

987: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
988: IF l_debug_on THEN
989: WSH_DEBUG_SV.logmsg(l_module_name,'Update_Geometries : ' || x_sqlerr);
990: END IF;
991: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
992: END IF;
993: EXCEPTION
994: WHEN OTHERS THEN
995: IF l_debug_on THEN

Line 998: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

994: WHEN OTHERS THEN
995: IF l_debug_on THEN
996: WSH_DEBUG_SV.logmsg(l_module_name,'UNEXP. Exception while updating geometries: ' || sqlerrm);
997: END IF;
998: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
999: END;
1000: END IF;
1001:
1002: END IF;

Line 1111: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

1107: x_Timezone_Tbl => pTimezoneTbl,
1108: x_return_status => x_return_status,
1109: x_error_msg => x_sqlerr);
1110:
1111: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1112: IF l_debug_on THEN
1113: WSH_DEBUG_SV.logmsg(l_module_name,'Get_Missing_Timezones : ' || x_sqlerr);
1114: END IF;
1115: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

Line 1115: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

1111: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1112: IF l_debug_on THEN
1113: WSH_DEBUG_SV.logmsg(l_module_name,'Get_Missing_Timezones : ' || x_sqlerr);
1114: END IF;
1115: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1116: END IF;
1117:
1118: Insert_Locations(pInsertLocationIdTbl,l_location_source_code,x_return_status);
1119:

Line 1120: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN

1116: END IF;
1117:
1118: Insert_Locations(pInsertLocationIdTbl,l_location_source_code,x_return_status);
1119:
1120: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
1121: IF l_debug_on THEN
1122: -- Bug 4775798
1123: WSH_DEBUG_SV.logmsg(l_module_name,'Error in Insert_Locations ');
1124: WSH_DEBUG_SV.pop(l_module_name);

Line 1136: (p_create_facilities IS NULL AND WSH_UTIL_CORE.Tp_Is_Installed = 'Y')) THEN

1132: --'N' is the default for the parameter.
1133: -- 1. If this procedure is explicitly called with 'Y', then we create facilities.
1134: -- 2. If is NULL, then we create facilities only if TP is installed.
1135: IF (UPPER(p_create_facilities) = 'Y' OR
1136: (p_create_facilities IS NULL AND WSH_UTIL_CORE.Tp_Is_Installed = 'Y')) THEN
1137: i := pInsertLocationIdTbl.COUNT;
1138: IF l_debug_on THEN
1139: WSH_DEBUG_SV.logmsg(l_module_name,'Calling WSH_FACILITIES_INTEGRATION.CREATE_FACILITIES with ' ||i|| 'External locations.');
1140: END IF;

Line 1149: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

1145: p_site_names => pInsertLocCodeTbl,
1146: x_return_status => x_return_status,
1147: x_error_msg => x_sqlerr);
1148:
1149: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1150: IF l_debug_on THEN
1151: WSH_DEBUG_SV.logmsg(l_module_name,'Create Facilities: ' || x_sqlerr);
1152: END IF;
1153: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

Line 1153: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

1149: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1150: IF l_debug_on THEN
1151: WSH_DEBUG_SV.logmsg(l_module_name,'Create Facilities: ' || x_sqlerr);
1152: END IF;
1153: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1154: END IF;
1155:
1156: EXCEPTION
1157: WHEN OTHERS THEN

Line 1161: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

1157: WHEN OTHERS THEN
1158: IF l_debug_on THEN
1159: WSH_DEBUG_SV.logmsg(l_module_name,'UNEXP. EXCEPTION WHILE CREATING FACILITIES: ' || sqlerrm);
1160: END IF;
1161: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1162: END;
1163:
1164: END IF;
1165:

Line 1169: IF (WSH_UTIL_CORE.Tp_Is_Installed = 'Y') THEN

1165:
1166:
1167: --If TP is installed, manually create a Geometry object from the latitude and longitude
1168: -- and update the location with the geometry object.
1169: IF (WSH_UTIL_CORE.Tp_Is_Installed = 'Y') THEN
1170: BEGIN
1171: Update_Geometries(p_location_ids => pInsertLocationIdTbl,
1172: p_latitudes => pLatitudeTbl,
1173: p_longitudes => pLongitudeTbl,

Line 1177: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

1173: p_longitudes => pLongitudeTbl,
1174: l_debug_on => l_debug_on,
1175: x_return_status => x_return_status,
1176: x_error_msg => x_sqlerr);
1177: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1178: IF l_debug_on THEN
1179: WSH_DEBUG_SV.logmsg(l_module_name,'Update_Geometries : ' || x_sqlerr);
1180: END IF;
1181: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

Line 1181: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

1177: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1178: IF l_debug_on THEN
1179: WSH_DEBUG_SV.logmsg(l_module_name,'Update_Geometries : ' || x_sqlerr);
1180: END IF;
1181: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1182: END IF;
1183: EXCEPTION
1184: WHEN OTHERS THEN
1185: IF l_debug_on THEN

Line 1188: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

1184: WHEN OTHERS THEN
1185: IF l_debug_on THEN
1186: WSH_DEBUG_SV.logmsg(l_module_name,'UNEXP. Exception while updating geometries: ' || sqlerrm);
1187: END IF;
1188: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1189: END;
1190: END IF;
1191:
1192: END IF;

Line 1293: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

1289: x_Timezone_Tbl => pTimezoneTbl,
1290: x_return_status => x_return_status,
1291: x_error_msg => x_sqlerr);
1292:
1293: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1294: IF l_debug_on THEN
1295: WSH_DEBUG_SV.logmsg(l_module_name,'Get_Missing_Timezones : ' || x_sqlerr);
1296: END IF;
1297: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

Line 1297: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

1293: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1294: IF l_debug_on THEN
1295: WSH_DEBUG_SV.logmsg(l_module_name,'Get_Missing_Timezones : ' || x_sqlerr);
1296: END IF;
1297: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1298: END IF;
1299:
1300: Update_Locations(pUpdateLocationIdTbl,l_location_source_code,x_return_status);
1301:

Line 1302: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN

1298: END IF;
1299:
1300: Update_Locations(pUpdateLocationIdTbl,l_location_source_code,x_return_status);
1301:
1302: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
1303:
1304: --x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1305: IF l_debug_on THEN
1306: WSH_DEBUG_SV.logmsg(l_module_name,'Error in Update_Locations ');

Line 1304: --x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;

1300: Update_Locations(pUpdateLocationIdTbl,l_location_source_code,x_return_status);
1301:
1302: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
1303:
1304: --x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1305: IF l_debug_on THEN
1306: WSH_DEBUG_SV.logmsg(l_module_name,'Error in Update_Locations ');
1307: WSH_DEBUG_SV.pop(l_module_name);
1308: END IF;

Line 1319: (p_create_facilities IS NULL AND WSH_UTIL_CORE.Tp_Is_Installed = 'Y')) THEN

1315: --'N' is the default for the parameter.
1316: -- 1. If this procedure is explicitly called with 'Y', then we create facilities.
1317: -- 2. If is NULL, then we create facilities only if TP is installed.
1318: IF (UPPER(p_create_facilities) = 'Y' OR
1319: (p_create_facilities IS NULL AND WSH_UTIL_CORE.Tp_Is_Installed = 'Y')) THEN
1320: i := pUpdateLocationIdTbl.COUNT;
1321: IF l_debug_on THEN
1322: WSH_DEBUG_SV.logmsg(l_module_name,'Calling WSH_FACILITIES_INTEGRATION.CREATE_FACILITIES with ' ||i|| 'Internal locations.');
1323: WSH_DEBUG_SV.logmsg(l_module_name,'Calling WSH_FACILITIES_INTEGRATION.CREATE_FACILITIES with ' ||pUpdateOwnerNameTbl.COUNT|| 'Company Names.');

Line 1334: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

1330: x_return_status => x_return_status,
1331: x_error_msg => x_sqlerr);
1332:
1333:
1334: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1335: IF l_debug_on THEN
1336: WSH_DEBUG_SV.logmsg(l_module_name,'Create Facilities: ' || x_sqlerr);
1337: END IF;
1338: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

Line 1338: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

1334: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1335: IF l_debug_on THEN
1336: WSH_DEBUG_SV.logmsg(l_module_name,'Create Facilities: ' || x_sqlerr);
1337: END IF;
1338: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1339: END IF;
1340:
1341: EXCEPTION
1342: WHEN OTHERS THEN

Line 1346: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

1342: WHEN OTHERS THEN
1343: IF l_debug_on THEN
1344: WSH_DEBUG_SV.logmsg(l_module_name,'UNEXP. EXCEPTION WHILE CREATING FACILITIES: ' || sqlerrm);
1345: END IF;
1346: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1347: END;
1348: END IF;
1349:
1350: --If TP is installed, manually create a Geometry object from the latitude and longitude

Line 1352: IF (WSH_UTIL_CORE.Tp_Is_Installed = 'Y') THEN

1348: END IF;
1349:
1350: --If TP is installed, manually create a Geometry object from the latitude and longitude
1351: -- and update the location with the geometry object.
1352: IF (WSH_UTIL_CORE.Tp_Is_Installed = 'Y') THEN
1353: BEGIN
1354: Update_Geometries(p_location_ids => pUpdateLocationIdTbl,
1355: p_latitudes => pLatitudeTbl,
1356: p_longitudes => pLongitudeTbl,

Line 1360: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

1356: p_longitudes => pLongitudeTbl,
1357: l_debug_on => l_debug_on,
1358: x_return_status => x_return_status,
1359: x_error_msg => x_sqlerr);
1360: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1361: IF l_debug_on THEN
1362: WSH_DEBUG_SV.logmsg(l_module_name,'Update_Geometries : ' || x_sqlerr);
1363: END IF;
1364: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

Line 1364: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

1360: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1361: IF l_debug_on THEN
1362: WSH_DEBUG_SV.logmsg(l_module_name,'Update_Geometries : ' || x_sqlerr);
1363: END IF;
1364: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1365: END IF;
1366: EXCEPTION
1367: WHEN OTHERS THEN
1368: IF l_debug_on THEN

Line 1371: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

1367: WHEN OTHERS THEN
1368: IF l_debug_on THEN
1369: WSH_DEBUG_SV.logmsg(l_module_name,'UNEXP. Exception while updating geometries: ' || sqlerrm);
1370: END IF;
1371: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1372: END;
1373: END IF;
1374:
1375: END IF;

Line 1484: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

1480: x_Timezone_Tbl => pTimezoneTbl,
1481: x_return_status => x_return_status,
1482: x_error_msg => x_sqlerr);
1483:
1484: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1485: IF l_debug_on THEN
1486: WSH_DEBUG_SV.logmsg(l_module_name,'Get_Missing_Timezones : ' || x_sqlerr);
1487: END IF;
1488: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

Line 1488: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

1484: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1485: IF l_debug_on THEN
1486: WSH_DEBUG_SV.logmsg(l_module_name,'Get_Missing_Timezones : ' || x_sqlerr);
1487: END IF;
1488: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1489: END IF;
1490:
1491: Insert_Locations(pInsertLocationIdTbl, l_location_source_code,x_return_status);
1492:

Line 1493: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN

1489: END IF;
1490:
1491: Insert_Locations(pInsertLocationIdTbl, l_location_source_code,x_return_status);
1492:
1493: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
1494:
1495: --x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1496: IF l_debug_on THEN
1497: WSH_DEBUG_SV.logmsg(l_module_name,'Error in Insert_Locations ');

Line 1495: --x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;

1491: Insert_Locations(pInsertLocationIdTbl, l_location_source_code,x_return_status);
1492:
1493: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
1494:
1495: --x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1496: IF l_debug_on THEN
1497: WSH_DEBUG_SV.logmsg(l_module_name,'Error in Insert_Locations ');
1498: WSH_DEBUG_SV.pop(l_module_name);
1499: END IF;

Line 1510: (p_create_facilities IS NULL AND WSH_UTIL_CORE.Tp_Is_Installed = 'Y')) THEN

1506: --'N' is the default for the parameter.
1507: -- 1. If this procedure is explicitly called with 'Y', then we create facilities.
1508: -- 2. If is NULL, then we create facilities only if TP is installed.
1509: IF (UPPER(p_create_facilities) = 'Y' OR
1510: (p_create_facilities IS NULL AND WSH_UTIL_CORE.Tp_Is_Installed = 'Y')) THEN
1511: i := pInsertLocationIdTbl.COUNT;
1512: IF l_debug_on THEN
1513: WSH_DEBUG_SV.logmsg(l_module_name,'Calling WSH_FACILITIES_INTEGRATION.CREATE_FACILITIES with ' ||i|| 'Internal locations.');
1514: WSH_DEBUG_SV.logmsg(l_module_name,'Calling WSH_FACILITIES_INTEGRATION.CREATE_FACILITIES with ' ||pInsertOwnerNameTbl.COUNT|| 'Company Names.');

Line 1523: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

1519: p_site_names => pInsertLocCodeTbl,
1520: x_return_status => x_return_status,
1521: x_error_msg => x_sqlerr);
1522:
1523: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1524: IF l_debug_on THEN
1525: WSH_DEBUG_SV.logmsg(l_module_name,'Create Facilities: ' || x_sqlerr);
1526: END IF;
1527: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

Line 1527: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

1523: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1524: IF l_debug_on THEN
1525: WSH_DEBUG_SV.logmsg(l_module_name,'Create Facilities: ' || x_sqlerr);
1526: END IF;
1527: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1528: END IF;
1529:
1530: EXCEPTION
1531: WHEN OTHERS THEN

Line 1535: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

1531: WHEN OTHERS THEN
1532: IF l_debug_on THEN
1533: WSH_DEBUG_SV.logmsg(l_module_name,'UNEXP. EXCEPTION WHILE CREATING FACILITIES: ' || sqlerrm);
1534: END IF;
1535: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1536: END;
1537: END IF;
1538:
1539: --If TP is installed, manually create a Geometry object from the latitude and longitude

Line 1541: IF (WSH_UTIL_CORE.Tp_Is_Installed = 'Y') THEN

1537: END IF;
1538:
1539: --If TP is installed, manually create a Geometry object from the latitude and longitude
1540: -- and update the location with the geometry object.
1541: IF (WSH_UTIL_CORE.Tp_Is_Installed = 'Y') THEN
1542: BEGIN
1543: Update_Geometries(p_location_ids => pInsertLocationIdTbl,
1544: p_latitudes => pLatitudeTbl,
1545: p_longitudes => pLongitudeTbl,

Line 1549: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

1545: p_longitudes => pLongitudeTbl,
1546: l_debug_on => l_debug_on,
1547: x_return_status => x_return_status,
1548: x_error_msg => x_sqlerr);
1549: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1550: IF l_debug_on THEN
1551: WSH_DEBUG_SV.logmsg(l_module_name,'Update_Geometries : ' || x_sqlerr);
1552: END IF;
1553: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

Line 1553: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

1549: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1550: IF l_debug_on THEN
1551: WSH_DEBUG_SV.logmsg(l_module_name,'Update_Geometries : ' || x_sqlerr);
1552: END IF;
1553: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1554: END IF;
1555: EXCEPTION
1556: WHEN OTHERS THEN
1557: IF l_debug_on THEN

Line 1560: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

1556: WHEN OTHERS THEN
1557: IF l_debug_on THEN
1558: WSH_DEBUG_SV.logmsg(l_module_name,'UNEXP. Exception while updating geometries: ' || sqlerrm);
1559: END IF;
1560: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1561: END;
1562: END IF;
1563:
1564: END IF;

Line 1585: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;

1581: END IF;
1582: --
1583: EXCEPTION
1584: WHEN others THEN
1585: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1586: l_sqlcode := SQLCODE;
1587: l_sqlerr := SQLERRM;
1588: --
1589: -- Debug Statements

Line 1599: WSH_UTIL_CORE.printmsg('In the Others Exception of Locations_Child');

1595: WSH_DEBUG_SV.logmsg(l_module_name,'SQLERRM : ' || l_sqlerr);
1596: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1597:
1598: ELSE
1599: WSH_UTIL_CORE.printmsg('In the Others Exception of Locations_Child');
1600: WSH_UTIL_CORE.printmsg(l_sqlcode);
1601: WSH_UTIL_CORE.printmsg(l_sqlerr);
1602: END IF;
1603: --

Line 1600: WSH_UTIL_CORE.printmsg(l_sqlcode);

1596: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1597:
1598: ELSE
1599: WSH_UTIL_CORE.printmsg('In the Others Exception of Locations_Child');
1600: WSH_UTIL_CORE.printmsg(l_sqlcode);
1601: WSH_UTIL_CORE.printmsg(l_sqlerr);
1602: END IF;
1603: --
1604: END Process_Locations;

Line 1601: WSH_UTIL_CORE.printmsg(l_sqlerr);

1597:
1598: ELSE
1599: WSH_UTIL_CORE.printmsg('In the Others Exception of Locations_Child');
1600: WSH_UTIL_CORE.printmsg(l_sqlcode);
1601: WSH_UTIL_CORE.printmsg(l_sqlerr);
1602: END IF;
1603: --
1604: END Process_Locations;
1605:

Line 1695: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;

1691: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'INSERT_LOCATIONS';
1692: --
1693: BEGIN
1694:
1695: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1696: --
1697: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1698: --
1699: IF l_debug_on IS NULL

Line 1784: WSH_UTIL_CORE.printmsg('UNEXPECTED ERROR WHILE CREATING WSH_LOCATION FOR LOCATION '||l_loc_id);

1780: WSH_DEBUG_SV.logmsg(l_module_name,'UNEXPECTED ERROR WHILE CREATING WSH_LOCATION LOCATION '||l_loc_id);
1781: WSH_DEBUG_SV.logmsg(l_module_name,'ERROR MESSAGE '||SQLERRM);
1782: -- Bug 4775798
1783: ELSE
1784: WSH_UTIL_CORE.printmsg('UNEXPECTED ERROR WHILE CREATING WSH_LOCATION FOR LOCATION '||l_loc_id);
1785: WSH_UTIL_CORE.printmsg('ERROR MESSAGE '||SQLERRM);
1786: END IF;
1787: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1788: IF l_debug_on THEN

Line 1785: WSH_UTIL_CORE.printmsg('ERROR MESSAGE '||SQLERRM);

1781: WSH_DEBUG_SV.logmsg(l_module_name,'ERROR MESSAGE '||SQLERRM);
1782: -- Bug 4775798
1783: ELSE
1784: WSH_UTIL_CORE.printmsg('UNEXPECTED ERROR WHILE CREATING WSH_LOCATION FOR LOCATION '||l_loc_id);
1785: WSH_UTIL_CORE.printmsg('ERROR MESSAGE '||SQLERRM);
1786: END IF;
1787: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1788: IF l_debug_on THEN
1789: WSH_DEBUG_SV.pop(l_module_name);

Line 1787: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;

1783: ELSE
1784: WSH_UTIL_CORE.printmsg('UNEXPECTED ERROR WHILE CREATING WSH_LOCATION FOR LOCATION '||l_loc_id);
1785: WSH_UTIL_CORE.printmsg('ERROR MESSAGE '||SQLERRM);
1786: END IF;
1787: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1788: IF l_debug_on THEN
1789: WSH_DEBUG_SV.pop(l_module_name);
1790: END IF;
1791: RETURN;

Line 1797: --IF (WSH_UTIL_CORE.FTE_Is_Installed = 'Y') THEN

1793: END;
1794: END LOOP;
1795: END;
1796:
1797: --IF (WSH_UTIL_CORE.FTE_Is_Installed = 'Y') THEN
1798: insert_location_owners(pInsertLocationIdTbl, p_location_source_code,x_return_status);
1799: --END IF;
1800:
1801: --

Line 1811: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;

1807: --
1808: -- Bug 4775798
1809: EXCEPTION
1810: WHEN OTHERS THEN
1811: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1812: WSH_UTIL_CORE.DEFAULT_HANDLER( 'WSH_LOCATIONS_PKG.insert_locations', l_module_name);
1813: IF l_debug_on THEN
1814: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1815: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');

Line 1812: WSH_UTIL_CORE.DEFAULT_HANDLER( 'WSH_LOCATIONS_PKG.insert_locations', l_module_name);

1808: -- Bug 4775798
1809: EXCEPTION
1810: WHEN OTHERS THEN
1811: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1812: WSH_UTIL_CORE.DEFAULT_HANDLER( 'WSH_LOCATIONS_PKG.insert_locations', l_module_name);
1813: IF l_debug_on THEN
1814: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1815: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1816: ELSE

Line 1817: WSH_UTIL_CORE.printmsg('Unexpected error in Insert_Locations');

1813: IF l_debug_on THEN
1814: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1815: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1816: ELSE
1817: WSH_UTIL_CORE.printmsg('Unexpected error in Insert_Locations');
1818: WSH_UTIL_CORE.printmsg(SQLERRM);
1819: END IF;
1820: END insert_locations;
1821:

Line 1818: WSH_UTIL_CORE.printmsg(SQLERRM);

1814: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1815: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1816: ELSE
1817: WSH_UTIL_CORE.printmsg('Unexpected error in Insert_Locations');
1818: WSH_UTIL_CORE.printmsg(SQLERRM);
1819: END IF;
1820: END insert_locations;
1821:
1822: PROCEDURE update_locations(pUpdateLocationIdTbl IN ID_Tbl_Type,

Line 1837: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;

1833: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'UPDATE_LOCATIONS';
1834: --
1835: BEGIN
1836:
1837: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1838: --
1839: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1840: --
1841: IF l_debug_on IS NULL

Line 1881: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;

1877:
1878: EXCEPTION
1879: WHEN OTHERS THEN
1880: l_loc_id := pUpdateLocCodeTbl(pUpdateLocationIdTbl.FIRST + sql%rowcount);
1881: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1882: IF l_debug_on THEN
1883: WSH_DEBUG_SV.logmsg(l_module_name,'UNEXPECTED ERROR WHILE UPDATING WSH_LOCATION FOR LOCATION '||l_loc_id);
1884: WSH_DEBUG_SV.logmsg(l_module_name,'ERROR MESSAGE '||SQLERRM);
1885: WSH_DEBUG_SV.pop(l_module_name);

Line 1888: WSH_UTIL_CORE.printmsg('UNEXPECTED ERROR WHILE UPDATING WSH_LOCATION FOR LOCATION '||l_loc_id);

1884: WSH_DEBUG_SV.logmsg(l_module_name,'ERROR MESSAGE '||SQLERRM);
1885: WSH_DEBUG_SV.pop(l_module_name);
1886: -- Bug 4775798
1887: ELSE
1888: WSH_UTIL_CORE.printmsg('UNEXPECTED ERROR WHILE UPDATING WSH_LOCATION FOR LOCATION '||l_loc_id);
1889: WSH_UTIL_CORE.printmsg('ERROR MESSAGE '||SQLERRM);
1890: END IF;
1891: return;
1892: END;

Line 1889: WSH_UTIL_CORE.printmsg('ERROR MESSAGE '||SQLERRM);

1885: WSH_DEBUG_SV.pop(l_module_name);
1886: -- Bug 4775798
1887: ELSE
1888: WSH_UTIL_CORE.printmsg('UNEXPECTED ERROR WHILE UPDATING WSH_LOCATION FOR LOCATION '||l_loc_id);
1889: WSH_UTIL_CORE.printmsg('ERROR MESSAGE '||SQLERRM);
1890: END IF;
1891: return;
1892: END;
1893: --IF (WSH_UTIL_CORE.FTE_Is_Installed = 'Y') THEN

Line 1893: --IF (WSH_UTIL_CORE.FTE_Is_Installed = 'Y') THEN

1889: WSH_UTIL_CORE.printmsg('ERROR MESSAGE '||SQLERRM);
1890: END IF;
1891: return;
1892: END;
1893: --IF (WSH_UTIL_CORE.FTE_Is_Installed = 'Y') THEN
1894: insert_location_owners(pUpdateLocationIdTbl, p_location_source_code,x_return_status);
1895: --END IF;
1896:
1897: --

Line 1907: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;

1903: --
1904: -- Bug 4775798
1905: EXCEPTION
1906: WHEN OTHERS THEN
1907: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1908: WSH_UTIL_CORE.DEFAULT_HANDLER( 'WSH_LOCATIONS_PKG.update_locations', l_module_name);
1909: IF l_debug_on THEN
1910: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1911: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');

Line 1908: WSH_UTIL_CORE.DEFAULT_HANDLER( 'WSH_LOCATIONS_PKG.update_locations', l_module_name);

1904: -- Bug 4775798
1905: EXCEPTION
1906: WHEN OTHERS THEN
1907: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1908: WSH_UTIL_CORE.DEFAULT_HANDLER( 'WSH_LOCATIONS_PKG.update_locations', l_module_name);
1909: IF l_debug_on THEN
1910: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1911: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1912: ELSE

Line 1913: WSH_UTIL_CORE.printmsg('Unexpected error in Update_Locations');

1909: IF l_debug_on THEN
1910: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1911: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1912: ELSE
1913: WSH_UTIL_CORE.printmsg('Unexpected error in Update_Locations');
1914: WSH_UTIL_CORE.printmsg(SQLERRM);
1915: END IF;
1916: END update_locations;
1917:

Line 1914: WSH_UTIL_CORE.printmsg(SQLERRM);

1910: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1911: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1912: ELSE
1913: WSH_UTIL_CORE.printmsg('Unexpected error in Update_Locations');
1914: WSH_UTIL_CORE.printmsg(SQLERRM);
1915: END IF;
1916: END update_locations;
1917:
1918: PROCEDURE check_duplicate_rec

Line 1936: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;

1932:
1933: l_dup_owner_id NUMBER;
1934:
1935: BEGIN
1936: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1937:
1938: OPEN c_check_duplicate(p_wsh_location_id,p_owner_type,p_owner_party_id);
1939: FETCH c_check_duplicate INTO l_dup_owner_id;
1940: IF (c_check_duplicate%NOTFOUND) THEN

Line 1949: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;

1945: CLOSE c_check_duplicate;
1946:
1947: EXCEPTION
1948: WHEN others THEN
1949: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1950: END check_duplicate_rec;
1951:
1952: PROCEDURE get_location_owner(p_location_id IN NUMBER,
1953: p_location_source_code IN VARCHAR2) IS

Line 2058: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

2054: p_owner_type => 1,
2055: x_dup_rec_pk => l_dup_pk,
2056: x_return_status => l_return_status);
2057:
2058: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2059:
2060: IF (l_dup_pk = -1) THEN
2061: -- Duplicate row does not exist.
2062: IF l_debug_on THEN

Line 2213: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;

2209: --
2210: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'INSERT_LOCATION_OWNERS';
2211: --
2212: BEGIN
2213: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2214: --
2215: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2216: --
2217: IF l_debug_on IS NULL

Line 2288: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;

2284: IF l_debug_on THEN
2285: WSH_DEBUG_SV.logmsg(l_module_name,'UNEXPECTED ERROR WHILE CREATING LOCATION OWNER FOR LOCATION '||l_loc_id);
2286: WSH_DEBUG_SV.logmsg(l_module_name,'ERROR MESSAGE '||SQLERRM);
2287: END IF;
2288: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2289: RETURN;
2290: END IF;
2291: END;
2292: END LOOP;

Line 2345: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;

2341: IF l_debug_on THEN
2342: WSH_DEBUG_SV.push(l_module_name);
2343: END IF;
2344:
2345: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2346:
2347: x_geometry := MDSYS.SDO_GEOMETRY(2001, --SDO_GTYPE: Geometry type.
2348: -- 2 indicates two-dimensional, 1 indicates a single point
2349: 8307, --SDO_SRID: 8307 is SRID for 'Long/Lat (WGS 84)' coordinate system

Line 2366: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;

2362: IF l_debug_on THEN
2363: WSH_DEBUG_SV.LogMsg(l_module_name, x_error_msg);
2364: WSH_DEBUG_SV.pop(l_module_name);
2365: END IF;
2366: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2367:
2368: END Create_Geometry;
2369:
2370:

Line 2434: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;

2430: --
2431: --
2432: l_cache_rec.input_param1 := to_char(p_internal_cust_location_id)||'-'||to_char(p_customer_id);
2433:
2434: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2435:
2436: get_table_index(
2437: p_validate_rec => l_cache_rec,
2438: p_generic_tab => g_int_loc_cache,

Line 2443: IF (l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR,

2439: x_index => l_index,
2440: x_return_status => l_rs,
2441: x_flag => l_flag);
2442:
2443: IF (l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
2444: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
2445: l_flag := NULL;
2446: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2447: END IF;

Line 2444: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN

2440: x_return_status => l_rs,
2441: x_flag => l_flag);
2442:
2443: IF (l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
2444: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
2445: l_flag := NULL;
2446: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2447: END IF;
2448:

Line 2446: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;

2442:
2443: IF (l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
2444: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
2445: l_flag := NULL;
2446: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2447: END IF;
2448:
2449: IF l_flag = 'U' THEN
2450: OPEN c_convert(p_internal_cust_location_id,p_customer_id);

Line 2462: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;

2458:
2459: IF g_int_loc_cache.EXISTS(l_index) THEN
2460: x_internal_org_location_id := g_int_loc_cache(l_index).output_param1;
2461: ELSE
2462: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2463: x_internal_org_location_id := NULL;
2464: END IF;
2465:
2466: --

Line 2475: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;

2471: END IF;
2472:
2473: EXCEPTION
2474: WHEN OTHERS THEN
2475: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2476: IF c_convert%ISOPEN THEN
2477: CLOSE c_convert;
2478: END IF;
2479: WSH_UTIL_CORE.DEFAULT_HANDLER(

Line 2479: WSH_UTIL_CORE.DEFAULT_HANDLER(

2475: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2476: IF c_convert%ISOPEN THEN
2477: CLOSE c_convert;
2478: END IF;
2479: WSH_UTIL_CORE.DEFAULT_HANDLER(
2480: 'WSH_LOCATIONS_PKG.convert_internal_cust_location',
2481: l_module_name);
2482:
2483: IF l_debug_on THEN

Line 2534: IF (l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR,

2530: x_internal_org_location_id => l_internal_org_location_id,
2531: x_return_status => l_rs
2532: );
2533:
2534: IF (l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
2535: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
2536: l_internal_org_location_id := NULL;
2537: END IF;
2538:

Line 2535: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN

2531: x_return_status => l_rs
2532: );
2533:
2534: IF (l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
2535: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
2536: l_internal_org_location_id := NULL;
2537: END IF;
2538:
2539: --

Line 2550: WSH_UTIL_CORE.DEFAULT_HANDLER(

2546: RETURN l_internal_org_location_id;
2547:
2548: EXCEPTION
2549: WHEN OTHERS THEN
2550: WSH_UTIL_CORE.DEFAULT_HANDLER(
2551: 'WSH_LOCATIONS_PKG.convert_internal_cust_location',
2552: l_module_name);
2553: IF l_debug_on THEN
2554: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);