25: --
26: --
27: Procedure Translate_edw_source_instances
28: ( p_api_version IN NUMBER
29: , p_commit IN VARCHAR2 := FND_API.G_FALSE
30: , p_src_inst_rec IN EDW_SOURCE_INST_PKG.src_inst_rec_type
31: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
32: , x_return_status OUT VARCHAR2
33: )
56: and userenv('LANG') IN (LANGUAGE, SOURCE_LANG);
57:
58: EXCEPTION
59: WHEN NO_DATA_FOUND THEN
60: x_return_status := FND_API.G_RET_STS_ERROR ;
61: when FND_API.G_EXC_ERROR then
62: x_return_status := FND_API.G_RET_STS_ERROR ;
63: when FND_API.G_EXC_UNEXPECTED_ERROR then
64: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
57:
58: EXCEPTION
59: WHEN NO_DATA_FOUND THEN
60: x_return_status := FND_API.G_RET_STS_ERROR ;
61: when FND_API.G_EXC_ERROR then
62: x_return_status := FND_API.G_RET_STS_ERROR ;
63: when FND_API.G_EXC_UNEXPECTED_ERROR then
64: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
65: when others then
58: EXCEPTION
59: WHEN NO_DATA_FOUND THEN
60: x_return_status := FND_API.G_RET_STS_ERROR ;
61: when FND_API.G_EXC_ERROR then
62: x_return_status := FND_API.G_RET_STS_ERROR ;
63: when FND_API.G_EXC_UNEXPECTED_ERROR then
64: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
65: when others then
66: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
59: WHEN NO_DATA_FOUND THEN
60: x_return_status := FND_API.G_RET_STS_ERROR ;
61: when FND_API.G_EXC_ERROR then
62: x_return_status := FND_API.G_RET_STS_ERROR ;
63: when FND_API.G_EXC_UNEXPECTED_ERROR then
64: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
65: when others then
66: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
67:
60: x_return_status := FND_API.G_RET_STS_ERROR ;
61: when FND_API.G_EXC_ERROR then
62: x_return_status := FND_API.G_RET_STS_ERROR ;
63: when FND_API.G_EXC_UNEXPECTED_ERROR then
64: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
65: when others then
66: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
67:
68:
62: x_return_status := FND_API.G_RET_STS_ERROR ;
63: when FND_API.G_EXC_UNEXPECTED_ERROR then
64: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
65: when others then
66: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
67:
68:
69: END Translate_Edw_source_instances ;
70: --
69: END Translate_Edw_source_instances ;
70: --
71: Procedure Load_Edw_source_instances
72: ( p_api_version IN NUMBER
73: , p_commit IN VARCHAR2 := FND_API.G_FALSE
74: , p_src_inst_rec IN EDW_SOURCE_INST_PKG.src_inst_rec_type
75: , p_owner IN VARCHAR2 := BIS_UTILITIES_PUB.G_CUSTOM_OWNER
76: , x_return_status OUT VARCHAR2)
77: IS
108: where instance_code = p_src_inst_rec.instance_code
109: and userenv('LANG') IN (LANGUAGE, SOURCE_LANG);
110:
111: EXCEPTION
112: WHEN NO_DATA_FOUND OR FND_API.G_EXC_ERROR then
113:
114: INSERT INTO EDW_SOURCE_INSTANCES(
115: INSTANCE_CODE, ENABLED_FLAG,
116: WAREHOUSE_TO_INSTANCE_LINK, CREATION_DATE,
142: WHERE tl.instance_code = e.instance_code
143: and tl.language = l.language_code);
144:
145: WHEN OTHERS THEN
146: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
147: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
148:
149: END;
150:
143: and tl.language = l.language_code);
144:
145: WHEN OTHERS THEN
146: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
147: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
148:
149: END;
150:
151: EXCEPTION
149: END;
150:
151: EXCEPTION
152: WHEN NO_DATA_FOUND THEN
153: x_return_status := FND_API.G_RET_STS_ERROR ;
154: when FND_API.G_EXC_ERROR then
155: x_return_status := FND_API.G_RET_STS_ERROR ;
156: when FND_API.G_EXC_UNEXPECTED_ERROR then
157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
150:
151: EXCEPTION
152: WHEN NO_DATA_FOUND THEN
153: x_return_status := FND_API.G_RET_STS_ERROR ;
154: when FND_API.G_EXC_ERROR then
155: x_return_status := FND_API.G_RET_STS_ERROR ;
156: when FND_API.G_EXC_UNEXPECTED_ERROR then
157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
158: when others then
151: EXCEPTION
152: WHEN NO_DATA_FOUND THEN
153: x_return_status := FND_API.G_RET_STS_ERROR ;
154: when FND_API.G_EXC_ERROR then
155: x_return_status := FND_API.G_RET_STS_ERROR ;
156: when FND_API.G_EXC_UNEXPECTED_ERROR then
157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
158: when others then
159: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
152: WHEN NO_DATA_FOUND THEN
153: x_return_status := FND_API.G_RET_STS_ERROR ;
154: when FND_API.G_EXC_ERROR then
155: x_return_status := FND_API.G_RET_STS_ERROR ;
156: when FND_API.G_EXC_UNEXPECTED_ERROR then
157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
158: when others then
159: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
160:
153: x_return_status := FND_API.G_RET_STS_ERROR ;
154: when FND_API.G_EXC_ERROR then
155: x_return_status := FND_API.G_RET_STS_ERROR ;
156: when FND_API.G_EXC_UNEXPECTED_ERROR then
157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
158: when others then
159: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
160:
161: END Load_edw_source_instances ;
155: x_return_status := FND_API.G_RET_STS_ERROR ;
156: when FND_API.G_EXC_UNEXPECTED_ERROR then
157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
158: when others then
159: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
160:
161: END Load_edw_source_instances ;
162: --
163: --