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,
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
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,
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
176: where rowid = x_rowid ;
177:
178: END update_row ;
179:
180: END pa_cc_org_relationships_pkg;