1 PACKAGE BODY PA_CLIENT_EXTN_ASGMT_WF AS
2 -- $Header: PARAWFCB.pls 120.2 2006/06/28 07:28:51 sunkalya noship $
3
4
5
6 PROCEDURE Generate_Assignment_Approvers
7 (p_assignment_id IN NUMBER
8 ,p_project_id IN NUMBER
9 ,p_in_list_of_approvers IN Users_List_tbltyp
10 ,x_out_list_of_approvers OUT NOCOPY Users_List_tbltyp -- For 1159 mandate changes bug#2674619
11 ,x_number_of_approvers OUT NOCOPY NUMBER ) IS --File.Sql.39 bug 4440895
12 BEGIN
13 -- This procedure , by default, returns the input approvers
14 -- as output. You could customize this code to add or modify
15 -- more approvers, as necessary. You must ensure that both
16 -- x_out_list_of_approvers and x_number_of_approvers are properly
17 -- populated. The calling apis used by Oracle Projects and Oracle
18 -- Oracle Project Resource Management would use the output values
19
20 x_out_list_of_approvers := p_in_list_of_approvers;
21 IF p_in_list_of_approvers.EXISTS(1) THEN
22 x_number_of_approvers := p_in_list_of_approvers.COUNT;
23 ELSE
24 x_number_of_approvers := 0;
25 END IF;
26 END Generate_Assignment_Approvers;
27
28 PROCEDURE Generate_NF_Recipients
29 ( p_assignment_id IN NUMBER
30 ,p_project_id IN NUMBER
31 ,p_notification_type IN VARCHAR2
32 ,p_in_list_of_recipients IN Users_List_tbltyp
33 ,x_out_list_of_recipients OUT NOCOPY Users_List_tbltyp -- For 1159 mandate changes bug#2674619
34 ,x_number_of_recipients OUT NOCOPY NUMBER ) IS --File.Sql.39 bug 4440895
35 BEGIN
36 -- This procedure , by default, returns the input recipients
37 -- as output. You could customize this code to add or modify
38 -- more recipients, as necessary. You must ensure that both
39 -- x_out_list_of_recipients and x_number_of_recipients are properly
40 -- populated. The calling apis used by Oracle Projects and Oracle
41 -- Oracle Project Resource Management would use the output values
42 -- You can use the p_notification_type parameter to distinguish
43 -- between different types of notifications
44 -- valid values in p_notification_type are 'APPROVAL_FYI'
45 -- and 'REJECTION_FYI'
46 x_out_list_of_recipients := p_in_list_of_recipients;
47 IF p_in_list_of_recipients.EXISTS(1) THEN
48 x_number_of_recipients := p_in_list_of_recipients.COUNT;
49 ELSE
50 x_number_of_recipients := 0;
51 END IF;
52 END Generate_NF_Recipients;
53
54 PROCEDURE Set_Timeout_And_Reminders
55 ( p_assignment_id IN NUMBER
56 ,p_project_id IN NUMBER
57 ,x_waiting_time OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
58 ,x_number_of_reminders OUT NOCOPY NUMBER ) IS --File.Sql.39 bug 4440895
59 BEGIN
60 -- This procedure returns the following
61 -- x_waiting_time - This is expressed in minutes and indicates
62 -- the time the process has to wait before reminding
63 -- the approver when the approver fails to respond
64 -- to the approval notification.
65 -- Note that the default supplied with the product is
66 -- 3 days , which is expressed in minutes
67 -- as (3*24*60) = 4320. If you wish to change
68 -- this , you would have to calculate the minutes
69 -- appropriately. Note that the waiting time , referred to as
70 -- timeouts by Oracle Workflow, has to be expressed in minutes
71 -- only
72
73 -- x_number_of_reminders - This indicates the number of times the approval
74 -- has to remind the approver who has not responded
75 -- to the approval notification
76 -- By default this value is set to 3
77 -- Based on the defaults, the approval process would wait for 3 days
78 -- before issuing the first reminder. It will then issue two more reminders
79 -- before cancelling the notification and the project manager would be informed
80 -- of such cancellation
81
82 x_waiting_time := 4320;
83 x_number_of_reminders := 3;
84
85 EXCEPTION
86 WHEN OTHERS THEN RAISE;
87 END Set_Timeout_And_Reminders;
88
89 END PA_CLIENT_EXTN_ASGMT_WF ;