APPS.AHL_APPROVERS_PKG dependencies on AHL_APPROVERS

Line 1: package body AHL_APPROVERS_PKG as

1: package body AHL_APPROVERS_PKG as
2: /*$Header: AHLLAPPB.pls 115.6 2002/12/04 01:21:55 ssurapan noship $*/
3:
4: procedure INSERT_ROW
5: (

Line 38: cursor C is select ROWID from AHL_APPROVERS where

34: X_ATTRIBUTE14 IN VARCHAR2,
35: X_ATTRIBUTE15 IN VARCHAR2
36: )
37: is
38: cursor C is select ROWID from AHL_APPROVERS where
39: APPROVAL_APPROVER_ID = X_APPROVAL_APPROVER_ID;
40: begin
41: insert into AHL_APPROVERS
42: (

Line 41: insert into AHL_APPROVERS

37: is
38: cursor C is select ROWID from AHL_APPROVERS where
39: APPROVAL_APPROVER_ID = X_APPROVAL_APPROVER_ID;
40: begin
41: insert into AHL_APPROVERS
42: (
43: APPROVAL_APPROVER_ID,
44: OBJECT_VERSION_NUMBER,
45: APPROVAL_RULE_ID,

Line 145: update AHL_APPROVERS set

141: X_ATTRIBUTE14 IN VARCHAR2,
142: X_ATTRIBUTE15 IN VARCHAR2
143: ) is
144: begin
145: update AHL_APPROVERS set
146: OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
147: APPROVAL_RULE_ID = X_APPROVAL_RULE_ID,
148: APPROVER_TYPE_CODE = X_APPROVER_TYPE_CODE,
149: APPROVER_SEQUENCE = X_APPROVER_SEQUENCE,

Line 186: delete from AHL_APPROVERS

182: X_APPROVAL_APPROVER_ID in NUMBER
183: )
184: is
185: begin
186: delete from AHL_APPROVERS
187: where APPROVAL_APPROVER_ID = X_APPROVAL_APPROVER_ID;
188:
189: if (sql%notfound) then
190: raise no_data_found;

Line 232: FROM AHL_APPROVERS

228:
229:
230: CURSOR c_obj_verno IS
231: SELECT object_version_number
232: FROM AHL_APPROVERS
233: WHERE approval_approver_id = X_APPROVAL_APPROVER_ID;
234:
235: CURSOR c_chk_approver_exists IS
236: SELECT 'x'

Line 237: FROM AHL_APPROVERS

233: WHERE approval_approver_id = X_APPROVAL_APPROVER_ID;
234:
235: CURSOR c_chk_approver_exists IS
236: SELECT 'x'
237: FROM AHL_APPROVERS
238: WHERE approval_approver_id = X_APPROVAL_APPROVER_ID;
239:
240: CURSOR c_get_approver_id IS
241: SELECT ahl_approvers_s.NEXTVAL

Line 241: SELECT ahl_approvers_s.NEXTVAL

237: FROM AHL_APPROVERS
238: WHERE approval_approver_id = X_APPROVAL_APPROVER_ID;
239:
240: CURSOR c_get_approver_id IS
241: SELECT ahl_approvers_s.NEXTVAL
242: FROM dual;
243:
244:
245: BEGIN

Line 267: AHL_APPROVERS_PKG.INSERT_ROW (

263: END IF ;
264:
265: l_obj_verno := 1;
266:
267: AHL_APPROVERS_PKG.INSERT_ROW (
268: X_ROWID => l_row_id,
269: X_APPROVER_ID => X_APPROVER_ID,
270: X_OBJECT_VERSION_NUMBER => l_obj_verno,
271: X_APPROVAL_RULE_ID => X_APPROVAL_RULE_ID ,

Line 309: AHL_APPROVERS_PKG.UPDATE_ROW (

305:
306:
307:
308:
309: AHL_APPROVERS_PKG.UPDATE_ROW (
310: X_APPROVER_ID => X_APPROVER_ID,
311: X_OBJECT_VERSION_NUMBER => l_obj_verno + 1,
312: X_APPROVAL_RULE_ID => X_APPROVAL_RULE_ID ,
313: X_APPROVAL_APPROVER_ID => X_APPROVAL_APPROVER_ID ,

Line 345: end AHL_APPROVERS_PKG;

341:
342: END LOAD_ROW ;
343:
344:
345: end AHL_APPROVERS_PKG;