APPS.JTF_PERZ_PROFILE_PVT dependencies on FND_API

Line 81: IF (X_PROFILE_ID IS NULL) OR ( X_PROFILE_ID = FND_API.G_MISS_NUM) THEN

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
82: OPEN C2;
83: FETCH C2 INTO X_PROFILE_ID;
84: CLOSE C2;
85: END IF;

Line 99: decode( x_PROFILE_NAME, FND_API.G_MISS_CHAR, NULL ,x_PROFILE_NAME ),

95: LAST_UPDATE_DATE,
96: LAST_UPDATED_BY,
97: LAST_UPDATE_LOGIN)
98: VALUES ( x_PROFILE_ID,
99: decode( x_PROFILE_NAME, FND_API.G_MISS_CHAR, NULL ,x_PROFILE_NAME ),
100: decode( x_PROFILE_TYPE, FND_API.G_MISS_CHAR, NULL ,x_PROFILE_TYPE ),
101: decode( x_PROFILE_DESCRIPTION, FND_API.G_MISS_CHAR, NULL ,x_PROFILE_DESCRIPTION ),
102: decode( x_ACTIVE_FLAG, FND_API.G_MISS_CHAR, NULL ,x_ACTIVE_FLAG ),
103: decode( p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, 1, p_OBJECT_VERSION_NUMBER),

Line 100: decode( x_PROFILE_TYPE, FND_API.G_MISS_CHAR, NULL ,x_PROFILE_TYPE ),

96: LAST_UPDATED_BY,
97: LAST_UPDATE_LOGIN)
98: VALUES ( x_PROFILE_ID,
99: decode( x_PROFILE_NAME, FND_API.G_MISS_CHAR, NULL ,x_PROFILE_NAME ),
100: decode( x_PROFILE_TYPE, FND_API.G_MISS_CHAR, NULL ,x_PROFILE_TYPE ),
101: decode( x_PROFILE_DESCRIPTION, FND_API.G_MISS_CHAR, NULL ,x_PROFILE_DESCRIPTION ),
102: decode( x_ACTIVE_FLAG, FND_API.G_MISS_CHAR, NULL ,x_ACTIVE_FLAG ),
103: decode( p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, 1, p_OBJECT_VERSION_NUMBER),
104: G_USER_ID, SYSDATE, G_USER_ID, G_LOGIN_ID);

Line 101: decode( x_PROFILE_DESCRIPTION, FND_API.G_MISS_CHAR, NULL ,x_PROFILE_DESCRIPTION ),

97: LAST_UPDATE_LOGIN)
98: VALUES ( x_PROFILE_ID,
99: decode( x_PROFILE_NAME, FND_API.G_MISS_CHAR, NULL ,x_PROFILE_NAME ),
100: decode( x_PROFILE_TYPE, FND_API.G_MISS_CHAR, NULL ,x_PROFILE_TYPE ),
101: decode( x_PROFILE_DESCRIPTION, FND_API.G_MISS_CHAR, NULL ,x_PROFILE_DESCRIPTION ),
102: decode( x_ACTIVE_FLAG, FND_API.G_MISS_CHAR, NULL ,x_ACTIVE_FLAG ),
103: decode( p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, 1, p_OBJECT_VERSION_NUMBER),
104: G_USER_ID, SYSDATE, G_USER_ID, G_LOGIN_ID);
105:

Line 102: decode( x_ACTIVE_FLAG, FND_API.G_MISS_CHAR, NULL ,x_ACTIVE_FLAG ),

98: VALUES ( x_PROFILE_ID,
99: decode( x_PROFILE_NAME, FND_API.G_MISS_CHAR, NULL ,x_PROFILE_NAME ),
100: decode( x_PROFILE_TYPE, FND_API.G_MISS_CHAR, NULL ,x_PROFILE_TYPE ),
101: decode( x_PROFILE_DESCRIPTION, FND_API.G_MISS_CHAR, NULL ,x_PROFILE_DESCRIPTION ),
102: decode( x_ACTIVE_FLAG, FND_API.G_MISS_CHAR, NULL ,x_ACTIVE_FLAG ),
103: decode( p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, 1, p_OBJECT_VERSION_NUMBER),
104: G_USER_ID, SYSDATE, G_USER_ID, G_LOGIN_ID);
105:
106: OPEN C;

Line 103: decode( p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, 1, p_OBJECT_VERSION_NUMBER),

99: decode( x_PROFILE_NAME, FND_API.G_MISS_CHAR, NULL ,x_PROFILE_NAME ),
100: decode( x_PROFILE_TYPE, FND_API.G_MISS_CHAR, NULL ,x_PROFILE_TYPE ),
101: decode( x_PROFILE_DESCRIPTION, FND_API.G_MISS_CHAR, NULL ,x_PROFILE_DESCRIPTION ),
102: decode( x_ACTIVE_FLAG, FND_API.G_MISS_CHAR, NULL ,x_ACTIVE_FLAG ),
103: decode( p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, 1, p_OBJECT_VERSION_NUMBER),
104: G_USER_ID, SYSDATE, G_USER_ID, G_LOGIN_ID);
105:
106: OPEN C;
107: FETCH C INTO x_Rowid;

