[Home] [Help]
57: to_char(p.sequence) AS sequence,
58: ptl.override_label AS Button_label
59: FROM hr_navigation_node_usages NNU,
60: hr_navigation_node_usages NNU2,
61: hr_workflows W,
62: hr_navigation_units NU,
63: hr_navigation_nodes NN,
64: hr_navigation_units NU2,
65: hr_navigation_nodes NN2,
301: -- returns null.
302: function find_workflow_name( p_workflow_id in number ) return varchar2 is
303: cursor c1 is
304: select workflow_name
305: from hr_workflows
306: where workflow_id = p_workflow_id ;
307: l_return_value hr_workflows.workflow_name%type := null ;
308: begin
309: open c1 ;
303: cursor c1 is
304: select workflow_name
305: from hr_workflows
306: where workflow_id = p_workflow_id ;
307: l_return_value hr_workflows.workflow_name%type := null ;
308: begin
309: open c1 ;
310: fetch c1 into l_return_value ;
311: close c1 ;
316: -- Returns the id for a given workflow
317: function find_workflow_id( p_workflow_name in varchar2 ) return number is
318: cursor c1 is
319: select workflow_id
320: from hr_workflows
321: where workflow_name = p_workflow_name ;
322: l_return_value number := null ;
323: begin
324: open c1 ;
330:
331: procedure get_workflow_id (p_workflow_name varchar2) is
332: cursor id is
333: select workflow_id
334: from hr_workflows
335: where workflow_name = p_workflow_name;
336: begin
337: if p_workflow_name is not null then
338: open id;
381: procedure new_workflow (p_name varchar2) is
382: begin
383: get_workflow_id(p_name);
384: if ( current_workflow_id is null ) then
385: insert into hr_workflows (workflow_id, workflow_name)
386: values (hr_workflows_s.nextval, p_name);
387: get_workflow_id (p_name);
388: end if;
389: end new_workflow;
382: begin
383: get_workflow_id(p_name);
384: if ( current_workflow_id is null ) then
385: insert into hr_workflows (workflow_id, workflow_name)
386: values (hr_workflows_s.nextval, p_name);
387: get_workflow_id (p_name);
388: end if;
389: end new_workflow;
390: procedure new_nav_unit (