DBA Data[Home] [Help]

APPS.JTF_PERZ_PROFILE_PVT dependencies on JTF_PERZ_PROFILE

Line 1: PACKAGE BODY JTF_PERZ_PROFILE_PVT as

1: PACKAGE BODY JTF_PERZ_PROFILE_PVT as
2: /* $Header: jtfzvpfb.pls 120.2 2005/11/02 22:47:33 skothe ship $ */
3: --
4: --
5: -- Start of Comments

Line 9: -- JTF_PERZ_PROFILE_PVT

5: -- Start of Comments
6: --
7: -- NAME
8: --
9: -- JTF_PERZ_PROFILE_PVT
10: --
11: -- PURPOSE
12: -- Private API for managing common functionality across the personalization
13: -- framework.

Line 38: -- Updated insert_row_jtf_perz_profile(), insert_row_profile_attrib().

34: -- * commented the profile id and attribute id lines
35: -- * specified IN, IN OUTs for the parameters
36: -- * where clause must use the profile id and attribute name instead of rowid
37: -- 09/30/99 SMATTEGU Updated the create_profile() to handle profile_id also.
38: -- Updated insert_row_jtf_perz_profile(), insert_row_profile_attrib().
39: --
40: -- 11/04/99 SMATTEGU Changing the names to suite the standards and adding who columns
41: --
42: -- End of Comments

Line 44: G_PKG_NAME CONSTANT VARCHAR2(30):='JTF_PERZ_PROFILE_PVT';

40: -- 11/04/99 SMATTEGU Changing the names to suite the standards and adding who columns
41: --
42: -- End of Comments
43:
44: G_PKG_NAME CONSTANT VARCHAR2(30):='JTF_PERZ_PROFILE_PVT';
45: G_FILE_NAME CONSTANT VARCHAR2(12):='asxvzpfb.pls';
46:
47:
48: G_LOGIN_ID NUMBER := FND_GLOBAL.CONC_LOGIN_ID;

Line 55: -- 1. insert_row_jtf_perz_profile()

51:
52: -- ****************************************************************************
53: -- ****************************************************************************
54: -- TABLE HANDLERS
55: -- 1. insert_row_jtf_perz_profile()
56: -- 2. update_row_jtf_perz_profile()
57: -- 4. delete_row_jtf_perz_profile()
58: -- 5. update_row_profile_attrib()
59: -- 6. insert_row_profile_attrib()

Line 56: -- 2. update_row_jtf_perz_profile()

52: -- ****************************************************************************
53: -- ****************************************************************************
54: -- TABLE HANDLERS
55: -- 1. insert_row_jtf_perz_profile()
56: -- 2. update_row_jtf_perz_profile()
57: -- 4. delete_row_jtf_perz_profile()
58: -- 5. update_row_profile_attrib()
59: -- 6. insert_row_profile_attrib()
60: -- 7. delete_row_profile_attrib()

Line 57: -- 4. delete_row_jtf_perz_profile()

53: -- ****************************************************************************
54: -- TABLE HANDLERS
55: -- 1. insert_row_jtf_perz_profile()
56: -- 2. update_row_jtf_perz_profile()
57: -- 4. delete_row_jtf_perz_profile()
58: -- 5. update_row_profile_attrib()
59: -- 6. insert_row_profile_attrib()
60: -- 7. delete_row_profile_attrib()
61: --

