[Home] [Help]
PACKAGE: APPS.OKC_EXTEND_PVT
Source
1 package OKC_EXTEND_PVT AUTHID CURRENT_USER as
2 /* $Header: OKCREXTS.pls 120.0 2005/05/25 22:35:38 appldev noship $ */
3
4 Type extend_in_parameters_rec is RECORD (
5 p_contract_id number,
6 p_contract_number okc_k_headers_v.contract_number%type,
7 p_contract_modifier okc_k_headers_v.contract_number_modifier%type,
8 p_contract_version varchar2(9),
9 p_object_version_number number,
10 p_orig_start_date date,
11 p_orig_end_date date,
12 p_end_date date,
13 p_uom_code okx_units_of_measure_v.uom_code%type ,
14 p_duration number,
15 p_perpetual_flag Varchar2(1) DEFAULT OKC_API.G_FALSE);
16
17 TYPE extend_in_parameters_tbl is TABLE of extend_in_parameters_rec
18 INDEX BY BINARY_INTEGER;
19
20 TYPE extend_in_cle_rec is RECORD (
21 p_cle_id number,
22 p_line_number okc_k_lines_v.line_number%type,
23 p_item_description okc_k_lines_v.item_description%type,
24 p_dnz_chr_id number,
25 p_object_version_number number,
26 p_orig_start_date date,
27 p_orig_end_date date,
28 p_end_date date,
29 p_uom_code okx_units_of_measure_v.uom_code%type,
30 p_duration number,
31 p_perpetual_flag Varchar2(1) DEFAULT OKC_API.G_FALSE);
32
33 TYPE extend_in_cle_tbl is TABLE of extend_in_cle_rec
34 INDEX BY BINARY_INTEGER;
35
36 g_rulv_rec OKC_RULE_PUB.rulv_rec_type;
37
38 g_lines_count number := 0; -- this is used for header validation. enforces header validation
39 -- only once even if several lines are passed
40
41 g_called_from varchar2(15) := 'HEADER';
42
43 -- GLOBAL VARIABLES
44 -------------------------------------------------------------------------------------------
45 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
46 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKC_CONTRACTS_UNEXP_ERROR';
47 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLCODE';
48 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLERRM';
49 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKC_EXTEND_PVT';
50 G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
51 G_FND_APP CONSTANT VARCHAR2(200) := OKC_API.G_FND_APP;
52 G_FORM_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKC_API.G_FORM_UNABLE_TO_RESERVE_REC;
53 ---------------------------------------------------------------------------------------------
54
55 FUNCTION is_k_extend_allowed(p_chr_id IN NUMBER,p_sts_code IN VARCHAR2) RETURN BOOLEAN;
56 FUNCTION is_kl_extend_allowed(p_cle_id IN NUMBER,p_sts_code IN VARCHAR2) RETURN BOOLEAN;
57
58 PROCEDURE extend_chr( p_api_version IN NUMBER,
59 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
60 x_return_status OUT NOCOPY VARCHAR2,
61 x_msg_count OUT NOCOPY NUMBER,
62 x_msg_data OUT NOCOPY VARCHAR2,
63 p_extend_in_parameters_rec IN extend_in_parameters_rec
64 );
65
66 PROCEDURE validate_chr( p_api_version IN NUMBER,
67 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
68 x_return_status OUT NOCOPY VARCHAR2,
69 x_msg_count OUT NOCOPY NUMBER,
70 x_msg_data OUT NOCOPY VARCHAR2,
71 p_extend_in_parameters_rec IN extend_in_parameters_rec
72 );
73
74 PROCEDURE extend_cle( p_api_version IN NUMBER,
75 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
76 x_return_status OUT NOCOPY VARCHAR2,
77 x_msg_count OUT NOCOPY NUMBER,
78 x_msg_data OUT NOCOPY VARCHAR2,
79 p_extend_in_parameters_rec IN extend_in_cle_rec
80 );
81
82 PROCEDURE validate_cle( p_api_version IN NUMBER,
83 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
84 x_return_status OUT NOCOPY VARCHAR2,
85 x_msg_count OUT NOCOPY NUMBER,
86 x_msg_data OUT NOCOPY VARCHAR2,
87 p_extend_in_parameters_rec IN extend_in_cle_rec
88 );
89
90
91 END OKC_EXTEND_PVT;