[Home] [Help]
1: PACKAGE BODY GMD_FETCH_OPRN AS
2: /* $Header: GMDPOPNB.pls 120.2 2011/06/23 14:38:49 rnalla ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'gmd_fetch_oprn';
5: PROCEDURE fetch_oprn
1: PACKAGE BODY GMD_FETCH_OPRN AS
2: /* $Header: GMDPOPNB.pls 120.2 2011/06/23 14:38:49 rnalla ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'gmd_fetch_oprn';
5: PROCEDURE fetch_oprn
6: ( p_api_version IN NUMBER ,
7: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
8: p_oprn_id IN NUMBER ,
49: CLOSE Cur_validate_record;
50: -- Bug #2415756 (JKB) Added validation above.
51:
52:
53: gmd_fetch_oprn.get_oprn_act(p_api_version => p_api_version,
54: p_init_msg_list => FND_API.G_FALSE,
55: p_oprn_id => p_oprn_id,
56: x_return_status => x_return_status,
57: x_msg_count => x_msg_count,
59: x_return_code => x_return_code,
60: x_oprn_act_out => x_oprn_act_out);
61:
62: IF X_return_status = FND_API.g_ret_sts_success THEN
63: gmd_fetch_oprn.get_oprn_resc(p_api_version => p_api_version,
64: p_init_msg_list => FND_API.G_FALSE,
65: p_oprn_id => p_oprn_id,
66: p_orgn_code => p_orgn_code,
67: x_return_status => x_return_status,
364: x_oprn_resc_rec(i).attribute28 := get_rec.attribute28 ;
365: x_oprn_resc_rec(i).attribute29 := get_rec.attribute29 ;
366: x_oprn_resc_rec(i).attribute30 := get_rec.attribute30 ;
367:
368: gmd_fetch_oprn.get_oprn_process_param_detl
369: (p_api_version => p_api_version
370: ,p_init_msg_list => p_init_msg_list
371: ,p_oprn_line_id => get_rec.oprn_line_id
372: ,p_resources => get_rec.resources
459: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
460: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
461: END get_oprn_process_param_detl;
462:
463: END GMD_FETCH_OPRN ;