[Home] [Help]
PACKAGE: APPS.OKL_VENDOR_PROGRAM_PUB
Source
1 PACKAGE OKL_VENDOR_PROGRAM_PUB AUTHID CURRENT_USER AS
2 /*$Header: OKLPPRMS.pls 120.1 2005/10/29 02:14:33 manumanu noship $*/
3
4 SUBTYPE chrv_rec_type IS OKL_OKC_MIGRATION_PVT.chrv_rec_type;
5 SUBTYPE khrv_rec_type IS OKL_CONTRACT_PUB.khrv_rec_type;
6
7 ---------------------------------------------------------------------------
8 -- GLOBAL VARIABLES
9 ---------------------------------------------------------------------------
10 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_VENDOR_PROGRAM_PUB';
11 G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
12
13
14 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKL_API.G_REQUIRED_VALUE;
15 G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKL_API.G_INVALID_VALUE;
16 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'OKL_SQLerrm';
17 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'OKL_SQLcode';
18 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKL_CONTRACTS_UNEXPECTED_ERROR';
19 G_UPPERCASE_REQUIRED CONSTANT VARCHAR2(200) := 'OKL_UPPER_CASE_REQUIRED';
20 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_COL_NAME_TOKEN;
21 G_START_DATE CONSTANT VARCHAR2(200) := 'OKL_START_DATE';
22 G_END_DATE CONSTANT VARCHAR2(200) := 'OKL_END_DATE';
23
24
25 SUBTYPE program_header_rec_type IS OKL_VENDOR_PROGRAM_PVT.program_header_rec_type;
26
27
28 PROCEDURE create_program(p_api_version IN NUMBER,
29 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
30 x_return_status OUT NOCOPY VARCHAR2,
31 x_msg_count OUT NOCOPY NUMBER,
32 x_msg_data OUT NOCOPY VARCHAR2,
33 p_hdr_rec IN program_header_rec_type,
34 p_parent_agreement_number IN VARCHAR2 DEFAULT NULL,
35 x_header_rec OUT NOCOPY chrv_rec_type,
36 x_k_header_rec OUT NOCOPY khrv_rec_type);
37
38
39 PROCEDURE update_program(p_api_version IN NUMBER,
40 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
41 x_return_status OUT NOCOPY VARCHAR2,
42 x_msg_count OUT NOCOPY NUMBER,
43 x_msg_data OUT NOCOPY VARCHAR2,
44 p_hdr_rec IN program_header_rec_type,
45 p_program_id IN NUMBER,
46 p_parent_agreement_id IN okc_k_headers_v.ID%TYPE DEFAULT NULL
47 );
48
49
50 FUNCTION Is_Process_Active(p_chr_id IN NUMBER) RETURN VARCHAR2;
51
52
53 END OKL_VENDOR_PROGRAM_PUB;