[Home] [Help]
PACKAGE BODY: APPS.PAY_PATCH_STATUS_PKG
Source
1 package body pay_patch_status_pkg as
2 /* $Header: pycoppst.pkb 120.0 2005/05/29 04:08 appldev noship $ */
3 --
4 /*
5 Name
6 get_result_value
7 Description
8
9 This function is used to retrieve the run result value in
10 a sparse matrix solution.
11 */
12 procedure ins_patch_status(p_patch_id out nocopy number,
13 p_patch_number in number,
14 p_patch_name in varchar2,
15 p_phase in varchar2,
16 p_patch_type in varchar2,
17 p_status in varchar2,
18 p_description in varchar2,
19 p_legislation_code in varchar2,
20 p_application_release in varchar2,
21 p_prereq_patch_name in varchar2)
22 is
23 l_patch_id number;
24 begin
25 --
26 select id
27 into l_patch_id
28 from pay_patch_status
29 where patch_number = p_patch_number;
30 --
31 exception
32 when no_data_found then
33 --
34 select pay_patch_status_s.nextval
35 into l_patch_id
36 from dual;
37 --
38 insert into pay_patch_status
39 (ID,
40 PATCH_NUMBER,
41 PATCH_NAME,
42 PHASE,
43 PROCESS_TYPE,
44 APPLIED_DATE,
45 STATUS,
46 DESCRIPTION,
47 UPDATE_DATE,
48 LEGISLATION_CODE,
49 APPLICATION_RELEASE,
50 PREREQ_PATCH_NAME
51 )
52 values
53 (l_patch_id,
54 p_patch_number,
55 p_patch_name,
56 p_phase,
57 p_patch_type,
58 sysdate,
59 p_status,
60 p_description,
61 sysdate,
62 p_legislation_code,
63 p_application_release,
64 p_prereq_patch_name
65 );
66 --
67 p_patch_id := l_patch_id;
68 --
69 end ins_patch_status;
70 --
71 end pay_patch_status_pkg;