1 PACKAGE pa_po_integration_utils AUTHID CURRENT_USER AS
2 /* $Header: PAPOUTLS.pls 120.5 2011/12/23 12:17:45 mokukuma ship $ */
3
4 G_err_code NUMBER;
5 G_INVOKE_PA_SEC NUMBER:=0; --anuragag for 8815657
6 --anuragag for 8815657
7 FUNCTION PA_USER_PO_ACCESS_CHECK(x_po_header_id IN NUMBER,
8 x_proj_user_id IN NUMBER,
9 x_mode IN VARCHAR2 DEFAULT 'VIEW' /* Mode can have 2 values 'VIEW' or 'UPDATE'*/)
10 RETURN varchar2;
11 --anuragag for 8815657
12 FUNCTION PA_USER_PO_ACCESS_PROJ(x_proj_id IN NUMBER,
13 x_proj_user_id IN NUMBER)
14 RETURN varchar2;
15
16
17 FUNCTION Allow_Project_Info_Change ( p_po_distribution_id IN po_distributions_all.po_distribution_id%type)
18 RETURN varchar2;
19
20 /* Bug: 9462109 */
21
22 FUNCTION Getpolinenum( p_po_line_id IN number)
23 RETURN varchar2;
24
25 --Added for bug 4407908
26 /*This is a public API, which will update PA_ADDITION_FLAG in
27 rcv_receiving_sub_ledger table. This API will be called from
28 purchasing module at the time of receipt creation.*/
29
30 PROCEDURE Update_PA_Addition_Flg (p_api_version IN NUMBER,
31 p_init_msg_list IN VARCHAR2 default FND_API.G_FALSE,
32 p_commit IN VARCHAR2 default FND_API.G_FALSE,
33 p_validation_level IN NUMBER default FND_API.G_VALID_LEVEL_FULL,
34 x_return_status OUT NOCOPY VARCHAR2,
35 x_msg_count OUT NOCOPY NUMBER,
36 x_msg_data OUT NOCOPY VARCHAR2,
37 p_rcv_transaction_id IN NUMBER,
38 p_po_distribution_id IN NUMBER,
39 p_accounting_event_id IN NUMBER);
40
41
42 -- Added the below procedure as a part of Novation Enhancement.
43
44 PROCEDURE validate_novation_projects
45 (
46 p_request_id IN NUMBER,
47 p_vendor_id IN NUMBER,
48 p_novation_date IN DATE,
49 p_header_id_tbl IN PO_TBL_NUMBER,
50 x_validation_results IN OUT NOCOPY po_multi_mod_val_results_type,
51 x_validation_result_type OUT NOCOPY VARCHAR2,
52 x_return_status OUT NOCOPY VARCHAR2,
53 x_error_msg OUT NOCOPY VARCHAR2 );
54
55 END pa_po_integration_utils;