502: l_sqlerrm varchar2(240);
503:
504: begin
505:
506: FND_MESSAGE.SET_NAME('PJI', 'PJI_SUM_CLEANALL_FAILED');
507:
508: if (upper(nvl(p_check, 'N')) <> 'Y') then
509: pji_utils.write2out(FND_MESSAGE.GET);
510: commit;
505:
506: FND_MESSAGE.SET_NAME('PJI', 'PJI_SUM_CLEANALL_FAILED');
507:
508: if (upper(nvl(p_check, 'N')) <> 'Y') then
509: pji_utils.write2out(FND_MESSAGE.GET);
510: commit;
511: retcode := 1;
512: return;
513: end if;