112: l_return_status := FND_API.G_RET_STS_SUCCESS;
113: x_return_status := FND_API.G_RET_STS_SUCCESS;
114:
115: /*------------------------------------------------------------------------+
116: | Calling CSTPOYLD.transact_op_yield_var to calculate and account |
117: | operation yield variance for lot based job. |
118: +------------------------------------------------------------------------*/
119: l_stmt_num := 10;
120:
117: | operation yield variance for lot based job. |
118: +------------------------------------------------------------------------*/
119: l_stmt_num := 10;
120:
121: l_return_code := CSTPOYLD.transact_op_yield_var (
122: p_wcti_group_id,
123: p_user_id,
124: p_login_id,
125: p_prg_appl_id,
129: l_err_code,
130: l_err_msg);
131:
132: IF (l_return_code <> 1) THEN
133: l_msg_data := 'CSTPOYLD.transact_op_yield_var: ' || l_err_msg;
134: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
135: END IF;
136:
137: /*------------------------------------------------------------------------+