DBA Data[Home] [Help]

APPS.GML_OPM_OM_CONV_MIG_PKG dependencies on FND_API

Line 25: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE

21: -- HISTORY
22: --=============================================================================================================*/
23:
24: PROCEDURE Migrate_opm_om_open_lines( p_migration_run_id IN NUMBER
25: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
26: , x_failure_count OUT NOCOPY NUMBER) IS
27:
28: /* Migration specific variables */
29: l_failure_count NUMBER := 0;

Line 57: l_commit VARCHAR2(1) := FND_API.G_TRUE;

53:
54: /* MTL Move order line */
55: l_trolin_tbl INV_Move_Order_PUB.Trolin_Tbl_Type;
56: l_trolin_val_tbl INV_Move_Order_PUB.Trolin_Val_Tbl_Type;
57: l_commit VARCHAR2(1) := FND_API.G_TRUE;
58: l_line_num Number := 0;
59: l_order_count NUMBER := 1;
60:
61: /* Item Controls */

Line 367: p_commit => FND_API.G_TRUE,

363: p_migration_run_id => p_migration_run_id,
364: p_item_id => allocations_for_line_rec.item_id,
365: p_organization_id => l_organization_id,
366: p_mode => NULL,
367: p_commit => FND_API.G_TRUE,
368: x_inventory_item_id => l_inventory_item_id,
369: x_failure_count => l_failure_count1);
370:
371: IF (l_failure_count1 > 0) THEN

Line 388: raise FND_API.G_EXC_ERROR;

384: p_param5 => NULL,
385: p_db_error => NULL,
386: p_app_short_name => 'GMI');
387: l_failure_count := l_failure_count + l_failure_count1;
388: raise FND_API.G_EXC_ERROR;
389: END IF; -- IF (l_failure_count1 > 0) THEN
390:
391: /* possibly multiple delivery details are updated */
392: update wsh_delivery_details

Line 445: p_commit => FND_API.G_TRUE,

441: p_subinventory_code => allocations_for_line_rec.whse_code,
442: p_location => allocations_for_line_rec.location,
443: p_loct_desc => allocations_for_line_rec.location,
444: p_start_date_active => sysdate,
445: p_commit => FND_API.G_TRUE,
446: x_location_id => l_locator_id,
447: x_failure_count => l_failure_count1,
448: p_segment2 => NULL,
449: p_segment3 => NULL,

Line 485: raise FND_API.G_EXC_ERROR;

481: p_param5 => NULL,
482: p_db_error => NULL,
483: p_app_short_name => 'GMI');
484: l_failure_count := l_failure_count + l_failure_count1;
485: raise FND_API.G_EXC_ERROR;
486: END IF; -- IF (l_failure_count1 > 0) THEN
487: GMI_RESERVATION_UTIL.Println('after calling inv_migrate_process_org.create_location - locator_id '|| l_locator_id);
488:
489: END IF; -- IF (l_locator_id is NULL) THEN

Line 529: P_COMMIT => FND_API.G_TRUE,

525: P_LOT_NO => l_lot_no,
526: P_SUBLOT_NO => l_sublot_no,
527: P_ORGANIZATION_ID => l_organization_id, -- 5574631 instead of open_order_line_rec.ship_from_org_id,
528: P_LOCATOR_ID => l_inventory_location_id, -- 5574631 use instead of l_locator_id
529: P_COMMIT => FND_API.G_TRUE,
530: X_LOT_NUMBER => l_odm_lot_num,
531: X_PARENT_LOT_NUMBER => l_parent_lot_num,
532: X_FAILURE_COUNT => l_count
533: );

Line 555: raise FND_API.G_EXC_ERROR;

551: p_param4 => l_locator_id,
552: p_param5 => NULL,
553: p_db_error => NULL,
554: p_app_short_name => 'GMI');
555: raise FND_API.G_EXC_ERROR;
556: ELSE
557: GMI_RESERVATION_UTIL.Println('get odm_lot succes: l_odm_lot_num is '||l_odm_lot_num);
558:
559: END IF;

