DBA Data[Home] [Help]

APPS.IGS_PE_VISAPASS_PUB dependencies on IGS_PE_VISA

Line 1: PACKAGE BODY IGS_PE_VISAPASS_PUB AS

1: PACKAGE BODY IGS_PE_VISAPASS_PUB AS
2: /* $Header: IGSPE16B.pls 120.1 2005/10/17 02:22:50 appldev noship $ */
3:
4: /******************************************************************************
5: || Created By : ssaleem

Line 17: G_PKG_NAME CONSTANT VARCHAR2(30):='IGS_PE_VISAPASS_PUB';

13: || vredkar 14-Oct-2005 Bug#4654248,replaced generic duplicate/overlap
14: || exists messages with component specific messages
15: ******************************************************************************/
16:
17: G_PKG_NAME CONSTANT VARCHAR2(30):='IGS_PE_VISAPASS_PUB';
18:
19: -- Start of comments
20: -- API name : Create_Visa
21: -- Type : Public

Line 69: l_error_code igs_pe_visa_int.error_code%TYPE;

65:
66: l_api_name CONSTANT VARCHAR2(30) := 'Create_Visa';
67: l_api_version CONSTANT NUMBER := 1.0;
68:
69: l_error_code igs_pe_visa_int.error_code%TYPE;
70: l_message_name VARCHAR2(30);
71: l_app VARCHAR2(50);
72: l_rowid ROWID := NULL;
73:

Line 244: IGS_PE_VISA_PKG.INSERT_ROW(

240: END IF;
241:
242: IF igs_ad_imp_026.validate_visa_pub(api_visa_rec => l_visa_rec, p_err_code => l_error_code) THEN
243:
244: IGS_PE_VISA_PKG.INSERT_ROW(
245: X_ROWID => l_rowid,
246: X_VISA_ID => x_visa_id,
247: X_PERSON_ID => l_visa_rec.person_id,
248: X_VISA_TYPE => l_visa_rec.VISA_TYPE ,

Line 315: IF l_message_name IN('IGS_PE_VIS_ASOC_PASS_EXP','IGS_FOREIGN_KEY_REFERENCE','IGS_PE_VISA_DATE_OVERLAP','IGS_EN_INV','IGS_PS_LGCY_MANDATORY', 'IGS_PE_VIPS_UPD_ERR') THEN

311:
312: FND_MESSAGE.PARSE_ENCODED(FND_MESSAGE.GET_ENCODED, l_app, l_message_name);
313: x_msg_count := 1;
314:
315: IF l_message_name IN('IGS_PE_VIS_ASOC_PASS_EXP','IGS_FOREIGN_KEY_REFERENCE','IGS_PE_VISA_DATE_OVERLAP','IGS_EN_INV','IGS_PS_LGCY_MANDATORY', 'IGS_PE_VIPS_UPD_ERR') THEN
316: x_return_status := FND_API.G_RET_STS_ERROR ;
317: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_FIRST, p_encoded => 'F');
318: ELSIF l_message_name = 'FORM_RECORD_DELETED' THEN
319: x_return_status := FND_API.G_RET_STS_ERROR ;

Line 324: ELSIF l_message_name = 'IGS_PE_VISA_DUP_EXISTS' THEN

320: fnd_message.set_name ('IGS', 'IGS_EN_INV');
321: fnd_message.set_token('PARAM','PERSON_ID');
322: igs_ge_msg_stack.add;
323: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_LAST, p_encoded => 'F');
324: ELSIF l_message_name = 'IGS_PE_VISA_DUP_EXISTS' THEN
325: x_return_status := FND_API.G_RET_STS_ERROR ;
326: fnd_message.set_name ('IGS', 'IGS_PE_UNIQUE_FAILED');
327: fnd_message.set_token('COLUMN','PERSON_ID,VISA_TYPE,VISA_ISSUE_DATE');
328: igs_ge_msg_stack.add;

Line 392: FROM IGS_PE_VISA

388: attribute_category,attribute1, attribute2, attribute3, attribute4, attribute5, attribute6,
389: attribute7, attribute8, attribute9, attribute10, attribute11, attribute12, attribute13,
390: attribute14, attribute15, attribute16, attribute17, attribute18, attribute19, attribute20,
391: visa_issuing_country
392: FROM IGS_PE_VISA
393: WHERE VISA_ID = cp_visa_rec.visa_id FOR UPDATE NOWAIT;
394:
395: dup_visa_rec null_handlng_cur%ROWTYPE;
396: l_error_code igs_pe_visa_int.error_code%TYPE;

Line 396: l_error_code igs_pe_visa_int.error_code%TYPE;

392: FROM IGS_PE_VISA
393: WHERE VISA_ID = cp_visa_rec.visa_id FOR UPDATE NOWAIT;
394:
395: dup_visa_rec null_handlng_cur%ROWTYPE;
396: l_error_code igs_pe_visa_int.error_code%TYPE;
397:
398: l_message_name VARCHAR2(30);
399: l_app VARCHAR2(50);
400:

Line 675: IGS_PE_VISA_PKG.UPDATE_ROW (

671: x_msg_count := 0;
672:
673: IF igs_ad_imp_026.validate_visa_pub(api_visa_rec => l_visa_rec, p_err_code => l_error_code) THEN
674:
675: IGS_PE_VISA_PKG.UPDATE_ROW (
676: X_ROWID => dup_visa_rec.rowid,
677: X_VISA_ID => l_visa_rec.visa_id,
678: X_PERSON_ID => l_visa_rec.person_id,
679: X_VISA_TYPE => l_visa_rec.visa_type,

Line 751: IF l_message_name IN('IGS_PE_VIS_ASOC_PASS_EXP','IGS_PE_VISA_DUP_EXISTS','IGS_PE_VISA_DATE_OVERLAP','IGS_EN_INV','IGS_PS_LGCY_MANDATORY', 'IGS_PE_VIPS_UPD_ERR','IGS_PE_VIPS_COL_NONUPD','FORM_RECORD_DELETED') THEN

747: ROLLBACK TO Update_Visa_PUB;
748: FND_MESSAGE.PARSE_ENCODED(FND_MESSAGE.GET_ENCODED, l_app, l_message_name);
749:
750: x_msg_count := 1;
751: IF l_message_name IN('IGS_PE_VIS_ASOC_PASS_EXP','IGS_PE_VISA_DUP_EXISTS','IGS_PE_VISA_DATE_OVERLAP','IGS_EN_INV','IGS_PS_LGCY_MANDATORY', 'IGS_PE_VIPS_UPD_ERR','IGS_PE_VIPS_COL_NONUPD','FORM_RECORD_DELETED') THEN
752: x_return_status := FND_API.G_RET_STS_ERROR ;
753: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_FIRST, p_encoded => 'F');
754: ELSE
755: x_msg_data := SQLERRM;

Line 1602: END IGS_PE_VISAPASS_PUB;

1598: END IF;
1599:
1600: END Update_Passport;
1601:
1602: END IGS_PE_VISAPASS_PUB;