Line 134: PROFILE_NAME = decode( x_PROFILE_NAME, FND_API.G_MISS_CHAR, PROFILE_NAME, x_PROFILE_NAME ),

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 ),
138: ACTIVE_FLAG = decode( x_ACTIVE_FLAG, FND_API.G_MISS_CHAR, ACTIVE_FLAG,

Line 135: PROFILE_TYPE = decode( x_PROFILE_TYPE, FND_API.G_MISS_CHAR, PROFILE_TYPE, x_PROFILE_TYPE ),

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 ),
138: ACTIVE_FLAG = decode( x_ACTIVE_FLAG, FND_API.G_MISS_CHAR, ACTIVE_FLAG,
139: x_ACTIVE_FLAG ),

Line 136: PROFILE_DESCRIPTION = decode( x_PROFILE_DESCRIPTION, FND_API.G_MISS_CHAR,

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 ),
138: ACTIVE_FLAG = decode( x_ACTIVE_FLAG, FND_API.G_MISS_CHAR, ACTIVE_FLAG,
139: x_ACTIVE_FLAG ),
140: OBJECT_VERSION_NUMBER = decode (p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM,

Line 138: ACTIVE_FLAG = decode( x_ACTIVE_FLAG, FND_API.G_MISS_CHAR, ACTIVE_FLAG,

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 ),
138: ACTIVE_FLAG = decode( x_ACTIVE_FLAG, FND_API.G_MISS_CHAR, ACTIVE_FLAG,
139: x_ACTIVE_FLAG ),
140: OBJECT_VERSION_NUMBER = decode (p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM,
141: OBJECT_VERSION_NUMBER, p_OBJECT_VERSION_NUMBER+1),
142: LAST_UPDATE_DATE = SYSDATE,

Line 140: OBJECT_VERSION_NUMBER = decode (p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM,

136: PROFILE_DESCRIPTION = decode( x_PROFILE_DESCRIPTION, FND_API.G_MISS_CHAR,
137: PROFILE_DESCRIPTION,x_PROFILE_DESCRIPTION ),
138: ACTIVE_FLAG = decode( x_ACTIVE_FLAG, FND_API.G_MISS_CHAR, ACTIVE_FLAG,
139: x_ACTIVE_FLAG ),
140: OBJECT_VERSION_NUMBER = decode (p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM,
141: OBJECT_VERSION_NUMBER, p_OBJECT_VERSION_NUMBER+1),
142: LAST_UPDATE_DATE = SYSDATE,
143: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
144: LAST_UPDATE_LOGIN = FND_GLOBAL.CONC_LOGIN_ID

Line 170: (X_PROFILE_ATTRIB_ID = FND_API.G_MISS_NUM) THEN

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
171: OPEN C2;
172: FETCH C2 INTO X_PROFILE_ATTRIB_ID;
173: CLOSE C2;
174: END IF;

Line 189: decode (x_PROFILE_ATTRIBUTE, FND_API.G_MISS_CHAR, NULL, x_PROFILE_ATTRIBUTE ),

185: LAST_UPDATE_LOGIN)
186: VALUES (
187: X_PROFILE_ATTRIB_ID,
188: x_PROFILE_ID,
189: decode (x_PROFILE_ATTRIBUTE, FND_API.G_MISS_CHAR, NULL, x_PROFILE_ATTRIBUTE ),
190: decode (x_ATTRIBUTE_TYPE, FND_API.G_MISS_CHAR, NULL ,x_ATTRIBUTE_TYPE),
191: decode (x_ATTRIBUTE_VALUE, FND_API.G_MISS_CHAR, NULL ,x_ATTRIBUTE_VALUE),
192: G_USER_ID, SYSDATE, G_USER_ID, G_LOGIN_ID );
193:

Line 190: decode (x_ATTRIBUTE_TYPE, FND_API.G_MISS_CHAR, NULL ,x_ATTRIBUTE_TYPE),

186: VALUES (
187: X_PROFILE_ATTRIB_ID,
188: x_PROFILE_ID,
189: decode (x_PROFILE_ATTRIBUTE, FND_API.G_MISS_CHAR, NULL, x_PROFILE_ATTRIBUTE ),
190: decode (x_ATTRIBUTE_TYPE, FND_API.G_MISS_CHAR, NULL ,x_ATTRIBUTE_TYPE),
191: decode (x_ATTRIBUTE_VALUE, FND_API.G_MISS_CHAR, NULL ,x_ATTRIBUTE_VALUE),
192: G_USER_ID, SYSDATE, G_USER_ID, G_LOGIN_ID );
193:
194: OPEN C;

Line 191: decode (x_ATTRIBUTE_VALUE, FND_API.G_MISS_CHAR, NULL ,x_ATTRIBUTE_VALUE),

187: X_PROFILE_ATTRIB_ID,
188: x_PROFILE_ID,
189: decode (x_PROFILE_ATTRIBUTE, FND_API.G_MISS_CHAR, NULL, x_PROFILE_ATTRIBUTE ),
190: decode (x_ATTRIBUTE_TYPE, FND_API.G_MISS_CHAR, NULL ,x_ATTRIBUTE_TYPE),
191: decode (x_ATTRIBUTE_VALUE, FND_API.G_MISS_CHAR, NULL ,x_ATTRIBUTE_VALUE),
192: G_USER_ID, SYSDATE, G_USER_ID, G_LOGIN_ID );
193:
194: OPEN C;
195: FETCH C INTO x_Rowid;

