183: begin
184: if (l_rowid is not null) then
185: if (checkMNrecord(l_dim_table, l_key_column1,l_key_column2,
186: l_code1,l_code2, l_rowid)) then
187: l_message:=fnd_message.get_string('BSC','BSC_PMD_LDR_UNICONSTR_VIOLATE');
188: else
189: l_stmt:='update '||l_dim_table ||' set '||
190: l_key_column1 ||'=:1, '||
191: l_key_column2 ||'=:2 ' ||
193: execute immediate l_stmt using l_code1,l_code2, l_rowid;
194: end if;
195: else
196: if (checkMNrecord(l_dim_table, l_key_column1,l_key_column2, l_code1,l_code2)) then
197: l_message:=fnd_message.get_string('BSC','BSC_PMD_LDR_UNICONSTR_VIOLATE');
198: --raise_application_error(-20000,'UNIQUE_CONSTRAINT_VIOLATED');
199: else
200: l_stmt:='insert into '||l_dim_table ||'( '||
201: l_key_column1 ||','|| l_key_column2 ||')'||
213: l_source_lang varchar2(4);
214: UsercodeChange boolean ;
215: begin
216: if (checkrecord(l_dim_table, l_user_code, l_name, l_code)) then
217: l_message:=fnd_message.get_string('BSC','BSC_PMD_LDR_UNICONSTR_VIOLATE');
218: else
219: UsercodeChange:=checkUsercodeChange(l_dim_table, l_code, l_user_code);
220: l_source_lang:=USERENV('LANG');
221: l_stmt:=' update '||l_dim_table||' set '||
242: l_source_lang varchar2(4);
243: e_unexpected_error EXCEPTION;
244: begin
245: if (checkrecord(l_dim_table, l_user_code, l_name)) then
246: l_message:=fnd_message.get_string('BSC','BSC_PMD_LDR_UNICONSTR_VIOLATE');
247: -- raise_application_error(-20000,'UNIQUE_CONSTRAINT_VIOLATED');
248: else
249: l_code:=BSC_UPDATE_DIM.get_new_code(l_dim_table);
250: l_source_lang:=USERENV('LANG');
287: close cv;
288: if (l_code_number is not null) then
289: deleteNormalRow(l_dim_table, l_code_number);
290: else
291: l_message:=fnd_message.get_string('BSC','BSC_PMD_LDR_UNICONSTR_VIOLATE');
292: end if;
293: end if;
294: if (l_message is null) then
295: UsercodeChange:=checkUsercodeChange(l_dim_table, l_code, l_user_code);
329: close cv;
330: if (l_code is not null) then
331: updateNormalRowNW(l_dim_table, l_fk, l_fk_user, l_code, l_user_code, l_name, l_fkcode, l_fkusercode, l_message);
332: else
333: l_message:=fnd_message.get_string('BSC','BSC_PMD_LDR_UNICONSTR_VIOLATE');
334: --raise_application_error(-20000,'UNIQUE_CONSTRAINT_VIOLATED');
335: end if;
336: else
337: l_code:=BSC_UPDATE_DIM.get_new_code(l_dim_table);
582: close cv;
583: if (l_code is not null) then
584: updateNormalRowNWM(l_dim_table, l_code, l_user_code, l_name, l_parentcount, l_fklist, l_fkvaluelist, l_fkuservaluelist, l_message);
585: else
586: l_message:=fnd_message.get_string('BSC','BSC_PMD_LDR_UNICONSTR_VIOLATE');
587: --raise_application_error(-20000,'UNIQUE_CONSTRAINT_VIOLATED');
588: end if;
589: else
590: l_code:=BSC_UPDATE_DIM.get_new_code(l_dim_table);
646: close cv;
647: if (l_code_number is not null) then
648: deleteNormalRow(l_dim_table, l_code_number);
649: else
650: l_message:=fnd_message.get_string('BSC','BSC_PMD_LDR_UNICONSTR_VIOLATE');
651: end if;
652: end if;
653: if (l_message is null) then
654: UsercodeChange:=checkUsercodeChange(l_dim_table, l_code, l_user_code);
759: l_message:=null;
760: exception
761: when others then
762: l_message:=null;
763: fnd_message.set_name('BSC','BSC_PMD_LDR_VIEW_NOT_EXIST');
764: fnd_message.set_token('VIEW_NAME',p_view_name);
765: l_message:=fnd_message.get;
766:
767:
760: exception
761: when others then
762: l_message:=null;
763: fnd_message.set_name('BSC','BSC_PMD_LDR_VIEW_NOT_EXIST');
764: fnd_message.set_token('VIEW_NAME',p_view_name);
765: l_message:=fnd_message.get;
766:
767:
768: end;
761: when others then
762: l_message:=null;
763: fnd_message.set_name('BSC','BSC_PMD_LDR_VIEW_NOT_EXIST');
764: fnd_message.set_token('VIEW_NAME',p_view_name);
765: l_message:=fnd_message.get;
766:
767:
768: end;
769:
775: l_message:=null;
776: exception
777: when others then
778: l_message:=null;
779: fnd_message.set_name('BSC','BSC_PMD_LDR_METADATACORRUPTION');
780: fnd_message.set_token('TABLE_NAME',p_table_name);
781: l_message:=fnd_message.get;
782:
783:
776: exception
777: when others then
778: l_message:=null;
779: fnd_message.set_name('BSC','BSC_PMD_LDR_METADATACORRUPTION');
780: fnd_message.set_token('TABLE_NAME',p_table_name);
781: l_message:=fnd_message.get;
782:
783:
784: end;
777: when others then
778: l_message:=null;
779: fnd_message.set_name('BSC','BSC_PMD_LDR_METADATACORRUPTION');
780: fnd_message.set_token('TABLE_NAME',p_table_name);
781: l_message:=fnd_message.get;
782:
783:
784: end;
785: