[Home] [Help]
PACKAGE: APPS.OKL_EQUIPMENT_EXCHANGE_PUB
Source
1 package okl_equipment_exchange_pub AUTHID CURRENT_USER AS
2 /* $Header: OKLPEQXS.pls 115.1 2002/11/30 08:34:29 spillaip noship $ */
3
4
5 ---------------------------------------------------------------------------
6 -- GLOBAL CONSTANTS
7 ---------------------------------------------------------------------------
8 G_APP_NAME CONSTANT VARCHAR2(3) := 'OKL';
9 G_PKG_NAME CONSTANT VARCHAR2(30) := 'OKL_EQUIPMENT_EXCHANGE_PUB';
10 G_API_NAME CONSTANT VARCHAR2(30) := 'OKL_EQUIPMENT_EXCHANGE';
11 G_API_VERSION CONSTANT NUMBER := 1;
12 G_COMMIT CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
13 G_INIT_MSG_LIST CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
14 G_VALIDATION_LEVEL CONSTANT NUMBER := FND_API.G_VALID_LEVEL_FULL;
15
16
17 ---------------------------------------------------------------------------
18 -- Local Variables
19 ---------------------------------------------------------------------------
20
21 SUBTYPE thpv_tbl_type IS okl_trx_assets_pvt.tavv_tbl_type;
22 SUBTYPE tlpv_tbl_type IS okl_txl_assets_pvt.tlvv_tbl_type;
23 SUBTYPE talv_tbl_type IS okl_txl_assets_pvt.tlvv_tbl_type;
24 SUBTYPE iipv_tbl_type IS okl_txl_itm_insts_pvt.iivv_tbl_type;
25 SUBTYPE itiv_tbl_type IS okl_iti_pvt.itiv_tbl_type;
26
27 SUBTYPE cvmv_rec_type IS OKL_OKC_MIGRATION_PVT.CVMV_REC_TYPE;
28
29
30 ---------------------------------------------------------------------------
31 -- Procedures and Functions
32 ---------------------------------------------------------------------------
33
34
35 FUNCTION GET_TAS_HDR_REC
36 (p_thpv_tbl IN thpv_tbl_type
37 ,p_no_data_found OUT NOCOPY BOOLEAN
38 ) RETURN thpv_tbl_type;
39 FUNCTION get_status
40 (p_status_code IN VARCHAR2)
41 RETURN VARCHAR2;
42 FUNCTION get_tal_rec
43 (p_talv_tbl IN talv_tbl_type,
44 x_no_data_found OUT NOCOPY BOOLEAN)
45 RETURN talv_tbl_type;
46 FUNCTION get_vendor_name
47 (p_vendor_id IN VARCHAR2)
48 RETURN VARCHAR2;
49
50 FUNCTION get_item_rec (
51 p_itiv_tbl IN itiv_tbl_type,
52 x_no_data_found OUT NOCOPY BOOLEAN) RETURN itiv_tbl_type;
53
54 FUNCTION get_exchange_type
55 (p_tas_id IN NUMBER)
56 RETURN VARCHAR2;
57
58 PROCEDURE update_serial_number(
59 p_api_version IN NUMBER,
60 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
61 p_instance_id IN NUMBER,
62 p_instance_name IN VARCHAR2,
63 p_serial_number IN VARCHAR2,
64 p_inventory_item_id IN NUMBER,
65 x_return_status OUT NOCOPY VARCHAR2,
66 x_msg_count OUT NOCOPY NUMBER,
67 x_msg_data OUT NOCOPY VARCHAR2);
68
69 PROCEDURE store_exchange_details (
70 p_api_version IN NUMBER,
71 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
72 p_thpv_tbl IN thpv_tbl_type,
73 p_old_tlpv_tbl IN tlpv_tbl_type,
74 p_new_tlpv_tbl IN tlpv_tbl_type,
75 p_old_iipv_tbl IN iipv_tbl_type,
76 p_new_iipv_tbl IN iipv_tbl_type,
77 x_thpv_tbl OUT NOCOPY thpv_tbl_type,
78 x_old_tlpv_tbl OUT NOCOPY tlpv_tbl_type,
79 x_new_tlpv_tbl OUT NOCOPY tlpv_tbl_type,
80 x_old_iipv_tbl OUT NOCOPY iipv_tbl_type,
81 x_new_iipv_tbl OUT NOCOPY iipv_tbl_type,
82 x_return_status OUT NOCOPY VARCHAR2,
83 x_msg_count OUT NOCOPY NUMBER,
84 x_msg_data OUT NOCOPY VARCHAR2);
85
86 PROCEDURE exchange(
87 p_api_version IN NUMBER,
88 p_init_msg_list IN VARCHAR2 := OKL_API.G_FALSE,
89 p_tas_id IN NUMBER,
90 x_return_status OUT NOCOPY VARCHAR2,
91 x_msg_count OUT NOCOPY NUMBER,
92 x_msg_data OUT NOCOPY VARCHAR2);
93
94 END okl_equipment_exchange_pub;