Line 216: ATTRIBUTE_TYPE = decode( x_ATTRIBUTE_TYPE, FND_API.G_MISS_CHAR,

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 ),
220: LAST_UPDATE_DATE = SYSDATE,

Line 218: ATTRIBUTE_VALUE = decode( x_ATTRIBUTE_VALUE, FND_API.G_MISS_CHAR,

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 ),
220: LAST_UPDATE_DATE = SYSDATE,
221: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
222: LAST_UPDATE_LOGIN = FND_GLOBAL.CONC_LOGIN_ID

Line 259: x_return_status := FND_API.G_TRUE;

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;
260: else
261: x_return_status := FND_API.G_FALSE;
262: end if;
263:

Line 261: x_return_status := FND_API.G_FALSE;

257:
258: if (x_profile_id IS NOT NULL) then
259: x_return_status := FND_API.G_TRUE;
260: else
261: x_return_status := FND_API.G_FALSE;
262: end if;
263:
264: ELSIF ((p_profile_name IS NULL) AND (x_profile_id IS NOT NULL)) THEN
265:

Line 271: x_return_status := FND_API.G_TRUE;

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;
272: else
273: x_return_status := FND_API.G_FALSE;
274: end if;
275:

Line 273: x_return_status := FND_API.G_FALSE;

269:
270: if (l_temp_id IS NOT NULL) then
271: x_return_status := FND_API.G_TRUE;
272: else
273: x_return_status := FND_API.G_FALSE;
274: end if;
275:
276: ELSIF ((p_profile_name IS NOT NULL) AND (x_profile_id IS NOT NULL)) THEN
277:

Line 284: x_return_status := FND_API.G_TRUE;

280: WHERE profile_name = p_profile_name
281: and profile_id = x_profile_id;
282:
283: if (l_temp_id IS NOT NULL) then
284: x_return_status := FND_API.G_TRUE;
285: else
286: x_return_status := FND_API.G_FALSE;
287: end if;
288:

Line 286: x_return_status := FND_API.G_FALSE;

282:
283: if (l_temp_id IS NOT NULL) then
284: x_return_status := FND_API.G_TRUE;
285: else
286: x_return_status := FND_API.G_FALSE;
287: end if;
288:
289: else
290: x_return_status := FND_API.G_FALSE;

Line 290: x_return_status := FND_API.G_FALSE;

286: x_return_status := FND_API.G_FALSE;
287: end if;
288:
289: else
290: x_return_status := FND_API.G_FALSE;
291: end if;
292:
293: -- dbms_output.put_line( 'chk profile rtn status '||x_return_status);
294: EXCEPTION

Line 297: x_return_status := FND_API.G_FALSE;

293: -- dbms_output.put_line( 'chk profile rtn status '||x_return_status);
294: EXCEPTION
295:
296: WHEN NO_DATA_FOUND THEN
297: x_return_status := FND_API.G_FALSE;
298: when OTHERS then
299: RAISE FND_API.G_EXC_ERROR;
300: END check_profile_duplicates;
301:

Line 299: RAISE FND_API.G_EXC_ERROR;

295:
296: WHEN NO_DATA_FOUND THEN
297: x_return_status := FND_API.G_FALSE;
298: when OTHERS then
299: RAISE FND_API.G_EXC_ERROR;
300: END check_profile_duplicates;
301:
302: -- ****************************************************************************
303: -- ****************************************************************************

Line 533: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

