26: l_api_version_number NUMBER:=1.0;
27:
28: BEGIN
29: -- Standard call to check for call compatibility.
30: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
31: p_api_version_number,
32: l_api_name,
33: G_PKG_NAME)
34: THEN
31: p_api_version_number,
32: l_api_name,
33: G_PKG_NAME)
34: THEN
35: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
36: END IF;
37: x_return_status := FND_API.G_RET_STS_SUCCESS;
38: INSERT INTO IEM_ARCH_REQUESTS
39: (REQUEST_ID,
33: G_PKG_NAME)
34: THEN
35: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
36: END IF;
37: x_return_status := FND_API.G_RET_STS_SUCCESS;
38: INSERT INTO IEM_ARCH_REQUESTS
39: (REQUEST_ID,
40: ARCH_CRITERIA,
41: EMAIL_ACCOUNT_ID,
72: ( p_count => x_msg_count,
73: p_data => x_msg_data
74: );
75: EXCEPTION
76: WHEN FND_API.G_EXC_ERROR THEN
77: x_return_status := FND_API.G_RET_STS_ERROR ;
78: FND_MSG_PUB.Count_And_Get
79: ( p_count => x_msg_count,
80: p_data => x_msg_data
73: p_data => x_msg_data
74: );
75: EXCEPTION
76: WHEN FND_API.G_EXC_ERROR THEN
77: x_return_status := FND_API.G_RET_STS_ERROR ;
78: FND_MSG_PUB.Count_And_Get
79: ( p_count => x_msg_count,
80: p_data => x_msg_data
81: );
78: FND_MSG_PUB.Count_And_Get
79: ( p_count => x_msg_count,
80: p_data => x_msg_data
81: );
82: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
83: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
84: FND_MSG_PUB.Count_And_Get
85: ( p_count => x_msg_count,
86: p_data => x_msg_data
79: ( p_count => x_msg_count,
80: p_data => x_msg_data
81: );
82: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
83: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
84: FND_MSG_PUB.Count_And_Get
85: ( p_count => x_msg_count,
86: p_data => x_msg_data
87: );
85: ( p_count => x_msg_count,
86: p_data => x_msg_data
87: );
88: WHEN OTHERS THEN
89: x_return_status := FND_API.G_RET_STS_ERROR;
90: IF FND_MSG_PUB.Check_Msg_Level
91: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
92: THEN
93: FND_MSG_PUB.Add_Exc_Msg
119: l_api_version_number NUMBER:=1.0;
120:
121: BEGIN
122: -- Standard call to check for call compatibility.
123: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
124: p_api_version_number,
125: l_api_name,
126: G_PKG_NAME)
127: THEN
124: p_api_version_number,
125: l_api_name,
126: G_PKG_NAME)
127: THEN
128: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
129: END IF;
130: x_return_status := FND_API.G_RET_STS_SUCCESS;
131: update iem_arch_requests
132: set arch_count=decode(p_arch_count,null,arch_count,p_arch_count),
126: G_PKG_NAME)
127: THEN
128: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
129: END IF;
130: x_return_status := FND_API.G_RET_STS_SUCCESS;
131: update iem_arch_requests
132: set arch_count=decode(p_arch_count,null,arch_count,p_arch_count),
133: arch_size=decode(p_arch_size,null,arch_size,p_arch_size),
134: status=p_status,
144: ( p_count => x_msg_count,
145: p_data => x_msg_data
146: );
147: EXCEPTION
148: WHEN FND_API.G_EXC_ERROR THEN
149: x_return_status := FND_API.G_RET_STS_ERROR ;
150: FND_MSG_PUB.Count_And_Get
151: ( p_count => x_msg_count,
152: p_data => x_msg_data
145: p_data => x_msg_data
146: );
147: EXCEPTION
148: WHEN FND_API.G_EXC_ERROR THEN
149: x_return_status := FND_API.G_RET_STS_ERROR ;
150: FND_MSG_PUB.Count_And_Get
151: ( p_count => x_msg_count,
152: p_data => x_msg_data
153: );
150: FND_MSG_PUB.Count_And_Get
151: ( p_count => x_msg_count,
152: p_data => x_msg_data
153: );
154: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
155: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
156: FND_MSG_PUB.Count_And_Get
157: ( p_count => x_msg_count,
158: p_data => x_msg_data
151: ( p_count => x_msg_count,
152: p_data => x_msg_data
153: );
154: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
155: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
156: FND_MSG_PUB.Count_And_Get
157: ( p_count => x_msg_count,
158: p_data => x_msg_data
159: );
157: ( p_count => x_msg_count,
158: p_data => x_msg_data
159: );
160: WHEN OTHERS THEN
161: x_return_status := FND_API.G_RET_STS_ERROR;
162: IF FND_MSG_PUB.Check_Msg_Level
163: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
164: THEN
165: FND_MSG_PUB.Add_Exc_Msg