14: g_msg_lvl_debug_high NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH ;
15: g_msg_lvl_debug_medium NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM ;
16: g_msg_lvl_debug_low NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW ;
17:
18: g_ret_success varchar2(1) := FND_API.G_RET_STS_SUCCESS;
19: g_ret_error varchar2(1) := FND_API.G_RET_STS_ERROR;
20: g_ret_unexpected varchar2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
21:
22: -- This procedure will be invoked by the WIP move processor (for interface transactions)
15: g_msg_lvl_debug_medium NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM ;
16: g_msg_lvl_debug_low NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW ;
17:
18: g_ret_success varchar2(1) := FND_API.G_RET_STS_SUCCESS;
19: g_ret_error varchar2(1) := FND_API.G_RET_STS_ERROR;
20: g_ret_unexpected varchar2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
21:
22: -- This procedure will be invoked by the WIP move processor (for interface transactions)
23: -- If the transaction type is an undo/assembly return transaction populate_components will be invoked.
16: g_msg_lvl_debug_low NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW ;
17:
18: g_ret_success varchar2(1) := FND_API.G_RET_STS_SUCCESS;
19: g_ret_error varchar2(1) := FND_API.G_RET_STS_ERROR;
20: g_ret_unexpected varchar2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
21:
22: -- This procedure will be invoked by the WIP move processor (for interface transactions)
23: -- If the transaction type is an undo/assembly return transaction populate_components will be invoked.
24: -- Or else the WIP API wip_movProc_grp.backflushIntoMTI will be invoked which would derive backflush components..
106: );
107:
108: if x_returnStatus <> G_RET_SUCCESS then
109: IF x_returnStatus = G_RET_ERROR THEN
110: raise FND_API.G_EXC_ERROR;
111: ELSIF x_returnStatus = G_RET_UNEXPECTED THEN
112: raise FND_API.G_EXC_UNEXPECTED_ERROR;
113: END IF;
114: end if;
108: if x_returnStatus <> G_RET_SUCCESS then
109: IF x_returnStatus = G_RET_ERROR THEN
110: raise FND_API.G_EXC_ERROR;
111: ELSIF x_returnStatus = G_RET_UNEXPECTED THEN
112: raise FND_API.G_EXC_UNEXPECTED_ERROR;
113: END IF;
114: end if;
115: l_stmt_num := 40;
116: else
149: );
150:
151: if x_returnStatus <> G_RET_SUCCESS then
152: IF x_returnStatus = G_RET_ERROR THEN
153: raise FND_API.G_EXC_ERROR;
154: ELSIF x_returnStatus = G_RET_UNEXPECTED THEN
155: raise FND_API.G_EXC_UNEXPECTED_ERROR;
156: END IF;
157: end if;
151: if x_returnStatus <> G_RET_SUCCESS then
152: IF x_returnStatus = G_RET_ERROR THEN
153: raise FND_API.G_EXC_ERROR;
154: ELSIF x_returnStatus = G_RET_UNEXPECTED THEN
155: raise FND_API.G_EXC_UNEXPECTED_ERROR;
156: END IF;
157: end if;
158:
159: l_stmt_num := 60;
159: l_stmt_num := 60;
160: end if;
161: EXCEPTION
162:
163: WHEN FND_API.G_EXC_ERROR THEN
164:
165: x_returnStatus := G_RET_ERROR;
166: FND_MSG_PUB.Count_And_Get( p_encoded => 'F' ,
167: p_count => x_error_count ,
167: p_count => x_error_count ,
168: p_data => x_error_msg
169: );
170:
171: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
172:
173: x_returnStatus := G_RET_UNEXPECTED;
174:
175: FND_MSG_PUB.Count_And_Get( p_encoded => 'F' ,
324: p_fnd_log_level => G_LOG_LEVEL_ERROR ,
325: p_run_log_level => l_log_level
326: );
327: END IF;
328: RAISE FND_API.G_EXC_ERROR;
329:
330: end if;
331:
332: -- get a txn header id..
1238: end loop;
1239:
1240: exception
1241:
1242: WHEN FND_API.G_EXC_ERROR THEN
1243:
1244: x_return_status := G_RET_ERROR;
1245: FND_MSG_PUB.Count_And_Get( p_encoded => 'F' ,
1246: p_count => x_error_count ,
1246: p_count => x_error_count ,
1247: p_data => x_error_msg
1248: );
1249:
1250: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1251:
1252: x_return_status := G_RET_UNEXPECTED;
1253:
1254: FND_MSG_PUB.Count_And_Get( p_encoded => 'F' ,