1 PACKAGE BODY CAC_SYNC_CONTACT_MAPPINGS_PKG AS
2 /* $Header: cacvscmb.pls 120.1 2005/07/02 02:20:21 appldev noship $ */
3
4 PROCEDURE INSERT_ROW
5 ( x_rowid IN OUT NOCOPY VARCHAR2
6 , x_sync_contact_mapping_id IN NUMBER
7 , x_contact_party_id IN NUMBER
8 , x_org_party_id IN NUMBER
9 , x_person_party_id IN NUMBER
10 , x_party_site_id IN NUMBER
11 , x_work_contact_point_id IN NUMBER
12 , x_home_contact_point_id IN NUMBER
13 , x_fax_contact_point_id IN NUMBER
14 , x_cell_contact_point_id IN NUMBER
15 , x_pager_contact_point_id IN NUMBER
16 , x_email_contact_point_id IN NUMBER
17 , x_created_by IN NUMBER
18 , x_creation_date IN DATE
19 , x_last_updated_by IN NUMBER
20 , x_last_update_date IN DATE
21 , x_last_update_login IN NUMBER
22 )
23 IS
24 CURSOR c_rowid IS
25 SELECT ROWID
26 FROM cac_sync_contact_mappings
27 WHERE sync_contact_mapping_id = x_sync_contact_mapping_id;
28 BEGIN
29 INSERT INTO cac_sync_contact_mappings
30 (sync_contact_mapping_id
31 ,contact_party_id
32 ,org_party_id
33 ,person_party_id
34 ,party_site_id
35 ,work_contact_point_id
36 ,home_contact_point_id
37 ,fax_contact_point_id
38 ,cell_contact_point_id
39 ,pager_contact_point_id
40 ,email_contact_point_id
41 ,created_by
42 ,creation_date
43 ,last_updated_by
44 ,last_update_date
45 ,last_update_login
46 )
47 VALUES
48 (x_sync_contact_mapping_id
49 ,x_contact_party_id
50 ,x_org_party_id
51 ,x_person_party_id
52 ,x_party_site_id
53 ,x_work_contact_point_id
54 ,x_home_contact_point_id
55 ,x_fax_contact_point_id
56 ,x_cell_contact_point_id
57 ,x_pager_contact_point_id
58 ,x_email_contact_point_id
59 ,x_created_by
60 ,x_creation_date
61 ,x_last_updated_by
62 ,x_last_update_date
63 ,x_last_update_login
64 );
65
66 OPEN c_rowid;
67 FETCH c_rowid INTO x_rowid;
68
69 IF c_rowid%NOTFOUND THEN
70 CLOSE c_rowid;
71 RAISE NO_DATA_FOUND;
72 END IF;
73 CLOSE c_rowid;
74
75 END INSERT_ROW;
76
77 PROCEDURE UPDATE_ROW
78 ( x_sync_contact_mapping_id IN NUMBER
79 , x_contact_party_id IN NUMBER
80 , x_org_party_id IN NUMBER
81 , x_person_party_id IN NUMBER
82 , x_party_site_id IN NUMBER
83 , x_work_contact_point_id IN NUMBER
84 , x_home_contact_point_id IN NUMBER
85 , x_fax_contact_point_id IN NUMBER
86 , x_cell_contact_point_id IN NUMBER
87 , x_pager_contact_point_id IN NUMBER
88 , x_email_contact_point_id IN NUMBER
89 , x_last_updated_by IN NUMBER
90 , x_last_update_date IN DATE
91 , x_last_update_login IN NUMBER
92 )
93 IS
94 BEGIN
95 UPDATE cac_sync_contact_mappings
96 SET contact_party_id = x_contact_party_id
97 , org_party_id = x_org_party_id
98 , person_party_id = x_person_party_id
99 , party_site_id = x_party_site_id
100 , work_contact_point_id = x_work_contact_point_id
101 , home_contact_point_id = x_home_contact_point_id
102 , fax_contact_point_id = x_fax_contact_point_id
103 , cell_contact_point_id = x_cell_contact_point_id
104 , pager_contact_point_id = x_pager_contact_point_id
105 , email_contact_point_id = x_email_contact_point_id
106 , last_updated_by = x_last_updated_by
107 , last_update_date = x_last_update_date
108 , last_update_login = x_last_update_login
109 WHERE sync_contact_mapping_id = x_sync_contact_mapping_id;
110
111 IF SQL%NOTFOUND THEN
112 RAISE NO_DATA_FOUND;
113 END IF;
114
115 END UPDATE_ROW;
116
117 PROCEDURE DELETE_ROW(x_sync_contact_mapping_id IN NUMBER)
118 IS
119 BEGIN
120
121 DELETE cac_sync_contact_mappings
122 WHERE sync_contact_mapping_id = x_sync_contact_mapping_id;
123
124 IF SQL%NOTFOUND THEN
125 RAISE NO_DATA_FOUND;
126 END IF;
127
128 END DELETE_ROW;
129
130 end CAC_SYNC_CONTACT_MAPPINGS_PKG;
[Home] [Help]