DBA Data[Home] [Help]

APPS.IBY_ECAPP_PKG dependencies on IBY_ECAPP

Line 1: package body iby_ecapp_pkg as

1: package body iby_ecapp_pkg as
2: /*$Header: ibyecapb.pls 115.11 2002/11/18 22:04:50 jleybovi ship $*/
3:
4:
5: /*

Line 14: iby_ecapp.application_short_name%type,

10: **
11: ** not case sensitive
12: */
13: function ecappShortNameExists(i_app_short_name
14: iby_ecapp.application_short_name%type,
15: o_ecappid out nocopy iby_ecapp.ecappid%type)
16: return boolean
17:
18: is

Line 15: o_ecappid out nocopy iby_ecapp.ecappid%type)

11: ** not case sensitive
12: */
13: function ecappShortNameExists(i_app_short_name
14: iby_ecapp.application_short_name%type,
15: o_ecappid out nocopy iby_ecapp.ecappid%type)
16: return boolean
17:
18: is
19: l_app_short_name iby_ecapp.application_short_name%type;

Line 19: l_app_short_name iby_ecapp.application_short_name%type;

15: o_ecappid out nocopy iby_ecapp.ecappid%type)
16: return boolean
17:
18: is
19: l_app_short_name iby_ecapp.application_short_name%type;
20: l_flag boolean := false;
21:
22: cursor c_app_short_name (ci_app_short_name
23: iby_ecapp.application_short_name%type)

Line 23: iby_ecapp.application_short_name%type)

19: l_app_short_name iby_ecapp.application_short_name%type;
20: l_flag boolean := false;
21:
22: cursor c_app_short_name (ci_app_short_name
23: iby_ecapp.application_short_name%type)
24: is
25: SELECT application_short_name, ecappid
26: FROM iby_ecapp_v
27: WHERE UPPER(application_short_name) = UPPER(ci_app_short_name);

Line 26: FROM iby_ecapp_v

22: cursor c_app_short_name (ci_app_short_name
23: iby_ecapp.application_short_name%type)
24: is
25: SELECT application_short_name, ecappid
26: FROM iby_ecapp_v
27: WHERE UPPER(application_short_name) = UPPER(ci_app_short_name);
28:
29: begin
30:

Line 51: function ecappExists(i_ecappid in iby_ecapp.ecappid%type)

47: /*
48: ** Function: ecappExists.
49: ** Purpose: Check if the specified ecappid exists or not.
50: */
51: function ecappExists(i_ecappid in iby_ecapp.ecappid%type)
52: return boolean
53: is
54: l_ecappid iby_ecapp.ecappid%type;
55: l_flag boolean := false;

Line 54: l_ecappid iby_ecapp.ecappid%type;

50: */
51: function ecappExists(i_ecappid in iby_ecapp.ecappid%type)
52: return boolean
53: is
54: l_ecappid iby_ecapp.ecappid%type;
55: l_flag boolean := false;
56:
57: cursor c_ecappid
58: (ci_ecappid iby_ecapp.ecappid%type)

Line 58: (ci_ecappid iby_ecapp.ecappid%type)

54: l_ecappid iby_ecapp.ecappid%type;
55: l_flag boolean := false;
56:
57: cursor c_ecappid
58: (ci_ecappid iby_ecapp.ecappid%type)
59: is
60: SELECT ecappid
61: FROM iby_ecapp_v
62: WHERE ecappid = ci_ecappid;

Line 61: FROM iby_ecapp_v

57: cursor c_ecappid
58: (ci_ecappid iby_ecapp.ecappid%type)
59: is
60: SELECT ecappid
61: FROM iby_ecapp_v
62: WHERE ecappid = ci_ecappid;
63: begin
64: if ( c_ecappid%isopen) then
65: close c_ecappid;

Line 88: procedure createEcApp(i_ecappname iby_ecapp.name%type,

84: ** In : i_ecappname
85: ** Out : io_ecappid.
86: **
87: */
88: procedure createEcApp(i_ecappname iby_ecapp.name%type,
89: i_app_short_name iby_ecapp.application_short_name%type,
90: io_ecappid in out nocopy iby_ecapp.ecappid%type)
91: is
92: NO_SEQUENCE_FOUND EXCEPTION;

Line 89: i_app_short_name iby_ecapp.application_short_name%type,

85: ** Out : io_ecappid.
86: **
87: */
88: procedure createEcApp(i_ecappname iby_ecapp.name%type,
89: i_app_short_name iby_ecapp.application_short_name%type,
90: io_ecappid in out nocopy iby_ecapp.ecappid%type)
91: is
92: NO_SEQUENCE_FOUND EXCEPTION;
93: cursor c_ecappid is

Line 90: io_ecappid in out nocopy iby_ecapp.ecappid%type)

