PACKAGE BODY: APPS.GMO_OPERT_CERT_GTMP_DBL

Source

1 PACKAGE BODY gmo_opert_cert_gtmp_dbl AS
2 /* $Header: GMOVGCTB.pls 120.2 2011/02/24 12:28:04 srpuri ship $ */
3 
4    /* Global Variables */
5    g_table_name   VARCHAR2 (80) DEFAULT 'gmo_opert_cert_gtmp_dbl';
6 
7 /*============================================================================
8  |                         Copyright (c) 2001 Oracle Corporation
9  |                                 TVP, Reading
10  |                                  All rights reserved
11  =============================================================================
12  |   FILENAME
13  |      GMOVGCTB.pls
14  |
15  |   DESCRIPTION
16  |
17  |
18  |
19  |
20  |   NOTES
21  |
22  |   HISTORY
23  |   12-MAR-07 Pawan Kumar   Created
24  |
25  |      - insert_row
26  |
27  |
28  |
29  =============================================================================
30 */
31 
32    /* Api start of comments
33  +============================================================================
34  |   FUNCTION NAME
35  |      insert_row
36  |
37  |   TYPE
38  |      Private
39  |   USAGE
40  |      Insert_Row will insert a row in gmo_opert_cert_gtmp
41  |
42  |
43  |   DESCRIPTION
44  |      Insert_Row will insert a row in gmo_opert_cert_gtmp
45 
46  |   HISTORY
47  |   12-MAR-07 Pawan Kumar   Created
48  |
49  |
50  |
51  +=============================================================================
52  Api end of comments
53 */
54 
55    PROCEDURE INSERT_ROW (
56     p_ERECORD_ID               IN NUMBER
57    ,p_Operator_certificate_id  IN NUMBER
58    ,p_EVENT_KEY                IN VARCHAR2
59    ,p_EVENT_NAME               IN VARCHAR2
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_opert_cert_gtmp
71                          (ERECORD_ID
72                          ,Operator_certificate_id
73                          ,EVENT_KEY
74                          ,EVENT_NAME
75                          )
76                  VALUES ( p_ERECORD_ID
77                          ,p_Operator_certificate_id
78                          ,p_EVENT_KEY
79                          ,p_EVENT_NAME
80 
81                          ) ;
82 
83       IF SQL%NOTFOUND THEN
84              x_return_status := fnd_api.g_ret_sts_error;
85       END IF;
86 
87    EXCEPTION
88      WHEN FND_API.g_exc_error  THEN
89         --dbms_output.put_line(SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1, 255));
90           x_return_status := fnd_api.g_ret_sts_error;
91       WHEN OTHERS THEN
92       	x_return_status := fnd_api.g_ret_sts_unexp_error;
93          --dbms_output.put_line(SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1, 255));
94 
95    END insert_row;
96 
97 
98 
99 END gmo_opert_cert_gtmp_dbl;