[Home] [Help]
PACKAGE: APPS.OKE_AGREEMENT_PVT
Source
1 package OKE_AGREEMENT_PVT AUTHID CURRENT_USER as
2 /* $Header: OKEVKAGS.pls 120.0.12020000.2 2012/08/22 06:05:00 skuchima ship $ */
3
4
5 --
6 -- Global Variables
7 --
8
9 G_PKG_NAME CONSTANT VARCHAR2(50) := 'OKE_AGREEMENT_PVT';
10 G_API_VERSION_NUMBER NUMBER := 1.0;
11 G_DESCRIPTION VARCHAR2(100) := 'Created by Oracle Project Contracts';
12 G_APP_NAME CONSTANT VARCHAR2(3) := OKE_API.G_APP_NAME;
13 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLcode';
14 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLerrm';
15 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKE_CONTRACTS_UNEXPECTED_ERROR';
16 G_PRODUCT_CODE CONSTANT VARCHAR2(3) := 'OKE';
17 G_PA_DESC_FLEX_NAME CONSTANT VARCHAR2(50) := 'PA_AGREEMENTS_DESC_FLEX';
18 G_PROJ_FUND_DESC_FLEX_NAME CONSTANT VARCHAR2(50) := 'PA_PROJECT_FUNDINGS_DESC_FLEX';
19 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
20 G_RESOURCE_BUSY EXCEPTION;
21 PRAGMA EXCEPTION_INIT(G_RESOURCE_BUSY, -54);
22
23
24 --
25 -- Agreement_Rec_Type
26 --
27
28 TYPE agreement_rec_type is RECORD
29 (object_id NUMBER := OKE_API.G_MISS_NUM ,
30 org_total_amount NUMBER := OKE_API.G_MISS_NUM ,
31 total_amount NUMBER := OKE_API.G_MISS_NUM ,
32 agreement_currency_code VARCHAR2(15) := OKE_API.G_MISS_CHAR ,
33 --negative_amount NUMBER := OKE_API.G_MISS_NUM
34 agreement_id NUMBER := OKE_API.G_MISS_NUM
35 );
36
37 --
38 -- Agreement_Tbl_Type
39 --
40
41 TYPE agreement_tbl_type is TABLE of agreement_rec_type
42 index by binary_integer;
43
44 --
45 -- Pa_Agreement_Tbl_Type
46 --
47
48 TYPE pa_agreement_tbl_type is TABLE of PA_AGREEMENT_PUB.AGREEMENT_REC_IN_TYPE
49 index by binary_integer;
50
51
52 --
53 -- Procedure: create_agreement
54 --
55 -- Description: This procedure is used to create pa agreement
56 --
57 --
58
59 PROCEDURE create_agreement(p_api_version IN NUMBER ,
60 p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
61 p_commit IN VARCHAR2 := OKE_API.G_FALSE ,
62 p_msg_count OUT NOCOPY NUMBER ,
63 p_msg_data OUT NOCOPY VARCHAR2 ,
64 p_agreement_type IN VARCHAR2 ,
65 p_funding_in_rec IN OKE_FUNDSOURCE_PVT.FUNDING_REC_IN_TYPE ,
66 -- p_allocation_in_tbl IN OKE_ALLOCATION_PVT.ALLOCATION_IN_TBL_TYPE ,
67 p_return_status OUT NOCOPY VARCHAR2 ,
68 p_receivables_term_id IN NUMBER DEFAULT NULL ----skuchima bug 14344021
69 );
70
71 --
72 -- Procedure: update_agreement
73 --
74 -- Description: This procedure is used to update pa agreement
75 --
76 --
77
78 PROCEDURE update_agreement(p_api_version IN NUMBER ,
79 p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
80 p_commit IN VARCHAR2 := OKE_API.G_FALSE ,
81 p_msg_count OUT NOCOPY NUMBER ,
82 p_msg_data OUT NOCOPY VARCHAR2 ,
83 p_agreement_type IN VARCHAR2 ,
84 p_funding_in_rec IN OKE_FUNDSOURCE_PVT.FUNDING_REC_IN_TYPE ,
85 -- p_allocation_in_tbl IN OKE_ALLOCATION_PVT.ALLOCATION_IN_TBL_TYPE ,
86 p_return_status OUT NOCOPY VARCHAR2 ,
87 p_receivables_term_id IN NUMBER DEFAULT NULL ----skuchima bug 14344021
88 );
89
90
91 --
92 -- Procedure: update_pa_funding
93 --
94 -- Description: This procedure is used to update/insert record in pa project funding table
95 --
96 --
97
98 PROCEDURE update_pa_funding(p_api_version IN NUMBER ,
99 p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
100 p_commit IN VARCHAR2 := OKE_API.G_FALSE ,
101 p_msg_count OUT NOCOPY NUMBER ,
102 p_msg_data OUT NOCOPY VARCHAR2 ,
103 p_allocation_in_rec IN OKE_ALLOCATION_PVT.ALLOCATION_REC_IN_TYPE ,
104 p_return_status OUT NOCOPY VARCHAR2
105 );
106
107
108 --
109 -- Procedure: add_pa_funding
110 --
111 -- Description: This procedure is used to add funding line to PA_PROJECT_FUNDINGS table
112 --
113 --
114
115 PROCEDURE add_pa_funding(p_api_version IN NUMBER ,
116 p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
117 p_commit IN VARCHAR2 := OKE_API.G_FALSE ,
118 p_msg_count OUT NOCOPY NUMBER ,
119 p_msg_data OUT NOCOPY VARCHAR2 ,
120 p_allocation_in_rec IN OKE_ALLOCATION_PVT.ALLOCATION_REC_IN_TYPE ,
121 p_return_status OUT NOCOPY VARCHAR2
122 );
123
124
125 end OKE_AGREEMENT_PVT;