1 PACKAGE OKL_SERVICE_INTEGRATION_PUB AUTHID CURRENT_USER AS
2 /* $Header: OKLPSRIS.pls 115.1 2002/12/30 23:13:08 dedey noship $*/
3
4
5 SUBTYPE clev_rec_type IS okl_okc_migration_pvt.clev_rec_type;
6 SUBTYPE clev_tbl_type IS okl_okc_migration_pvt.clev_tbl_type;
7 SUBTYPE klev_rec_type IS okl_contract_pub.klev_rec_type;
8 SUBTYPE klev_tbl_type IS okl_contract_pub.klev_tbl_type;
9 SUBTYPE cimv_tbl_type IS okl_okc_migration_pvt.cimv_tbl_type;
10
11 SUBTYPE link_line_tbl_type IS okl_service_integration_pvt.link_line_tbl_type;
12 SUBTYPE srv_cov_tbl_type IS okl_service_integration_pvt.srv_cov_tbl_type;
13
14 PROCEDURE create_service_line(
15 p_api_version IN NUMBER,
16 p_init_msg_list IN VARCHAR2,
17 x_return_status OUT NOCOPY VARCHAR2,
18 x_msg_count OUT NOCOPY NUMBER,
19 x_msg_data OUT NOCOPY VARCHAR2,
20 p_okl_chr_id IN OKC_K_HEADERS_V.ID%TYPE, -- Lease Contract Header ID
21 p_oks_chr_id IN OKC_K_HEADERS_V.ID%TYPE, -- Service Contract Header ID
22 p_oks_service_line_id IN OKC_K_LINES_V.ID%TYPE, -- Service Contract Service Top Line ID
23 p_supplier_id IN NUMBER,
24 x_okl_service_line_id OUT NOCOPY OKC_K_LINES_V.ID%TYPE -- Returns Lease Service TOP Line ID
25 );
26
27 PROCEDURE link_service_line(
28 p_api_version IN NUMBER,
29 p_init_msg_list IN VARCHAR2,
30 x_return_status OUT NOCOPY VARCHAR2,
31 x_msg_count OUT NOCOPY NUMBER,
32 x_msg_data OUT NOCOPY VARCHAR2,
33 p_okl_chr_id IN OKC_K_HEADERS_V.ID%TYPE, -- Lease Contract Header ID
34 p_oks_chr_id IN OKC_K_HEADERS_V.ID%TYPE, -- Service Contract Header ID
35 p_okl_service_line_id IN OKC_K_LINES_V.ID%TYPE, -- Lease Service Top Line ID
36 p_oks_service_line_id IN OKC_K_LINES_V.ID%TYPE -- Service Contract - Service TOP Line ID
37 );
38
39 PROCEDURE delete_service_line(
40 p_api_version IN NUMBER,
41 p_init_msg_list IN VARCHAR2,
42 x_return_status OUT NOCOPY VARCHAR2,
43 x_msg_count OUT NOCOPY NUMBER,
44 x_msg_data OUT NOCOPY VARCHAR2,
45 p_clev_rec IN clev_rec_type,
46 p_klev_rec IN klev_rec_type
47 );
48
49 PROCEDURE check_service_link (
50 p_api_version IN NUMBER,
51 p_init_msg_list IN VARCHAR2,
52 x_return_status OUT NOCOPY VARCHAR2,
53 x_msg_count OUT NOCOPY NUMBER,
54 x_msg_data OUT NOCOPY VARCHAR2,
55 p_lease_contract_id IN OKC_K_HEADERS_V.ID%TYPE,
56 x_service_contract_id OUT NOCOPY OKC_K_HEADERS_V.ID%TYPE
57 );
58
59 PROCEDURE get_service_link_line (
60 p_api_version IN NUMBER,
61 p_init_msg_list IN VARCHAR2,
62 x_return_status OUT NOCOPY VARCHAR2,
63 x_msg_count OUT NOCOPY NUMBER,
64 x_msg_data OUT NOCOPY VARCHAR2,
65 p_lease_contract_id IN OKC_K_HEADERS_V.ID%TYPE,
66 x_link_line_tbl OUT NOCOPY LINK_LINE_TBL_TYPE,
67 x_service_contract_id OUT NOCOPY OKC_K_HEADERS_V.ID%TYPE
68 );
69
70
71 PROCEDURE create_link_service_line(
72 p_api_version IN NUMBER,
73 p_init_msg_list IN VARCHAR2,
74 x_return_status OUT NOCOPY VARCHAR2,
75 x_msg_count OUT NOCOPY NUMBER,
76 x_msg_data OUT NOCOPY VARCHAR2,
77 p_okl_chr_id IN OKC_K_HEADERS_V.ID%TYPE, -- Lease Contract Header ID
78 p_oks_chr_id IN OKC_K_HEADERS_V.ID%TYPE, -- Service Contract Header ID
79 p_oks_service_line_id IN OKC_K_LINES_V.ID%TYPE, -- Service Contract Service Top Line ID
80 p_supplier_id IN NUMBER,
81 x_okl_service_line_id OUT NOCOPY OKC_K_LINES_V.ID%TYPE -- Returns Contract Service TOP Line ID
82 );
83
84 PROCEDURE update_service_line(
85 p_api_version IN NUMBER,
86 p_init_msg_list IN VARCHAR2,
87 x_return_status OUT NOCOPY VARCHAR2,
88 x_msg_count OUT NOCOPY NUMBER,
89 x_msg_data OUT NOCOPY VARCHAR2,
90 p_okl_chr_id IN OKC_K_HEADERS_V.ID%TYPE, -- Lease Contract Header ID
91 p_oks_chr_id IN OKC_K_HEADERS_V.ID%TYPE, -- Service Contract Header ID
92 p_oks_service_line_id IN OKC_K_LINES_V.ID%TYPE, -- Service Contract Service Top Line ID
93 p_supplier_id IN NUMBER,
94 p_clev_rec IN clev_rec_type,
95 p_klev_rec IN klev_rec_type,
96 x_okl_service_line_id OUT NOCOPY OKC_K_LINES_V.ID%TYPE
97 );
98
99 PROCEDURE create_cov_asset_line(
100 p_api_version IN NUMBER,
101 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
102 x_return_status OUT NOCOPY VARCHAR2,
103 x_msg_count OUT NOCOPY NUMBER,
104 x_msg_data OUT NOCOPY VARCHAR2,
105 p_clev_tbl IN clev_tbl_type,
106 p_klev_tbl IN klev_tbl_type,
107 p_cimv_tbl IN cimv_tbl_type,
108 p_cov_tbl IN srv_cov_tbl_type,
109 x_clev_tbl OUT NOCOPY clev_tbl_type,
110 x_klev_tbl OUT NOCOPY klev_tbl_type,
111 x_cimv_tbl OUT NOCOPY cimv_tbl_type
112 );
113
114 PROCEDURE update_cov_asset_line(
115 p_api_version IN NUMBER,
116 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
117 x_return_status OUT NOCOPY VARCHAR2,
118 x_msg_count OUT NOCOPY NUMBER,
119 x_msg_data OUT NOCOPY VARCHAR2,
120 p_clev_tbl IN clev_tbl_type,
121 p_klev_tbl IN klev_tbl_type,
122 p_cimv_tbl IN cimv_tbl_type,
123 p_cov_tbl IN srv_cov_tbl_type,
124 x_clev_tbl OUT NOCOPY clev_tbl_type,
125 x_klev_tbl OUT NOCOPY klev_tbl_type,
126 x_cimv_tbl OUT NOCOPY cimv_tbl_type);
127
128 PROCEDURE initiate_service_booking(
129 p_api_version IN NUMBER,
130 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
131 x_return_status OUT NOCOPY VARCHAR2,
132 x_msg_count OUT NOCOPY NUMBER,
133 x_msg_data OUT NOCOPY VARCHAR2,
134 p_okl_chr_id IN OKC_K_HEADERS_B.ID%TYPE
135 );
136
137 END OKL_SERVICE_INTEGRATION_PUB;