86: **
87: */
88: procedure createEcApp(i_ecappname iby_ecapp.name%type,
89: i_app_short_name iby_ecapp.application_short_name%type,
90: io_ecappid in out nocopy iby_ecapp.ecappid%type)
91: is
92: NO_SEQUENCE_FOUND EXCEPTION;
93: cursor c_ecappid is
94: select iby_ecapp_s.nextval from dual;

Line 94: select iby_ecapp_s.nextval from dual;

90: io_ecappid in out nocopy iby_ecapp.ecappid%type)
91: is
92: NO_SEQUENCE_FOUND EXCEPTION;
93: cursor c_ecappid is
94: select iby_ecapp_s.nextval from dual;
95:
96: l_dummy iby_ecapp.ecappid%type;
97:
98: begin

Line 96: l_dummy iby_ecapp.ecappid%type;

92: NO_SEQUENCE_FOUND EXCEPTION;
93: cursor c_ecappid is
94: select iby_ecapp_s.nextval from dual;
95:
96: l_dummy iby_ecapp.ecappid%type;
97:
98: begin
99: if ( c_ecappid%isopen ) then
100: close c_ecappid;

Line 112: INSERT into iby_ecapp (ecappid, name, application_short_name,

108: 'IBY_20551#',
109: FALSE);
110: end if;
111:
112: INSERT into iby_ecapp (ecappid, name, application_short_name,
113: last_update_date, last_updated_by, creation_date, created_by,
114: last_update_login, object_version_number)
115: VALUES ( io_ecappid, i_ecappname, i_app_short_name,
116: sysdate, fnd_global.user_id, sysdate, fnd_global.user_id,

Line 132: procedure modEcApp(i_ecappid iby_ecapp.ecappid%type,

128: ** In : i_ecappid, i_ecappname
129: ** Out : None
130: **
131: */
132: procedure modEcApp(i_ecappid iby_ecapp.ecappid%type,
133: i_ecappname iby_ecapp.name%type,
134: i_app_short_name iby_ecapp.application_short_name%type,
135: i_object_version iby_ecapp.object_version_number%type)
136: is

Line 133: i_ecappname iby_ecapp.name%type,

129: ** Out : None
130: **
131: */
132: procedure modEcApp(i_ecappid iby_ecapp.ecappid%type,
133: i_ecappname iby_ecapp.name%type,
134: i_app_short_name iby_ecapp.application_short_name%type,
135: i_object_version iby_ecapp.object_version_number%type)
136: is
137:

Line 134: i_app_short_name iby_ecapp.application_short_name%type,

130: **
131: */
132: procedure modEcApp(i_ecappid iby_ecapp.ecappid%type,
133: i_ecappname iby_ecapp.name%type,
134: i_app_short_name iby_ecapp.application_short_name%type,
135: i_object_version iby_ecapp.object_version_number%type)
136: is
137:
138: l_ecappid iby_ecapp.ecappid%type;

Line 135: i_object_version iby_ecapp.object_version_number%type)

131: */
132: procedure modEcApp(i_ecappid iby_ecapp.ecappid%type,
133: i_ecappname iby_ecapp.name%type,
134: i_app_short_name iby_ecapp.application_short_name%type,
135: i_object_version iby_ecapp.object_version_number%type)
136: is
137:
138: l_ecappid iby_ecapp.ecappid%type;
139:

Line 138: l_ecappid iby_ecapp.ecappid%type;

134: i_app_short_name iby_ecapp.application_short_name%type,
135: i_object_version iby_ecapp.object_version_number%type)
136: is
137:
138: l_ecappid iby_ecapp.ecappid%type;
139:
140: begin
141:
142: -- check the uniqueness of the application short name

Line 156: UPDATE iby_ecapp

152: */
153: --- update only if the object_version_number is correct
154: if (i_object_version < 0) then
155: -- no check in object version number in this case
156: UPDATE iby_ecapp
157: SET name = i_ecappname, application_short_name = i_app_short_name,
158: last_update_date = sysdate,
159: last_update_login = fnd_global.login_id,
160: object_version_number = object_version_number + 1

Line 163: UPDATE iby_ecapp

159: last_update_login = fnd_global.login_id,
160: object_version_number = object_version_number + 1
161: WHERE ecappid = i_ecappid ;
162: else
163: UPDATE iby_ecapp
164: SET name = i_ecappname, application_short_name = i_app_short_name,
165: last_update_date = sysdate,
166: last_update_login = fnd_global.login_id,
167: object_version_number = object_version_number + 1

Line 184: end iby_ecapp_pkg;

180: end if;
181:
182: commit;
183: end modecapp;
184: end iby_ecapp_pkg;