1: package body ame_position_level_handler as
2: /* $Header: ameeplha.pkb 120.5 2007/12/20 20:03:41 prasashe noship $ */
3: /* package variables */
4: approverCategories ame_util.charList;
5: parametersCount integer;
88: errorMessage := ame_util.getMessage(applicationShortNameIn => 'PER',
89: messageNameIn => 'AME_400407_NO_PARENT_POSITION',
90: tokenNameOneIn => 'POSITION',
91: tokenValueOneIn => substrb(approverDescription, 1,70));
92: ame_util.runtimeException(packageNameIn => 'ame_position_level_handler',
93: routineNameIn => 'getNextPosition',
94: exceptionNumberIn => errorCode,
95: exceptionStringIn => errorMessage);
96: raise_application_error(errorCode,
96: raise_application_error(errorCode,
97: errorMessage);
98: return(null);
99: when others then
100: ame_util.runtimeException(packageNameIn => 'ame_position_level_handler',
101: routineNameIn => 'getNextPosition',
102: exceptionNumberIn => sqlcode,
103: exceptionStringIn => sqlerrm);
104: raise;
192: when others then
193: categoryOut := null;
194: hasFinalAuthorityYNOut := null;
195: sourceOut := null;
196: ame_util.runtimeException(packageNameIn => 'ame_position_level_handler',
197: routineNameIn => 'getCatSourceAndAuthority',
198: exceptionNumberIn => sqlcode,
199: exceptionStringIn => sqlerrm);
200: raise;
422: when nullFirstIdException then
423: errorCode := -20001;
424: errorMessage := ame_util.getMessage(applicationShortNameIn => 'PER',
425: messageNameIn => 'AME_400408_HAN_NO_TRANS_POS_ID');
426: ame_util.runtimeException(packageNameIn => 'ame_position_level_handler',
427: routineNameIn => 'handler',
428: exceptionNumberIn => errorCode,
429: exceptionStringIn => errorMessage);
430: raise_application_error(errorCode,
432: when topDogRequestorException then
433: errorCode := -20001;
434: errorMessage := ame_util.getMessage(applicationShortNameIn => 'PER',
435: messageNameIn => 'AME_400421_REQ_CANNOT_APPROVE');
436: ame_util.runtimeException(packageNameIn => 'ame_position_level_handler',
437: routineNameIn => 'handler',
438: exceptionNumberIn => errorCode,
439: exceptionStringIn => errorMessage);
440: raise_application_error(errorCode,
439: exceptionStringIn => errorMessage);
440: raise_application_error(errorCode,
441: errorMessage);
442: when others then
443: ame_util.runtimeException(packageNameIn => 'ame_position_level_handler',
444: routineNameIn => 'handler',
445: exceptionNumberIn => sqlcode,
446: exceptionStringIn => sqlerrm);
447: raise;
509: when badParameterException then
510: errorCode := -20001;
511: errorMessage := ame_util.getMessage(applicationShortNameIn => 'PER',
512: messageNameIn => 'AME_400234_HAN_ACT_PAR_SIGN');
513: ame_util.runtimeException(packageNameIn => 'ame_position_level_handler',
514: routineNameIn => 'parseAndSortRules',
515: exceptionNumberIn => errorCode,
516: exceptionStringIn => errorMessage);
517: raise_application_error(errorCode,
516: exceptionStringIn => errorMessage);
517: raise_application_error(errorCode,
518: errorMessage);
519: when others then
520: ame_util.runtimeException(packageNameIn => 'ame_position_level_handler',
521: routineNameIn => 'parseAndSortRules',
522: exceptionNumberIn => sqlcode,
523: exceptionStringIn => sqlerrm);
524: raise;
522: exceptionNumberIn => sqlcode,
523: exceptionStringIn => sqlerrm);
524: raise;
525: end parseAndSortRules;
526: end ame_position_level_handler;