[Home] [Help]
1: package body FND_CONC_SSWA as
2: /* $Header: AFCPSSUB.pls 120.7.12020000.2 2012/11/07 22:01:31 ckclark ship $ */
3:
4:
5: --
3:
4:
5: --
6: -- Package
7: -- FND_CONC_SSWA
8: -- Purpose
9: -- Utilities for the Concurrent SelfService Web Applications
10: -- History
11: --
45: --
46: -- Name
47: -- map_attr_to_arg
48: -- Purpose
49: -- Maps the application column name attribute in fnd_concurrent requests
50: -- to the enabled arguments of the program's desc flexfield
51:
52:
53:
110: g_request_id := reqid;
111:
112: -- check if there are more than 25 argument
113: select count(*) into g_arg_count
114: from fnd_conc_request_arguments
115: where request_id = reqid;
116:
117: -- clear global array
118: attr_counter := 1;
124: end loop;
125:
126: select r.program_application_id , p.concurrent_program_name
127: into app_id, prog_short_name
128: from fnd_concurrent_requests r, fnd_concurrent_programs p
129: where r.request_id = reqid
130: and r.concurrent_program_id = p.concurrent_program_id
131: and r.program_application_id = p.application_id;
132:
176: args(13), args(14), args(15), args(16),
177: args(17), args(18), args(19), args(20),
178: args(21), args(22), args(23), args(24),
179: args(25)
180: from fnd_concurrent_requests
181: where request_id = reqid;
182:
183: if (g_arg_count <> 0) then
184: select argument26,argument27,argument28,
211: args(81),args(82),args(83),args(84),args(85),
212: args(86),args(87),args(88),args(89),args(90),
213: args(91),args(92),args(93),args(94),args(95),
214: args(96),args(97),args(98),args(99),args(100)
215: from fnd_conc_request_arguments
216: where request_id = reqid;
217: end if;
218:
219: last_attr_disabled := 0;
257: upcode varchar2(1);
258:
259: begin
260:
261: fnd_conc_request_pkg.get_phase_status(pcode, scode, hold, enbld,
262: null, stdate, rid,
263: req_phase, req_status,
264: upcode, req_status_code);
265:
451:
452: /* If this is a temp schedule, erase the name */
453: SELECT COUNT(*)
454: into cnt
455: from FND_CONC_RELEASE_CLASSES
456: WHERE OWNER_REQ_ID is not null
457: AND RELEASE_CLASS_NAME = schedule_name
458: AND rownum < 2;
459:
467: elsif schedule_type = 'P' then
468: if my_schedule_name is null then
469: select resubmit_interval, resubmit_interval_unit_code
470: into interval, int_unit
471: from fnd_concurrent_requests
472: where request_id = req_id;
473: if date2 is null then
474: fnd_message.set_name('FND','SCH-PERIODIC NO END DATE');
475: fnd_message.set_token('UNIT_INTERVAL', to_char(interval));
669: sch_curr_values, sch_type
670: into l_sch_id, l_sch_exists, l_sch_perm, l_sch_owner_req_id,
671: l_requested_start_date, l_request_date, l_sch_date1, l_sch_date2,
672: l_sch_name, l_sch_curr_values, l_sch_type
673: from fnd_conc_requests_form_v
674: where request_id = get_sch_desc.request_id;
675:
676:
677:
762: function get_notifications(request_id in number) return varchar2 is
763:
764: cursor notifications(req_id number) is
765: select substrb(display_name,1,80) dname
766: from fnd_conc_pp_actions pp,
767: wf_roles wf
768: where pp.concurrent_request_id = req_id
769: and pp.action_type = 2
770: and wf.orig_system_id = pp.orig_system_id
791: return null;
792: end;
793:
794: -- This function will return request diagnostics for a given request_id.
795: -- This is a wrapper on top of fnd_conc.diagnose procedure.
796:
797: function diagnostics( request_id IN number ) return varchar2 is
798: phase varchar2(80);
799: status varchar2(80);
798: phase varchar2(80);
799: status varchar2(80);
800: diag varchar2(2000);
801: begin
802: fnd_conc.diagnose(request_id, phase, status, diag );
803:
804: return diag;
805: end;
806:
820: (select R.phase_code,
821: decode(nvl(A.Action_type,0), 6, O.file_name, R.outfile_name),
822: decode(nvl(A.action_type,0), 6, O.file_size, R.ofile_size),
823: R.save_output_flag
824: from fnd_concurrent_requests R,
825: fnd_conc_pp_actions A,
826: fnd_conc_req_outputs O
827: where R.request_id = A.concurrent_request_id (+)
828: and R.request_id = O.concurrent_request_id (+)
821: decode(nvl(A.Action_type,0), 6, O.file_name, R.outfile_name),
822: decode(nvl(A.action_type,0), 6, O.file_size, R.ofile_size),
823: R.save_output_flag
824: from fnd_concurrent_requests R,
825: fnd_conc_pp_actions A,
826: fnd_conc_req_outputs O
827: where R.request_id = A.concurrent_request_id (+)
828: and R.request_id = O.concurrent_request_id (+)
829: and R.request_id = req_id
822: decode(nvl(A.action_type,0), 6, O.file_size, R.ofile_size),
823: R.save_output_flag
824: from fnd_concurrent_requests R,
825: fnd_conc_pp_actions A,
826: fnd_conc_req_outputs O
827: where R.request_id = A.concurrent_request_id (+)
828: and R.request_id = O.concurrent_request_id (+)
829: and R.request_id = req_id
830: order by A.action_type desc)
881: --
882: function layout_enabled ( ProgramApplName varchar2,
883: ProgramShortName varchar2) return boolean is
884: sqlstmt varchar2(1000) := 'select count(*) from ' ||
885: ' xdo_templates_vl T, fnd_concurrent_programs P, ' ||
886: ' fnd_application A , xdo_ds_definitions_vl D ' ||
887: ' where T.ds_app_short_name= :1 and T.data_source_code= :2 ' ||
888: ' and T.template_status = ''E'' ' ||
889: ' and D.data_source_status = ''E'' ' ||
954: return FALSE;
955:
956: end;
957:
958: end FND_CONC_SSWA;