Line 604: , p_init_msg_lst => fnd_api.g_false

600:
601: fnd_msg_pub.initialize;
602: INV_RESERVATION_PUB.create_reservation(
603: p_api_version_number => 1.0
604: , p_init_msg_lst => fnd_api.g_false
605: , x_return_status => l_api_return_status
606: , x_msg_count => l_msg_count
607: , x_msg_data => l_msg_data
608: , p_rsv_rec => l_insert_rsv_rec

Line 611: , p_partial_reservation_flag => fnd_api.g_true

607: , x_msg_data => l_msg_data
608: , p_rsv_rec => l_insert_rsv_rec
609: , p_serial_number => l_dummy_sn
610: , x_serial_number => l_dummy_sn
611: , p_partial_reservation_flag => fnd_api.g_true
612: , p_force_reservation_flag => fnd_api.g_false
613: , p_validation_flag => 'Q'
614: , x_quantity_reserved => l_qty_reserved
615: , x_secondary_quantity_reserved=> l_sec_qty_reserved

Line 612: , p_force_reservation_flag => fnd_api.g_false

608: , p_rsv_rec => l_insert_rsv_rec
609: , p_serial_number => l_dummy_sn
610: , x_serial_number => l_dummy_sn
611: , p_partial_reservation_flag => fnd_api.g_true
612: , p_force_reservation_flag => fnd_api.g_false
613: , p_validation_flag => 'Q'
614: , x_quantity_reserved => l_qty_reserved
615: , x_secondary_quantity_reserved=> l_sec_qty_reserved
616: , x_reservation_id => l_reservation_id

Line 620: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN

616: , x_reservation_id => l_reservation_id
617: );
618:
619: -- Return an error if the create reservation call failed
620: IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
621: GMI_RESERVATION_UTIL.PrintLn(' Create reservation failed');
622: GMI_RESERVATION_UTIL.PrintLn(l_msg_data);
623: FND_MSG_PUB.Count_AND_GET (p_count => l_msg_count, p_data => l_msg_data);
624: FOR i in 1..l_msg_count LOOP

Line 659: RAISE fnd_api.g_exc_unexpected_error;

655: p_app_short_name => 'GMI');
656:
657: fnd_message.set_name('INV', 'INV_CREATE_RSV_FAILED');
658: fnd_msg_pub.ADD;
659: RAISE fnd_api.g_exc_unexpected_error;
660: ELSE
661: GMI_RESERVATION_UTIL.PrintLn(' Create reservation succeeded - Reservation_id : '|| l_reservation_id);
662: GMI_RESERVATION_UTIL.PrintLn(' l_qty_reserved : '|| l_qty_reserved);
663: GMI_RESERVATION_UTIL.PrintLn(' l_sec_qty_reserved : '|| l_sec_qty_reserved);

Line 667: END IF; -- IF l_api_return_status <> fnd_api.g_ret_sts_success THEN

663: GMI_RESERVATION_UTIL.PrintLn(' l_sec_qty_reserved : '|| l_sec_qty_reserved);
664: GMI_RESERVATION_UTIL.PrintLn(' Created at least one detailed reservation ');
665: /* Created atleast one detailed reservation */
666: l_detail_reservations := 1;
667: END IF; -- IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
668:
669:
670: EXCEPTION
671: --WHEN NON_INV_ITEM THEN

Line 675: WHEN FND_API.g_exc_unexpected_error THEN

671: --WHEN NON_INV_ITEM THEN
672: -- GMI_RESERVATION_UTIL.PrintLn('Non inventory item..doing nothing');
673: -- NULL;
674:
675: WHEN FND_API.g_exc_unexpected_error THEN
676: l_failure_count := l_failure_count + 1;
677:
678:
679: WHEN OTHERS THEN

Line 770: l_trohdr_rec.db_flag := FND_API.G_TRUE;

