1: PACKAGE BODY PO_ACCEPTANCES_INS_PVT AS
2: /* $Header: POXVIACB.pls 120.4 2011/12/27 08:43:58 pamandav ship $*/
3:
4: -- Bug 2850566
5: -- Modified the parameters of the procedure to accomodate new columns
64: -- SQL Why :To set the output parameter x_rowid
65: -- SQL Join :Acceptance_id
66: CURSOR c_rowid IS
67: SELECT rowid
68: FROM PO_ACCEPTANCES
69: WHERE acceptance_id = l_id;
70:
71: -- Bug 2850566 RBAIRRAJ
72: -- SQL What :selects the next avaiable sequence number from PO_ACCEPTANCES_S sequence
68: FROM PO_ACCEPTANCES
69: WHERE acceptance_id = l_id;
70:
71: -- Bug 2850566 RBAIRRAJ
72: -- SQL What :selects the next avaiable sequence number from PO_ACCEPTANCES_S sequence
73: -- SQL Why :To insert it as Acceptance_Id in the PO_ACCEPTANCES table
74: CURSOR c_next_id IS
75: SELECT PO_ACCEPTANCES_S.nextval
76: FROM SYS.DUAL;
69: WHERE acceptance_id = l_id;
70:
71: -- Bug 2850566 RBAIRRAJ
72: -- SQL What :selects the next avaiable sequence number from PO_ACCEPTANCES_S sequence
73: -- SQL Why :To insert it as Acceptance_Id in the PO_ACCEPTANCES table
74: CURSOR c_next_id IS
75: SELECT PO_ACCEPTANCES_S.nextval
76: FROM SYS.DUAL;
77:
71: -- Bug 2850566 RBAIRRAJ
72: -- SQL What :selects the next avaiable sequence number from PO_ACCEPTANCES_S sequence
73: -- SQL Why :To insert it as Acceptance_Id in the PO_ACCEPTANCES table
74: CURSOR c_next_id IS
75: SELECT PO_ACCEPTANCES_S.nextval
76: FROM SYS.DUAL;
77:
78: BEGIN
79:
77:
78: BEGIN
79:
80: IF (x_acceptance_id IS NULL) THEN
81: SELECT PO_ACCEPTANCES_S.nextval
82: INTO l_id
83: FROM SYS.DUAL;
84: ELSE
85: l_id := x_acceptance_id;
96: x_last_update_login := fnd_global.login_id;
97: end if;
98:
99: -- Bug 2850566 RBAIRRAJ
100: -- SQL What :Inserts a record into PO_ACCEPTANCES table
101: -- SQL Why :This acts as a rowhandler for the PO_ACCEPTANCES table
102: INSERT INTO PO_ACCEPTANCES(
103: ACCEPTANCE_ID,
104: LAST_UPDATE_DATE,
97: end if;
98:
99: -- Bug 2850566 RBAIRRAJ
100: -- SQL What :Inserts a record into PO_ACCEPTANCES table
101: -- SQL Why :This acts as a rowhandler for the PO_ACCEPTANCES table
102: INSERT INTO PO_ACCEPTANCES(
103: ACCEPTANCE_ID,
104: LAST_UPDATE_DATE,
105: LAST_UPDATED_BY,
98:
99: -- Bug 2850566 RBAIRRAJ
100: -- SQL What :Inserts a record into PO_ACCEPTANCES table
101: -- SQL Why :This acts as a rowhandler for the PO_ACCEPTANCES table
102: INSERT INTO PO_ACCEPTANCES(
103: ACCEPTANCE_ID,
104: LAST_UPDATE_DATE,
105: LAST_UPDATED_BY,
106: LAST_UPDATE_LOGIN,
208: WHEN OTHERS THEN
209: RAISE;
210: END insert_row;
211:
212: END PO_ACCEPTANCES_INS_PVT;