1623: return(null);
1624: end getHandlerRuleType;
1625: function getHandlerState(handlerNameIn in varchar2,
1626: parameterIn in varchar2 default null) return varchar2 as
1627: handlerName ame_temp_handler_states.handler_name%type;
1628: tempState ame_temp_handler_states.state%type;
1629: begin
1630: handlerName := upper(handlerNameIn);
1631: select state
1624: end getHandlerRuleType;
1625: function getHandlerState(handlerNameIn in varchar2,
1626: parameterIn in varchar2 default null) return varchar2 as
1627: handlerName ame_temp_handler_states.handler_name%type;
1628: tempState ame_temp_handler_states.state%type;
1629: begin
1630: handlerName := upper(handlerNameIn);
1631: select state
1632: into tempState
1629: begin
1630: handlerName := upper(handlerNameIn);
1631: select state
1632: into tempState
1633: from ame_temp_handler_states
1634: where
1635: handler_name = handlerName and
1636: ((application_id is null and engAmeApplicationId is null) or
1637: (application_id = engAmeApplicationId)) and
2588: end checkApprover;
2589: --+
2590: procedure clearHandlerState(handlerNameIn in varchar2,
2591: parameterIn in varchar2 default null) as
2592: handlerName ame_temp_handler_states.handler_name%type;
2593: begin
2594: handlerName := upper(handlerNameIn);
2595: delete
2596: from ame_temp_handler_states
2592: handlerName ame_temp_handler_states.handler_name%type;
2593: begin
2594: handlerName := upper(handlerNameIn);
2595: delete
2596: from ame_temp_handler_states
2597: where
2598: handler_name = handlerName and
2599: application_id = engAmeApplicationId and
2600: ((parameter is null and parameterIn is null) or
11857: stateIn in varchar2 default null) as
11858: argumentLengthException exception;
11859: errorCode integer;
11860: errorMessage ame_util.longestStringType;
11861: handlerName ame_temp_handler_states.handler_name%type;
11862: begin
11863: if(lengthb(stateIn) > 100 or
11864: lengthb(parameterIn) > 100) then
11865: raise argumentLengthException;
11865: raise argumentLengthException;
11866: end if;
11867: handlerName := upper(handlerNameIn);
11868: delete
11869: from ame_temp_handler_states
11870: where
11871: handler_name = handlerName and
11872: application_id = engAmeApplicationId and
11873: ((parameter is null and parameterIn is null) or
11871: handler_name = handlerName and
11872: application_id = engAmeApplicationId and
11873: ((parameter is null and parameterIn is null) or
11874: (parameter = parameterIn));
11875: insert into ame_temp_handler_states(
11876: handler_name,
11877: row_timestamp,
11878: application_id,
11879: parameter,