[Home] [Help]
PACKAGE BODY: APPS.PA_CC_ORG_RELATIONSHIPS_PKG
Source
1 package body pa_cc_org_relationships_pkg as
2 /* $Header: PAXCCOUB.pls 120.2 2005/08/08 12:46:21 sbharath noship $ */
3
4
5 procedure insert_row ( x_rowid IN OUT NOCOPY Varchar2,
6 x_prvdr_org_id IN Number,
7 x_recvr_org_id IN Number,
8 x_Prvdr_allow_cc_flag IN Varchar2,
9 x_Cross_charge_code IN Varchar2,
10 x_prvdr_project_id IN Number ,
11 x_invoice_grouping_code IN Varchar2,
12 x_last_update_date IN Date,
13 x_last_updated_by IN Number,
14 x_creation_date IN Date,
15 x_created_by IN Number,
16 x_last_update_login IN Number ,
17 x_vendor_site_id IN Number ,
18 x_ap_inv_exp_type IN Varchar2 ,
19 x_ap_inv_exp_organization_id IN Number ,
20 x_attribute_category IN Varchar2 ,
21 x_attribute1 IN Varchar2 ,
22 x_attribute2 IN Varchar2 ,
23 x_attribute3 IN Varchar2 ,
24 x_attribute4 IN Varchar2 ,
25 x_attribute5 IN Varchar2 ,
26 x_attribute6 IN Varchar2 ,
27 x_attribute7 IN Varchar2 ,
28 x_attribute8 IN Varchar2 ,
29 x_attribute9 IN Varchar2 ,
30 x_attribute10 IN Varchar2 ,
31 x_attribute11 IN Varchar2 ,
32 x_attribute12 IN Varchar2 ,
33 x_attribute13 IN Varchar2 ,
34 x_attribute14 IN Varchar2 ,
35 x_attribute15 IN Varchar2 )IS
36
37 cursor return_rowid is select rowid from pa_cc_org_relationships
38 where prvdr_org_id = x_prvdr_org_id
39 and recvr_org_id = x_recvr_org_id ;
40
41 BEGIN
42 insert into pa_cc_org_relationships (prvdr_org_id,
43 recvr_org_id,
44 prvdr_allow_cc_flag,
45 cross_charge_code,
46 prvdr_project_id,
47 invoice_grouping_code,
48 vendor_site_id,
49 ap_inv_exp_type,
50 ap_inv_exp_organization_id,
51 last_update_date,
52 last_updated_by,
53 creation_date,
54 created_by,
55 last_update_login,
56 attribute_category,
57 attribute1,
58 attribute2,
59 attribute3,
60 attribute4,
61 attribute5,
62 attribute6,
63 attribute7,
64 attribute8,
65 attribute9,
66 attribute10,
67 attribute11,
68 attribute12,
69 attribute13,
70 attribute14,
71 attribute15
72 )
73 values (x_prvdr_org_id,
74 x_recvr_org_id ,
75 x_Prvdr_allow_cc_flag ,
76 x_Cross_charge_code ,
77 x_prvdr_project_id ,
78 x_invoice_grouping_code ,
79 x_vendor_site_id ,
80 x_ap_inv_exp_type ,
81 x_ap_inv_exp_organization_id ,
82 x_last_update_date ,
83 x_last_updated_by ,
84 x_creation_date ,
85 x_created_by ,
86 x_last_update_login ,
87 x_attribute_category ,
88 x_attribute1 ,
89 x_attribute2 ,
90 x_attribute3 ,
91 x_attribute4 ,
92 x_attribute5 ,
93 x_attribute6 ,
94 x_attribute7 ,
95 x_attribute8 ,
96 x_attribute9 ,
97 x_attribute10 ,
98 x_attribute11 ,
99 x_attribute12 ,
100 x_attribute13 ,
101 x_attribute14 ,
102 x_attribute15
103 );
104 open return_rowid;
105 fetch return_rowid into x_rowid;
106 if (return_rowid%notfound) then
107 raise NO_DATA_FOUND;
108 end if;
109 close return_rowid;
110
111 END insert_row;
112
113 procedure update_row ( x_rowid IN Varchar2,
114 x_prvdr_org_id IN Number,
115 x_recvr_org_id IN Number,
116 x_Prvdr_allow_cc_flag IN Varchar2,
117 x_Cross_charge_code IN Varchar2,
118 x_prvdr_project_id IN Number ,
119 x_invoice_grouping_code IN Varchar2,
120 x_last_update_date IN Date,
121 x_last_updated_by IN Number,
122 x_creation_date IN Date,
123 x_created_by IN Number,
124 x_last_update_login IN Number ,
125 x_vendor_site_id IN Number ,
126 x_ap_inv_exp_type IN Varchar2 ,
127 x_ap_inv_exp_organization_id IN Number ,
128 x_attribute_category IN Varchar2 ,
129 x_attribute1 IN Varchar2 ,
130 x_attribute2 IN Varchar2 ,
131 x_attribute3 IN Varchar2 ,
132 x_attribute4 IN Varchar2 ,
133 x_attribute5 IN Varchar2 ,
134 x_attribute6 IN Varchar2 ,
135 x_attribute7 IN Varchar2 ,
136 x_attribute8 IN Varchar2 ,
137 x_attribute9 IN Varchar2 ,
138 x_attribute10 IN Varchar2 ,
139 x_attribute11 IN Varchar2 ,
140 x_attribute12 IN Varchar2 ,
141 x_attribute13 IN Varchar2 ,
142 x_attribute14 IN Varchar2 ,
143 x_attribute15 IN Varchar2 )IS
144 BEGIN
145 update pa_cc_org_relationships
146 set prvdr_org_id = x_prvdr_org_id
147 ,recvr_org_id = x_recvr_org_id
148 ,prvdr_allow_cc_flag = x_prvdr_allow_cc_flag
149 ,cross_charge_code = x_cross_charge_code
150 ,prvdr_project_id = x_prvdr_project_id
151 ,invoice_grouping_code = x_invoice_grouping_code
152 ,vendor_site_id = x_vendor_site_id
153 ,ap_inv_exp_type = x_ap_inv_exp_type
154 ,ap_inv_exp_organization_id = x_ap_inv_exp_organization_id
155 ,last_update_date = x_last_update_date
156 ,last_updated_by = x_last_updated_by
157 ,creation_date = x_creation_date
158 ,created_by = x_created_by
159 ,last_update_login = x_last_update_login
160 ,attribute_category = x_attribute_category
161 ,attribute1 = x_attribute1
162 ,attribute2 = x_attribute2
163 ,attribute3 = x_attribute3
164 ,attribute4 = x_attribute4
165 ,attribute5 = x_attribute5
166 ,attribute6 = x_attribute6
167 ,attribute7 = x_attribute7
168 ,attribute8 = x_attribute8
169 ,attribute9 = x_attribute9
170 ,attribute10 = x_attribute10
171 ,attribute11 = x_attribute11
172 ,attribute12 = x_attribute12
173 ,attribute13 = x_attribute13
174 ,attribute14 = x_attribute14
175 ,attribute15 = x_attribute15
176 where rowid = x_rowid ;
177
178 END update_row ;
179
180 END pa_cc_org_relationships_pkg;