22: X_Business_Group_Id NUMBER
23: ) IS
24: CURSOR C IS
25: SELECT ROWID
26: FROM PSP_AUTO_ACCTS
27: WHERE acct_id = X_Acct_Id;
28: BEGIN
29: INSERT INTO psp_auto_accts
30: (
25: SELECT ROWID
26: FROM PSP_AUTO_ACCTS
27: WHERE acct_id = X_Acct_Id;
28: BEGIN
29: INSERT INTO psp_auto_accts
30: (
31: acct_id,
32: acct_type,
33: period_type,
88: X_Business_Group_Id NUMBER
89: ) IS
90: CURSOR C IS
91: SELECT *
92: FROM psp_auto_accts
93: WHERE ROWID = X_Rowid
94: FOR UPDATE OF Acct_Id NOWAIT;
95: Recinfo C%ROWTYPE;
96: BEGIN
138: X_Set_of_Books_Id NUMBER,
139: X_Business_Group_Id NUMBER
140: ) IS
141: BEGIN
142: UPDATE psp_auto_accts
143: SET Acct_Id = X_Acct_Id,
144: Acct_Type = X_Acct_Type,
145: Period_Type = X_Period_Type,
146: Acct_Seq_Num = X_Acct_Seq_Num,
203: end if;
204:
205:
206: -- Delete the master record
207: DELETE FROM psp_auto_accts
208: WHERE ROWID = X_Rowid;
209: if (SQL%NOTFOUND) then
210: Raise NO_DATA_FOUND;
211: end if;