529: -- ****************************************************************************
530: -- ****************************************************************************
531: PROCEDURE Create_Profile
532: ( p_api_version_number IN NUMBER,
533: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
534: p_commit IN VARCHAR2 := FND_API.G_FALSE,
535:
536: p_profile_id IN NUMBER,
537: p_profile_name IN VARCHAR2 := NULL,

Line 534: p_commit IN VARCHAR2 := FND_API.G_FALSE,

530: -- ****************************************************************************
531: PROCEDURE Create_Profile
532: ( p_api_version_number IN NUMBER,
533: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
534: p_commit IN VARCHAR2 := FND_API.G_FALSE,
535:
536: p_profile_id IN NUMBER,
537: p_profile_name IN VARCHAR2 := NULL,
538: p_profile_type IN VARCHAR2 := NULL,

Line 555: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

551: := p_profile_attrib_tbl;
552: l_any_errors BOOLEAN := FALSE;
553: l_any_row_errors BOOLEAN := FALSE;
554: l_rowid ROWID;
555: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
556: l_api_name CONSTANT VARCHAR2(30) := 'Create Profile';
557: l_count NUMBER := p_profile_attrib_tbl.count;
558: l_curr_row NUMBER := NULL;
559:

Line 560: l_duplicate VARCHAR2(240) := FND_API.G_FALSE;

556: l_api_name CONSTANT VARCHAR2(30) := 'Create Profile';
557: l_count NUMBER := p_profile_attrib_tbl.count;
558: l_curr_row NUMBER := NULL;
559:
560: l_duplicate VARCHAR2(240) := FND_API.G_FALSE;
561: l_profile_name VARCHAR2(60) := p_profile_name;
562:
563: -- Variables for ids
564: l_active_flag VARCHAR2(1) := 'Y';

Line 579: IF NOT FND_API.Compatible_API_Call ( l_api_version_number, p_api_version_number, l_api_name, G_PKG_NAME)

575:
576: --dbms_output.put_line('creating save point ');
577: /*
578: -- Standard call to check for call compatibility.
579: IF NOT FND_API.Compatible_API_Call ( l_api_version_number, p_api_version_number, l_api_name, G_PKG_NAME)
580: THEN
581: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
582: END IF;
583: */

Line 581: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

577: /*
578: -- Standard call to check for call compatibility.
579: IF NOT FND_API.Compatible_API_Call ( l_api_version_number, p_api_version_number, l_api_name, G_PKG_NAME)
580: THEN
581: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
582: END IF;
583: */
584: -- Initialize message list if p_init_msg_list is set to TRUE.
585: IF FND_API.to_Boolean( p_init_msg_list )

Line 585: IF FND_API.to_Boolean( p_init_msg_list )

581: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
582: END IF;
583: */
584: -- Initialize message list if p_init_msg_list is set to TRUE.
585: IF FND_API.to_Boolean( p_init_msg_list )
586: THEN
587: FND_MSG_PUB.initialize;
588: END IF;
589:

Line 591: x_return_status := FND_API.G_RET_STS_SUCCESS;

587: FND_MSG_PUB.initialize;
588: END IF;
589:
590: -- Initialize API return status to success
591: x_return_status := FND_API.G_RET_STS_SUCCESS;
592:
593:
594: -- profiles execution steps :
595: -- 1. check if duplicate exists

Line 614: IF (FND_API.To_Boolean(l_duplicate)) THEN

610: --dbms_output.put_line(' l_duplicate ' || l_duplicate);
611:
612: -- 1.2. IF PROFILE ALREADY EXISTS, RETURN ERROR !
613:
614: IF (FND_API.To_Boolean(l_duplicate)) THEN
615: -- x_return_status := FND_API.G_RET_STS_ERROR ;
616: RAISE FND_API.G_EXC_ERROR;
617: END IF;
618:

Line 615: -- x_return_status := FND_API.G_RET_STS_ERROR ;

611:
612: -- 1.2. IF PROFILE ALREADY EXISTS, RETURN ERROR !
613:
614: IF (FND_API.To_Boolean(l_duplicate)) THEN
615: -- x_return_status := FND_API.G_RET_STS_ERROR ;
616: RAISE FND_API.G_EXC_ERROR;
617: END IF;
618:
619: -- 1.3. IF NOT, CHECK IF THERE ARE ANY DUPLICATE ENTRIES AT ATTRIBUTES LEVEL

Line 616: RAISE FND_API.G_EXC_ERROR;

612: -- 1.2. IF PROFILE ALREADY EXISTS, RETURN ERROR !
613:
614: IF (FND_API.To_Boolean(l_duplicate)) THEN
615: -- x_return_status := FND_API.G_RET_STS_ERROR ;
616: RAISE FND_API.G_EXC_ERROR;
617: END IF;
618:
619: -- 1.3. IF NOT, CHECK IF THERE ARE ANY DUPLICATE ENTRIES AT ATTRIBUTES LEVEL
620:

Line 628: (p_profile_id <> FND_API.G_MISS_NUM)) then

624:
625: --dbms_output.put_line('inserting into profile table ');
626:
627: if ((p_profile_id is not null) and
628: (p_profile_id <> FND_API.G_MISS_NUM)) then
629: l_profile_id := p_profile_id;
630: end if;
631:
632: l_object_version_number := 1;

Line 667: IF (FND_API.To_Boolean(p_commit)) THEN

663: --
664: -- End of main API body.
665:
666: -- Standard check of p_commit.
667: IF (FND_API.To_Boolean(p_commit)) THEN
668: COMMIT WORK;
669: END IF;
670:
671: -- Standard call to get message count and if count is 1, get message info.

Line 677: WHEN FND_API.G_EXC_ERROR THEN

673: p_data => x_msg_data );
674:
675: EXCEPTION
676:
677: WHEN FND_API.G_EXC_ERROR THEN
678: -- dbms_output.put_line('stop 1 ');
679:
680: ROLLBACK TO CREATE_PERZ_PROFILE_PVT;
681: x_return_status := FND_API.G_RET_STS_ERROR ;

Line 681: x_return_status := FND_API.G_RET_STS_ERROR ;

677: WHEN FND_API.G_EXC_ERROR THEN
678: -- dbms_output.put_line('stop 1 ');
679:
680: ROLLBACK TO CREATE_PERZ_PROFILE_PVT;
681: x_return_status := FND_API.G_RET_STS_ERROR ;
682:
683: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
684: p_data => x_msg_data );
685:

Line 686: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