Line 64: PROCEDURE insert_row_jtf_perz_profile(

60: -- 7. delete_row_profile_attrib()
61: --
62: -- ****************************************************************************
63:
64: PROCEDURE insert_row_jtf_perz_profile(
65: X_ROWID OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
66: x_PROFILE_ID IN OUT NOCOPY /* file.sql.39 change */ NUMBER,
67: x_PROFILE_NAME IN VARCHAR2,
68: x_PROFILE_TYPE IN VARCHAR2,

Line 74: CURSOR C IS SELECT rowid FROM JTF_PERZ_PROFILE

70: x_ACTIVE_FLAG IN VARCHAR2,
71: p_OBJECT_VERSION_NUMBER IN NUMBER
72: ) IS
73:
74: CURSOR C IS SELECT rowid FROM JTF_PERZ_PROFILE
75: WHERE PROFILE_ID = x_PROFILE_ID;
76:
77: CURSOR C2 IS SELECT JTF_PERZ_PROFILE_S.NEXTVAL FROM SYS.DUAL;
78:

Line 77: CURSOR C2 IS SELECT JTF_PERZ_PROFILE_S.NEXTVAL FROM SYS.DUAL;

73:
74: CURSOR C IS SELECT rowid FROM JTF_PERZ_PROFILE
75: WHERE PROFILE_ID = x_PROFILE_ID;
76:
77: CURSOR C2 IS SELECT JTF_PERZ_PROFILE_S.NEXTVAL FROM SYS.DUAL;
78:
79: BEGIN
80:
81: IF (X_PROFILE_ID IS NULL) OR ( X_PROFILE_ID = FND_API.G_MISS_NUM) THEN

Line 87: INSERT INTO JTF_PERZ_PROFILE(

83: FETCH C2 INTO X_PROFILE_ID;
84: CLOSE C2;
85: END IF;
86:
87: INSERT INTO JTF_PERZ_PROFILE(
88: PROFILE_ID,
89: PROFILE_NAME,
90: PROFILE_TYPE,
91: PROFILE_DESCRIPTION,

Line 113: END insert_row_jtf_perz_profile;

109: CLOSE C;
110: RAISE NO_DATA_FOUND;
111: END IF;
112:
113: END insert_row_jtf_perz_profile;
114: -- ****************************************************************************
115: --
116: -- Procedure to UPDATE a row in the JTF_PERZ_PROFILE table
117: --

Line 116: -- Procedure to UPDATE a row in the JTF_PERZ_PROFILE table

112:
113: END insert_row_jtf_perz_profile;
114: -- ****************************************************************************
115: --
116: -- Procedure to UPDATE a row in the JTF_PERZ_PROFILE table
117: --
118:
119: PROCEDURE update_row_jtf_perz_profile(
120: X_ROWID IN OUT NOCOPY /* file.sql.39 change */ VARCHAR2,

Line 119: PROCEDURE update_row_jtf_perz_profile(

115: --
116: -- Procedure to UPDATE a row in the JTF_PERZ_PROFILE table
117: --
118:
119: PROCEDURE update_row_jtf_perz_profile(
120: X_ROWID IN OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
121: x_PROFILE_ID IN OUT NOCOPY /* file.sql.39 change */ NUMBER,
122: x_PROFILE_NAME IN VARCHAR2,
123: x_PROFILE_TYPE IN VARCHAR2,

Line 133: UPDATE JTF_PERZ_PROFILE SET

129: l_object_version_number NUMBER := p_OBJECT_VERSION_NUMBER;
130:
131: BEGIN
132:
133: UPDATE JTF_PERZ_PROFILE SET
134: PROFILE_NAME = decode( x_PROFILE_NAME, FND_API.G_MISS_CHAR, PROFILE_NAME, x_PROFILE_NAME ),
135: PROFILE_TYPE = decode( x_PROFILE_TYPE, FND_API.G_MISS_CHAR, PROFILE_TYPE, x_PROFILE_TYPE ),
136: PROFILE_DESCRIPTION = decode( x_PROFILE_DESCRIPTION, FND_API.G_MISS_CHAR,
137: PROFILE_DESCRIPTION,x_PROFILE_DESCRIPTION ),

Line 152: END update_row_jtf_perz_profile;

148: IF (SQL%NOTFOUND) THEN
149: RAISE NO_DATA_FOUND;
150: END IF;
151:
152: END update_row_jtf_perz_profile;
153:
154: -- ****************************************************************************
155: PROCEDURE insert_row_profile_attrib(
156: X_ROWID OUT NOCOPY /* file.sql.39 change */ VARCHAR2,

Line 164: CURSOR C IS SELECT rowid FROM jtf_perz_profile_attrib

160: x_ATTRIBUTE_TYPE IN VARCHAR2,
161: x_ATTRIBUTE_VALUE IN VARCHAR2
162: ) IS
163:
164: CURSOR C IS SELECT rowid FROM jtf_perz_profile_attrib
165: WHERE PROFILE_ID = x_PROFILE_ID AND ROWNUM = 1;
166: CURSOR C2 IS SELECT jtf_perz_profile_attrib_s.NEXTVAL FROM SYS.DUAL;
167:
168: BEGIN

Line 166: CURSOR C2 IS SELECT jtf_perz_profile_attrib_s.NEXTVAL FROM SYS.DUAL;

162: ) IS
163:
164: CURSOR C IS SELECT rowid FROM jtf_perz_profile_attrib
165: WHERE PROFILE_ID = x_PROFILE_ID AND ROWNUM = 1;
166: CURSOR C2 IS SELECT jtf_perz_profile_attrib_s.NEXTVAL FROM SYS.DUAL;
167:
168: BEGIN
169: IF (X_PROFILE_ATTRIB_ID IS NULL) OR
170: (X_PROFILE_ATTRIB_ID = FND_API.G_MISS_NUM) THEN

Line 176: INSERT INTO jtf_perz_profile_attrib(

172: FETCH C2 INTO X_PROFILE_ATTRIB_ID;
173: CLOSE C2;
174: END IF;
175:
176: INSERT INTO jtf_perz_profile_attrib(
177: PROFILE_ATTRIB_ID,
178: PROFILE_ID,
179: PROFILE_ATTRIBUTE,
180: ATTRIBUTE_TYPE,

Line 215: UPDATE jtf_perz_profile_attrib SET

211: ) IS
212:
213: BEGIN
214:
215: UPDATE jtf_perz_profile_attrib SET
216: ATTRIBUTE_TYPE = decode( x_ATTRIBUTE_TYPE, FND_API.G_MISS_CHAR,
217: ATTRIBUTE_TYPE, x_ATTRIBUTE_TYPE ),
218: ATTRIBUTE_VALUE = decode( x_ATTRIBUTE_VALUE, FND_API.G_MISS_CHAR,
219: ATTRIBUTE_VALUE, x_ATTRIBUTE_VALUE ),

Line 255: FROM jtf_perz_profile

251: IF ((p_profile_name IS NOT NULL) AND (x_profile_id IS NULL)) THEN
252:
253: -- dbms_output.put_line( 'chk profile '||p_profile_name);
254: SELECT profile_id INTO x_profile_id
255: FROM jtf_perz_profile
256: WHERE profile_name = p_profile_name;
257:
258: if (x_profile_id IS NOT NULL) then
259: x_return_status := FND_API.G_TRUE;

Line 267: from jtf_perz_profile

263:
264: ELSIF ((p_profile_name IS NULL) AND (x_profile_id IS NOT NULL)) THEN
265:
266: select profile_id INTO l_temp_id
267: from jtf_perz_profile
268: where profile_id = x_profile_id;
269:
270: if (l_temp_id IS NOT NULL) then
271: x_return_status := FND_API.G_TRUE;

Line 279: FROM jtf_perz_profile

275:
276: ELSIF ((p_profile_name IS NOT NULL) AND (x_profile_id IS NOT NULL)) THEN
277:
278: SELECT profile_id INTO l_temp_id
279: FROM jtf_perz_profile
280: WHERE profile_name = p_profile_name
281: and profile_id = x_profile_id;
282:
283: if (l_temp_id IS NOT NULL) then

Line 313: p_profile_attrib_rec IN JTF_PERZ_PROFILE_PUB.PROFILE_OUT_REC_TYPE,

309: -- The columns are essentially a mapping of table columns from
310: -- the query to the output record set.
311:
312: PROCEDURE Define_Columns_Profile(
313: p_profile_attrib_rec IN JTF_PERZ_PROFILE_PUB.PROFILE_OUT_REC_TYPE,
314: p_cur_profile IN NUMBER ) IS
315: BEGIN
316:
317: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 319: -- dbms_output.put_line('JTF_PERZ_PROFILE_PVT Define columns');

315: BEGIN
316:
317: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
318: THEN
319: -- dbms_output.put_line('JTF_PERZ_PROFILE_PVT Define columns');
320: null;
321: END IF;
322:
323: dbms_sql.define_column(p_cur_profile, 1, p_profile_attrib_rec.PROFILE_ID);

Line 337: p_profile_attrib_rec OUT NOCOPY /* file.sql.39 change */ JTF_PERZ_PROFILE_PUB.PROFILE_OUT_REC_TYPE ) IS

333: -- ****************************************************************************
334: -- This procedure defines the return columns for the D-SQL
335:
336: PROCEDURE Get_Columns_Profile(p_cur_profile IN NUMBER,
337: p_profile_attrib_rec OUT NOCOPY /* file.sql.39 change */ JTF_PERZ_PROFILE_PUB.PROFILE_OUT_REC_TYPE ) IS
338: BEGIN
339: --dbms_output.put_line('JTF_PERZ_PROFILE_PVT Get column values');
340:
341: dbms_sql.column_value(p_cur_profile, 1, p_profile_attrib_rec.PROFILE_ID);

Line 339: --dbms_output.put_line('JTF_PERZ_PROFILE_PVT Get column values');

335:
336: PROCEDURE Get_Columns_Profile(p_cur_profile IN NUMBER,
337: p_profile_attrib_rec OUT NOCOPY /* file.sql.39 change */ JTF_PERZ_PROFILE_PUB.PROFILE_OUT_REC_TYPE ) IS
338: BEGIN
339: --dbms_output.put_line('JTF_PERZ_PROFILE_PVT Get column values');
340:
341: dbms_sql.column_value(p_cur_profile, 1, p_profile_attrib_rec.PROFILE_ID);
342: dbms_sql.column_value(p_cur_profile, 2, p_profile_attrib_rec.PROFILE_NAME);
343: dbms_sql.column_value(p_cur_profile, 3, p_profile_attrib_rec.PROFILE_TYPE);

Line 357: p_profile_attrib_tbl IN JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE,

353: -- This procedure will bind the variables for the dynamic SQL query
354:
355: PROCEDURE Bind_Variables_Profile(
356: p_cur_profile IN NUMBER,
357: p_profile_attrib_tbl IN JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE,
358: p_profile_name IN VARCHAR2,
359: p_profile_type IN VARCHAR2,
360: p_profile_id IN NUMBER
361: ) IS

Line 370: --dbms_output.put_line('JTF_PERZ_PROFILE_PVT Bind variables');

366: -- Only those that are not NULL
367:
368: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
369: THEN
370: --dbms_output.put_line('JTF_PERZ_PROFILE_PVT Bind variables');
371: null;
372: END IF;
373:
374: If (p_profile_name IS NOT NULL) Then

Line 410: p_profile_attrib_tbl IN JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE,

406:
407: -- This procedure generates the WHERE clause for Get_Activities
408:
409: PROCEDURE Gen_Where_Profile(
410: p_profile_attrib_tbl IN JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE,
411: p_profile_name IN VARCHAR2,
412: p_profile_type IN VARCHAR2,
413: p_profile_id IN NUMBER,
414: x_head_where OUT NOCOPY /* file.sql.39 change */ VARCHAR2

Line 421: --dbms_output.put_line('JTF_PERZ_PROFILE_PVT Generate Where');

417: BEGIN
418:
419: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
420: THEN
421: --dbms_output.put_line('JTF_PERZ_PROFILE_PVT Generate Where');
422: null;
423: END IF;
424:
425:

Line 518: ' from JTF_PERZ_PROFILE prfl, jtf_perz_profile_attrib prfl_attrib ';

514: 'prfl_attrib.PROFILE_ATTRIBUTE,' ||
515: 'prfl_attrib.ATTRIBUTE_TYPE,' ||
516: 'prfl_attrib.ATTRIBUTE_VALUE ' ||
517:
518: ' from JTF_PERZ_PROFILE prfl, jtf_perz_profile_attrib prfl_attrib ';
519:
520: --dbms_output.put_line(x_select_cl);
521:
522: END Gen_Select_Profile;

Line 540: p_profile_attrib_tbl IN JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE

536: p_profile_id IN NUMBER,
537: p_profile_name IN VARCHAR2 := NULL,
538: p_profile_type IN VARCHAR2 := NULL,
539: p_profile_desc IN VARCHAR2 := NULL,
540: p_profile_attrib_tbl IN JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE
541: := JTF_PERZ_PROFILE_PUB.G_MISS_PROFILE_ATTRIB_TBL,
542:
543: x_profile_name OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
544: x_profile_id OUT NOCOPY /* file.sql.39 change */ NUMBER,

Line 541: := JTF_PERZ_PROFILE_PUB.G_MISS_PROFILE_ATTRIB_TBL,

537: p_profile_name IN VARCHAR2 := NULL,
538: p_profile_type IN VARCHAR2 := NULL,
539: p_profile_desc IN VARCHAR2 := NULL,
540: p_profile_attrib_tbl IN JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE
541: := JTF_PERZ_PROFILE_PUB.G_MISS_PROFILE_ATTRIB_TBL,
542:
543: x_profile_name OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
544: x_profile_id OUT NOCOPY /* file.sql.39 change */ NUMBER,
545: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,

Line 550: l_profile_attrib_tbl JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE

546: x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,
547: x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
548: )IS
549:
550: l_profile_attrib_tbl JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE
551: := p_profile_attrib_tbl;
552: l_any_errors BOOLEAN := FALSE;
553: l_any_row_errors BOOLEAN := FALSE;
554: l_rowid ROWID;

Line 633: insert_row_jtf_perz_profile(

629: l_profile_id := p_profile_id;
630: end if;
631:
632: l_object_version_number := 1;
633: insert_row_jtf_perz_profile(
634: l_rowid,
635: l_profile_id,
636: p_profile_name,
637: p_profile_type,

Line 718: p_profile_attrib_tbl IN JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE

714:
715: p_profile_id IN NUMBER := NULL,
716: p_profile_name IN VARCHAR2 := NULL,
717: p_profile_type IN VARCHAR2 := NULL,
718: p_profile_attrib_tbl IN JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE
719: := JTF_PERZ_PROFILE_PUB.G_MISS_PROFILE_ATTRIB_TBL,
720:
721: x_profile_tbl OUT NOCOPY /* file.sql.39 change */ JTF_PERZ_PROFILE_PUB.PROFILE_OUT_TBL_TYPE,
722: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,

Line 719: := JTF_PERZ_PROFILE_PUB.G_MISS_PROFILE_ATTRIB_TBL,

715: p_profile_id IN NUMBER := NULL,
716: p_profile_name IN VARCHAR2 := NULL,
717: p_profile_type IN VARCHAR2 := NULL,
718: p_profile_attrib_tbl IN JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE
719: := JTF_PERZ_PROFILE_PUB.G_MISS_PROFILE_ATTRIB_TBL,
720:
721: x_profile_tbl OUT NOCOPY /* file.sql.39 change */ JTF_PERZ_PROFILE_PUB.PROFILE_OUT_TBL_TYPE,
722: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
723: x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,

Line 721: x_profile_tbl OUT NOCOPY /* file.sql.39 change */ JTF_PERZ_PROFILE_PUB.PROFILE_OUT_TBL_TYPE,

717: p_profile_type IN VARCHAR2 := NULL,
718: p_profile_attrib_tbl IN JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE
719: := JTF_PERZ_PROFILE_PUB.G_MISS_PROFILE_ATTRIB_TBL,
720:
721: x_profile_tbl OUT NOCOPY /* file.sql.39 change */ JTF_PERZ_PROFILE_PUB.PROFILE_OUT_TBL_TYPE,
722: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
723: x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,
724: x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
725: )IS

Line 727: l_profile_attrib_tbl JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE

723: x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,
724: x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
725: )IS
726:
727: l_profile_attrib_tbl JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE
728: := p_profile_attrib_tbl;
729: l_profile_out_tbl JTF_PERZ_PROFILE_PUB.PROFILE_OUT_TBL_TYPE;
730: l_profile_out_rec JTF_PERZ_PROFILE_PUB.PROFILE_OUT_REC_TYPE;
731:

Line 729: l_profile_out_tbl JTF_PERZ_PROFILE_PUB.PROFILE_OUT_TBL_TYPE;

725: )IS
726:
727: l_profile_attrib_tbl JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE
728: := p_profile_attrib_tbl;
729: l_profile_out_tbl JTF_PERZ_PROFILE_PUB.PROFILE_OUT_TBL_TYPE;
730: l_profile_out_rec JTF_PERZ_PROFILE_PUB.PROFILE_OUT_REC_TYPE;
731:
732: l_any_errors BOOLEAN := FALSE;
733: l_any_row_errors BOOLEAN := FALSE;

Line 730: l_profile_out_rec JTF_PERZ_PROFILE_PUB.PROFILE_OUT_REC_TYPE;

726:
727: l_profile_attrib_tbl JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE
728: := p_profile_attrib_tbl;
729: l_profile_out_tbl JTF_PERZ_PROFILE_PUB.PROFILE_OUT_TBL_TYPE;
730: l_profile_out_rec JTF_PERZ_PROFILE_PUB.PROFILE_OUT_REC_TYPE;
731:
732: l_any_errors BOOLEAN := FALSE;
733: l_any_row_errors BOOLEAN := FALSE;
734: l_rowid ROWID;

Line 761: FROM JTF_PERZ_PROFILE a, JTF_PERZ_PROFILE_ATTRIB b

757: cursor prof1_curs (l_profname varchar2) is
758: SELECT a.PROFILE_ID, a.PROFILE_NAME,
759: a.PROFILE_TYPE, a.PROFILE_DESCRIPTION, a.ACTIVE_FLAG,
760: b.PROFILE_ATTRIBUTE, b.ATTRIBUTE_TYPE, b.ATTRIBUTE_VALUE
761: FROM JTF_PERZ_PROFILE a, JTF_PERZ_PROFILE_ATTRIB b
762: WHERE a.profile_id = b.profile_id AND a.profile_name = l_profname ;
763:
764: cursor profid1_curs (l_profid number) is
765: SELECT a.PROFILE_ID, a.PROFILE_NAME,

Line 768: FROM JTF_PERZ_PROFILE a, JTF_PERZ_PROFILE_ATTRIB b

764: cursor profid1_curs (l_profid number) is
765: SELECT a.PROFILE_ID, a.PROFILE_NAME,
766: a.PROFILE_TYPE, a.PROFILE_DESCRIPTION, a.ACTIVE_FLAG,
767: b.PROFILE_ATTRIBUTE, b.ATTRIBUTE_TYPE, b.ATTRIBUTE_VALUE
768: FROM JTF_PERZ_PROFILE a, JTF_PERZ_PROFILE_ATTRIB b
769: WHERE a.profile_id = b.profile_id AND a.profile_id = l_profid ;
770:
771: cursor proftype1_curs (l_proftype varchar2) is
772: SELECT a.PROFILE_ID, a.PROFILE_NAME,

Line 775: FROM JTF_PERZ_PROFILE a, JTF_PERZ_PROFILE_ATTRIB b

771: cursor proftype1_curs (l_proftype varchar2) is
772: SELECT a.PROFILE_ID, a.PROFILE_NAME,
773: a.PROFILE_TYPE, a.PROFILE_DESCRIPTION, a.ACTIVE_FLAG,
774: b.PROFILE_ATTRIBUTE, b.ATTRIBUTE_TYPE, b.ATTRIBUTE_VALUE
775: FROM JTF_PERZ_PROFILE a, JTF_PERZ_PROFILE_ATTRIB b
776: WHERE a.profile_id = b.profile_id AND profile_type = l_proftype ;
777:
778: cursor proftype2_curs (l_proftype varchar2, l_profile_attrib varchar2) is
779: SELECT a.PROFILE_ID, a.PROFILE_NAME,

Line 782: FROM JTF_PERZ_PROFILE a, JTF_PERZ_PROFILE_ATTRIB b

778: cursor proftype2_curs (l_proftype varchar2, l_profile_attrib varchar2) is
779: SELECT a.PROFILE_ID, a.PROFILE_NAME,
780: a.PROFILE_TYPE, a.PROFILE_DESCRIPTION, a.ACTIVE_FLAG,
781: b.PROFILE_ATTRIBUTE, b.ATTRIBUTE_TYPE, b.ATTRIBUTE_VALUE
782: FROM JTF_PERZ_PROFILE a, JTF_PERZ_PROFILE_ATTRIB b
783: WHERE a.profile_id = b.profile_id
784: AND a.profile_type = l_proftype
785: AND b.PROFILE_ATTRIBUTE = l_profile_attrib ;
786:

Line 791: FROM JTF_PERZ_PROFILE a, JTF_PERZ_PROFILE_ATTRIB b

787: cursor proftype3_curs (l_proftype varchar2, l_attrib_type varchar2) is
788: SELECT a.PROFILE_ID, a.PROFILE_NAME,
789: a.PROFILE_TYPE, a.PROFILE_DESCRIPTION, a.ACTIVE_FLAG,
790: b.PROFILE_ATTRIBUTE, b.ATTRIBUTE_TYPE, b.ATTRIBUTE_VALUE
791: FROM JTF_PERZ_PROFILE a, JTF_PERZ_PROFILE_ATTRIB b
792: WHERE a.profile_id = b.profile_id
793: AND a.profile_type = l_proftype
794: AND b.ATTRIBUTE_TYPE = l_attrib_type ;
795:

Line 800: FROM JTF_PERZ_PROFILE a, JTF_PERZ_PROFILE_ATTRIB b

796: cursor proftype4_curs (l_proftype varchar2, l_profile_attrib varchar2, l_attrib_type varchar2) is
797: SELECT a.PROFILE_ID, a.PROFILE_NAME,
798: a.PROFILE_TYPE, a.PROFILE_DESCRIPTION, a.ACTIVE_FLAG,
799: b.PROFILE_ATTRIBUTE, b.ATTRIBUTE_TYPE, b.ATTRIBUTE_VALUE
800: FROM JTF_PERZ_PROFILE a, JTF_PERZ_PROFILE_ATTRIB b
801: WHERE a.profile_id = b.profile_id
802: AND a.profile_type = l_proftype
803: AND b.ATTRIBUTE_TYPE = l_attrib_type
804: AND b.PROFILE_ATTRIBUTE = l_profile_attrib;

Line 808: FROM JTF_PERZ_PROFILE_ATTRIB

804: AND b.PROFILE_ATTRIBUTE = l_profile_attrib;
805:
806: cursor profid1attr_curs (l_profid number) is
807: SELECT PROFILE_ATTRIBUTE,ATTRIBUTE_TYPE,ATTRIBUTE_VALUE
808: FROM JTF_PERZ_PROFILE_ATTRIB
809: WHERE profile_id = l_profid;
810:
811: curso_1prof prof1_curs%ROWTYPE;
812: curso_1profid profid1_curs%ROWTYPE;

Line 1009: p_Profile_ATTRIB_Tbl IN JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE,

1005: p_profile_name IN VARCHAR2,
1006: p_profile_type IN VARCHAR2 := NULL,
1007: p_profile_desc IN VARCHAR2 ,
1008: p_active_flag IN VARCHAR2,
1009: p_Profile_ATTRIB_Tbl IN JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE,
1010: x_profile_id OUT NOCOPY /* file.sql.39 change */ NUMBER,
1011: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
1012: x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,
1013: x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2

Line 1017: l_profile_attrib_tbl JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE;

1013: x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
1014: ) IS
1015: -- problem is, this API will not check the validity of the p_active_flag
1016:
1017: l_profile_attrib_tbl JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE;
1018: l_attributes_from_database JTF_PERZ_PROFILE_PUB.PROFILE_OUT_TBL_TYPE;
1019:
1020: l_api_version NUMBER := 1.0;
1021: l_init_msg_list VARCHAR2(240):= FND_API.G_TRUE;

Line 1018: l_attributes_from_database JTF_PERZ_PROFILE_PUB.PROFILE_OUT_TBL_TYPE;

1014: ) IS
1015: -- problem is, this API will not check the validity of the p_active_flag
1016:
1017: l_profile_attrib_tbl JTF_PERZ_PROFILE_PUB.PROFILE_ATTRIB_TBL_TYPE;
1018: l_attributes_from_database JTF_PERZ_PROFILE_PUB.PROFILE_OUT_TBL_TYPE;
1019:
1020: l_api_version NUMBER := 1.0;
1021: l_init_msg_list VARCHAR2(240):= FND_API.G_TRUE;
1022: l_msg_count NUMBER;

Line 1125: from jtf_perz_profile where profile_id = l_profile_id;

1121: -- profile object. This must be done separately as object_version_number
1122: -- is not part of the get_profile API.
1123:
1124: select object_version_number into l_object_version_number
1125: from jtf_perz_profile where profile_id = l_profile_id;
1126:
1127: -- In the following call, p_active_flag must be replaced with l_active_flag
1128: -- and l_active_flag must be initialized like l_profile_type above.
1129: -- for some reason, I am getting ORA 6502 when I trie to do that.

Line 1132: update_row_jtf_perz_profile(

1128: -- and l_active_flag must be initialized like l_profile_type above.
1129: -- for some reason, I am getting ORA 6502 when I trie to do that.
1130: -- This must be fixed in future - srikanth
1131:
1132: update_row_jtf_perz_profile(
1133: l_rowid,
1134: l_profile_id,
1135: l_profile_name,
1136: l_profile_type,

Line 1230: END JTF_PERZ_PROFILE_PVT;

1226: END Update_Profile;
1227: -- ****************************************************************************
1228: -- ****************************************************************************
1229:
1230: END JTF_PERZ_PROFILE_PVT;