12: X_LAST_UPDATE_DATE in DATE,
13: X_LAST_UPDATED_BY in NUMBER,
14: X_LAST_UPDATE_LOGIN in NUMBER
15: ) is
16: cursor C is select ROWID from JTF_PROFILE_MAPPINGS_B
17: where PROFILE_MAPPINGS_ID = X_PROFILE_MAPPINGS_ID
18: ;
19: begin
20: insert into JTF_PROFILE_MAPPINGS_B (
16: cursor C is select ROWID from JTF_PROFILE_MAPPINGS_B
17: where PROFILE_MAPPINGS_ID = X_PROFILE_MAPPINGS_ID
18: ;
19: begin
20: insert into JTF_PROFILE_MAPPINGS_B (
21: SECURITY_GROUP_ID,
22: PROFILE_MAPPINGS_ID,
23: OWNERID,
24: OBJECT_VERSION_NUMBER,
91: cursor c is select
92: SECURITY_GROUP_ID,
93: OWNERID,
94: OBJECT_VERSION_NUMBER
95: from JTF_PROFILE_MAPPINGS_B
96: where PROFILE_MAPPINGS_ID = X_PROFILE_MAPPINGS_ID
97: for update of PROFILE_MAPPINGS_ID nowait;
98: recinfo c%rowtype;
99:
154: X_LAST_UPDATED_BY in NUMBER,
155: X_LAST_UPDATE_LOGIN in NUMBER
156: ) is
157: begin
158: update JTF_PROFILE_MAPPINGS_B set
159: SECURITY_GROUP_ID = X_SECURITY_GROUP_ID,
160: OWNERID = X_OWNERID,
161: OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
162: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
193: if (sql%notfound) then
194: raise no_data_found;
195: end if;
196:
197: delete from JTF_PROFILE_MAPPINGS_B
198: where PROFILE_MAPPINGS_ID = X_PROFILE_MAPPINGS_ID;
199:
200: if (sql%notfound) then
201: raise no_data_found;
207: begin
208: delete from JTF_PROFILE_MAPPINGS_TL T
209: where not exists
210: (select NULL
211: from JTF_PROFILE_MAPPINGS_B B
212: where B.PROFILE_MAPPINGS_ID = T.PROFILE_MAPPINGS_ID
213: );
214:
215: update JTF_PROFILE_MAPPINGS_TL T set (