PACKAGE: APPS.OKE_CONTRACT_APPROVAL_PVT

Source

1 package OKE_CONTRACT_APPROVAL_PVT AUTHID CURRENT_USER as
2 /* $Header: OKEVCAPS.pls 115.5 2002/08/14 01:42:49 alaw ship $ */
3 
4   -- public procedure declarations
5   -- for use by OKC_CONTRACT_APPROVAL_PUB public PL/SQL API
6 procedure k_approval_start(
7 				p_api_version	IN	NUMBER,
8                   	p_init_msg_list	IN	VARCHAR2 default OKE_API.G_FALSE,
9                         x_return_status	OUT NOCOPY	VARCHAR2,
10                         x_msg_count	OUT NOCOPY	NUMBER,
11                         x_msg_data	OUT NOCOPY	VARCHAR2,
12 				p_contract_id IN number,
13 				p_process_id IN number,
14 				p_do_commit IN VARCHAR2 default OKE_API.G_TRUE
15 			);
16 function wf_monitor_url(
17 				p_contract_id IN number,
18 				p_process_id IN number,
19 				p_mode IN varchar2 default 'USER'
20 		    ) return varchar2;
21 procedure k_approval_stop(
22 				p_api_version	IN	NUMBER,
23                   	p_init_msg_list	IN	VARCHAR2 default OKE_API.G_FALSE,
24                         x_return_status	OUT NOCOPY	VARCHAR2,
25                         x_msg_count	OUT NOCOPY	NUMBER,
26                         x_msg_data	OUT NOCOPY	VARCHAR2,
27 				p_contract_id number,
28 				p_do_commit IN VARCHAR2 default OKE_API.G_TRUE
29 			);
30 
31   -- public utilities declarations
32   -- for use by Contract Approval Process Developers
33 procedure wf_copy_env(	p_item_type varchar2,
34 				p_item_key varchar2);
35 function  k_accesible(
36 			p_contract_id IN number,
37 			p_user_id IN number,
38 			p_level IN varchar2 default 'R'
39 		     ) return varchar2;
40 procedure k_approved(
41 			p_contract_id IN number,
42 			p_date_approved IN date default sysdate,
43                   x_return_status	OUT NOCOPY	VARCHAR2
44 		    );
45 procedure k_erase_approved(
46 			p_contract_id IN number,
47                   x_return_status	OUT NOCOPY	VARCHAR2
48 		    );
49 procedure k_signed(
50 			p_contract_id IN number,
51 			p_date_signed IN date default sysdate,
52                   x_return_status	OUT NOCOPY	VARCHAR2
53 		    );
54 end OKE_CONTRACT_APPROVAL_PVT;