DBA Data[Home] [Help]

APPS.JTF_PERZ_DATA_PVT dependencies on JTF_PERZ_DATA

Line 1: PACKAGE BODY JTF_PERZ_DATA_PVT as

1: PACKAGE BODY JTF_PERZ_DATA_PVT as
2: /* $Header: jtfzvpdb.pls 120.2 2005/11/02 22:31:23 skothe ship $ */
3: --
4: --
5: -- Start of Comments

Line 8: -- JTF_PERZ_DATA_PVT

4: --
5: -- Start of Comments
6: --
7: -- NAME
8: -- JTF_PERZ_DATA_PVT
9:
10: -- HISTORY
11: --
12: -- 09/20/99 SMATTEGU Created

Line 29: G_PKG_NAME CONSTANT VARCHAR2(30):='JTF_PERZ_DATA_PVT';

25: --
26: --*****************************************************************************
27:
28:
29: G_PKG_NAME CONSTANT VARCHAR2(30):='JTF_PERZ_DATA_PVT';
30: G_FILE_NAME CONSTANT VARCHAR2(12):='jtfvpzdb.pls';
31:
32:
33: G_LOGIN_ID NUMBER := FND_GLOBAL.CONC_LOGIN_ID;

Line 41: -- 1. insert_jtf_perz_data

37:
38: -- *****************************************************************************
39: -- *****************************************************************************
40: -- TABLE HANDLERS
41: -- 1. insert_jtf_perz_data
42: -- 2. insert_jtf_perz_data_attrib
43: -- 3. update_jtf_perz_data
44: -- *****************************************************************************
45: -- *****************************************************************************

Line 42: -- 2. insert_jtf_perz_data_attrib

38: -- *****************************************************************************
39: -- *****************************************************************************
40: -- TABLE HANDLERS
41: -- 1. insert_jtf_perz_data
42: -- 2. insert_jtf_perz_data_attrib
43: -- 3. update_jtf_perz_data
44: -- *****************************************************************************
45: -- *****************************************************************************
46: --

Line 43: -- 3. update_jtf_perz_data

39: -- *****************************************************************************
40: -- TABLE HANDLERS
41: -- 1. insert_jtf_perz_data
42: -- 2. insert_jtf_perz_data_attrib
43: -- 3. update_jtf_perz_data
44: -- *****************************************************************************
45: -- *****************************************************************************
46: --
47:

