DBA Data[Home] [Help]

PACKAGE BODY: APPS.CN_SRP_PAYEE_ASSIGNS_PKG

Source


1 PACKAGE BODY CN_SRP_PAYEE_ASSIGNS_PKG as
2 -- $Header: cntspab.pls 120.1 2005/06/10 14:01:45 appldev  $
3 /*
4 Date	  Name	     	        Description
5 ***************************************************************************
6 10-JUN-99 Kumar Sivasankaran 	Created
7 ***************************************************************************
8   Name	  : CN_SRP_PAYEE_ASSIGNS_PKG
9   Purpose : Holds all server side packages used to insert a
10             srp Payee Assigns
11 
12   Desc    : BEGIN_RECORD is called at the start of the commit cycle.
13 */
14 
15   -- Procedure Name
16   --	Insert_Record
17   -- Purpose
18   --    Main insert procedure
19 /*-------------------------------------------------------------------------*
20  |
21  | Procedure Name Insert_Record
22  |
23  *-------------------------------------------------------------------------*/
24   PROCEDURE Insert_Record
25      ( x_srp_payee_assign_id     IN OUT NOCOPY NUMBER
26       ,p_srp_quota_assign_id            NUMBER
27       ,p_org_id                         NUMBER
28       ,p_payee_id		        NUMBER
29       ,p_quota_id                       NUMBER
30       ,p_salesrep_id	                NUMBER
31       ,p_start_date			DATE
32       ,p_end_date	                DATE
33       ,p_Last_Update_Date               DATE
34       ,p_Last_Updated_By                NUMBER
35       ,p_Creation_Date                  DATE
36       ,p_Created_By                     NUMBER
37       ,p_Last_Update_Login              NUMBER) IS
38 
39   BEGIN
40 
41      SELECT cn_srp_payee_assigns_s.NEXTVAL
42        INTO x_srp_payee_assign_id
43        FROM dual;
44 
45      INSERT INTO cn_srp_payee_assigns_all (
46                 srp_payee_assign_id
47                ,srp_quota_assign_id
48 	       ,org_id
49 	       ,payee_id
50                ,quota_id
51 	       ,salesrep_id
52 	       ,start_date
53                ,end_date
54                ,last_update_date
55                ,last_updated_by
56                ,creation_date
57                ,created_by
58 	       ,last_update_login
59              ) VALUES (
60                 X_srp_payee_assign_id
61                ,p_srp_quota_assign_id
62 	       ,p_org_id
63 	       ,p_payee_id
64                ,p_quota_id
65 	       ,p_salesrep_id
66 	       ,p_start_date
67 	       ,p_end_date
68                ,p_Last_Update_Date
69                ,p_Last_Updated_By
70                ,p_Creation_Date
71                ,p_Created_By
72 	       ,p_Last_Update_Login
73              );
74 
75   END Insert_Record;
76 
77   -- Procedure Name
78   --   Update Record
79   -- Purpose
80   --   To Update the Srp Payee Assigns
81   --
82 /*-------------------------------------------------------------------------*
83  |
84  | Procedure Name Update_Record
85  |
86  *-------------------------------------------------------------------------*/
87   PROCEDURE Update_Record(
88                         p_srp_payee_assign_id            NUMBER
89 		       ,p_payee_id		         NUMBER
90                        ,p_start_date			 DATE
91 		       ,p_end_date	                 DATE
92                        ,p_Last_Update_Date               DATE
93                        ,p_Last_Updated_By                NUMBER
94                        ,p_Last_Update_Login              NUMBER) IS
95   BEGIN
96 
97      UPDATE cn_srp_payee_assigns_all
98      SET
99        start_date              = p_start_date,
100        end_date	               = p_end_date,
101        payee_id                = p_payee_id,
102        last_update_date        = p_last_update_date,
103        last_updated_by         = p_Last_Updated_By,
104        last_update_login       = p_last_update_login,
105        object_version_number   = object_version_number + 1
106      WHERE srp_payee_assign_id = p_srp_payee_assign_id ;
107 
108      if (SQL%NOTFOUND) then
109         Raise NO_DATA_FOUND;
110      end if;
111 
112   END Update_Record;
113 
114   -- Procedure Name
115   --	Delete_Record
116   -- Purpose
117   --    Delete the Srp Payee Assigns
118 /*-------------------------------------------------------------------------*
119  |
120  | Procedure Name Delete_Record
121  |
122  *-------------------------------------------------------------------------*/
123    PROCEDURE Delete_Record( p_srp_payee_assign_id     NUMBER ) IS
124 
125    BEGIN
126        -- changes for bug#2753634, #3143462
127        -- changed the delete to update so that srp_payee_assign_id remains
128        -- and can be used for futuer revert operations - use delete_flag
129 
130        UPDATE cn_srp_payee_assigns_all
131        SET    delete_flag = 'Y'
132        WHERE srp_payee_assign_id = p_srp_payee_assign_id;
133 
134        --DELETE FROM cn_srp_payee_assigns
135        --WHERE  srp_payee_assign_id = p_srp_payee_assign_id;
136 
137   END Delete_Record;
138 
139 /*-------------------------------------------------------------------------*/
140   -- Procedure Name
141   --	Delete_Record
142   -- Purpose
143   --    Called from cn_srp_quota_assigns.
144 /*-------------------------------------------------------------------------*/
145  PROCEDURE Delete_Record(
146 			 p_srp_quota_assign_id  	 NUMBER
147 			 ,p_quota_id	       		 NUMBER) IS
148 
149     CURSOR get_payee_del_strdt_cur IS
150        SELECT srp_payee_assign_id
151        FROM cn_srp_payee_assigns_all
152        WHERE srp_quota_assign_id  = p_srp_quota_assign_id
153         AND  quota_id             = p_quota_id  ;
154 
155   BEGIN
156      -- changes for bug#2753634
157      -- changed the delete to update so that srp_payee_assign_id remains
158      -- and can be used for futuer revert operations
159      For l_get_payee_del_strdt_cur IN get_payee_del_strdt_cur LOOP
160 	Delete_Record(l_get_payee_del_strdt_cur.srp_payee_assign_id);
161      END LOOP;
162 
163  END Delete_Record;
164 
165 END CN_SRP_PAYEE_ASSIGNS_PKG;