15: Item_Key is
16: /*IS
17: l_key varchar2(240);
18: BEGIN
19: SELECT p_event_name ||'-'|| JTF_AM_WF_SR_EVENT_S.nextval INTO l_key FROM DUAL;
20: RETURN l_key;
21: END item_key;*/
22:
23: /*************************End of Comments***********************/
33: l_str varchar2(1000);
34: l_doc_type varchar2(10);
35: l_sequence varchar2(10);
36: BEGIN
37: SELECT Upper(Substr(p_event_name,22,(Instr(p_event_name,'.',1,5)-22))) into l_doc_type from dual;
38: l_str:='SELECT JTF_AM_WF_'||l_doc_type||'_EVENT_S.nextval FROM DUAL';
39: EXECUTE IMMEDIATE l_str Into l_sequence;
40: l_key:=p_event_name ||'-'|| l_sequence;
41: RETURN l_key;
34: l_doc_type varchar2(10);
35: l_sequence varchar2(10);
36: BEGIN
37: SELECT Upper(Substr(p_event_name,22,(Instr(p_event_name,'.',1,5)-22))) into l_doc_type from dual;
38: l_str:='SELECT JTF_AM_WF_'||l_doc_type||'_EVENT_S.nextval FROM DUAL';
39: EXECUTE IMMEDIATE l_str Into l_sequence;
40: l_key:=p_event_name ||'-'|| l_sequence;
41: RETURN l_key;
42: END item_key;