Line 49: PROCEDURE insert_jtf_perz_data(

45: -- *****************************************************************************
46: --
47:
48:
49: PROCEDURE insert_jtf_perz_data(
50: px_PERZ_DATA_ID IN OUT NOCOPY /* file.sql.39 change */ NUMBER,
51: p_PROFILE_ID NUMBER,
52: p_APPLICATION_ID NUMBER,
53: p_PERZ_DATA_NAME VARCHAR2,

Line 59: CURSOR C2 IS SELECT JTF_PERZ_DATA_S.nextval FROM sys.dual;

55: p_PERZ_DATA_DESC VARCHAR2
56: )
57:
58: IS
59: CURSOR C2 IS SELECT JTF_PERZ_DATA_S.nextval FROM sys.dual;
60: BEGIN
61: If (px_PERZ_DATA_ID IS NULL) OR (px_PERZ_DATA_ID = FND_API.G_MISS_NUM) then
62: OPEN C2;
63: FETCH C2 INTO px_PERZ_DATA_ID;

Line 66: INSERT INTO JTF_PERZ_DATA(

62: OPEN C2;
63: FETCH C2 INTO px_PERZ_DATA_ID;
64: CLOSE C2;
65: End If;
66: INSERT INTO JTF_PERZ_DATA(
67: PERZ_DATA_ID,
68: PROFILE_ID,
69: APPLICATION_ID,
70: PERZ_DATA_NAME,

Line 86: End insert_jtf_perz_data;

82: decode( p_PERZ_DATA_NAME, FND_API.G_MISS_CHAR, NULL, p_PERZ_DATA_NAME),
83: decode( p_PERZ_DATA_TYPE, FND_API.G_MISS_CHAR, NULL, p_PERZ_DATA_TYPE),
84: decode( p_PERZ_DATA_DESC, FND_API.G_MISS_CHAR, NULL, p_PERZ_DATA_DESC),
85: 1, G_USER_ID, SYSDATE, G_USER_ID, G_LOGIN_ID);
86: End insert_jtf_perz_data;
87:
88: -- *****************************************************************************
89: PROCEDURE insert_jtf_perz_data_attrib(
90: px_PERZ_DATA_ATTRIB_ID IN OUT NOCOPY /* file.sql.39 change */ NUMBER,

Line 89: PROCEDURE insert_jtf_perz_data_attrib(

85: 1, G_USER_ID, SYSDATE, G_USER_ID, G_LOGIN_ID);
86: End insert_jtf_perz_data;
87:
88: -- *****************************************************************************
89: PROCEDURE insert_jtf_perz_data_attrib(
90: px_PERZ_DATA_ATTRIB_ID IN OUT NOCOPY /* file.sql.39 change */ NUMBER,
91: p_PERZ_DATA_ID NUMBER,
92: p_ATTRIBUTE_NAME VARCHAR2,
93: p_ATTRIBUTE_TYPE VARCHAR2,

Line 98: CURSOR C2 IS SELECT JTF_PERZ_DATA_ATTRIBUTES_S.nextval FROM sys.dual;

94: p_ATTRIBUTE_VALUE VARCHAR2,
95: p_ATTRIBUTE_CONTEXT VARCHAR2)
96:
97: IS
98: CURSOR C2 IS SELECT JTF_PERZ_DATA_ATTRIBUTES_S.nextval FROM sys.dual;
99: BEGIN
100: If (px_PERZ_DATA_ATTRIB_ID IS NULL) OR (px_PERZ_DATA_ATTRIB_ID = FND_API.G_MISS_NUM) then
101: OPEN C2;
102: FETCH C2 INTO px_PERZ_DATA_ATTRIB_ID;

Line 105: INSERT INTO JTF_PERZ_DATA_ATTRIB(

101: OPEN C2;
102: FETCH C2 INTO px_PERZ_DATA_ATTRIB_ID;
103: CLOSE C2;
104: End If;
105: INSERT INTO JTF_PERZ_DATA_ATTRIB(
106: PERZ_DATA_ATTRIB_ID,
107: PERZ_DATA_ID,
108: ATTRIBUTE_NAME,
109: ATTRIBUTE_TYPE,

Line 125: End insert_jtf_perz_data_attrib;

121: decode( p_ATTRIBUTE_VALUE, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE_VALUE),
122: decode( p_ATTRIBUTE_CONTEXT, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE_CONTEXT),
123: G_USER_ID, SYSDATE, G_USER_ID, G_LOGIN_ID );
124:
125: End insert_jtf_perz_data_attrib;
126:
127: -- *****************************************************************************
128:
129: PROCEDURE update_jtf_perz_data(

Line 129: PROCEDURE update_jtf_perz_data(

125: End insert_jtf_perz_data_attrib;
126:
127: -- *****************************************************************************
128:
129: PROCEDURE update_jtf_perz_data(
130: p_PERZ_DATA_ID NUMBER,
131: p_PROFILE_ID NUMBER,
132: p_APPLICATION_ID NUMBER,
133: p_PERZ_DATA_NAME VARCHAR2,

Line 140: Update JTF_PERZ_DATA

136: p_OBJECT_VERSION_NUMBER IN NUMBER)
137:
138: IS
139: BEGIN
140: Update JTF_PERZ_DATA
141: SET
142: PROFILE_ID = decode( p_PROFILE_ID, FND_API.G_MISS_NUM, PROFILE_ID, p_PROFILE_ID),
143: APPLICATION_ID = decode( p_APPLICATION_ID, FND_API.G_MISS_NUM, APPLICATION_ID, p_APPLICATION_ID),
144: PERZ_DATA_NAME = decode( p_PERZ_DATA_NAME, FND_API.G_MISS_CHAR, PERZ_DATA_NAME, p_PERZ_DATA_NAME),

Line 158: END update_jtf_perz_data;

154:
155: If (SQL%NOTFOUND) then
156: RAISE NO_DATA_FOUND;
157: End If;
158: END update_jtf_perz_data;
159:
160: -- *****************************************************************************
161: -- *****************************************************************************
162: --

Line 191: FROM jtf_perz_data

187: if (p_perz_data_type <> FND_API.G_MISS_CHAR) THEN
188:
189: SELECT perz_data_id, object_version_number
190: INTO x_perz_data_id, x_object_version_number
191: FROM jtf_perz_data
192: WHERE
193: perz_data_name = p_perz_data_name AND
194: application_id = p_application_id AND
195: profile_id = p_profile_id AND

Line 202: FROM jtf_perz_data

198: else -- p_perz_data_type is G_MISS_CHAR
199:
200: SELECT perz_data_id, object_version_number
201: INTO x_perz_data_id, x_object_version_number
202: FROM jtf_perz_data
203: WHERE perz_data_name = p_perz_data_name AND
204: application_id = p_application_id AND
205: profile_id = p_profile_id;
206: end if;

Line 222: from jtf_perz_data

218: (x_perz_data_id <> FND_API.G_MISS_NUM)) THEN
219:
220: SELECT perz_data_id, object_version_number
221: INTO l_temp_id, x_object_version_number
222: from jtf_perz_data
223: where perz_data_id = x_perz_data_id;
224:
225: if (l_temp_id IS NOT NULL) then
226: x_return_status := FND_API.G_TRUE;

Line 267: p_data_attrib_tbl IN JTF_PERZ_DATA_PUB.DATA_ATTRIB_TBL_TYPE

263: p_perz_data_id IN NUMBER,
264: p_perz_data_name IN VARCHAR2,
265: p_perz_data_type IN VARCHAR2,
266: p_perz_data_desc IN VARCHAR2,
267: p_data_attrib_tbl IN JTF_PERZ_DATA_PUB.DATA_ATTRIB_TBL_TYPE
268: := JTF_PERZ_DATA_PUB.G_MISS_DATA_ATTRIB_TBL,
269:
270: x_perz_data_id OUT NOCOPY /* file.sql.39 change */ NUMBER,
271: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,

Line 268: := JTF_PERZ_DATA_PUB.G_MISS_DATA_ATTRIB_TBL,

264: p_perz_data_name IN VARCHAR2,
265: p_perz_data_type IN VARCHAR2,
266: p_perz_data_desc IN VARCHAR2,
267: p_data_attrib_tbl IN JTF_PERZ_DATA_PUB.DATA_ATTRIB_TBL_TYPE
268: := JTF_PERZ_DATA_PUB.G_MISS_DATA_ATTRIB_TBL,
269:
270: x_perz_data_id OUT NOCOPY /* file.sql.39 change */ NUMBER,
271: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
272: x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,

Line 511: p_data_attrib_tbl IN JTF_PERZ_DATA_PUB.DATA_ATTRIB_TBL_TYPE

507: p_perz_data_id IN NUMBER,
508: p_perz_data_name IN VARCHAR2,
509: p_perz_data_type IN VARCHAR2,
510: p_perz_data_desc IN VARCHAR2,
511: p_data_attrib_tbl IN JTF_PERZ_DATA_PUB.DATA_ATTRIB_TBL_TYPE
512: := JTF_PERZ_DATA_PUB.G_MISS_DATA_ATTRIB_TBL,
513:
514: x_perz_data_id OUT NOCOPY /* file.sql.39 change */ NUMBER,
515: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,

Line 512: := JTF_PERZ_DATA_PUB.G_MISS_DATA_ATTRIB_TBL,

508: p_perz_data_name IN VARCHAR2,
509: p_perz_data_type IN VARCHAR2,
510: p_perz_data_desc IN VARCHAR2,
511: p_data_attrib_tbl IN JTF_PERZ_DATA_PUB.DATA_ATTRIB_TBL_TYPE
512: := JTF_PERZ_DATA_PUB.G_MISS_DATA_ATTRIB_TBL,
513:
514: x_perz_data_id OUT NOCOPY /* file.sql.39 change */ NUMBER,
515: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
516: x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,

Line 583: insert_jtf_perz_data(

579: x_return_status := FND_API.G_RET_STS_ERROR ;
580: RAISE FND_API.G_EXC_ERROR;
581: END IF;
582:
583: insert_jtf_perz_data(
584: l_perz_data_id,
585: p_PROFILE_ID,
586: p_APPLICATION_ID,
587: p_PERZ_DATA_NAME,

Line 609: insert_jtf_perz_data_attrib(

605:
606: l_PERZ_DATA_ATTRIB_ID :=p_data_attrib_tbl(l_curr_row).PERZ_DATA_ATTRIB_ID ;
607: --dbms_output.put_line('attribute count ' || p_data_attrib_tbl.count);
608:
609: insert_jtf_perz_data_attrib(
610: l_PERZ_DATA_ATTRIB_ID,
611: l_perz_data_id,
612: p_data_attrib_tbl(l_curr_row).ATTRIBUTE_NAME,
613: p_data_attrib_tbl(l_curr_row).ATTRIBUTE_TYPE,

Line 686: x_data_attrib_tbl OUT NOCOPY /* file.sql.39 change */ JTF_PERZ_DATA_PUB.DATA_ATTRIB_TBL_TYPE,

682: x_perz_data_id OUT NOCOPY /* file.sql.39 change */ NUMBER,
683: x_perz_data_name OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
684: x_perz_data_type OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
685: x_perz_data_desc OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
686: x_data_attrib_tbl OUT NOCOPY /* file.sql.39 change */ JTF_PERZ_DATA_PUB.DATA_ATTRIB_TBL_TYPE,
687:
688: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
689: x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,
690: x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2

Line 701: l_data_out_tbl JTF_PERZ_DATA_PUB.DATA_OUT_TBL_TYPE;

697:
698: -- ******* Get_Perz_Data Local Variables ********
699: l_perz_data_id NUMBER := p_perz_data_id;
700: l_count NUMBER := NULL;
701: l_data_out_tbl JTF_PERZ_DATA_PUB.DATA_OUT_TBL_TYPE;
702:
703: -- temp variables
704:
705: l_PERZ_DATA_ATTRIB_ID_temp NUMBER := NULL;

Line 716: FROM jtf_perz_data_attrib

712: -- cursors
713: CURSOR C_Get_Perz_Data (p_perz_data_id NUMBER ) IS
714: SELECT perz_data_attrib_id, perz_data_id, attribute_name,
715: attribute_type, attribute_value, attribute_context
716: FROM jtf_perz_data_attrib
717: WHERE perz_data_id = p_perz_data_id;
718:
719:
720: BEGIN

Line 871: x_data_out_tbl OUT NOCOPY /* file.sql.39 change */ JTF_PERZ_DATA_PUB.DATA_OUT_TBL_TYPE,

867: p_perz_data_id IN NUMBER,
868: p_perz_data_name IN VARCHAR2,
869: p_perz_data_type IN VARCHAR2 := NULL,
870:
871: x_data_out_tbl OUT NOCOPY /* file.sql.39 change */ JTF_PERZ_DATA_PUB.DATA_OUT_TBL_TYPE,
872:
873: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
874: x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,
875: x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2

Line 890: l_perz_data_temp_rec JTF_PERZ_DATA_PUB.DATA_OUT_REC_TYPE;

886: l_count NUMBER := NULL;
887:
888: -- Temporary Variables
889: -- SMATTEGU Enhancement #1181062 Begin
890: l_perz_data_temp_rec JTF_PERZ_DATA_PUB.DATA_OUT_REC_TYPE;
891: -- Instead of individual temp variables, this will be referred in the select
892: -- into statements etc.
893: -- SMATTEGU Enhancement #1181062 End
894: /*

Line 907: FROM jtf_perz_data

903:
904: CURSOR C_Get_Perz_Summary (p_profile_id NUMBER, p_application_id NUMBER) IS
905: SELECT perz_data_id, Profile_ID, Application_id, perz_data_name,
906: perz_data_type, perz_data_desc
907: FROM jtf_perz_data
908: WHERE Profile_ID = p_profile_id AND
909: Application_ID = p_application_id;
910:
911: CURSOR C_Get_Perz_Summary_pzdid (p_perz_data_id NUMBER ) IS

Line 914: FROM jtf_perz_data

910:
911: CURSOR C_Get_Perz_Summary_pzdid (p_perz_data_id NUMBER ) IS
912: SELECT perz_data_id, Profile_ID, Application_id, perz_data_name,
913: perz_data_type, perz_data_desc
914: FROM jtf_perz_data
915: WHERE perz_data_id = p_perz_data_id;
916:
917: CURSOR C_Get_Perz_Summary_pzdn (p_perz_data_name VARCHAR2,
918: p_profile_id NUMBER, p_application_id NUMBER) IS

Line 921: FROM jtf_perz_data

917: CURSOR C_Get_Perz_Summary_pzdn (p_perz_data_name VARCHAR2,
918: p_profile_id NUMBER, p_application_id NUMBER) IS
919: SELECT perz_data_id, Profile_ID, Application_id, perz_data_name,
920: perz_data_type, perz_data_desc
921: FROM jtf_perz_data
922: WHERE perz_data_name = p_perz_data_name AND
923: Profile_ID = p_profile_id AND
924: Application_ID = p_application_id;
925:

Line 930: FROM jtf_perz_data

926: CURSOR C_Get_Perz_Summary_pzdt (p_perz_data_type VARCHAR2,
927: p_profile_id NUMBER, p_application_id NUMBER) IS
928: SELECT perz_data_id, Profile_ID, Application_id, perz_data_name,
929: perz_data_type, perz_data_desc
930: FROM jtf_perz_data
931: WHERE perz_data_type = p_perz_data_type AND
932: Profile_ID = p_profile_id AND
933: Application_ID = p_application_id;
934:

Line 942: FROM jtf_perz_data

938: p_perz_data_type VARCHAR2, p_profile_id NUMBER,
939: p_application_id NUMBER) IS
940: SELECT perz_data_id, Profile_ID, Application_id, perz_data_name,
941: perz_data_type, perz_data_desc
942: FROM jtf_perz_data
943: WHERE perz_data_name = p_perz_data_name AND
944: perz_data_type = p_perz_data_type AND
945: Profile_ID = p_profile_id AND
946: Application_ID = p_application_id;

Line 1239: p_data_attrib_tbl IN JTF_PERZ_DATA_PUB.DATA_ATTRIB_TBL_TYPE

1235: p_perz_data_id IN NUMBER,
1236: p_perz_data_name IN VARCHAR2,
1237: p_perz_data_type IN VARCHAR2 := NULL,
1238: p_perz_data_desc IN VARCHAR2,
1239: p_data_attrib_tbl IN JTF_PERZ_DATA_PUB.DATA_ATTRIB_TBL_TYPE
1240: := JTF_PERZ_DATA_PUB.G_MISS_DATA_ATTRIB_TBL,
1241:
1242: x_perz_data_id OUT NOCOPY /* file.sql.39 change */ NUMBER,
1243: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,

Line 1240: := JTF_PERZ_DATA_PUB.G_MISS_DATA_ATTRIB_TBL,

1236: p_perz_data_name IN VARCHAR2,
1237: p_perz_data_type IN VARCHAR2 := NULL,
1238: p_perz_data_desc IN VARCHAR2,
1239: p_data_attrib_tbl IN JTF_PERZ_DATA_PUB.DATA_ATTRIB_TBL_TYPE
1240: := JTF_PERZ_DATA_PUB.G_MISS_DATA_ATTRIB_TBL,
1241:
1242: x_perz_data_id OUT NOCOPY /* file.sql.39 change */ NUMBER,
1243: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
1244: x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,

Line 1309: DELETE FROM JTF_PERZ_DATA_ATTRIB WHERE

1305:
1306: IF (FND_API.To_Boolean(l_is_duplicate)) THEN
1307: -- 2. Delete all the attributes for that Perz Data ID
1308:
1309: DELETE FROM JTF_PERZ_DATA_ATTRIB WHERE
1310: PERZ_DATA_ID = l_perz_data_id;
1311:
1312: -- 3. Update Perz Data header information
1313: update_jtf_perz_data(

Line 1313: update_jtf_perz_data(

1309: DELETE FROM JTF_PERZ_DATA_ATTRIB WHERE
1310: PERZ_DATA_ID = l_perz_data_id;
1311:
1312: -- 3. Update Perz Data header information
1313: update_jtf_perz_data(
1314: l_perz_data_id,
1315: p_PROFILE_ID,
1316: p_APPLICATION_ID,
1317: p_PERZ_DATA_NAME,

Line 1329: insert_jtf_perz_data_attrib(

1325: IF (p_data_attrib_tbl.COUNT > 0) THEN
1326: FOR l_curr_row in 1..p_data_attrib_tbl.COUNT LOOP
1327:
1328: l_PERZ_DATA_ATTRIB_ID :=p_data_attrib_tbl(l_curr_row).PERZ_DATA_ATTRIB_ID ;
1329: insert_jtf_perz_data_attrib(
1330: l_PERZ_DATA_ATTRIB_ID,
1331: l_perz_data_id,
1332: p_data_attrib_tbl(l_curr_row).ATTRIBUTE_NAME,
1333: p_data_attrib_tbl(l_curr_row).ATTRIBUTE_TYPE,

Line 1445: DELETE FROM JTF_PERZ_DATA_ATTRIB WHERE

1441: -- CALL FLOW
1442: --1 Delete all the attributes
1443: --2 Delete the Perz Data
1444:
1445: DELETE FROM JTF_PERZ_DATA_ATTRIB WHERE
1446: PERZ_DATA_ID = p_perz_data_id;
1447: DELETE FROM JTF_PERZ_DATA WHERE
1448: PERZ_DATA_ID = p_perz_data_id;
1449:

Line 1447: DELETE FROM JTF_PERZ_DATA WHERE

1443: --2 Delete the Perz Data
1444:
1445: DELETE FROM JTF_PERZ_DATA_ATTRIB WHERE
1446: PERZ_DATA_ID = p_perz_data_id;
1447: DELETE FROM JTF_PERZ_DATA WHERE
1448: PERZ_DATA_ID = p_perz_data_id;
1449:
1450:
1451: -- ******** Standard Ends ***********

Line 1502: END JTF_PERZ_DATA_PVT;

1498:
1499:
1500: -- *****************************************************************************
1501: -- *****************************************************************************
1502: END JTF_PERZ_DATA_PVT;