766: l_trohdr_rec.organization_id := l_ic_mo_header_rec.organization_id;
767: l_trohdr_rec.status_date := sysdate;
768: l_trohdr_rec.to_subinventory_code := l_ic_mo_header_rec.to_subinventory_code;
769: --l_trohdr_rec.transaction_type_id := INV_GLOBALS.G_TYPE_TRANSFER_ORDER_ISSUE; -- not sure of this
770: l_trohdr_rec.db_flag := FND_API.G_TRUE;
771: l_trohdr_rec.operation := INV_GLOBALS.G_OPR_CREATE;
772: l_trohdr_rec.move_order_type := INV_GLOBALS.G_MOVE_ORDER_PICK_WAVE; -- 5601081 type changed
773: l_trohdr_rec.grouping_rule_id := l_grouping_rule_id ; -- 5601081
774: GMI_RESERVATION_UTIL.PrintLn('before call to INV_Move_Order_PUB.Create_move_order_header');

Line 779: p_commit => FND_API.G_FALSE,

775:
776: fnd_msg_pub.initialize;
777: INV_Move_Order_PUB.Create_move_order_header ( p_api_version_number => 1.0 ,
778: p_init_msg_list => 'T',
779: p_commit => FND_API.G_FALSE,
780: p_return_values => FND_API.G_TRUE,
781: x_return_status => l_return_status,
782: x_msg_count => l_msg_count,
783: x_msg_data => l_msg_data,

Line 780: p_return_values => FND_API.G_TRUE,

776: fnd_msg_pub.initialize;
777: INV_Move_Order_PUB.Create_move_order_header ( p_api_version_number => 1.0 ,
778: p_init_msg_list => 'T',
779: p_commit => FND_API.G_FALSE,
780: p_return_values => FND_API.G_TRUE,
781: x_return_status => l_return_status,
782: x_msg_count => l_msg_count,
783: x_msg_data => l_msg_data,
784: p_trohdr_rec => l_trohdr_rec,

Line 790: IF l_return_status <> fnd_api.g_ret_sts_success THEN

786: x_trohdr_rec => l_trohdr_rec,
787: x_trohdr_val_rec => l_trohdr_val_rec
788: );
789:
790: IF l_return_status <> fnd_api.g_ret_sts_success THEN
791: GMI_RESERVATION_UTIL.PrintLn(' Create_move_order_header failed ');
792: GMI_RESERVATION_UTIL.PrintLn(l_msg_data);
793: FND_MSG_PUB.Count_AND_GET (p_count => l_msg_count, p_data => l_msg_data);
794: FOR i in 1..l_msg_count LOOP

Line 829: RAISE fnd_api.g_exc_unexpected_error;

825: p_app_short_name => 'INV');
826:
827: fnd_message.set_name('INV', 'INV_ERROR_CREATING_MO');
828: fnd_msg_pub.ADD;
829: RAISE fnd_api.g_exc_unexpected_error;
830: ELSE
831: GMI_RESERVATION_UTIL.PrintLn(' Create_move_order_header succeeded - header_id : '|| l_trohdr_rec.header_id);
832: l_mo_header_id := l_trohdr_rec.header_id;
833: -- only do this if the create move order header above suceeded

Line 843: END IF; -- IF l_api_return_status <> fnd_api.g_ret_sts_success THEN

839: WHERE header_id = l_ic_mo_header_rec.header_id;
840:
841: GMI_RESERVATION_UTIL.PrintLn(' after update to attribute15 of in ic_txn_request_headers');
842:
843: END IF; -- IF l_api_return_status <> fnd_api.g_ret_sts_success THEN
844:
845: END IF; -- IF(l_ic_mo_header_rec.attribute15 IS NOT NULL) THEN
846:
847: /* Now Create a line */

Line 906: l_trolin_tbl(l_order_count).line_id := FND_API.G_MISS_NUM;

