1 PACKAGE AMW_PROC_ORG_APPROVAL_PKG as
2 /*$Header: amwapogs.pls 120.1.12000000.1 2007/01/16 20:37:23 appldev ship $*/
3
4 APPROV_TXN_DATE date;
5
6
7 type tn is table of number;
8 type links_table is table of tn index by varchar2(50);
9 type index_tbl is table of pls_integer index by varchar2(80);
10 x_index_tbl index_tbl;
11 x_t1 links_table;
12 x_t2 links_table;
13
14 type t_valid_link is varray(3) of number;
15 type t_valid_lt is table of t_valid_link;
16 x_valid_links t_valid_lt;
17
18 type ltst_link_rec is record (parent_id amw_latest_hierarchies.parent_id%type,
19 child_id amw_latest_hierarchies.child_id%type,
20 child_order_number amw_latest_hierarchies.child_order_number%type);
21
22 type appr_link_rec is record (parent_id amw_latest_hierarchies.parent_id%type,
23 child_id amw_latest_hierarchies.child_id%type);
24
25
26 type ltst_links_tbl is table of ltst_link_rec;
27
28 type appr_links_tbl is table of appr_link_rec;
29 p_ltst_links_tbl ltst_links_tbl;
30 p_appr_links_tbl appr_links_tbl;
31
32 x_parent_tbl tn;
33 x_child_tbl tn;
34 x_child_ord_tbl tn;
35
36
37 procedure sub_for_approval (p_process_id in number, p_org_id in number);
38
39 procedure approve(p_process_id in number, p_org_id in number,
40 p_update_count in varchar2 := FND_API.G_TRUE);
41
42 procedure reject (p_process_id in number, p_org_id in number);
43
44 procedure check_hier_approved(p_process_id in number, p_org_id in number);
45
46 procedure approve_associations(p_process_id in number, p_org_id in number);
47
48 procedure write_approved_hierarchy(p_process_id in number, p_step in number, p_org_id in number,
49 p_appr_date in DATE := NULL);
50
51 procedure prod_err_unapr_obj_ass_ex (p_process_id in number,
52 p_org_id in number,
53 approve_option in varchar2,
54 raise_ex in varchar2,
55 p_result out nocopy varchar2,
56 p_out_mesg out nocopy varchar2 );
57
58 procedure autoapprove(
59 p_process_id in number,
60 p_org_id in number,
61 p_commit in varchar2 := FND_API.G_FALSE,
62 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
63 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
64 x_return_status out nocopy varchar2,
65 x_msg_count out nocopy number,
66 x_msg_data out nocopy varchar2 );
67
68 procedure check_hier_approved(p_process_id in number,
69 p_org_id in number,
70 p_result out nocopy varchar2,
71 p_out_mesg out nocopy varchar2);
72
73 procedure check_approval_subm_eligib(
74 p_process_id in number,
75 p_org_id in number,
76 p_result out nocopy varchar2,
77 p_out_mesg out nocopy varchar2,
78 p_commit in varchar2 := FND_API.G_FALSE,
79 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
80 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
81 x_return_status out nocopy varchar2,
82 x_msg_count out nocopy number,
83 x_msg_data out nocopy varchar2 );
84
85
86 -- ko Procedure to Approve the process Exceptions..
87 procedure approve_exceptions(p_org_id IN NUMBER, p_process_id IN NUMBER);
88
89 procedure added_rows(p_org_id IN NUMBER);
90
91 procedure invalid_rows(p_org_id IN NUMBER);
92
93 end AMW_PROC_ORG_APPROVAL_PKG;
94