682:
683: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
684: p_data => x_msg_data );
685:
686: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
687: -- dbms_output.put_line('stop 2 ');
688: ROLLBACK TO CREATE_PERZ_PROFILE_PVT;
689: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
690:

Line 689: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

685:
686: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
687: -- dbms_output.put_line('stop 2 ');
688: ROLLBACK TO CREATE_PERZ_PROFILE_PVT;
689: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
690:
691: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
692: p_data => x_msg_data );
693:

Line 697: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

693:
694: WHEN OTHERS THEN
695: -- dbms_output.put_line('stop 3 ');
696: ROLLBACK TO CREATE_PERZ_PROFILE_PVT;
697: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
698:
699: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
700: THEN
701: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );

Line 713: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

709: -- ****************************************************************************
710:
711: PROCEDURE Get_Profile
712: ( p_api_version_number IN NUMBER,
713: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
714:
715: p_profile_id IN NUMBER := NULL,
716: p_profile_name IN VARCHAR2 := NULL,
717: p_profile_type IN VARCHAR2 := NULL,

Line 735: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

731:
732: l_any_errors BOOLEAN := FALSE;
733: l_any_row_errors BOOLEAN := FALSE;
734: l_rowid ROWID;
735: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
736: l_api_name CONSTANT VARCHAR2(30) := 'Get Profile';
737:
738: l_count NUMBER := p_profile_attrib_tbl.count;
739: l_curr_row NUMBER := 0;

Line 823: IF FND_API.to_Boolean( p_init_msg_list )

819: BEGIN
820: -- ******* Standard Begins ********
821:
822: -- Initialize message list if p_init_msg_list is set to TRUE.
823: IF FND_API.to_Boolean( p_init_msg_list )
824: THEN
825: FND_MSG_PUB.initialize;
826: END IF;
827:

Line 829: l_return_status := FND_API.G_RET_STS_SUCCESS;

825: FND_MSG_PUB.initialize;
826: END IF;
827:
828: -- Initialize API return status to success
829: l_return_status := FND_API.G_RET_STS_SUCCESS;
830:
831:
832: if (p_profile_id IS NOT NULL) then
833:

Line 845: x_return_status := FND_API.G_RET_STS_SUCCESS;

841: x_profile_tbl(i).ATTRIBUTE_TYPE:= curso_1profid.ATTRIBUTE_TYPE;
842: x_profile_tbl(i).ATTRIBUTE_VALUE:= curso_1profid.ATTRIBUTE_VALUE;
843: i := i+1;
844: end loop;
845: x_return_status := FND_API.G_RET_STS_SUCCESS;
846: return;
847:
848: elsif (p_profile_name IS NOT NULL) then
849:

Line 861: x_return_status := FND_API.G_RET_STS_SUCCESS;

857: x_profile_tbl(i).ATTRIBUTE_TYPE:= curso_1prof.ATTRIBUTE_TYPE;
858: x_profile_tbl(i).ATTRIBUTE_VALUE:= curso_1prof.ATTRIBUTE_VALUE;
859: i := i+1;
860: end loop;
861: x_return_status := FND_API.G_RET_STS_SUCCESS;
862: return;
863:
864: elsif ((p_profile_type IS NOT NULL) AND
865:

Line 867: (p_profile_attrib_tbl(1).PROFILE_ATTRIBUTE <> FND_API.G_MISS_CHAR)) AND

863:
864: elsif ((p_profile_type IS NOT NULL) AND
865:
866: ((p_profile_attrib_tbl(1).PROFILE_ATTRIBUTE IS NOT NULL) AND
867: (p_profile_attrib_tbl(1).PROFILE_ATTRIBUTE <> FND_API.G_MISS_CHAR)) AND
868:
869: ((p_profile_attrib_tbl(1).ATTRIBUTE_TYPE IS NOT NULL) AND
870: (p_profile_attrib_tbl(1).ATTRIBUTE_TYPE <> FND_API.G_MISS_CHAR))) then
871:

Line 870: (p_profile_attrib_tbl(1).ATTRIBUTE_TYPE <> FND_API.G_MISS_CHAR))) then

866: ((p_profile_attrib_tbl(1).PROFILE_ATTRIBUTE IS NOT NULL) AND
867: (p_profile_attrib_tbl(1).PROFILE_ATTRIBUTE <> FND_API.G_MISS_CHAR)) AND
868:
869: ((p_profile_attrib_tbl(1).ATTRIBUTE_TYPE IS NOT NULL) AND
870: (p_profile_attrib_tbl(1).ATTRIBUTE_TYPE <> FND_API.G_MISS_CHAR))) then
871:
872: for curso_4proftype in proftype4_curs(p_profile_type, p_profile_attrib_tbl(1).PROFILE_ATTRIBUTE,
873: p_profile_attrib_tbl(1).ATTRIBUTE_TYPE) loop
874: x_profile_tbl(i).Profile_ID := curso_4proftype.PROFILE_ID ;

Line 885: x_return_status := FND_API.G_RET_STS_SUCCESS;