902: l_trolin_tbl(l_order_count).inventory_item_id := move_order_line_rec.inventory_item_id;
903: l_trolin_tbl(l_order_count).last_updated_by := FND_GLOBAL.USER_ID;
904: l_trolin_tbl(l_order_count).last_update_date := sysdate;
905: l_trolin_tbl(l_order_count).last_update_login := FND_GLOBAL.LOGIN_ID;
906: l_trolin_tbl(l_order_count).line_id := FND_API.G_MISS_NUM;
907: l_trolin_tbl(l_order_count).line_number := l_line_num;
908: l_trolin_tbl(l_order_count).line_status := INV_Globals.G_TO_STATUS_PREAPPROVED;
909: l_trolin_tbl(l_order_count).organization_id := move_order_line_rec.organization_id; -- pal this needs to be right if suborg mapping
910: l_trolin_tbl(l_order_count).quantity := move_order_line_rec.quantity;

Line 931: l_trolin_tbl(l_order_count).db_flag := FND_API.G_TRUE;

927: l_trolin_tbl(l_order_count).txn_source_line_detail_id := l_delivery_detail_id; -- 5601081
928:
929: l_trolin_tbl(l_order_count).grade_code := move_order_line_rec.qc_grade; -- 5703365
930:
931: l_trolin_tbl(l_order_count).db_flag := FND_API.G_TRUE;
932: l_trolin_tbl(l_order_count).operation := INV_GLOBALS.G_OPR_CREATE;
933:
934:
935: fnd_msg_pub.initialize;

Line 939: p_commit => FND_API.G_FALSE,

935: fnd_msg_pub.initialize;
936: INV_Move_Order_PUB.Create_Move_Order_Lines (
937: p_api_version_number => 1.0 ,
938: p_init_msg_list => 'T',
939: p_commit => FND_API.G_FALSE,
940: x_return_status => l_return_status,
941: x_msg_count => l_msg_count,
942: x_msg_data => l_msg_data,
943: p_trolin_tbl => l_trolin_tbl,

Line 948: IF l_return_status <> fnd_api.g_ret_sts_success THEN

944: p_trolin_val_tbl => l_trolin_val_tbl,
945: x_trolin_tbl => l_trolin_tbl,
946: x_trolin_val_tbl => l_trolin_val_tbl);
947:
948: IF l_return_status <> fnd_api.g_ret_sts_success THEN
949: GMI_RESERVATION_UTIL.PrintLn(' Create_Move_Order_Lines failed ');
950: GMI_RESERVATION_UTIL.PrintLn(l_msg_data);
951: FND_MSG_PUB.Count_AND_GET (p_count => l_msg_count, p_data => l_msg_data);
952: FOR i in 1..l_msg_count LOOP

Line 987: RAISE fnd_api.g_exc_unexpected_error;

983: p_app_short_name => 'INV');
984:
985: fnd_message.set_name('INV', 'INV_ERROR_CREATING_MO');
986: fnd_msg_pub.ADD;
987: RAISE fnd_api.g_exc_unexpected_error;
988: ELSE
989: GMI_RESERVATION_UTIL.PrintLn(' Create_move_order_lines succeeded - line_id : '|| to_char(l_trolin_tbl(l_order_count).line_id));
990:
991: /* Update OPM move order line attribute15 */

Line 1014: END IF; -- IF l_return_status <> fnd_api.g_ret_sts_success THEN

1010: WHERE line_id = l_line_id;
1011: GMI_RESERVATION_UTIL.PrintLn(' newly created move_order_line :-' || l_line_id);
1012: GMI_RESERVATION_UTIL.PrintLn(' locator_id updated to :- ' || l_to_locator_id);
1013:
1014: END IF; -- IF l_return_status <> fnd_api.g_ret_sts_success THEN
1015:
1016:
1017:
1018:

Line 1107: IF p_commit = FND_API.G_TRUE THEN

1103: , p_param2 => l_failure_count );
1104: end if; -- if L_FAILURE_COUNT < 1 THEN
1105:
1106: --Lets save the changes now based on the commit parameter
1107: IF p_commit = FND_API.G_TRUE THEN
1108: COMMIT;
1109: END IF;
1110:
1111: