1 PACKAGE eam_asset_move_pub AS
2 /* $Header: EAMPAMTS.pls 120.2.12010000.3 2008/10/23 08:04:13 vchidura ship $ */
3
4
5 /* Prepare*/
6
7 -- Get all the assets in the Hierarchy
8 -- Validate whether an Asset needs to be processed or not for Asset Move (All Hierarchy Assets)
9 -- Populate Temporary Table with Valid/Invalid Move Status & Error Message for Asset Not moving
10
11 /* Move */
12
13 -- Get all the GTT entries which are to be processed
14 -- Add the to be processed Transaction Records to MTL_TRANSACTIONS_INTERFACE and MTL_SERIAL_NUMBERS_INTERFACE
15 -- Invoke the Transaction Processor
16 -- Capture Transaction Status for each record in the MTL_TRANSACTIONS_INTERFACE and MTL_SERIAL_NUMBERS_INTERFACE
17
18
19 TYPE asset_move_hierarchy_REC_TYPE IS RECORD
20 (instance_id NUMBER,
21 serial_number VARCHAR2(30),
22 gen_object_id NUMBER,
23 inventory_item_id NUMBER,
24 current_org_id NUMBER,
25 current_subinventory_code VARCHAR2(30),
26 maintainable_flag VARCHAR2(1),
27 eam_item_type NUMBER,
28 maint_org_id NUMBER,
29 prepare_status VARCHAR2(30),
30 prepare_msg VARCHAR2(30)
31 );
32
33 TYPE asset_move_hierarchy_tbl_type is TABLE OF asset_move_hierarchy_REC_TYPE INDEX BY BINARY_INTEGER;
34
35 -- p_context determines whether its a prepare move/ actual asset move
36
37
38 PROCEDURE prepareMoveAsset(
39 x_return_status OUT NOCOPY VARCHAR2,
40 x_return_message OUT NOCOPY VARCHAR2,
41 p_parent_instance_id IN NUMBER,
42 p_dest_org_id IN NUMBER,
43 p_includeChild IN VARCHAR2,
44 p_move_type IN NUMBER,
45 p_curr_org_id IN NUMBER,
46 p_curr_subinv_code IN VARCHAR2,
47 p_shipment_no IN VARCHAR2,
48 p_dest_subinv_code IN VARCHAR2,
49 p_context IN VARCHAR2,
50 p_dest_locator_id IN NUMBER :=NULL
51 );
52
53 PROCEDURE getAssetHierarchy(
54 p_parent_instance_id IN NUMBER,
55 p_includeChild IN VARCHAR2 ,
56 x_asset_move_hierarchy_tbl OUT NOCOPY asset_move_hierarchy_tbl_type,
57 p_curr_org_id IN NUMBER
58 );
59
60 PROCEDURE populateTemp(
61 p_header_id IN NUMBER,
62 p_asset_move_hierarchy_tbl asset_move_hierarchy_tbl_type,
63 p_parent_instance_id IN NUMBER
64 );
65
66 PROCEDURE addAssetsToInterface(
67 p_header_id IN NUMBER,
68 p_inventory_item_id IN NUMBER,
69 p_CURRENT_ORGANIZATION_ID IN NUMBER,
70 p_current_subinventory_code IN VARCHAR2,
71 p_transfer_organization_id IN NUMBER,
72 p_transfer_subinventory_code IN VARCHAR2,
73 p_transaction_type_id IN NUMBER,
74 p_shipment_number IN VARCHAR2 := NULL,
75 p_transfer_locator_id IN NUMBER := NULL,
76 x_locator_error_flag OUT NOCOPY NUMBER,
77 x_locator_error_mssg OUT NOCOPY VARCHAR2
78
79 );
80
81
82 PROCEDURE processAssetMoveTxn(
83 p_txn_header_id IN NUMBER,
84 x_return_status OUT NOCOPY VARCHAR2,
85 x_return_message OUT NOCOPY VARCHAR2
86 );
87
88 Procedure Get_LocatorControl_Code(
89 p_org IN NUMBER,
90 p_subinv IN VARCHAR2,
91 p_item_id IN NUMBER,
92 p_action IN NUMBER,
93 x_locator_ctrl OUT NOCOPY NUMBER,
94 x_error_flag OUT NOCOPY NUMBER, -- returns 0 if no error ,1 if any error .
95 x_error_mssg OUT NOCOPY VARCHAR2
96 ) ;
97
98 Function Dynamic_Entry_Not_Allowed(
99 p_restrict_flag IN NUMBER,
100 p_neg_flag IN NUMBER,
101 p_action IN NUMBER) return Boolean;
102 --Added for 7370638-AMWB-MR
103 PROCEDURE addAssetsForMiscReceipt(p_header_id IN NUMBER,
104 p_batch_transaction_id IN NUMBER,
105 p_serial_number IN VARCHAR2,
106 p_CURRENT_ORGANIZATION_ID IN NUMBER,
107 p_inventory_item_id IN NUMBER,
108 p_current_subinventory_code IN VARCHAR2,
109 p_intermediate_locator_id IN NUMBER
110 ) ;
111
112
113 END eam_asset_move_pub;