881: x_profile_tbl(i).ATTRIBUTE_VALUE:= curso_4proftype.ATTRIBUTE_VALUE;
882: i := i+1;
883: end loop;
884:
885: x_return_status := FND_API.G_RET_STS_SUCCESS;
886: return;
887:
888: elsif ((p_profile_type IS NOT NULL) AND
889: (p_profile_attrib_tbl(1).PROFILE_ATTRIBUTE IS NOT NULL) AND

Line 890: (p_profile_attrib_tbl(1).PROFILE_ATTRIBUTE <> FND_API.G_MISS_CHAR)) then

886: return;
887:
888: elsif ((p_profile_type IS NOT NULL) AND
889: (p_profile_attrib_tbl(1).PROFILE_ATTRIBUTE IS NOT NULL) AND
890: (p_profile_attrib_tbl(1).PROFILE_ATTRIBUTE <> FND_API.G_MISS_CHAR)) then
891:
892: for curso_2proftype in proftype2_curs(p_profile_type, p_profile_attrib_tbl(1).PROFILE_ATTRIBUTE) loop
893: x_profile_tbl(i).Profile_ID := curso_2proftype.PROFILE_ID ;
894: x_profile_tbl(i).PROFILE_NAME:= curso_2proftype.PROFILE_NAME;

Line 903: x_return_status := FND_API.G_RET_STS_SUCCESS;

899: x_profile_tbl(i).ATTRIBUTE_TYPE:= curso_2proftype.ATTRIBUTE_TYPE;
900: x_profile_tbl(i).ATTRIBUTE_VALUE:= curso_2proftype.ATTRIBUTE_VALUE;
901: i := i+1;
902: end loop;
903: x_return_status := FND_API.G_RET_STS_SUCCESS;
904: return;
905:
906: elsif ((p_profile_type IS NOT NULL) AND
907: (p_profile_attrib_tbl(1).ATTRIBUTE_TYPE IS NOT NULL) AND

Line 908: (p_profile_attrib_tbl(1).ATTRIBUTE_TYPE <> FND_API.G_MISS_CHAR)) then

904: return;
905:
906: elsif ((p_profile_type IS NOT NULL) AND
907: (p_profile_attrib_tbl(1).ATTRIBUTE_TYPE IS NOT NULL) AND
908: (p_profile_attrib_tbl(1).ATTRIBUTE_TYPE <> FND_API.G_MISS_CHAR)) then
909:
910: for curso_3proftype in proftype3_curs(p_profile_type, p_profile_attrib_tbl(1).ATTRIBUTE_TYPE) loop
911: x_profile_tbl(i).Profile_ID := curso_3proftype.PROFILE_ID ;
912: x_profile_tbl(i).PROFILE_NAME:= curso_3proftype.PROFILE_NAME;

Line 921: x_return_status := FND_API.G_RET_STS_SUCCESS;

917: x_profile_tbl(i).ATTRIBUTE_TYPE:= curso_3proftype.ATTRIBUTE_TYPE;
918: x_profile_tbl(i).ATTRIBUTE_VALUE:= curso_3proftype.ATTRIBUTE_VALUE;
919: i := i+1;
920: end loop;
921: x_return_status := FND_API.G_RET_STS_SUCCESS;
922: return;
923:
924: else
925: for curso_1proftype in proftype1_curs(p_profile_type) loop

Line 936: x_return_status := FND_API.G_RET_STS_SUCCESS;

932: x_profile_tbl(i).ATTRIBUTE_TYPE:= curso_1proftype.ATTRIBUTE_TYPE;
933: x_profile_tbl(i).ATTRIBUTE_VALUE:= curso_1proftype.ATTRIBUTE_VALUE;
934: i := i+1;
935: end loop;
936: x_return_status := FND_API.G_RET_STS_SUCCESS;
937:
938: end if;
939:
940:

Line 966: WHEN FND_API.G_EXC_ERROR THEN

962: p_data => x_msg_data );
963:
964: EXCEPTION
965:
966: WHEN FND_API.G_EXC_ERROR THEN
967: --dbms_output.put_line('stop 1 ');
968:
969: --ROLLBACK TO CREATE_PERZ_PROFILE_PVT;
970: x_return_status := FND_API.G_RET_STS_ERROR ;

Line 970: x_return_status := FND_API.G_RET_STS_ERROR ;

966: WHEN FND_API.G_EXC_ERROR THEN
967: --dbms_output.put_line('stop 1 ');
968:
969: --ROLLBACK TO CREATE_PERZ_PROFILE_PVT;
970: x_return_status := FND_API.G_RET_STS_ERROR ;
971:
972: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
973: p_data => x_msg_data );
974:

Line 975: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

971:
972: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
973: p_data => x_msg_data );
974:
975: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
976: --dbms_output.put_line('stop 2 ');
977: -- ROLLBACK TO CREATE_PERZ_PROFILE_PVT;
978: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
979:

Line 978: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

974:
975: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
976: --dbms_output.put_line('stop 2 ');
977: -- ROLLBACK TO CREATE_PERZ_PROFILE_PVT;
978: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
979:
980: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
981: p_data => x_msg_data );
982:

Line 986: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

982:
983: WHEN OTHERS THEN
984: --dbms_output.put_line('stop 3 ');
985: --ROLLBACK TO CREATE_PERZ_PROFILE_PVT;
986: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
987:
988: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
989: THEN
990: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );

