PACKAGE BODY: APPS.GMO_CERT_TRANS_DETAIL_DBL

Source

1 PACKAGE BODY gmo_cert_trans_detail_dbl AS
2 /* $Header: GMOVGCDB.pls 120.2 2011/02/24 12:27:35 srpuri ship $ */
3 
4    /* Global Variables */
5    g_table_name   VARCHAR2 (80) DEFAULT 'gmo_cert_trans_detail_dbl';
6 
7 /*============================================================================
8  |                         Copyright (c) 2001 Oracle Corporation
9  |                                 TVP, Reading
10  |                                  All rights reserved
11  =============================================================================
12  |   FILENAME
13  |      GMOVGCDB.pls
14  |
15  |   DESCRIPTION
16 
17  |   NOTES
18  |
19  |   HISTORY
20  |   12-MAR-07 Pawan Kumar   Created
21  |
22  |      - insert_row
23  |
24  =============================================================================
25 */
26 
27    /* Api start of comments
28  +============================================================================
29  |   FUNCTION NAME
30  |      insert_row
31  |
32  |   TYPE
33  |      Private
34  |   USAGE
35  |      Insert_Row will insert a row in gmo_cert_trans_detail
36  |
37  |
38  |   DESCRIPTION
39  |      Insert_Row will insert a row in gmo_cert_trans_detail
40  |
41  |   PARAMETERS
42  |
43  |
44  |   HISTORY
45  |   12-MAR-07 Pawan Kumar   Created
46  |
47  |
48  |
49  +=============================================================================
50  Api end of comments
51 */
52 
53    PROCEDURE INSERT_ROW (
54    p_trans_detail_id          IN OUT NOCOPY    NUMBER
55   ,p_operator_certificate_id  IN               NUMBER
56   ,p_header_id                IN               NUMBER
57   ,p_Qualification_id         IN               NUMBER
58   ,p_Qualification_type       IN               NUMBER
59   ,p_PROFICIENCY_LEVEL_ID     IN               NUMBER
60   ,x_return_Status          OUT   NOCOPY     VARCHAR2 ) IS
61 
62 
63 BEGIN
64    -- Initially let us assign the return status to success
65       x_return_status := fnd_api.g_ret_sts_success;
66 
67 
68 
69 
70      INSERT INTO gmo_operator_trans_detail
71                         (trans_detail_id
72                          ,operator_certificate_id
73                          ,header_id
74                          ,Qualification_id
75                          ,Qualification_type
76                          ,PROFICIENCY_LEVEL_ID
77                          )
78                  VALUES ( gmo_oc_object_trans_s.nextval
79                          ,p_operator_certificate_id
80                          ,p_header_id
81                          ,p_Qualification_id
82                          ,p_Qualification_type
83                          ,p_PROFICIENCY_LEVEL_ID
84 
85                          )
86         RETURNING trans_detail_id
87              INTO p_trans_detail_id ;
88 
89       IF SQL%NOTFOUND THEN
90              x_return_status := fnd_api.g_ret_sts_error;
91       END IF;
92 
93    EXCEPTION
94      WHEN FND_API.g_exc_error  THEN
95         --dbms_output.put_line(SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1, 255));
96          x_return_status := fnd_api.g_ret_sts_error;
97       WHEN OTHERS THEN
98       	x_return_status := fnd_api.g_ret_sts_unexp_error;
99          --dbms_output.put_line(SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1, 255));
100 
101    END insert_row;
102 
103 
104 
105 END gmo_cert_trans_detail_dbl;