23: p_init_msg_list IN VARCHAR2,
24: x_return_status OUT NOCOPY VARCHAR2,
25: x_msg_count OUT NOCOPY NUMBER,
26: x_msg_data OUT NOCOPY VARCHAR2,
27: p_okl_chr_id IN OKC_K_HEADERS_V.ID%TYPE, -- Lease Contract Header ID
28: p_oks_chr_id IN OKC_K_HEADERS_V.ID%TYPE, -- Service Contract Header ID
29: p_oks_service_line_id IN OKC_K_LINES_V.ID%TYPE, -- Service Contract Service Top Line ID
30: p_supplier_id IN NUMBER,
31: x_okl_service_line_id OUT NOCOPY OKC_K_LINES_V.ID%TYPE -- Returns Lease Contract Service TOP Line ID
24: x_return_status OUT NOCOPY VARCHAR2,
25: x_msg_count OUT NOCOPY NUMBER,
26: x_msg_data OUT NOCOPY VARCHAR2,
27: p_okl_chr_id IN OKC_K_HEADERS_V.ID%TYPE, -- Lease Contract Header ID
28: p_oks_chr_id IN OKC_K_HEADERS_V.ID%TYPE, -- Service Contract Header ID
29: p_oks_service_line_id IN OKC_K_LINES_V.ID%TYPE, -- Service Contract Service Top Line ID
30: p_supplier_id IN NUMBER,
31: x_okl_service_line_id OUT NOCOPY OKC_K_LINES_V.ID%TYPE -- Returns Lease Contract Service TOP Line ID
32: )IS
34: l_api_name VARCHAR2(35) := 'create_link_service_line';
35: l_proc_name VARCHAR2(35) := 'CREATE_LINK_SERVICE_LINE';
36: l_api_version CONSTANT NUMBER := 1;
37:
38: l_okl_service_line_id OKC_K_HEADERS_V.ID%TYPE;
39: BEGIN
40:
41:
42: -- call START_ACTIVITY to create savepoint, check compatibility
127: p_init_msg_list IN VARCHAR2,
128: x_return_status OUT NOCOPY VARCHAR2,
129: x_msg_count OUT NOCOPY NUMBER,
130: x_msg_data OUT NOCOPY VARCHAR2,
131: p_okl_chr_id IN OKC_K_HEADERS_V.ID%TYPE, -- Lease Contract Header ID
132: p_oks_chr_id IN OKC_K_HEADERS_V.ID%TYPE, -- Service Contract Header ID
133: p_oks_service_line_id IN OKC_K_LINES_V.ID%TYPE, -- Service Contract Service Top Line ID
134: p_supplier_id IN NUMBER,
135: x_okl_service_line_id OUT NOCOPY OKC_K_LINES_V.ID%TYPE -- Returns Lease Contract Service TOP Line ID
128: x_return_status OUT NOCOPY VARCHAR2,
129: x_msg_count OUT NOCOPY NUMBER,
130: x_msg_data OUT NOCOPY VARCHAR2,
131: p_okl_chr_id IN OKC_K_HEADERS_V.ID%TYPE, -- Lease Contract Header ID
132: p_oks_chr_id IN OKC_K_HEADERS_V.ID%TYPE, -- Service Contract Header ID
133: p_oks_service_line_id IN OKC_K_LINES_V.ID%TYPE, -- Service Contract Service Top Line ID
134: p_supplier_id IN NUMBER,
135: x_okl_service_line_id OUT NOCOPY OKC_K_LINES_V.ID%TYPE -- Returns Lease Contract Service TOP Line ID
136: )IS
230: p_init_msg_list IN VARCHAR2,
231: x_return_status OUT NOCOPY VARCHAR2,
232: x_msg_count OUT NOCOPY NUMBER,
233: x_msg_data OUT NOCOPY VARCHAR2,
234: p_okl_chr_id IN OKC_K_HEADERS_V.ID%TYPE, -- Lease Contract Header ID
235: p_oks_chr_id IN OKC_K_HEADERS_V.ID%TYPE, -- Service Contract Header ID
236: p_okl_service_line_id IN OKC_K_LINES_V.ID%TYPE, -- Lease Service Top Line ID
237: p_oks_service_line_id IN OKC_K_LINES_V.ID%TYPE -- Service Contract - Service TOP Line ID
238: ) IS
231: x_return_status OUT NOCOPY VARCHAR2,
232: x_msg_count OUT NOCOPY NUMBER,
233: x_msg_data OUT NOCOPY VARCHAR2,
234: p_okl_chr_id IN OKC_K_HEADERS_V.ID%TYPE, -- Lease Contract Header ID
235: p_oks_chr_id IN OKC_K_HEADERS_V.ID%TYPE, -- Service Contract Header ID
236: p_okl_service_line_id IN OKC_K_LINES_V.ID%TYPE, -- Lease Service Top Line ID
237: p_oks_service_line_id IN OKC_K_LINES_V.ID%TYPE -- Service Contract - Service TOP Line ID
238: ) IS
239:
427: p_init_msg_list IN VARCHAR2,
428: x_return_status OUT NOCOPY VARCHAR2,
429: x_msg_count OUT NOCOPY NUMBER,
430: x_msg_data OUT NOCOPY VARCHAR2,
431: p_okl_chr_id IN OKC_K_HEADERS_V.ID%TYPE, -- Lease Contract Header ID
432: p_oks_chr_id IN OKC_K_HEADERS_V.ID%TYPE, -- Service Contract Header ID
433: p_oks_service_line_id IN OKC_K_LINES_V.ID%TYPE, -- Service Contract Service Top Line ID
434: p_supplier_id IN NUMBER,
435: p_clev_rec IN clev_rec_type,
428: x_return_status OUT NOCOPY VARCHAR2,
429: x_msg_count OUT NOCOPY NUMBER,
430: x_msg_data OUT NOCOPY VARCHAR2,
431: p_okl_chr_id IN OKC_K_HEADERS_V.ID%TYPE, -- Lease Contract Header ID
432: p_oks_chr_id IN OKC_K_HEADERS_V.ID%TYPE, -- Service Contract Header ID
433: p_oks_service_line_id IN OKC_K_LINES_V.ID%TYPE, -- Service Contract Service Top Line ID
434: p_supplier_id IN NUMBER,
435: p_clev_rec IN clev_rec_type,
436: p_klev_rec IN klev_rec_type,
536: p_init_msg_list IN VARCHAR2,
537: x_return_status OUT NOCOPY VARCHAR2,
538: x_msg_count OUT NOCOPY NUMBER,
539: x_msg_data OUT NOCOPY VARCHAR2,
540: p_lease_contract_id IN OKC_K_HEADERS_V.ID%TYPE,
541: x_service_contract_id OUT NOCOPY OKC_K_HEADERS_V.ID%TYPE
542: ) IS
543: l_api_name VARCHAR2(35) := 'check_service_link';
544: l_proc_name VARCHAR2(35) := 'CHECK_SERVICE_LINK';
537: x_return_status OUT NOCOPY VARCHAR2,
538: x_msg_count OUT NOCOPY NUMBER,
539: x_msg_data OUT NOCOPY VARCHAR2,
540: p_lease_contract_id IN OKC_K_HEADERS_V.ID%TYPE,
541: x_service_contract_id OUT NOCOPY OKC_K_HEADERS_V.ID%TYPE
542: ) IS
543: l_api_name VARCHAR2(35) := 'check_service_link';
544: l_proc_name VARCHAR2(35) := 'CHECK_SERVICE_LINK';
545: l_api_version CONSTANT NUMBER := 1;
632: p_init_msg_list IN VARCHAR2,
633: x_return_status OUT NOCOPY VARCHAR2,
634: x_msg_count OUT NOCOPY NUMBER,
635: x_msg_data OUT NOCOPY VARCHAR2,
636: p_lease_contract_id IN OKC_K_HEADERS_V.ID%TYPE,
637: x_link_line_tbl OUT NOCOPY LINK_LINE_TBL_TYPE,
638: x_service_contract_id OUT NOCOPY OKC_K_HEADERS_V.ID%TYPE
639: ) IS
640: l_api_name VARCHAR2(35) := 'get_service_link_line';
634: x_msg_count OUT NOCOPY NUMBER,
635: x_msg_data OUT NOCOPY VARCHAR2,
636: p_lease_contract_id IN OKC_K_HEADERS_V.ID%TYPE,
637: x_link_line_tbl OUT NOCOPY LINK_LINE_TBL_TYPE,
638: x_service_contract_id OUT NOCOPY OKC_K_HEADERS_V.ID%TYPE
639: ) IS
640: l_api_name VARCHAR2(35) := 'get_service_link_line';
641: l_proc_name VARCHAR2(35) := 'GET_SREVICE_LINK_LINE';
642: l_api_version CONSTANT NUMBER := 1;