Line 1002: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

998: -- ****************************************************************************
999:
1000: PROCEDURE Update_Profile
1001: ( p_api_version_number IN NUMBER,
1002: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1003: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1004: p_profile_id IN NUMBER,
1005: p_profile_name IN VARCHAR2,
1006: p_profile_type IN VARCHAR2 := NULL,

Line 1003: p_commit IN VARCHAR2 := FND_API.G_FALSE,

999:
1000: PROCEDURE Update_Profile
1001: ( p_api_version_number IN NUMBER,
1002: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1003: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1004: p_profile_id IN NUMBER,
1005: p_profile_name IN VARCHAR2,
1006: p_profile_type IN VARCHAR2 := NULL,
1007: p_profile_desc IN VARCHAR2 ,

Line 1021: l_init_msg_list VARCHAR2(240):= FND_API.G_TRUE;

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;
1023: l_msg_data VARCHAR2(2000);
1024: l_any_errors BOOLEAN := FALSE;
1025: l_any_row_errors BOOLEAN := FALSE;

Line 1027: l_return_status VARCHAR2(240) := FND_API.G_RET_STS_SUCCESS;

1023: l_msg_data VARCHAR2(2000);
1024: l_any_errors BOOLEAN := FALSE;
1025: l_any_row_errors BOOLEAN := FALSE;
1026: l_rowid ROWID;
1027: l_return_status VARCHAR2(240) := FND_API.G_RET_STS_SUCCESS;
1028: l_api_name CONSTANT VARCHAR2(30) := 'Update Profile';
1029: l_count NUMBER := p_profile_attrib_tbl.count;
1030: l_count_1 NUMBER := NULL;
1031: l_curr_row NUMBER := NULL;

Line 1033: l_duplicate VARCHAR2(240) := FND_API.G_FALSE;

1029: l_count NUMBER := p_profile_attrib_tbl.count;
1030: l_count_1 NUMBER := NULL;
1031: l_curr_row NUMBER := NULL;
1032: l_curr_row_1 NUMBER := NULL;
1033: l_duplicate VARCHAR2(240) := FND_API.G_FALSE;
1034: l_profile_name VARCHAR2(100) := NULL;
1035: l_profile_desc VARCHAR2(240) := FND_API.G_MISS_CHAR;
1036: l_active_flag VARCHAR2(1) := 'Y';
1037: l_is_duplicate VARCHAR2(1);

Line 1035: l_profile_desc VARCHAR2(240) := FND_API.G_MISS_CHAR;

1031: l_curr_row NUMBER := NULL;
1032: l_curr_row_1 NUMBER := NULL;
1033: l_duplicate VARCHAR2(240) := FND_API.G_FALSE;
1034: l_profile_name VARCHAR2(100) := NULL;
1035: l_profile_desc VARCHAR2(240) := FND_API.G_MISS_CHAR;
1036: l_active_flag VARCHAR2(1) := 'Y';
1037: l_is_duplicate VARCHAR2(1);
1038: l_found_flag BOOLEAN := FALSE;
1039: l_profile_type VARCHAR2(30);

Line 1053: IF NOT FND_API.Compatible_API_Call ( l_api_version_number, p_api_version_number, l_api_name, G_PKG_NAME)

1049: -- Standard Start of API savepoint
1050: SAVEPOINT UPDATE_PERZ_PROFILE_PVT;
1051: /*
1052: -- Standard call to check for call compatibility.
1053: IF NOT FND_API.Compatible_API_Call ( l_api_version_number, p_api_version_number, l_api_name, G_PKG_NAME)
1054: THEN
1055: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1056: END IF;
1057: */

Line 1055: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1051: /*
1052: -- Standard call to check for call compatibility.
1053: IF NOT FND_API.Compatible_API_Call ( l_api_version_number, p_api_version_number, l_api_name, G_PKG_NAME)
1054: THEN
1055: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1056: END IF;
1057: */
1058: -- Initialize message list if p_init_msg_list is set to TRUE.
1059: IF FND_API.to_Boolean( p_init_msg_list )

Line 1059: IF FND_API.to_Boolean( p_init_msg_list )

1055: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1056: END IF;
1057: */
1058: -- Initialize message list if p_init_msg_list is set to TRUE.
1059: IF FND_API.to_Boolean( p_init_msg_list )
1060: THEN
1061: FND_MSG_PUB.initialize;
1062: END IF;
1063:

Line 1065: x_return_status := FND_API.G_RET_STS_SUCCESS;

1061: FND_MSG_PUB.initialize;
1062: END IF;
1063:
1064: -- Initialize API return status to success
1065: x_return_status := FND_API.G_RET_STS_SUCCESS;
1066:
1067: if (p_profile_id is not null) AND
1068: (p_profile_id <> FND_API.G_MISS_NUM) then
1069: l_profile_id := p_profile_id;

Line 1068: (p_profile_id <> FND_API.G_MISS_NUM) then

1064: -- Initialize API return status to success
1065: x_return_status := FND_API.G_RET_STS_SUCCESS;
1066:
1067: if (p_profile_id is not null) AND
1068: (p_profile_id <> FND_API.G_MISS_NUM) then
1069: l_profile_id := p_profile_id;
1070: else
1071: l_profile_id := NULL;
1072: end if;

Line 1074: (p_profile_name <> FND_API.G_MISS_CHAR) then

1070: else
1071: l_profile_id := NULL;
1072: end if;
1073: if (p_profile_name is not null) AND
1074: (p_profile_name <> FND_API.G_MISS_CHAR) then
1075: l_profile_name := p_profile_name;
1076: else
1077: l_profile_name := NULL;
1078: end if;

Line 1081: raise FND_API.G_EXC_ERROR;

1077: l_profile_name := NULL;
1078: end if;
1079:
1080: if (l_profile_id is null and l_profile_name is null) then
1081: raise FND_API.G_EXC_ERROR;
1082: end if;
1083: l_profile_type := NULL;
1084:
1085: Get_Profile(

Line 1102: IF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN

1098: l_profile_id := l_attributes_from_database(1).PROFILE_ID;
1099: l_profile_name := l_attributes_from_database(1).profile_name;
1100: l_count_1 := l_attributes_from_database.count;
1101:
1102: IF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
1103: l_count := l_profile_attrib_tbl.count;
1104:
1105: if (( p_profile_type is null) OR
1106: (p_profile_type = FND_API.G_MISS_CHAR)) then

Line 1106: (p_profile_type = FND_API.G_MISS_CHAR)) then

1102: IF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
1103: l_count := l_profile_attrib_tbl.count;
1104:
1105: if (( p_profile_type is null) OR
1106: (p_profile_type = FND_API.G_MISS_CHAR)) then
1107: l_profile_type := FND_API.G_MISS_CHAR;
1108: else
1109: l_profile_type := p_profile_type;
1110: end if;

Line 1107: l_profile_type := FND_API.G_MISS_CHAR;

1103: l_count := l_profile_attrib_tbl.count;
1104:
1105: if (( p_profile_type is null) OR
1106: (p_profile_type = FND_API.G_MISS_CHAR)) then
1107: l_profile_type := FND_API.G_MISS_CHAR;
1108: else
1109: l_profile_type := p_profile_type;
1110: end if;
1111:

Line 1114: (p_profile_desc = FND_API.G_MISS_CHAR)) then

1110: end if;
1111:
1112:
1113: if (( p_profile_desc is null) OR
1114: (p_profile_desc = FND_API.G_MISS_CHAR)) then
1115: l_profile_desc := FND_API.G_MISS_CHAR;
1116: else
1117: l_profile_desc := p_profile_desc;
1118: end if;

Line 1115: l_profile_desc := FND_API.G_MISS_CHAR;

1111:
1112:
1113: if (( p_profile_desc is null) OR
1114: (p_profile_desc = FND_API.G_MISS_CHAR)) then
1115: l_profile_desc := FND_API.G_MISS_CHAR;
1116: else
1117: l_profile_desc := p_profile_desc;
1118: end if;
1119:

Line 1182: x_return_status := FND_API.G_RET_STS_SUCCESS;

1178:
1179: END LOOP; -- end outer loop
1180:
1181: if (x_return_status is not null) then
1182: x_return_status := FND_API.G_RET_STS_SUCCESS;
1183: end if;
1184:
1185: END IF; -- for success check
1186: -- ******** Standard Ends ***********

Line 1191: IF (FND_API.To_Boolean(p_commit)) THEN

1187: --
1188: -- End of main API body.
1189:
1190: -- Standard check of p_commit.
1191: IF (FND_API.To_Boolean(p_commit)) THEN
1192: COMMIT WORK;
1193: END IF;
1194:
1195: -- Standard call to get message count and if count is 1, get message info.

Line 1201: WHEN FND_API.G_EXC_ERROR THEN

1197: p_data => x_msg_data );
1198:
1199: EXCEPTION
1200:
1201: WHEN FND_API.G_EXC_ERROR THEN
1202: ROLLBACK TO UPDATE_PERZ_PROFILE_PVT;
1203: x_return_status := FND_API.G_RET_STS_ERROR ;
1204:
1205: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

Line 1203: x_return_status := FND_API.G_RET_STS_ERROR ;

1199: EXCEPTION
1200:
1201: WHEN FND_API.G_EXC_ERROR THEN
1202: ROLLBACK TO UPDATE_PERZ_PROFILE_PVT;
1203: x_return_status := FND_API.G_RET_STS_ERROR ;
1204:
1205: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1206: p_data => x_msg_data );
1207:

Line 1208: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1204:
1205: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1206: p_data => x_msg_data );
1207:
1208: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1209: ROLLBACK TO UPDATE_PERZ_PROFILE_PVT;
1210: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1211:
1212: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

Line 1210: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1206: p_data => x_msg_data );
1207:
1208: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1209: ROLLBACK TO UPDATE_PERZ_PROFILE_PVT;
1210: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1211:
1212: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
1213: p_data => x_msg_data );
1214:

Line 1217: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1213: p_data => x_msg_data );
1214:
1215: WHEN OTHERS THEN
1216: ROLLBACK TO UPDATE_PERZ_PROFILE_PVT;
1217: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1218: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1219: THEN
1220: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1221: END IF;