7:
8: -- Process_OSP_Transaction
9:
10: PROCEDURE Process_OSP_Transaction
11: ( p_OSP_rec IN WIP_Transaction_PUB.Res_Rec_Type
12: , p_validation_level IN NUMBER DEFAULT COMPLETE
13: , p_return_status OUT NOCOPY VARCHAR2
14: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
15: , p_msg_count OUT NOCOPY NUMBER
17: )
18: IS
19: l_direct_item_flag NUMBER;
20: l_return_status VARCHAR2(1);
21: l_OSP_rec WIP_Transaction_PUB.Res_Rec_Type :=
22: WIP_Transaction_PUB.G_MISS_RES_REC;
23: l_ShopFloorMove_rec WIP_Transaction_PUB.ShopFloorMove_Rec_Type :=
24: WIP_Transaction_PUB.G_MISS_SHOPFLOORMOVE_REC;
25:
18: IS
19: l_direct_item_flag NUMBER;
20: l_return_status VARCHAR2(1);
21: l_OSP_rec WIP_Transaction_PUB.Res_Rec_Type :=
22: WIP_Transaction_PUB.G_MISS_RES_REC;
23: l_ShopFloorMove_rec WIP_Transaction_PUB.ShopFloorMove_Rec_Type :=
24: WIP_Transaction_PUB.G_MISS_SHOPFLOORMOVE_REC;
25:
26: /* this variable is passed as a value for the p_old_res_rec
19: l_direct_item_flag NUMBER;
20: l_return_status VARCHAR2(1);
21: l_OSP_rec WIP_Transaction_PUB.Res_Rec_Type :=
22: WIP_Transaction_PUB.G_MISS_RES_REC;
23: l_ShopFloorMove_rec WIP_Transaction_PUB.ShopFloorMove_Rec_Type :=
24: WIP_Transaction_PUB.G_MISS_SHOPFLOORMOVE_REC;
25:
26: /* this variable is passed as a value for the p_old_res_rec
27: in the procedure wip_validate_res.Attributes. Enhancement No: 2665334
20: l_return_status VARCHAR2(1);
21: l_OSP_rec WIP_Transaction_PUB.Res_Rec_Type :=
22: WIP_Transaction_PUB.G_MISS_RES_REC;
23: l_ShopFloorMove_rec WIP_Transaction_PUB.ShopFloorMove_Rec_Type :=
24: WIP_Transaction_PUB.G_MISS_SHOPFLOORMOVE_REC;
25:
26: /* this variable is passed as a value for the p_old_res_rec
27: in the procedure wip_validate_res.Attributes. Enhancement No: 2665334
28: */
26: /* this variable is passed as a value for the p_old_res_rec
27: in the procedure wip_validate_res.Attributes. Enhancement No: 2665334
28: */
29:
30: l_old_OSP_rec WIP_Transaction_PUB.Res_Rec_Type :=
31: WIP_Transaction_PUB.G_MISS_RES_REC;
32:
33: l_old_ShopFloorMove_rec WIP_Transaction_PUB.Shopfloormove_Rec_Type :=
34: WIP_Transaction_PUB.G_MISS_SHOPFLOORMOVE_REC;
27: in the procedure wip_validate_res.Attributes. Enhancement No: 2665334
28: */
29:
30: l_old_OSP_rec WIP_Transaction_PUB.Res_Rec_Type :=
31: WIP_Transaction_PUB.G_MISS_RES_REC;
32:
33: l_old_ShopFloorMove_rec WIP_Transaction_PUB.Shopfloormove_Rec_Type :=
34: WIP_Transaction_PUB.G_MISS_SHOPFLOORMOVE_REC;
35:
29:
30: l_old_OSP_rec WIP_Transaction_PUB.Res_Rec_Type :=
31: WIP_Transaction_PUB.G_MISS_RES_REC;
32:
33: l_old_ShopFloorMove_rec WIP_Transaction_PUB.Shopfloormove_Rec_Type :=
34: WIP_Transaction_PUB.G_MISS_SHOPFLOORMOVE_REC;
35:
36: l_log_level NUMBER := fnd_log.g_current_runtime_level;
37: l_error_msg VARCHAR2(240);
30: l_old_OSP_rec WIP_Transaction_PUB.Res_Rec_Type :=
31: WIP_Transaction_PUB.G_MISS_RES_REC;
32:
33: l_old_ShopFloorMove_rec WIP_Transaction_PUB.Shopfloormove_Rec_Type :=
34: WIP_Transaction_PUB.G_MISS_SHOPFLOORMOVE_REC;
35:
36: l_log_level NUMBER := fnd_log.g_current_runtime_level;
37: l_error_msg VARCHAR2(240);
38: l_process_phase VARCHAR2(3);
262: , x_return_status OUT NOCOPY VARCHAR2
263: , x_msg_count OUT NOCOPY NUMBER
264: , x_msg_data OUT NOCOPY VARCHAR2
265: , p_dummy IN VARCHAR2
266: , x_WIPTransaction_tbl OUT NOCOPY WIP_Transaction_PUB.Wiptransaction_Tbl_Type
267: , x_Res_tbl OUT NOCOPY WIP_Transaction_PUB.Res_Tbl_Type
268: , x_ShopFloorMove_tbl OUT NOCOPY WIP_Transaction_PUB.Shopfloormove_Tbl_Type
269: )
270: IS
263: , x_msg_count OUT NOCOPY NUMBER
264: , x_msg_data OUT NOCOPY VARCHAR2
265: , p_dummy IN VARCHAR2
266: , x_WIPTransaction_tbl OUT NOCOPY WIP_Transaction_PUB.Wiptransaction_Tbl_Type
267: , x_Res_tbl OUT NOCOPY WIP_Transaction_PUB.Res_Tbl_Type
268: , x_ShopFloorMove_tbl OUT NOCOPY WIP_Transaction_PUB.Shopfloormove_Tbl_Type
269: )
270: IS
271: l_api_version_number CONSTANT NUMBER := 1.0;
264: , x_msg_data OUT NOCOPY VARCHAR2
265: , p_dummy IN VARCHAR2
266: , x_WIPTransaction_tbl OUT NOCOPY WIP_Transaction_PUB.Wiptransaction_Tbl_Type
267: , x_Res_tbl OUT NOCOPY WIP_Transaction_PUB.Res_Tbl_Type
268: , x_ShopFloorMove_tbl OUT NOCOPY WIP_Transaction_PUB.Shopfloormove_Tbl_Type
269: )
270: IS
271: l_api_version_number CONSTANT NUMBER := 1.0;
272: l_api_name CONSTANT VARCHAR2(30):= 'Get_Transaction';
269: )
270: IS
271: l_api_version_number CONSTANT NUMBER := 1.0;
272: l_api_name CONSTANT VARCHAR2(30):= 'Get_Transaction';
273: l_WIPTransaction_tbl WIP_Transaction_PUB.Wiptransaction_Tbl_Type;
274: l_Res_tbl WIP_Transaction_PUB.Res_Tbl_Type;
275: l_x_Res_tbl WIP_Transaction_PUB.Res_Tbl_Type;
276: l_ShopFloorMove_tbl WIP_Transaction_PUB.Shopfloormove_Tbl_Type;
277: l_x_ShopFloorMove_tbl WIP_Transaction_PUB.Shopfloormove_Tbl_Type;
270: IS
271: l_api_version_number CONSTANT NUMBER := 1.0;
272: l_api_name CONSTANT VARCHAR2(30):= 'Get_Transaction';
273: l_WIPTransaction_tbl WIP_Transaction_PUB.Wiptransaction_Tbl_Type;
274: l_Res_tbl WIP_Transaction_PUB.Res_Tbl_Type;
275: l_x_Res_tbl WIP_Transaction_PUB.Res_Tbl_Type;
276: l_ShopFloorMove_tbl WIP_Transaction_PUB.Shopfloormove_Tbl_Type;
277: l_x_ShopFloorMove_tbl WIP_Transaction_PUB.Shopfloormove_Tbl_Type;
278: BEGIN
271: l_api_version_number CONSTANT NUMBER := 1.0;
272: l_api_name CONSTANT VARCHAR2(30):= 'Get_Transaction';
273: l_WIPTransaction_tbl WIP_Transaction_PUB.Wiptransaction_Tbl_Type;
274: l_Res_tbl WIP_Transaction_PUB.Res_Tbl_Type;
275: l_x_Res_tbl WIP_Transaction_PUB.Res_Tbl_Type;
276: l_ShopFloorMove_tbl WIP_Transaction_PUB.Shopfloormove_Tbl_Type;
277: l_x_ShopFloorMove_tbl WIP_Transaction_PUB.Shopfloormove_Tbl_Type;
278: BEGIN
279:
272: l_api_name CONSTANT VARCHAR2(30):= 'Get_Transaction';
273: l_WIPTransaction_tbl WIP_Transaction_PUB.Wiptransaction_Tbl_Type;
274: l_Res_tbl WIP_Transaction_PUB.Res_Tbl_Type;
275: l_x_Res_tbl WIP_Transaction_PUB.Res_Tbl_Type;
276: l_ShopFloorMove_tbl WIP_Transaction_PUB.Shopfloormove_Tbl_Type;
277: l_x_ShopFloorMove_tbl WIP_Transaction_PUB.Shopfloormove_Tbl_Type;
278: BEGIN
279:
280: -- Standard call to check for call compatibility
273: l_WIPTransaction_tbl WIP_Transaction_PUB.Wiptransaction_Tbl_Type;
274: l_Res_tbl WIP_Transaction_PUB.Res_Tbl_Type;
275: l_x_Res_tbl WIP_Transaction_PUB.Res_Tbl_Type;
276: l_ShopFloorMove_tbl WIP_Transaction_PUB.Shopfloormove_Tbl_Type;
277: l_x_ShopFloorMove_tbl WIP_Transaction_PUB.Shopfloormove_Tbl_Type;
278: BEGIN
279:
280: -- Standard call to check for call compatibility
281:
402: -- Process_Resource_Transaction
403: -- ----------------------------
404:
405: PROCEDURE Process_Resource_Transaction
406: ( p_res_txn_rec IN WIP_Transaction_PUB.Res_Rec_Type
407: , p_validation_level IN NUMBER DEFAULT COMPLETE
408: , p_return_status OUT NOCOPY VARCHAR2
409: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
410: , p_msg_count OUT NOCOPY NUMBER
411: , p_msg_data OUT NOCOPY VARCHAR2
412: )
413: IS
414: l_return_status VARCHAR2(1);
415: l_res_txn_rec WIP_Transaction_PUB.Res_Rec_Type;
416:
417: /* this variable is passed as a value for the p_old_res_rec
418: in the procedure wip_validate_res.Attributes. Enhancement No: 2665334
419: */
417: /* this variable is passed as a value for the p_old_res_rec
418: in the procedure wip_validate_res.Attributes. Enhancement No: 2665334
419: */
420:
421: l_old_OSP_rec WIP_Transaction_PUB.Res_Rec_Type :=
422: WIP_Transaction_PUB.G_MISS_RES_REC;
423:
424: l_log_level NUMBER := fnd_log.g_current_runtime_level;
425: l_error_msg VARCHAR2(240);
418: in the procedure wip_validate_res.Attributes. Enhancement No: 2665334
419: */
420:
421: l_old_OSP_rec WIP_Transaction_PUB.Res_Rec_Type :=
422: WIP_Transaction_PUB.G_MISS_RES_REC;
423:
424: l_log_level NUMBER := fnd_log.g_current_runtime_level;
425: l_error_msg VARCHAR2(240);
426: l_process_phase VARCHAR2(3);