14: X_LAST_UPDATE_DATE in DATE,
15: X_LAST_UPDATED_BY in NUMBER,
16: X_LAST_UPDATE_LOGIN in NUMBER
17: ) is
18: cursor C is select ROWID from FEM_VEH_TYPE_CD_B
19: where VEH_TYPE_CD_CODE = X_VEH_TYPE_CD_CODE
20: ;
21: begin
22: insert into FEM_VEH_TYPE_CD_B (
18: cursor C is select ROWID from FEM_VEH_TYPE_CD_B
19: where VEH_TYPE_CD_CODE = X_VEH_TYPE_CD_CODE
20: ;
21: begin
22: insert into FEM_VEH_TYPE_CD_B (
23: VEH_TYPE_CD_CODE,
24: ENABLED_FLAG,
25: PERSONAL_FLAG,
26: READ_ONLY_FLAG,
96: ENABLED_FLAG,
97: PERSONAL_FLAG,
98: READ_ONLY_FLAG,
99: OBJECT_VERSION_NUMBER
100: from FEM_VEH_TYPE_CD_B
101: where VEH_TYPE_CD_CODE = X_VEH_TYPE_CD_CODE
102: for update of VEH_TYPE_CD_CODE nowait;
103: recinfo c%rowtype;
104:
158: X_LAST_UPDATED_BY in NUMBER,
159: X_LAST_UPDATE_LOGIN in NUMBER
160: ) is
161: begin
162: update FEM_VEH_TYPE_CD_B set
163: ENABLED_FLAG = X_ENABLED_FLAG,
164: PERSONAL_FLAG = X_PERSONAL_FLAG,
165: READ_ONLY_FLAG = X_READ_ONLY_FLAG,
166: OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
198: if (sql%notfound) then
199: raise no_data_found;
200: end if;
201:
202: delete from FEM_VEH_TYPE_CD_B
203: where VEH_TYPE_CD_CODE = X_VEH_TYPE_CD_CODE;
204:
205: if (sql%notfound) then
206: raise no_data_found;
212: begin
213: delete from FEM_VEH_TYPE_CD_TL T
214: where not exists
215: (select NULL
216: from FEM_VEH_TYPE_CD_B B
217: where B.VEH_TYPE_CD_CODE = T.VEH_TYPE_CD_CODE
218: );
219:
220: update FEM_VEH_TYPE_CD_TL T set (