eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.IGS_PE_VISAPASS_PUB dependencies on FND_API

Line 27: -- Default = FND_API.G_FALSE

23: -- Pre-reqs : None.
24: -- Parameters :
25: -- IN : p_api_version IN NUMBER Required
26: -- p_init_msg_list IN VARCHAR2 Optional
27: -- Default = FND_API.G_FALSE
28: -- p_commit IN VARCHAR2 Optional
29: -- Default = FND_API.G_FALSE
30: -- Default = FND_API.G_VALID_LEVEL_FULL
31: -- p_visa_rec IN visa_rec_type

Line 29: -- Default = FND_API.G_FALSE

25: -- IN : p_api_version IN NUMBER Required
26: -- p_init_msg_list IN VARCHAR2 Optional
27: -- Default = FND_API.G_FALSE
28: -- p_commit IN VARCHAR2 Optional
29: -- Default = FND_API.G_FALSE
30: -- Default = FND_API.G_VALID_LEVEL_FULL
31: -- p_visa_rec IN visa_rec_type
32: --
33: --

Line 30: -- Default = FND_API.G_VALID_LEVEL_FULL

26: -- p_init_msg_list IN VARCHAR2 Optional
27: -- Default = FND_API.G_FALSE
28: -- p_commit IN VARCHAR2 Optional
29: -- Default = FND_API.G_FALSE
30: -- Default = FND_API.G_VALID_LEVEL_FULL
31: -- p_visa_rec IN visa_rec_type
32: --
33: --
34: -- OUT : x_return_status OUT VARCHAR2(1)

Line 55: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,

51: -- End of comments
52:
53: PROCEDURE Create_Visa
54: ( p_api_version IN NUMBER,
55: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
56: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
57: x_return_status OUT NOCOPY VARCHAR2,
58: x_msg_count OUT NOCOPY NUMBER,
59: x_msg_data OUT NOCOPY VARCHAR2,

Line 56: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,

52:
53: PROCEDURE Create_Visa
54: ( p_api_version IN NUMBER,
55: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
56: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
57: x_return_status OUT NOCOPY VARCHAR2,
58: x_msg_count OUT NOCOPY NUMBER,
59: x_msg_data OUT NOCOPY VARCHAR2,
60: p_visa_rec IN visa_rec_type,

Line 77: IF NOT FND_API.Compatible_API_Call ( l_api_version,

73:
74: l_visa_rec visa_rec_type;
75: BEGIN
76: SAVEPOINT Create_Visa_PUB;
77: IF NOT FND_API.Compatible_API_Call ( l_api_version,
78: p_api_version,
79: l_api_name,
80: G_PKG_NAME )
81: THEN

Line 82: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

78: p_api_version,
79: l_api_name,
80: G_PKG_NAME )
81: THEN
82: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
83: END IF;
84:
85: IF FND_API.to_Boolean( p_init_msg_list ) THEN
86: FND_MSG_PUB.initialize;

Line 85: IF FND_API.to_Boolean( p_init_msg_list ) THEN

81: THEN
82: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
83: END IF;
84:
85: IF FND_API.to_Boolean( p_init_msg_list ) THEN
86: FND_MSG_PUB.initialize;
87: END IF;
88:
89: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 89: x_return_status := FND_API.G_RET_STS_SUCCESS;

85: IF FND_API.to_Boolean( p_init_msg_list ) THEN
86: FND_MSG_PUB.initialize;
87: END IF;
88:
89: x_return_status := FND_API.G_RET_STS_SUCCESS;
90: -- Start here
91:
92: l_visa_rec := p_visa_rec;
93: x_msg_count := 0;

Line 99: IF l_visa_rec.person_id IS NULL OR l_visa_rec.person_id = FND_API.G_MISS_NUM THEN

95: l_visa_rec.visa_issue_date := TRUNC(l_visa_rec.visa_issue_date);
96: l_visa_rec.visa_expiry_date := TRUNC(l_visa_rec.visa_expiry_date);
97:
98:
99: IF l_visa_rec.person_id IS NULL OR l_visa_rec.person_id = FND_API.G_MISS_NUM THEN
100: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
101: fnd_message.set_token('PARAM','PERSON_ID');
102: igs_ge_msg_stack.add;
103: app_exception.raise_exception;

Line 106: IF l_visa_rec.visa_type IS NULL OR l_visa_rec.visa_type = FND_API.G_MISS_CHAR THEN

102: igs_ge_msg_stack.add;
103: app_exception.raise_exception;
104: END IF;
105:
106: IF l_visa_rec.visa_type IS NULL OR l_visa_rec.visa_type = FND_API.G_MISS_CHAR THEN
107: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
108: fnd_message.set_token('PARAM','VISA_TYPE');
109: igs_ge_msg_stack.add;
110: app_exception.raise_exception;

Line 113: IF l_visa_rec.visa_number IS NULL OR l_visa_rec.visa_number = FND_API.G_MISS_CHAR THEN

109: igs_ge_msg_stack.add;
110: app_exception.raise_exception;
111: END IF;
112:
113: IF l_visa_rec.visa_number IS NULL OR l_visa_rec.visa_number = FND_API.G_MISS_CHAR THEN
114: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
115: fnd_message.set_token('PARAM','VISA_NUMBER');
116: igs_ge_msg_stack.add;
117: app_exception.raise_exception;

Line 120: IF l_visa_rec.visa_issue_date IS NULL OR l_visa_rec.visa_issue_date = FND_API.G_MISS_DATE THEN

116: igs_ge_msg_stack.add;
117: app_exception.raise_exception;
118: END IF;
119:
120: IF l_visa_rec.visa_issue_date IS NULL OR l_visa_rec.visa_issue_date = FND_API.G_MISS_DATE THEN
121: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
122: fnd_message.set_token('PARAM','VISA_ISSUE_DATE');
123: igs_ge_msg_stack.add;
124: app_exception.raise_exception;

Line 127: IF l_visa_rec.visa_expiry_date IS NULL OR l_visa_rec.visa_expiry_date = FND_API.G_MISS_DATE THEN

123: igs_ge_msg_stack.add;
124: app_exception.raise_exception;
125: END IF;
126:
127: IF l_visa_rec.visa_expiry_date IS NULL OR l_visa_rec.visa_expiry_date = FND_API.G_MISS_DATE THEN
128: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
129: fnd_message.set_token('PARAM','visa_expiry_date');
130: igs_ge_msg_stack.add;
131: app_exception.raise_exception;

Line 134: IF l_visa_rec.visa_issuing_post = FND_API.G_MISS_CHAR THEN

130: igs_ge_msg_stack.add;
131: app_exception.raise_exception;
132: END IF;
133:
134: IF l_visa_rec.visa_issuing_post = FND_API.G_MISS_CHAR THEN
135: l_visa_rec.visa_issuing_post := NULL;
136: END IF;
137:
138: IF l_visa_rec.passport_id = FND_API.G_MISS_NUM THEN

Line 138: IF l_visa_rec.passport_id = FND_API.G_MISS_NUM THEN

134: IF l_visa_rec.visa_issuing_post = FND_API.G_MISS_CHAR THEN
135: l_visa_rec.visa_issuing_post := NULL;
136: END IF;
137:
138: IF l_visa_rec.passport_id = FND_API.G_MISS_NUM THEN
139: l_visa_rec.passport_id := NULL;
140: END IF;
141:
142: IF l_visa_rec.agent_org_unit_cd = FND_API.G_MISS_CHAR THEN

Line 142: IF l_visa_rec.agent_org_unit_cd = FND_API.G_MISS_CHAR THEN

138: IF l_visa_rec.passport_id = FND_API.G_MISS_NUM THEN
139: l_visa_rec.passport_id := NULL;
140: END IF;
141:
142: IF l_visa_rec.agent_org_unit_cd = FND_API.G_MISS_CHAR THEN
143: l_visa_rec.agent_org_unit_cd := NULL;
144: END IF;
145:
146: IF l_visa_rec.agent_person_id = FND_API.G_MISS_NUM THEN

Line 146: IF l_visa_rec.agent_person_id = FND_API.G_MISS_NUM THEN

142: IF l_visa_rec.agent_org_unit_cd = FND_API.G_MISS_CHAR THEN
143: l_visa_rec.agent_org_unit_cd := NULL;
144: END IF;
145:
146: IF l_visa_rec.agent_person_id = FND_API.G_MISS_NUM THEN
147: l_visa_rec.agent_person_id := NULL;
148: END IF;
149:
150: IF l_visa_rec.visa_number = FND_API.G_MISS_CHAR THEN

Line 150: IF l_visa_rec.visa_number = FND_API.G_MISS_CHAR THEN

146: IF l_visa_rec.agent_person_id = FND_API.G_MISS_NUM THEN
147: l_visa_rec.agent_person_id := NULL;
148: END IF;
149:
150: IF l_visa_rec.visa_number = FND_API.G_MISS_CHAR THEN
151: l_visa_rec.visa_number := NULL;
152: END IF;
153:
154: IF l_visa_rec.agent_contact_name = FND_API.G_MISS_CHAR THEN

Line 154: IF l_visa_rec.agent_contact_name = FND_API.G_MISS_CHAR THEN

150: IF l_visa_rec.visa_number = FND_API.G_MISS_CHAR THEN
151: l_visa_rec.visa_number := NULL;
152: END IF;
153:
154: IF l_visa_rec.agent_contact_name = FND_API.G_MISS_CHAR THEN
155: l_visa_rec.agent_contact_name := NULL;
156: END IF;
157:
158: IF l_visa_rec.attribute_category = FND_API.G_MISS_CHAR THEN

Line 158: IF l_visa_rec.attribute_category = FND_API.G_MISS_CHAR THEN

154: IF l_visa_rec.agent_contact_name = FND_API.G_MISS_CHAR THEN
155: l_visa_rec.agent_contact_name := NULL;
156: END IF;
157:
158: IF l_visa_rec.attribute_category = FND_API.G_MISS_CHAR THEN
159: l_visa_rec.attribute_category := NULL;
160: END IF;
161:
162: IF l_visa_rec.attribute1 = FND_API.G_MISS_CHAR THEN

Line 162: IF l_visa_rec.attribute1 = FND_API.G_MISS_CHAR THEN

158: IF l_visa_rec.attribute_category = FND_API.G_MISS_CHAR THEN
159: l_visa_rec.attribute_category := NULL;
160: END IF;
161:
162: IF l_visa_rec.attribute1 = FND_API.G_MISS_CHAR THEN
163: l_visa_rec.attribute1 := NULL;
164: END IF;
165:
166: IF l_visa_rec.attribute2 = FND_API.G_MISS_CHAR THEN

Line 166: IF l_visa_rec.attribute2 = FND_API.G_MISS_CHAR THEN

162: IF l_visa_rec.attribute1 = FND_API.G_MISS_CHAR THEN
163: l_visa_rec.attribute1 := NULL;
164: END IF;
165:
166: IF l_visa_rec.attribute2 = FND_API.G_MISS_CHAR THEN
167: l_visa_rec.attribute2 := NULL;
168: END IF;
169:
170: IF l_visa_rec.attribute4 = FND_API.G_MISS_CHAR THEN

Line 170: IF l_visa_rec.attribute4 = FND_API.G_MISS_CHAR THEN

166: IF l_visa_rec.attribute2 = FND_API.G_MISS_CHAR THEN
167: l_visa_rec.attribute2 := NULL;
168: END IF;
169:
170: IF l_visa_rec.attribute4 = FND_API.G_MISS_CHAR THEN
171: l_visa_rec.attribute4 := NULL;
172: END IF;
173:
174: IF l_visa_rec.attribute5 = FND_API.G_MISS_CHAR THEN

Line 174: IF l_visa_rec.attribute5 = FND_API.G_MISS_CHAR THEN

170: IF l_visa_rec.attribute4 = FND_API.G_MISS_CHAR THEN
171: l_visa_rec.attribute4 := NULL;
172: END IF;
173:
174: IF l_visa_rec.attribute5 = FND_API.G_MISS_CHAR THEN
175: l_visa_rec.attribute5 := NULL;
176: END IF;
177:
178: IF l_visa_rec.attribute6 = FND_API.G_MISS_CHAR THEN

Line 178: IF l_visa_rec.attribute6 = FND_API.G_MISS_CHAR THEN

174: IF l_visa_rec.attribute5 = FND_API.G_MISS_CHAR THEN
175: l_visa_rec.attribute5 := NULL;
176: END IF;
177:
178: IF l_visa_rec.attribute6 = FND_API.G_MISS_CHAR THEN
179: l_visa_rec.attribute6 := NULL;
180: END IF;
181:
182: IF l_visa_rec.attribute7 = FND_API.G_MISS_CHAR THEN

Line 182: IF l_visa_rec.attribute7 = FND_API.G_MISS_CHAR THEN

178: IF l_visa_rec.attribute6 = FND_API.G_MISS_CHAR THEN
179: l_visa_rec.attribute6 := NULL;
180: END IF;
181:
182: IF l_visa_rec.attribute7 = FND_API.G_MISS_CHAR THEN
183: l_visa_rec.attribute7 := NULL;
184: END IF;
185:
186: IF l_visa_rec.attribute8 = FND_API.G_MISS_CHAR THEN

Line 186: IF l_visa_rec.attribute8 = FND_API.G_MISS_CHAR THEN

182: IF l_visa_rec.attribute7 = FND_API.G_MISS_CHAR THEN
183: l_visa_rec.attribute7 := NULL;
184: END IF;
185:
186: IF l_visa_rec.attribute8 = FND_API.G_MISS_CHAR THEN
187: l_visa_rec.attribute8 := NULL;
188: END IF;
189:
190: IF l_visa_rec.attribute9 = FND_API.G_MISS_CHAR THEN

Line 190: IF l_visa_rec.attribute9 = FND_API.G_MISS_CHAR THEN

186: IF l_visa_rec.attribute8 = FND_API.G_MISS_CHAR THEN
187: l_visa_rec.attribute8 := NULL;
188: END IF;
189:
190: IF l_visa_rec.attribute9 = FND_API.G_MISS_CHAR THEN
191: l_visa_rec.attribute9 := NULL;
192: END IF;
193:
194: IF l_visa_rec.attribute10 = FND_API.G_MISS_CHAR THEN

Line 194: IF l_visa_rec.attribute10 = FND_API.G_MISS_CHAR THEN

190: IF l_visa_rec.attribute9 = FND_API.G_MISS_CHAR THEN
191: l_visa_rec.attribute9 := NULL;
192: END IF;
193:
194: IF l_visa_rec.attribute10 = FND_API.G_MISS_CHAR THEN
195: l_visa_rec.attribute10 := NULL;
196: END IF;
197:
198: IF l_visa_rec.attribute11 = FND_API.G_MISS_CHAR THEN

Line 198: IF l_visa_rec.attribute11 = FND_API.G_MISS_CHAR THEN

194: IF l_visa_rec.attribute10 = FND_API.G_MISS_CHAR THEN
195: l_visa_rec.attribute10 := NULL;
196: END IF;
197:
198: IF l_visa_rec.attribute11 = FND_API.G_MISS_CHAR THEN
199: l_visa_rec.attribute11 := NULL;
200: END IF;
201:
202: IF l_visa_rec.attribute12 = FND_API.G_MISS_CHAR THEN

Line 202: IF l_visa_rec.attribute12 = FND_API.G_MISS_CHAR THEN

198: IF l_visa_rec.attribute11 = FND_API.G_MISS_CHAR THEN
199: l_visa_rec.attribute11 := NULL;
200: END IF;
201:
202: IF l_visa_rec.attribute12 = FND_API.G_MISS_CHAR THEN
203: l_visa_rec.attribute12 := NULL;
204: END IF;
205:
206: IF l_visa_rec.attribute13 = FND_API.G_MISS_CHAR THEN

Line 206: IF l_visa_rec.attribute13 = FND_API.G_MISS_CHAR THEN

202: IF l_visa_rec.attribute12 = FND_API.G_MISS_CHAR THEN
203: l_visa_rec.attribute12 := NULL;
204: END IF;
205:
206: IF l_visa_rec.attribute13 = FND_API.G_MISS_CHAR THEN
207: l_visa_rec.attribute13 := NULL;
208: END IF;
209:
210: IF l_visa_rec.attribute14 = FND_API.G_MISS_CHAR THEN

Line 210: IF l_visa_rec.attribute14 = FND_API.G_MISS_CHAR THEN

206: IF l_visa_rec.attribute13 = FND_API.G_MISS_CHAR THEN
207: l_visa_rec.attribute13 := NULL;
208: END IF;
209:
210: IF l_visa_rec.attribute14 = FND_API.G_MISS_CHAR THEN
211: l_visa_rec.attribute14 := NULL;
212: END IF;
213:
214: IF l_visa_rec.attribute15 = FND_API.G_MISS_CHAR THEN

Line 214: IF l_visa_rec.attribute15 = FND_API.G_MISS_CHAR THEN

210: IF l_visa_rec.attribute14 = FND_API.G_MISS_CHAR THEN
211: l_visa_rec.attribute14 := NULL;
212: END IF;
213:
214: IF l_visa_rec.attribute15 = FND_API.G_MISS_CHAR THEN
215: l_visa_rec.attribute15 := NULL;
216: END IF;
217:
218: IF l_visa_rec.attribute16 = FND_API.G_MISS_CHAR THEN

Line 218: IF l_visa_rec.attribute16 = FND_API.G_MISS_CHAR THEN

214: IF l_visa_rec.attribute15 = FND_API.G_MISS_CHAR THEN
215: l_visa_rec.attribute15 := NULL;
216: END IF;
217:
218: IF l_visa_rec.attribute16 = FND_API.G_MISS_CHAR THEN
219: l_visa_rec.attribute16 := NULL;
220: END IF;
221:
222: IF l_visa_rec.attribute17 = FND_API.G_MISS_CHAR THEN

Line 222: IF l_visa_rec.attribute17 = FND_API.G_MISS_CHAR THEN

218: IF l_visa_rec.attribute16 = FND_API.G_MISS_CHAR THEN
219: l_visa_rec.attribute16 := NULL;
220: END IF;
221:
222: IF l_visa_rec.attribute17 = FND_API.G_MISS_CHAR THEN
223: l_visa_rec.attribute17 := NULL;
224: END IF;
225:
226: IF l_visa_rec.attribute18 = FND_API.G_MISS_CHAR THEN

Line 226: IF l_visa_rec.attribute18 = FND_API.G_MISS_CHAR THEN

222: IF l_visa_rec.attribute17 = FND_API.G_MISS_CHAR THEN
223: l_visa_rec.attribute17 := NULL;
224: END IF;
225:
226: IF l_visa_rec.attribute18 = FND_API.G_MISS_CHAR THEN
227: l_visa_rec.attribute18 := NULL;
228: END IF;
229:
230: IF l_visa_rec.attribute19 = FND_API.G_MISS_CHAR THEN

Line 230: IF l_visa_rec.attribute19 = FND_API.G_MISS_CHAR THEN

226: IF l_visa_rec.attribute18 = FND_API.G_MISS_CHAR THEN
227: l_visa_rec.attribute18 := NULL;
228: END IF;
229:
230: IF l_visa_rec.attribute19 = FND_API.G_MISS_CHAR THEN
231: l_visa_rec.attribute19 := NULL;
232: END IF;
233:
234: IF l_visa_rec.attribute20 = FND_API.G_MISS_CHAR THEN

Line 234: IF l_visa_rec.attribute20 = FND_API.G_MISS_CHAR THEN

230: IF l_visa_rec.attribute19 = FND_API.G_MISS_CHAR THEN
231: l_visa_rec.attribute19 := NULL;
232: END IF;
233:
234: IF l_visa_rec.attribute20 = FND_API.G_MISS_CHAR THEN
235: l_visa_rec.attribute20 := NULL;
236: END IF;
237:
238: IF l_visa_rec.visa_issuing_country = FND_API.G_MISS_CHAR THEN

Line 238: IF l_visa_rec.visa_issuing_country = FND_API.G_MISS_CHAR THEN

234: IF l_visa_rec.attribute20 = FND_API.G_MISS_CHAR THEN
235: l_visa_rec.attribute20 := NULL;
236: END IF;
237:
238: IF l_visa_rec.visa_issuing_country = FND_API.G_MISS_CHAR THEN
239: l_visa_rec.visa_issuing_country := NULL;
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

Line 281: RAISE FND_API.G_EXC_ERROR;

277: X_ATTRIBUTE19 => l_visa_rec.ATTRIBUTE19 ,
278: X_ATTRIBUTE20 => l_visa_rec.ATTRIBUTE20 ,
279: x_visa_issuing_country => l_visa_rec.visa_issuing_country);
280: ELSE
281: RAISE FND_API.G_EXC_ERROR;
282: END IF;
283:
284: -- End Here
285:

Line 292: IF FND_API.To_Boolean( p_commit ) THEN

288: x_msg_data := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
289: END IF;
290:
291:
292: IF FND_API.To_Boolean( p_commit ) THEN
293: COMMIT WORK;
294: END IF;
295:
296: EXCEPTION

Line 297: WHEN FND_API.G_EXC_ERROR THEN

293: COMMIT WORK;
294: END IF;
295:
296: EXCEPTION
297: WHEN FND_API.G_EXC_ERROR THEN
298: ROLLBACK TO Create_Visa_PUB;
299: x_return_status := FND_API.G_RET_STS_ERROR ;
300: x_msg_data := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
301: x_msg_count := 1;

Line 299: x_return_status := FND_API.G_RET_STS_ERROR ;

295:
296: EXCEPTION
297: WHEN FND_API.G_EXC_ERROR THEN
298: ROLLBACK TO Create_Visa_PUB;
299: x_return_status := FND_API.G_RET_STS_ERROR ;
300: x_msg_data := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
301: x_msg_count := 1;
302: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
303: ROLLBACK TO Create_Visa_PUB;

Line 302: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

298: ROLLBACK TO Create_Visa_PUB;
299: x_return_status := FND_API.G_RET_STS_ERROR ;
300: x_msg_data := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
301: x_msg_count := 1;
302: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
303: ROLLBACK TO Create_Visa_PUB;
304: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
305: FND_MSG_PUB.Count_And_Get
306: ( p_count => x_msg_count ,

Line 304: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

300: x_msg_data := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
301: x_msg_count := 1;
302: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
303: ROLLBACK TO Create_Visa_PUB;
304: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
305: FND_MSG_PUB.Count_And_Get
306: ( p_count => x_msg_count ,
307: p_data => x_msg_data
308: );

Line 316: x_return_status := FND_API.G_RET_STS_ERROR ;

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 ;
320: fnd_message.set_name ('IGS', 'IGS_EN_INV');

Line 319: x_return_status := FND_API.G_RET_STS_ERROR ;

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 ;
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');

Line 325: x_return_status := FND_API.G_RET_STS_ERROR ;

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;
329: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_LAST, p_encoded => 'F');

Line 332: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

328: igs_ge_msg_stack.add;
329: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_LAST, p_encoded => 'F');
330: ELSE
331: x_msg_data := SQLERRM;
332: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
333: END IF;
334:
335: END Create_Visa;
336:

Line 348: -- Default = FND_API.G_FALSE

344: -- Pre-reqs : None.
345: -- Parameters :
346: -- IN : p_api_version IN NUMBER Required
347: -- p_init_msg_list IN VARCHAR2 Optional
348: -- Default = FND_API.G_FALSE
349: -- p_commit IN VARCHAR2 Optional
350: -- Default = FND_API.G_FALSE
351: -- Default = FND_API.G_VALID_LEVEL_FULL
352: -- p_visa_rec IN visa_rec_type

Line 350: -- Default = FND_API.G_FALSE

346: -- IN : p_api_version IN NUMBER Required
347: -- p_init_msg_list IN VARCHAR2 Optional
348: -- Default = FND_API.G_FALSE
349: -- p_commit IN VARCHAR2 Optional
350: -- Default = FND_API.G_FALSE
351: -- Default = FND_API.G_VALID_LEVEL_FULL
352: -- p_visa_rec IN visa_rec_type
353: --
354: --

Line 351: -- Default = FND_API.G_VALID_LEVEL_FULL

347: -- p_init_msg_list IN VARCHAR2 Optional
348: -- Default = FND_API.G_FALSE
349: -- p_commit IN VARCHAR2 Optional
350: -- Default = FND_API.G_FALSE
351: -- Default = FND_API.G_VALID_LEVEL_FULL
352: -- p_visa_rec IN visa_rec_type
353: --
354: --
355: -- OUT : x_return_status OUT VARCHAR2(1)

Line 375: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,

371: -- End of comments
372:
373: PROCEDURE Update_Visa
374: ( p_api_version IN NUMBER,
375: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
376: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
377: x_return_status OUT NOCOPY VARCHAR2,
378: x_msg_count OUT NOCOPY NUMBER,
379: x_msg_data OUT NOCOPY VARCHAR2,

Line 376: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,

372:
373: PROCEDURE Update_Visa
374: ( p_api_version IN NUMBER,
375: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
376: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
377: x_return_status OUT NOCOPY VARCHAR2,
378: x_msg_count OUT NOCOPY NUMBER,
379: x_msg_data OUT NOCOPY VARCHAR2,
380: p_visa_rec IN visa_rec_type

Line 411: IF NOT FND_API.Compatible_API_Call ( l_api_version,

407: PRAGMA EXCEPTION_INIT(E_RESOURCE_BUSY, -54);
408:
409: BEGIN
410: SAVEPOINT Update_Visa_PUB;
411: IF NOT FND_API.Compatible_API_Call ( l_api_version,
412: p_api_version,
413: l_api_name,
414: G_PKG_NAME )
415: THEN

Line 416: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

412: p_api_version,
413: l_api_name,
414: G_PKG_NAME )
415: THEN
416: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
417: END IF;
418:
419: IF FND_API.to_Boolean( p_init_msg_list ) THEN
420: FND_MSG_PUB.initialize;

Line 419: IF FND_API.to_Boolean( p_init_msg_list ) THEN

415: THEN
416: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
417: END IF;
418:
419: IF FND_API.to_Boolean( p_init_msg_list ) THEN
420: FND_MSG_PUB.initialize;
421: END IF;
422:
423: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 423: x_return_status := FND_API.G_RET_STS_SUCCESS;

419: IF FND_API.to_Boolean( p_init_msg_list ) THEN
420: FND_MSG_PUB.initialize;
421: END IF;
422:
423: x_return_status := FND_API.G_RET_STS_SUCCESS;
424:
425: -- Start here
426:
427: l_visa_rec := p_visa_rec;

Line 432: IF l_visa_rec.visa_id IS NULL OR l_visa_rec.visa_id = FND_API.G_MISS_NUM THEN

428:
429: l_visa_rec.visa_issue_date := TRUNC(l_visa_rec.visa_issue_date);
430: l_visa_rec.visa_expiry_date := TRUNC(l_visa_rec.visa_expiry_date);
431:
432: IF l_visa_rec.visa_id IS NULL OR l_visa_rec.visa_id = FND_API.G_MISS_NUM THEN
433: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
434: fnd_message.set_token('PARAM','VISA_ID');
435: igs_ge_msg_stack.add;
436: app_exception.raise_exception;

Line 449: IF l_visa_rec.person_id = FND_API.G_MISS_NUM THEN

445: app_exception.raise_exception;
446: END IF;
447: CLOSE null_handlng_cur;
448:
449: IF l_visa_rec.person_id = FND_API.G_MISS_NUM THEN
450: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
451: fnd_message.set_token('PARAM','PERSON_ID');
452: igs_ge_msg_stack.add;
453: app_exception.raise_exception;

Line 463: IF l_visa_rec.visa_type = FND_API.G_MISS_CHAR THEN

459: igs_ge_msg_stack.add;
460: app_exception.raise_exception;
461: END IF;
462:
463: IF l_visa_rec.visa_type = FND_API.G_MISS_CHAR THEN
464: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
465: fnd_message.set_token('PARAM','VISA_TYPE');
466: igs_ge_msg_stack.add;
467: app_exception.raise_exception;

Line 477: IF l_visa_rec.visa_number = FND_API.G_MISS_CHAR THEN

473: igs_ge_msg_stack.add;
474: app_exception.raise_exception;
475: END IF;
476:
477: IF l_visa_rec.visa_number = FND_API.G_MISS_CHAR THEN
478: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
479: fnd_message.set_token('PARAM','VISA_NUMBER');
480: igs_ge_msg_stack.add;
481: app_exception.raise_exception;

Line 486: IF l_visa_rec.visa_issue_date = FND_API.G_MISS_DATE THEN

482: ELSIF l_visa_rec.visa_number IS NULL THEN
483: l_visa_rec.visa_number := dup_visa_rec.visa_number;
484: END IF;
485:
486: IF l_visa_rec.visa_issue_date = FND_API.G_MISS_DATE THEN
487: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
488: fnd_message.set_token('PARAM','VISA_ISSUE_DATE');
489: igs_ge_msg_stack.add;
490: app_exception.raise_exception;

Line 500: IF l_visa_rec.visa_expiry_date = FND_API.G_MISS_DATE THEN

496: igs_ge_msg_stack.add;
497: app_exception.raise_exception;
498: END IF;
499:
500: IF l_visa_rec.visa_expiry_date = FND_API.G_MISS_DATE THEN
501: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
502: fnd_message.set_token('PARAM','VISA_EXPIRY_DATE');
503: igs_ge_msg_stack.add;
504: app_exception.raise_exception;

Line 509: IF l_visa_rec.visa_issuing_post = FND_API.G_MISS_CHAR THEN

505: ELSIF l_visa_rec.visa_expiry_date IS NULL THEN
506: l_visa_rec.visa_expiry_date := dup_visa_rec.visa_expiry_date;
507: END IF;
508:
509: IF l_visa_rec.visa_issuing_post = FND_API.G_MISS_CHAR THEN
510: l_visa_rec.visa_issuing_post := NULL;
511: ELSIF l_visa_rec.visa_issuing_post IS NULL THEN
512: l_visa_rec.visa_issuing_post := dup_visa_rec.visa_issuing_post;
513: END IF;

Line 515: IF l_visa_rec.passport_id = FND_API.G_MISS_NUM THEN

511: ELSIF l_visa_rec.visa_issuing_post IS NULL THEN
512: l_visa_rec.visa_issuing_post := dup_visa_rec.visa_issuing_post;
513: END IF;
514:
515: IF l_visa_rec.passport_id = FND_API.G_MISS_NUM THEN
516: l_visa_rec.passport_id := NULL;
517: ELSIF l_visa_rec.passport_id IS NULL THEN
518: l_visa_rec.passport_id := dup_visa_rec.passport_id;
519: END IF;

Line 521: IF l_visa_rec.agent_org_unit_cd = FND_API.G_MISS_CHAR THEN

517: ELSIF l_visa_rec.passport_id IS NULL THEN
518: l_visa_rec.passport_id := dup_visa_rec.passport_id;
519: END IF;
520:
521: IF l_visa_rec.agent_org_unit_cd = FND_API.G_MISS_CHAR THEN
522: l_visa_rec.agent_org_unit_cd := NULL;
523: ELSIF l_visa_rec.agent_org_unit_cd IS NULL THEN
524: l_visa_rec.agent_org_unit_cd := dup_visa_rec.agent_org_unit_cd ;
525: END IF;

Line 527: IF l_visa_rec.agent_person_id = FND_API.G_MISS_NUM THEN

523: ELSIF l_visa_rec.agent_org_unit_cd IS NULL THEN
524: l_visa_rec.agent_org_unit_cd := dup_visa_rec.agent_org_unit_cd ;
525: END IF;
526:
527: IF l_visa_rec.agent_person_id = FND_API.G_MISS_NUM THEN
528: l_visa_rec.agent_person_id := NULL;
529: ELSIF l_visa_rec.agent_person_id IS NULL THEN
530: l_visa_rec.agent_person_id := dup_visa_rec.agent_person_id;
531: END IF;

Line 533: IF l_visa_rec.agent_contact_name = FND_API.G_MISS_CHAR THEN

529: ELSIF l_visa_rec.agent_person_id IS NULL THEN
530: l_visa_rec.agent_person_id := dup_visa_rec.agent_person_id;
531: END IF;
532:
533: IF l_visa_rec.agent_contact_name = FND_API.G_MISS_CHAR THEN
534: l_visa_rec.agent_contact_name := NULL;
535: ELSIF l_visa_rec.agent_contact_name IS NULL THEN
536: l_visa_rec.agent_contact_name := dup_visa_rec.agent_contact_name;
537: END IF;

Line 539: IF l_visa_rec.attribute_category = FND_API.G_MISS_CHAR THEN

535: ELSIF l_visa_rec.agent_contact_name IS NULL THEN
536: l_visa_rec.agent_contact_name := dup_visa_rec.agent_contact_name;
537: END IF;
538:
539: IF l_visa_rec.attribute_category = FND_API.G_MISS_CHAR THEN
540: l_visa_rec.attribute_category := NULL;
541: ELSIF l_visa_rec.attribute_category IS NULL THEN
542: l_visa_rec.attribute_category := dup_visa_rec.attribute_category;
543: END IF;

Line 545: IF l_visa_rec.attribute1 = FND_API.G_MISS_CHAR THEN

541: ELSIF l_visa_rec.attribute_category IS NULL THEN
542: l_visa_rec.attribute_category := dup_visa_rec.attribute_category;
543: END IF;
544:
545: IF l_visa_rec.attribute1 = FND_API.G_MISS_CHAR THEN
546: l_visa_rec.attribute1 := NULL;
547: ELSIF l_visa_rec.attribute1 IS NULL THEN
548: l_visa_rec.attribute1 := dup_visa_rec.attribute1;
549: END IF;

Line 551: IF l_visa_rec.attribute2 = FND_API.G_MISS_CHAR THEN

547: ELSIF l_visa_rec.attribute1 IS NULL THEN
548: l_visa_rec.attribute1 := dup_visa_rec.attribute1;
549: END IF;
550:
551: IF l_visa_rec.attribute2 = FND_API.G_MISS_CHAR THEN
552: l_visa_rec.attribute2 := NULL;
553: ELSIF l_visa_rec.attribute2 IS NULL THEN
554: l_visa_rec.attribute2 := dup_visa_rec.attribute2;
555: END IF;

Line 557: IF l_visa_rec.attribute3 = FND_API.G_MISS_CHAR THEN

553: ELSIF l_visa_rec.attribute2 IS NULL THEN
554: l_visa_rec.attribute2 := dup_visa_rec.attribute2;
555: END IF;
556:
557: IF l_visa_rec.attribute3 = FND_API.G_MISS_CHAR THEN
558: l_visa_rec.attribute3 := NULL;
559: ELSIF l_visa_rec.attribute3 IS NULL THEN
560: l_visa_rec.attribute3 := dup_visa_rec.attribute3;
561: END IF;

Line 563: IF l_visa_rec.attribute4 = FND_API.G_MISS_CHAR THEN

559: ELSIF l_visa_rec.attribute3 IS NULL THEN
560: l_visa_rec.attribute3 := dup_visa_rec.attribute3;
561: END IF;
562:
563: IF l_visa_rec.attribute4 = FND_API.G_MISS_CHAR THEN
564: l_visa_rec.attribute4 := NULL;
565: ELSIF l_visa_rec.attribute4 IS NULL THEN
566: l_visa_rec.attribute4 := dup_visa_rec.attribute4;
567: END IF;

Line 569: IF l_visa_rec.attribute5 = FND_API.G_MISS_CHAR THEN

565: ELSIF l_visa_rec.attribute4 IS NULL THEN
566: l_visa_rec.attribute4 := dup_visa_rec.attribute4;
567: END IF;
568:
569: IF l_visa_rec.attribute5 = FND_API.G_MISS_CHAR THEN
570: l_visa_rec.attribute5 := NULL;
571: ELSIF l_visa_rec.attribute5 IS NULL THEN
572: l_visa_rec.attribute5 := dup_visa_rec.attribute5;
573: END IF;

Line 575: IF l_visa_rec.attribute6 = FND_API.G_MISS_CHAR THEN

571: ELSIF l_visa_rec.attribute5 IS NULL THEN
572: l_visa_rec.attribute5 := dup_visa_rec.attribute5;
573: END IF;
574:
575: IF l_visa_rec.attribute6 = FND_API.G_MISS_CHAR THEN
576: l_visa_rec.attribute6 := NULL;
577: ELSIF l_visa_rec.attribute6 IS NULL THEN
578: l_visa_rec.attribute6 := dup_visa_rec.attribute6;
579: END IF;

Line 581: IF l_visa_rec.attribute7 = FND_API.G_MISS_CHAR THEN

577: ELSIF l_visa_rec.attribute6 IS NULL THEN
578: l_visa_rec.attribute6 := dup_visa_rec.attribute6;
579: END IF;
580:
581: IF l_visa_rec.attribute7 = FND_API.G_MISS_CHAR THEN
582: l_visa_rec.attribute7 := NULL;
583: ELSIF l_visa_rec.attribute7 IS NULL THEN
584: l_visa_rec.attribute7 := dup_visa_rec.attribute7;
585: END IF;

Line 587: IF l_visa_rec.attribute8 = FND_API.G_MISS_CHAR THEN

583: ELSIF l_visa_rec.attribute7 IS NULL THEN
584: l_visa_rec.attribute7 := dup_visa_rec.attribute7;
585: END IF;
586:
587: IF l_visa_rec.attribute8 = FND_API.G_MISS_CHAR THEN
588: l_visa_rec.attribute8 := NULL;
589: ELSIF l_visa_rec.attribute8 IS NULL THEN
590: l_visa_rec.attribute8 := dup_visa_rec.attribute8;
591: END IF;

Line 593: IF l_visa_rec.attribute9 = FND_API.G_MISS_CHAR THEN

589: ELSIF l_visa_rec.attribute8 IS NULL THEN
590: l_visa_rec.attribute8 := dup_visa_rec.attribute8;
591: END IF;
592:
593: IF l_visa_rec.attribute9 = FND_API.G_MISS_CHAR THEN
594: l_visa_rec.attribute9 := NULL;
595: ELSIF l_visa_rec.attribute9 IS NULL THEN
596: l_visa_rec.attribute9 := dup_visa_rec.attribute9;
597: END IF;

Line 599: IF l_visa_rec.attribute10 = FND_API.G_MISS_CHAR THEN

595: ELSIF l_visa_rec.attribute9 IS NULL THEN
596: l_visa_rec.attribute9 := dup_visa_rec.attribute9;
597: END IF;
598:
599: IF l_visa_rec.attribute10 = FND_API.G_MISS_CHAR THEN
600: l_visa_rec.attribute10 := NULL;
601: ELSIF l_visa_rec.attribute10 IS NULL THEN
602: l_visa_rec.attribute10 := dup_visa_rec.attribute10;
603: END IF;

Line 605: IF l_visa_rec.attribute11 = FND_API.G_MISS_CHAR THEN

601: ELSIF l_visa_rec.attribute10 IS NULL THEN
602: l_visa_rec.attribute10 := dup_visa_rec.attribute10;
603: END IF;
604:
605: IF l_visa_rec.attribute11 = FND_API.G_MISS_CHAR THEN
606: l_visa_rec.attribute11 := NULL;
607: ELSIF l_visa_rec.attribute11 IS NULL THEN
608: l_visa_rec.attribute11 := dup_visa_rec.attribute11;
609: END IF;

Line 611: IF l_visa_rec.attribute12 = FND_API.G_MISS_CHAR THEN

607: ELSIF l_visa_rec.attribute11 IS NULL THEN
608: l_visa_rec.attribute11 := dup_visa_rec.attribute11;
609: END IF;
610:
611: IF l_visa_rec.attribute12 = FND_API.G_MISS_CHAR THEN
612: l_visa_rec.attribute12 := NULL;
613: ELSIF l_visa_rec.attribute12 IS NULL THEN
614: l_visa_rec.attribute12 := dup_visa_rec.attribute12;
615: END IF;

Line 617: IF l_visa_rec.attribute13 = FND_API.G_MISS_CHAR THEN

613: ELSIF l_visa_rec.attribute12 IS NULL THEN
614: l_visa_rec.attribute12 := dup_visa_rec.attribute12;
615: END IF;
616:
617: IF l_visa_rec.attribute13 = FND_API.G_MISS_CHAR THEN
618: l_visa_rec.attribute13 := NULL;
619: ELSIF l_visa_rec.attribute13 IS NULL THEN
620: l_visa_rec.attribute13 := dup_visa_rec.attribute13;
621: END IF;

Line 623: IF l_visa_rec.attribute14 = FND_API.G_MISS_CHAR THEN

619: ELSIF l_visa_rec.attribute13 IS NULL THEN
620: l_visa_rec.attribute13 := dup_visa_rec.attribute13;
621: END IF;
622:
623: IF l_visa_rec.attribute14 = FND_API.G_MISS_CHAR THEN
624: l_visa_rec.attribute14 := NULL;
625: ELSIF l_visa_rec.attribute14 IS NULL THEN
626: l_visa_rec.attribute14 := dup_visa_rec.attribute14;
627: END IF;

Line 629: IF l_visa_rec.attribute15 = FND_API.G_MISS_CHAR THEN

625: ELSIF l_visa_rec.attribute14 IS NULL THEN
626: l_visa_rec.attribute14 := dup_visa_rec.attribute14;
627: END IF;
628:
629: IF l_visa_rec.attribute15 = FND_API.G_MISS_CHAR THEN
630: l_visa_rec.attribute15 := NULL;
631: ELSIF l_visa_rec.attribute15 IS NULL THEN
632: l_visa_rec.attribute15 := dup_visa_rec.attribute15;
633: END IF;

Line 635: IF l_visa_rec.attribute16 = FND_API.G_MISS_CHAR THEN

631: ELSIF l_visa_rec.attribute15 IS NULL THEN
632: l_visa_rec.attribute15 := dup_visa_rec.attribute15;
633: END IF;
634:
635: IF l_visa_rec.attribute16 = FND_API.G_MISS_CHAR THEN
636: l_visa_rec.attribute16 := NULL;
637: ELSIF l_visa_rec.attribute16 IS NULL THEN
638: l_visa_rec.attribute16 := dup_visa_rec.attribute16;
639: END IF;

Line 641: IF l_visa_rec.attribute17 = FND_API.G_MISS_CHAR THEN

637: ELSIF l_visa_rec.attribute16 IS NULL THEN
638: l_visa_rec.attribute16 := dup_visa_rec.attribute16;
639: END IF;
640:
641: IF l_visa_rec.attribute17 = FND_API.G_MISS_CHAR THEN
642: l_visa_rec.attribute17 := NULL;
643: ELSIF l_visa_rec.attribute17 IS NULL THEN
644: l_visa_rec.attribute17 := dup_visa_rec.attribute17;
645: END IF;

Line 647: IF l_visa_rec.attribute18 = FND_API.G_MISS_CHAR THEN

643: ELSIF l_visa_rec.attribute17 IS NULL THEN
644: l_visa_rec.attribute17 := dup_visa_rec.attribute17;
645: END IF;
646:
647: IF l_visa_rec.attribute18 = FND_API.G_MISS_CHAR THEN
648: l_visa_rec.attribute18 := NULL;
649: ELSIF l_visa_rec.attribute18 IS NULL THEN
650: l_visa_rec.attribute18 := dup_visa_rec.attribute18;
651: END IF;

Line 653: IF l_visa_rec.attribute19 = FND_API.G_MISS_CHAR THEN

649: ELSIF l_visa_rec.attribute18 IS NULL THEN
650: l_visa_rec.attribute18 := dup_visa_rec.attribute18;
651: END IF;
652:
653: IF l_visa_rec.attribute19 = FND_API.G_MISS_CHAR THEN
654: l_visa_rec.attribute19 := NULL;
655: ELSIF l_visa_rec.attribute19 IS NULL THEN
656: l_visa_rec.attribute19 := dup_visa_rec.attribute19;
657: END IF;

Line 659: IF l_visa_rec.attribute20 = FND_API.G_MISS_CHAR THEN

655: ELSIF l_visa_rec.attribute19 IS NULL THEN
656: l_visa_rec.attribute19 := dup_visa_rec.attribute19;
657: END IF;
658:
659: IF l_visa_rec.attribute20 = FND_API.G_MISS_CHAR THEN
660: l_visa_rec.attribute20 := NULL;
661: ELSIF l_visa_rec.attribute20 IS NULL THEN
662: l_visa_rec.attribute20 := dup_visa_rec.attribute20;
663: END IF;

Line 665: IF l_visa_rec.visa_issuing_country = FND_API.G_MISS_CHAR THEN

661: ELSIF l_visa_rec.attribute20 IS NULL THEN
662: l_visa_rec.attribute20 := dup_visa_rec.attribute20;
663: END IF;
664:
665: IF l_visa_rec.visa_issuing_country = FND_API.G_MISS_CHAR THEN
666: l_visa_rec.visa_issuing_country := NULL;
667: ELSIF l_visa_rec.visa_issuing_country IS NULL THEN
668: l_visa_rec.visa_issuing_country := dup_visa_rec.visa_issuing_country;
669: END IF;

Line 712: RAISE FND_API.G_EXC_ERROR;

708: X_ATTRIBUTE19 => l_visa_rec.attribute19,
709: X_ATTRIBUTE20 => l_visa_rec.attribute20,
710: X_visa_issuing_country => l_visa_rec.visa_issuing_country);
711: ELSE
712: RAISE FND_API.G_EXC_ERROR;
713: END IF;
714:
715: IF l_error_code = 'E555' THEN
716: x_msg_count := 1;

Line 722: IF FND_API.To_Boolean( p_commit ) THEN

718: END IF;
719:
720: -- End Here
721:
722: IF FND_API.To_Boolean( p_commit ) THEN
723: COMMIT WORK;
724: END IF;
725:
726: EXCEPTION

Line 731: x_return_status := FND_API.G_RET_STS_ERROR ;

727: WHEN E_RESOURCE_BUSY THEN
728: ROLLBACK TO Update_Visa_PUB;
729: fnd_message.set_name ('IGS', 'IGS_GE_RECORD_LOCKED');
730: igs_ge_msg_stack.add;
731: x_return_status := FND_API.G_RET_STS_ERROR ;
732: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_FIRST, p_encoded => 'F');
733: x_msg_count := 1;
734: WHEN FND_API.G_EXC_ERROR THEN
735: ROLLBACK TO Update_Visa_PUB;

Line 734: WHEN FND_API.G_EXC_ERROR THEN

730: igs_ge_msg_stack.add;
731: x_return_status := FND_API.G_RET_STS_ERROR ;
732: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_FIRST, p_encoded => 'F');
733: x_msg_count := 1;
734: WHEN FND_API.G_EXC_ERROR THEN
735: ROLLBACK TO Update_Visa_PUB;
736: x_return_status := FND_API.G_RET_STS_ERROR ;
737: x_msg_data := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
738: x_msg_count := 1;

Line 736: x_return_status := FND_API.G_RET_STS_ERROR ;

732: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_FIRST, p_encoded => 'F');
733: x_msg_count := 1;
734: WHEN FND_API.G_EXC_ERROR THEN
735: ROLLBACK TO Update_Visa_PUB;
736: x_return_status := FND_API.G_RET_STS_ERROR ;
737: x_msg_data := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
738: x_msg_count := 1;
739: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
740: ROLLBACK TO Update_Visa_PUB;

Line 739: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

735: ROLLBACK TO Update_Visa_PUB;
736: x_return_status := FND_API.G_RET_STS_ERROR ;
737: x_msg_data := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
738: x_msg_count := 1;
739: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
740: ROLLBACK TO Update_Visa_PUB;
741: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
742: FND_MSG_PUB.Count_And_Get
743: ( p_count => x_msg_count ,

Line 741: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

737: x_msg_data := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
738: x_msg_count := 1;
739: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
740: ROLLBACK TO Update_Visa_PUB;
741: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
742: FND_MSG_PUB.Count_And_Get
743: ( p_count => x_msg_count ,
744: p_data => x_msg_data
745: );

Line 752: x_return_status := FND_API.G_RET_STS_ERROR ;

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;
756: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 756: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

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;
756: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
757: END IF;
758:
759: END Update_Visa;
760:

Line 770: -- Default = FND_API.G_FALSE

766: -- Pre-reqs : None.
767: -- Parameters :
768: -- IN : p_api_version IN NUMBER Required
769: -- p_init_msg_list IN VARCHAR2 Optional
770: -- Default = FND_API.G_FALSE
771: -- p_commit IN VARCHAR2 Optional
772: -- Default = FND_API.G_FALSE
773: -- Default = FND_API.G_VALID_LEVEL_FULL
774: -- p_visit_hstry_rec IN visit_hstry_rec_type

Line 772: -- Default = FND_API.G_FALSE

768: -- IN : p_api_version IN NUMBER Required
769: -- p_init_msg_list IN VARCHAR2 Optional
770: -- Default = FND_API.G_FALSE
771: -- p_commit IN VARCHAR2 Optional
772: -- Default = FND_API.G_FALSE
773: -- Default = FND_API.G_VALID_LEVEL_FULL
774: -- p_visit_hstry_rec IN visit_hstry_rec_type
775: --
776: --

Line 773: -- Default = FND_API.G_VALID_LEVEL_FULL

769: -- p_init_msg_list IN VARCHAR2 Optional
770: -- Default = FND_API.G_FALSE
771: -- p_commit IN VARCHAR2 Optional
772: -- Default = FND_API.G_FALSE
773: -- Default = FND_API.G_VALID_LEVEL_FULL
774: -- p_visit_hstry_rec IN visit_hstry_rec_type
775: --
776: --
777: -- OUT : x_return_status OUT VARCHAR2(1)

Line 798: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,

794: -- End of comments
795:
796: PROCEDURE Create_VisitHistry
797: ( p_api_version IN NUMBER,
798: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
799: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
800: x_return_status OUT NOCOPY VARCHAR2,
801: x_msg_count OUT NOCOPY NUMBER,
802: x_msg_data OUT NOCOPY VARCHAR2,

Line 799: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,

795:
796: PROCEDURE Create_VisitHistry
797: ( p_api_version IN NUMBER,
798: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
799: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
800: x_return_status OUT NOCOPY VARCHAR2,
801: x_msg_count OUT NOCOPY NUMBER,
802: x_msg_data OUT NOCOPY VARCHAR2,
803: p_visit_hstry_rec IN visit_hstry_rec_type

Line 823: IF NOT FND_API.Compatible_API_Call ( l_api_version,

819: l_visit_hstry_rec.visit_start_date := TRUNC(l_visit_hstry_rec.visit_start_date);
820: l_visit_hstry_rec.visit_end_date := TRUNC(l_visit_hstry_rec.visit_end_date);
821:
822: SAVEPOINT Create_VisitHistry_PUB;
823: IF NOT FND_API.Compatible_API_Call ( l_api_version,
824: p_api_version,
825: l_api_name,
826: G_PKG_NAME )
827: THEN

Line 828: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

824: p_api_version,
825: l_api_name,
826: G_PKG_NAME )
827: THEN
828: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
829: END IF;
830:
831: IF FND_API.to_Boolean( p_init_msg_list ) THEN
832: FND_MSG_PUB.initialize;

Line 831: IF FND_API.to_Boolean( p_init_msg_list ) THEN

827: THEN
828: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
829: END IF;
830:
831: IF FND_API.to_Boolean( p_init_msg_list ) THEN
832: FND_MSG_PUB.initialize;
833: END IF;
834:
835: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 835: x_return_status := FND_API.G_RET_STS_SUCCESS;

831: IF FND_API.to_Boolean( p_init_msg_list ) THEN
832: FND_MSG_PUB.initialize;
833: END IF;
834:
835: x_return_status := FND_API.G_RET_STS_SUCCESS;
836:
837: -- Start here
838: x_msg_count := 0;
839:

Line 841: IF l_visit_hstry_rec.port_of_entry IS NULL OR l_visit_hstry_rec.port_of_entry = FND_API.G_MISS_CHAR THEN

837: -- Start here
838: x_msg_count := 0;
839:
840:
841: IF l_visit_hstry_rec.port_of_entry IS NULL OR l_visit_hstry_rec.port_of_entry = FND_API.G_MISS_CHAR THEN
842: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
843: fnd_message.set_token('PARAM','PORT_OF_ENTRY');
844: igs_ge_msg_stack.add;
845: app_exception.raise_exception;

Line 848: IF l_visit_hstry_rec.cntry_entry_form_num IS NULL OR l_visit_hstry_rec.cntry_entry_form_num = FND_API.G_MISS_CHAR THEN

844: igs_ge_msg_stack.add;
845: app_exception.raise_exception;
846: END IF;
847:
848: IF l_visit_hstry_rec.cntry_entry_form_num IS NULL OR l_visit_hstry_rec.cntry_entry_form_num = FND_API.G_MISS_CHAR THEN
849: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
850: fnd_message.set_token('PARAM','CNTRY_ENTRY_FORM_NUM');
851: igs_ge_msg_stack.add;
852: app_exception.raise_exception;

Line 855: IF l_visit_hstry_rec.visa_id IS NULL OR l_visit_hstry_rec.visa_id = FND_API.G_MISS_NUM THEN

851: igs_ge_msg_stack.add;
852: app_exception.raise_exception;
853: END IF;
854:
855: IF l_visit_hstry_rec.visa_id IS NULL OR l_visit_hstry_rec.visa_id = FND_API.G_MISS_NUM THEN
856: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
857: fnd_message.set_token('PARAM','VISA_ID');
858: igs_ge_msg_stack.add;
859: app_exception.raise_exception;

Line 862: IF l_visit_hstry_rec.visit_start_date IS NULL OR l_visit_hstry_rec.visit_start_date = FND_API.G_MISS_DATE THEN

858: igs_ge_msg_stack.add;
859: app_exception.raise_exception;
860: END IF;
861:
862: IF l_visit_hstry_rec.visit_start_date IS NULL OR l_visit_hstry_rec.visit_start_date = FND_API.G_MISS_DATE THEN
863: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
864: fnd_message.set_token('PARAM','VISIT_START_DATE');
865: igs_ge_msg_stack.add;
866: app_exception.raise_exception;

Line 869: IF l_visit_hstry_rec.visit_end_date = FND_API.G_MISS_DATE THEN

865: igs_ge_msg_stack.add;
866: app_exception.raise_exception;
867: END IF;
868:
869: IF l_visit_hstry_rec.visit_end_date = FND_API.G_MISS_DATE THEN
870: l_visit_hstry_rec.visit_end_date := NULL;
871: END IF;
872:
873: IF l_visit_hstry_rec.remarks = FND_API.G_MISS_CHAR THEN

Line 873: IF l_visit_hstry_rec.remarks = FND_API.G_MISS_CHAR THEN

869: IF l_visit_hstry_rec.visit_end_date = FND_API.G_MISS_DATE THEN
870: l_visit_hstry_rec.visit_end_date := NULL;
871: END IF;
872:
873: IF l_visit_hstry_rec.remarks = FND_API.G_MISS_CHAR THEN
874: l_visit_hstry_rec.remarks := NULL;
875: END IF;
876:
877: IF igs_ad_imp_026.Validate_visit_histry_pub(api_visit_rec => l_visit_hstry_rec, p_err_code => l_error_code) THEN

Line 910: RAISE FND_API.G_EXC_ERROR;

906: X_ATTRIBUTE19 => NULL,
907: X_ATTRIBUTE20 => NULL,
908: X_MODE => 'R');
909: ELSE
910: RAISE FND_API.G_EXC_ERROR;
911: END IF;
912:
913: IF FND_API.To_Boolean( p_commit ) THEN
914: COMMIT WORK;

Line 913: IF FND_API.To_Boolean( p_commit ) THEN

909: ELSE
910: RAISE FND_API.G_EXC_ERROR;
911: END IF;
912:
913: IF FND_API.To_Boolean( p_commit ) THEN
914: COMMIT WORK;
915: END IF;
916:
917: EXCEPTION

Line 918: WHEN FND_API.G_EXC_ERROR THEN

914: COMMIT WORK;
915: END IF;
916:
917: EXCEPTION
918: WHEN FND_API.G_EXC_ERROR THEN
919: ROLLBACK TO Create_VisitHistry_PUB;
920: x_return_status := FND_API.G_RET_STS_ERROR ;
921: x_msg_data := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
922: x_msg_count := 1;

Line 920: x_return_status := FND_API.G_RET_STS_ERROR ;

916:
917: EXCEPTION
918: WHEN FND_API.G_EXC_ERROR THEN
919: ROLLBACK TO Create_VisitHistry_PUB;
920: x_return_status := FND_API.G_RET_STS_ERROR ;
921: x_msg_data := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
922: x_msg_count := 1;
923: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
924: ROLLBACK TO Create_VisitHistry_PUB;

Line 923: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

919: ROLLBACK TO Create_VisitHistry_PUB;
920: x_return_status := FND_API.G_RET_STS_ERROR ;
921: x_msg_data := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
922: x_msg_count := 1;
923: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
924: ROLLBACK TO Create_VisitHistry_PUB;
925: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
926: FND_MSG_PUB.Count_And_Get
927: ( p_count => x_msg_count ,

Line 925: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

921: x_msg_data := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
922: x_msg_count := 1;
923: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
924: ROLLBACK TO Create_VisitHistry_PUB;
925: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
926: FND_MSG_PUB.Count_And_Get
927: ( p_count => x_msg_count ,
928: p_data => x_msg_data
929: );

Line 938: x_return_status := FND_API.G_RET_STS_ERROR ;

934:
935: x_msg_count := 1;
936:
937: IF l_message_name IN('IGS_PE_PORT_DATE_OVERLAP','IGS_EN_INV','IGS_PS_LGCY_MANDATORY', 'IGS_PE_VIPS_UPD_ERR','IGS_PE_VIPS_COL_NONUPD') THEN
938: x_return_status := FND_API.G_RET_STS_ERROR ;
939: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_FIRST, p_encoded => 'F');
940: ELSIF l_message_name = 'IGS_PE_PORT_DUP_EXISTS' THEN
941: x_return_status := FND_API.G_RET_STS_ERROR ;
942: fnd_message.set_name ('IGS', 'IGS_PE_UNIQUE_FAILED');

Line 941: x_return_status := FND_API.G_RET_STS_ERROR ;

937: IF l_message_name IN('IGS_PE_PORT_DATE_OVERLAP','IGS_EN_INV','IGS_PS_LGCY_MANDATORY', 'IGS_PE_VIPS_UPD_ERR','IGS_PE_VIPS_COL_NONUPD') THEN
938: x_return_status := FND_API.G_RET_STS_ERROR ;
939: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_FIRST, p_encoded => 'F');
940: ELSIF l_message_name = 'IGS_PE_PORT_DUP_EXISTS' THEN
941: x_return_status := FND_API.G_RET_STS_ERROR ;
942: fnd_message.set_name ('IGS', 'IGS_PE_UNIQUE_FAILED');
943: fnd_message.set_token('COLUMN','PORT_OF_ENTRY,CNTRY_ENTRY_FORM_NUM');
944: igs_ge_msg_stack.add;
945: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_LAST, p_encoded => 'F');

Line 948: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

944: igs_ge_msg_stack.add;
945: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_LAST, p_encoded => 'F');
946: ELSE
947: x_msg_data := ' ' || SQLERRM;
948: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
949: END IF;
950:
951: END Create_VisitHistry;
952:

Line 962: -- Default = FND_API.G_FALSE

958: -- Pre-reqs : None.
959: -- Parameters :
960: -- IN : p_api_version IN NUMBER Required
961: -- p_init_msg_list IN VARCHAR2 Optional
962: -- Default = FND_API.G_FALSE
963: -- p_commit IN VARCHAR2 Optional
964: -- Default = FND_API.G_FALSE
965: -- Default = FND_API.G_VALID_LEVEL_FULL
966: -- p_visit_hstry_rec IN visit_hstry_rec_type

Line 964: -- Default = FND_API.G_FALSE

960: -- IN : p_api_version IN NUMBER Required
961: -- p_init_msg_list IN VARCHAR2 Optional
962: -- Default = FND_API.G_FALSE
963: -- p_commit IN VARCHAR2 Optional
964: -- Default = FND_API.G_FALSE
965: -- Default = FND_API.G_VALID_LEVEL_FULL
966: -- p_visit_hstry_rec IN visit_hstry_rec_type
967: --
968: --

Line 965: -- Default = FND_API.G_VALID_LEVEL_FULL

961: -- p_init_msg_list IN VARCHAR2 Optional
962: -- Default = FND_API.G_FALSE
963: -- p_commit IN VARCHAR2 Optional
964: -- Default = FND_API.G_FALSE
965: -- Default = FND_API.G_VALID_LEVEL_FULL
966: -- p_visit_hstry_rec IN visit_hstry_rec_type
967: --
968: --
969: -- OUT : x_return_status OUT VARCHAR2(1)

Line 989: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,

985: -- End of comments
986:
987: PROCEDURE Update_VisitHistry
988: ( p_api_version IN NUMBER,
989: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
990: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
991: x_return_status OUT NOCOPY VARCHAR2,
992: x_msg_count OUT NOCOPY NUMBER,
993: x_msg_data OUT NOCOPY VARCHAR2,

Line 990: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,

986:
987: PROCEDURE Update_VisitHistry
988: ( p_api_version IN NUMBER,
989: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
990: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
991: x_return_status OUT NOCOPY VARCHAR2,
992: x_msg_count OUT NOCOPY NUMBER,
993: x_msg_data OUT NOCOPY VARCHAR2,
994: p_visit_hstry_rec IN visit_hstry_rec_type

Line 1026: IF NOT FND_API.Compatible_API_Call ( l_api_version,

1022: l_visit_hstry_rec.visit_start_date := TRUNC(l_visit_hstry_rec.visit_start_date);
1023: l_visit_hstry_rec.visit_end_date := TRUNC(l_visit_hstry_rec.visit_end_date);
1024:
1025: SAVEPOINT Update_VisitHistry_PUB;
1026: IF NOT FND_API.Compatible_API_Call ( l_api_version,
1027: p_api_version,
1028: l_api_name,
1029: G_PKG_NAME )
1030: THEN

Line 1031: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1027: p_api_version,
1028: l_api_name,
1029: G_PKG_NAME )
1030: THEN
1031: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1032: END IF;
1033:
1034: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1035: FND_MSG_PUB.initialize;

Line 1034: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1030: THEN
1031: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1032: END IF;
1033:
1034: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1035: FND_MSG_PUB.initialize;
1036: END IF;
1037:
1038: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1038: x_return_status := FND_API.G_RET_STS_SUCCESS;

1034: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1035: FND_MSG_PUB.initialize;
1036: END IF;
1037:
1038: x_return_status := FND_API.G_RET_STS_SUCCESS;
1039:
1040: -- Start here
1041: x_msg_count := 0;
1042:

Line 1043: IF p_visit_hstry_rec.port_of_entry IS NULL OR p_visit_hstry_rec.port_of_entry = FND_API.G_MISS_CHAR THEN

1039:
1040: -- Start here
1041: x_msg_count := 0;
1042:
1043: IF p_visit_hstry_rec.port_of_entry IS NULL OR p_visit_hstry_rec.port_of_entry = FND_API.G_MISS_CHAR THEN
1044: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
1045: fnd_message.set_token('PARAM','PORT_OF_ENTRY');
1046: igs_ge_msg_stack.add;
1047: app_exception.raise_exception;

Line 1050: IF p_visit_hstry_rec.cntry_entry_form_num IS NULL OR p_visit_hstry_rec.cntry_entry_form_num = FND_API.G_MISS_CHAR THEN

1046: igs_ge_msg_stack.add;
1047: app_exception.raise_exception;
1048: END IF;
1049:
1050: IF p_visit_hstry_rec.cntry_entry_form_num IS NULL OR p_visit_hstry_rec.cntry_entry_form_num = FND_API.G_MISS_CHAR THEN
1051: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
1052: fnd_message.set_token('PARAM','CNTRY_ENTRY_FORM_NUM');
1053: igs_ge_msg_stack.add;
1054: app_exception.raise_exception;

Line 1068: IF l_visit_hstry_rec.visa_id = FND_API.G_MISS_NUM THEN

1064: app_exception.raise_exception;
1065: END IF;
1066: CLOSE null_handlng_cur;
1067:
1068: IF l_visit_hstry_rec.visa_id = FND_API.G_MISS_NUM THEN
1069: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
1070: fnd_message.set_token('PARAM','VISA_ID');
1071: igs_ge_msg_stack.add;
1072: app_exception.raise_exception;

Line 1077: IF l_visit_hstry_rec.visit_start_date = FND_API.G_MISS_DATE THEN

1073: ELSIF l_visit_hstry_rec.visa_id IS NULL THEN
1074: l_visit_hstry_rec.visa_id := dup_visit_rec.visa_id;
1075: END IF;
1076:
1077: IF l_visit_hstry_rec.visit_start_date = FND_API.G_MISS_DATE THEN
1078: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
1079: fnd_message.set_token('PARAM','VISIT_START_DATE');
1080: igs_ge_msg_stack.add;
1081: app_exception.raise_exception;

Line 1086: IF l_visit_hstry_rec.visit_end_date = FND_API.G_MISS_DATE THEN

1082: ELSIF l_visit_hstry_rec.visit_start_date IS NULL THEN
1083: l_visit_hstry_rec.visit_start_date := dup_visit_rec.visit_start_date;
1084: END IF;
1085:
1086: IF l_visit_hstry_rec.visit_end_date = FND_API.G_MISS_DATE THEN
1087: l_visit_hstry_rec.visit_end_date := NULL;
1088: ELSIF l_visit_hstry_rec.visit_end_date IS NULL THEN
1089: l_visit_hstry_rec.visit_end_date := dup_visit_rec.visit_end_date;
1090: END IF;

Line 1092: IF l_visit_hstry_rec.remarks = FND_API.G_MISS_CHAR THEN

1088: ELSIF l_visit_hstry_rec.visit_end_date IS NULL THEN
1089: l_visit_hstry_rec.visit_end_date := dup_visit_rec.visit_end_date;
1090: END IF;
1091:
1092: IF l_visit_hstry_rec.remarks = FND_API.G_MISS_CHAR THEN
1093: l_visit_hstry_rec.remarks := NULL;
1094: ELSIF l_visit_hstry_rec.remarks IS NULL THEN
1095: l_visit_hstry_rec.remarks := dup_visit_rec.remarks;
1096: END IF;

Line 1130: RAISE FND_API.G_EXC_ERROR;

1126: X_ATTRIBUTE18 => NULL,
1127: X_ATTRIBUTE19 => NULL,
1128: X_ATTRIBUTE20 => NULL);
1129: ELSE
1130: RAISE FND_API.G_EXC_ERROR;
1131: END IF;
1132:
1133: -- End Here
1134:

Line 1135: IF FND_API.To_Boolean( p_commit ) THEN

1131: END IF;
1132:
1133: -- End Here
1134:
1135: IF FND_API.To_Boolean( p_commit ) THEN
1136: COMMIT WORK;
1137: END IF;
1138:
1139: EXCEPTION

Line 1144: x_return_status := FND_API.G_RET_STS_ERROR ;

1140: WHEN E_RESOURCE_BUSY THEN
1141: ROLLBACK TO Update_VisitHistry_PUB;
1142: fnd_message.set_name ('IGS', 'IGS_GE_RECORD_LOCKED');
1143: igs_ge_msg_stack.add;
1144: x_return_status := FND_API.G_RET_STS_ERROR ;
1145: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_FIRST, p_encoded => 'F');
1146: x_msg_count := 1;
1147: WHEN FND_API.G_EXC_ERROR THEN
1148: ROLLBACK TO Update_VisitHistry_PUB;

Line 1147: WHEN FND_API.G_EXC_ERROR THEN

1143: igs_ge_msg_stack.add;
1144: x_return_status := FND_API.G_RET_STS_ERROR ;
1145: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_FIRST, p_encoded => 'F');
1146: x_msg_count := 1;
1147: WHEN FND_API.G_EXC_ERROR THEN
1148: ROLLBACK TO Update_VisitHistry_PUB;
1149: x_return_status := FND_API.G_RET_STS_ERROR ;
1150: x_msg_data := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
1151: x_msg_count := 1;

Line 1149: x_return_status := FND_API.G_RET_STS_ERROR ;

1145: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_FIRST, p_encoded => 'F');
1146: x_msg_count := 1;
1147: WHEN FND_API.G_EXC_ERROR THEN
1148: ROLLBACK TO Update_VisitHistry_PUB;
1149: x_return_status := FND_API.G_RET_STS_ERROR ;
1150: x_msg_data := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
1151: x_msg_count := 1;
1152: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1153: ROLLBACK TO Update_VisitHistry_PUB;

Line 1152: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1148: ROLLBACK TO Update_VisitHistry_PUB;
1149: x_return_status := FND_API.G_RET_STS_ERROR ;
1150: x_msg_data := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
1151: x_msg_count := 1;
1152: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1153: ROLLBACK TO Update_VisitHistry_PUB;
1154: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1155: FND_MSG_PUB.Count_And_Get
1156: ( p_count => x_msg_count ,

Line 1154: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1150: x_msg_data := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
1151: x_msg_count := 1;
1152: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1153: ROLLBACK TO Update_VisitHistry_PUB;
1154: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1155: FND_MSG_PUB.Count_And_Get
1156: ( p_count => x_msg_count ,
1157: p_data => x_msg_data
1158: );

Line 1167: x_return_status := FND_API.G_RET_STS_ERROR ;

1163:
1164: x_msg_count := 1;
1165:
1166: IF l_message_name IN('IGS_PE_PORT_DUP_EXISTS','IGS_PE_PORT_DATE_OVERLAP','IGS_EN_INV','IGS_PS_LGCY_MANDATORY', 'IGS_PE_VIPS_UPD_ERR','IGS_PE_VIPS_COL_NONUPD') THEN
1167: x_return_status := FND_API.G_RET_STS_ERROR ;
1168: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_FIRST, p_encoded => 'F');
1169: ELSE
1170: x_msg_data := SQLERRM;
1171: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 1171: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1167: x_return_status := FND_API.G_RET_STS_ERROR ;
1168: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_FIRST, p_encoded => 'F');
1169: ELSE
1170: x_msg_data := SQLERRM;
1171: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1172: END IF;
1173:
1174: END Update_VisitHistry;
1175:

Line 1185: -- Default = FND_API.G_FALSE

1181: -- Pre-reqs : None.
1182: -- Parameters :
1183: -- IN : p_api_version IN NUMBER Required
1184: -- p_init_msg_list IN VARCHAR2 Optional
1185: -- Default = FND_API.G_FALSE
1186: -- p_commit IN VARCHAR2 Optional
1187: -- Default = FND_API.G_FALSE
1188: -- Default = FND_API.G_VALID_LEVEL_FULL
1189: -- p_passport_rec IN passport_rec_type

Line 1187: -- Default = FND_API.G_FALSE

1183: -- IN : p_api_version IN NUMBER Required
1184: -- p_init_msg_list IN VARCHAR2 Optional
1185: -- Default = FND_API.G_FALSE
1186: -- p_commit IN VARCHAR2 Optional
1187: -- Default = FND_API.G_FALSE
1188: -- Default = FND_API.G_VALID_LEVEL_FULL
1189: -- p_passport_rec IN passport_rec_type
1190: --
1191: --

Line 1188: -- Default = FND_API.G_VALID_LEVEL_FULL

1184: -- p_init_msg_list IN VARCHAR2 Optional
1185: -- Default = FND_API.G_FALSE
1186: -- p_commit IN VARCHAR2 Optional
1187: -- Default = FND_API.G_FALSE
1188: -- Default = FND_API.G_VALID_LEVEL_FULL
1189: -- p_passport_rec IN passport_rec_type
1190: --
1191: --
1192: -- OUT : x_return_status OUT VARCHAR2(1)

Line 1213: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,

1209: -- End of comments
1210:
1211: PROCEDURE Create_Passport
1212: ( p_api_version IN NUMBER,
1213: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1214: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1215: x_return_status OUT NOCOPY VARCHAR2,
1216: x_msg_count OUT NOCOPY NUMBER,
1217: x_msg_data OUT NOCOPY VARCHAR2,

Line 1214: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,

1210:
1211: PROCEDURE Create_Passport
1212: ( p_api_version IN NUMBER,
1213: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1214: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1215: x_return_status OUT NOCOPY VARCHAR2,
1216: x_msg_count OUT NOCOPY NUMBER,
1217: x_msg_data OUT NOCOPY VARCHAR2,
1218: p_passport_rec IN passport_rec_type,

Line 1237: IF NOT FND_API.Compatible_API_Call ( l_api_version,

1233: BEGIN
1234: l_passport_rec := p_passport_rec;
1235: l_passport_rec.passport_expiry_date := TRUNC(l_passport_rec.passport_expiry_date);
1236: SAVEPOINT Create_Passport_PUB;
1237: IF NOT FND_API.Compatible_API_Call ( l_api_version,
1238: p_api_version,
1239: l_api_name,
1240: G_PKG_NAME )
1241: THEN

Line 1242: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1238: p_api_version,
1239: l_api_name,
1240: G_PKG_NAME )
1241: THEN
1242: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1243: END IF;
1244:
1245: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1246: FND_MSG_PUB.initialize;

Line 1245: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1241: THEN
1242: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1243: END IF;
1244:
1245: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1246: FND_MSG_PUB.initialize;
1247: END IF;
1248:
1249: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1249: x_return_status := FND_API.G_RET_STS_SUCCESS;

1245: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1246: FND_MSG_PUB.initialize;
1247: END IF;
1248:
1249: x_return_status := FND_API.G_RET_STS_SUCCESS;
1250: -- Start here
1251:
1252: x_msg_count := 0;
1253:

Line 1254: IF l_passport_rec.person_id IS NULL OR l_passport_rec.person_id = FND_API.G_MISS_NUM THEN

1250: -- Start here
1251:
1252: x_msg_count := 0;
1253:
1254: IF l_passport_rec.person_id IS NULL OR l_passport_rec.person_id = FND_API.G_MISS_NUM THEN
1255: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
1256: fnd_message.set_token('PARAM','PERSON_ID');
1257: igs_ge_msg_stack.add;
1258: app_exception.raise_exception;

Line 1261: IF l_passport_rec.passport_number IS NULL OR l_passport_rec.passport_number = FND_API.G_MISS_CHAR THEN

1257: igs_ge_msg_stack.add;
1258: app_exception.raise_exception;
1259: END IF;
1260:
1261: IF l_passport_rec.passport_number IS NULL OR l_passport_rec.passport_number = FND_API.G_MISS_CHAR THEN
1262: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
1263: fnd_message.set_token('PARAM','PASSPORT_NUMBER');
1264: igs_ge_msg_stack.add;
1265: app_exception.raise_exception;

Line 1268: IF l_passport_rec.passport_expiry_date IS NULL OR l_passport_rec.passport_expiry_date = FND_API.G_MISS_DATE THEN

1264: igs_ge_msg_stack.add;
1265: app_exception.raise_exception;
1266: END IF;
1267:
1268: IF l_passport_rec.passport_expiry_date IS NULL OR l_passport_rec.passport_expiry_date = FND_API.G_MISS_DATE THEN
1269: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
1270: fnd_message.set_token('PARAM','PASSPORT_EXPIRY_DATE');
1271: igs_ge_msg_stack.add;
1272: app_exception.raise_exception;

Line 1275: IF l_passport_rec.passport_cntry_code IS NULL OR l_passport_rec.passport_cntry_code = FND_API.G_MISS_CHAR THEN

1271: igs_ge_msg_stack.add;
1272: app_exception.raise_exception;
1273: END IF;
1274:
1275: IF l_passport_rec.passport_cntry_code IS NULL OR l_passport_rec.passport_cntry_code = FND_API.G_MISS_CHAR THEN
1276: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
1277: fnd_message.set_token('PARAM','PASSPORT_CNTRY_CODE');
1278: igs_ge_msg_stack.add;
1279: app_exception.raise_exception;

Line 1317: RAISE FND_API.G_EXC_ERROR;

1313: );
1314:
1315:
1316: ELSE
1317: RAISE FND_API.G_EXC_ERROR;
1318: END IF;
1319:
1320: -- End Here
1321:

Line 1322: IF FND_API.To_Boolean( p_commit ) THEN

1318: END IF;
1319:
1320: -- End Here
1321:
1322: IF FND_API.To_Boolean( p_commit ) THEN
1323: COMMIT WORK;
1324: END IF;
1325:
1326: EXCEPTION

Line 1327: WHEN FND_API.G_EXC_ERROR THEN

1323: COMMIT WORK;
1324: END IF;
1325:
1326: EXCEPTION
1327: WHEN FND_API.G_EXC_ERROR THEN
1328: ROLLBACK TO Create_Passport_PUB;
1329: x_return_status := FND_API.G_RET_STS_ERROR ;
1330: x_msg_data := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
1331: x_msg_count := 1;

Line 1329: x_return_status := FND_API.G_RET_STS_ERROR ;

1325:
1326: EXCEPTION
1327: WHEN FND_API.G_EXC_ERROR THEN
1328: ROLLBACK TO Create_Passport_PUB;
1329: x_return_status := FND_API.G_RET_STS_ERROR ;
1330: x_msg_data := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
1331: x_msg_count := 1;
1332: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1333: ROLLBACK TO Create_Passport_PUB;

Line 1332: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1328: ROLLBACK TO Create_Passport_PUB;
1329: x_return_status := FND_API.G_RET_STS_ERROR ;
1330: x_msg_data := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
1331: x_msg_count := 1;
1332: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1333: ROLLBACK TO Create_Passport_PUB;
1334: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1335: FND_MSG_PUB.Count_And_Get
1336: ( p_count => x_msg_count ,

Line 1334: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1330: x_msg_data := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
1331: x_msg_count := 1;
1332: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1333: ROLLBACK TO Create_Passport_PUB;
1334: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1335: FND_MSG_PUB.Count_And_Get
1336: ( p_count => x_msg_count ,
1337: p_data => x_msg_data
1338: );

Line 1346: x_return_status := FND_API.G_RET_STS_ERROR ;

1342:
1343: x_msg_count := 1;
1344:
1345: IF l_message_name IN('IGS_PE_VIS_ASOC_PASS_EXP','IGS_EN_INV','IGS_PS_LGCY_MANDATORY', 'IGS_PE_VIPS_UPD_ERR','IGS_PE_VIPS_COL_NONUPD') THEN
1346: x_return_status := FND_API.G_RET_STS_ERROR ;
1347: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_FIRST, p_encoded => 'F');
1348: ELSIF l_message_name = 'FORM_RECORD_DELETED' THEN
1349: x_return_status := FND_API.G_RET_STS_ERROR ;
1350: fnd_message.set_name ('IGS', 'IGS_EN_INV');

Line 1349: x_return_status := FND_API.G_RET_STS_ERROR ;

1345: IF l_message_name IN('IGS_PE_VIS_ASOC_PASS_EXP','IGS_EN_INV','IGS_PS_LGCY_MANDATORY', 'IGS_PE_VIPS_UPD_ERR','IGS_PE_VIPS_COL_NONUPD') THEN
1346: x_return_status := FND_API.G_RET_STS_ERROR ;
1347: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_FIRST, p_encoded => 'F');
1348: ELSIF l_message_name = 'FORM_RECORD_DELETED' THEN
1349: x_return_status := FND_API.G_RET_STS_ERROR ;
1350: fnd_message.set_name ('IGS', 'IGS_EN_INV');
1351: fnd_message.set_token('PARAM','PERSON_ID');
1352: igs_ge_msg_stack.add;
1353: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_LAST, p_encoded => 'F');

Line 1355: x_return_status := FND_API.G_RET_STS_ERROR ;

1351: fnd_message.set_token('PARAM','PERSON_ID');
1352: igs_ge_msg_stack.add;
1353: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_LAST, p_encoded => 'F');
1354: ELSIF l_message_name = 'IGS_PE_PASSPORT_DUP_EXISTS' THEN
1355: x_return_status := FND_API.G_RET_STS_ERROR ;
1356: fnd_message.set_name ('IGS', 'IGS_PE_UNIQUE_FAILED');
1357: fnd_message.set_token('COLUMN','PERSON_ID,PASSPORT_CNTRY_CODE,PASSPORT_NUMBER');
1358: igs_ge_msg_stack.add;
1359: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_LAST, p_encoded => 'F');

Line 1362: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1358: igs_ge_msg_stack.add;
1359: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_LAST, p_encoded => 'F');
1360: ELSE
1361: x_msg_data := ' ' || SQLERRM;
1362: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1363: END IF;
1364:
1365:
1366: END Create_Passport;

Line 1378: -- Default = FND_API.G_FALSE

1374: -- Pre-reqs : None.
1375: -- Parameters :
1376: -- IN : p_api_version IN NUMBER Required
1377: -- p_init_msg_list IN VARCHAR2 Optional
1378: -- Default = FND_API.G_FALSE
1379: -- p_commit IN VARCHAR2 Optional
1380: -- Default = FND_API.G_FALSE
1381: -- Default = FND_API.G_VALID_LEVEL_FULL
1382: -- p_passport_rec IN passport_rec_type

Line 1380: -- Default = FND_API.G_FALSE

1376: -- IN : p_api_version IN NUMBER Required
1377: -- p_init_msg_list IN VARCHAR2 Optional
1378: -- Default = FND_API.G_FALSE
1379: -- p_commit IN VARCHAR2 Optional
1380: -- Default = FND_API.G_FALSE
1381: -- Default = FND_API.G_VALID_LEVEL_FULL
1382: -- p_passport_rec IN passport_rec_type
1383: --
1384: --

Line 1381: -- Default = FND_API.G_VALID_LEVEL_FULL

1377: -- p_init_msg_list IN VARCHAR2 Optional
1378: -- Default = FND_API.G_FALSE
1379: -- p_commit IN VARCHAR2 Optional
1380: -- Default = FND_API.G_FALSE
1381: -- Default = FND_API.G_VALID_LEVEL_FULL
1382: -- p_passport_rec IN passport_rec_type
1383: --
1384: --
1385: -- OUT : x_return_status OUT VARCHAR2(1)

Line 1405: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,

1401: -- End of comments
1402:
1403: PROCEDURE Update_Passport
1404: ( p_api_version IN NUMBER,
1405: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1406: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1407: x_return_status OUT NOCOPY VARCHAR2,
1408: x_msg_count OUT NOCOPY NUMBER,
1409: x_msg_data OUT NOCOPY VARCHAR2,

Line 1406: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,

1402:
1403: PROCEDURE Update_Passport
1404: ( p_api_version IN NUMBER,
1405: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1406: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1407: x_return_status OUT NOCOPY VARCHAR2,
1408: x_msg_count OUT NOCOPY NUMBER,
1409: x_msg_data OUT NOCOPY VARCHAR2,
1410: p_passport_rec IN passport_rec_type

Line 1438: IF NOT FND_API.Compatible_API_Call ( l_api_version,

1434: BEGIN
1435: l_passport_rec := p_passport_rec;
1436: l_passport_rec.passport_expiry_date := TRUNC(l_passport_rec.passport_expiry_date);
1437: SAVEPOINT Update_Passport_PUB;
1438: IF NOT FND_API.Compatible_API_Call ( l_api_version,
1439: p_api_version,
1440: l_api_name,
1441: G_PKG_NAME )
1442: THEN

Line 1443: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1439: p_api_version,
1440: l_api_name,
1441: G_PKG_NAME )
1442: THEN
1443: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1444: END IF;
1445:
1446: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1447: FND_MSG_PUB.initialize;

Line 1446: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1442: THEN
1443: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1444: END IF;
1445:
1446: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1447: FND_MSG_PUB.initialize;
1448: END IF;
1449:
1450: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1450: x_return_status := FND_API.G_RET_STS_SUCCESS;

1446: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1447: FND_MSG_PUB.initialize;
1448: END IF;
1449:
1450: x_return_status := FND_API.G_RET_STS_SUCCESS;
1451:
1452: -- Start here
1453:
1454: x_msg_count := 0;

Line 1456: IF p_passport_rec.passport_id IS NULL OR p_passport_rec.passport_id = FND_API.G_MISS_NUM THEN

1452: -- Start here
1453:
1454: x_msg_count := 0;
1455:
1456: IF p_passport_rec.passport_id IS NULL OR p_passport_rec.passport_id = FND_API.G_MISS_NUM THEN
1457: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
1458: fnd_message.set_token('PARAM','PASSPORT_ID');
1459: igs_ge_msg_stack.add;
1460: app_exception.raise_exception;

Line 1473: IF l_passport_rec.person_id = FND_API.G_MISS_NUM THEN

1469: app_exception.raise_exception;
1470: END IF;
1471: CLOSE null_handlng_cur;
1472:
1473: IF l_passport_rec.person_id = FND_API.G_MISS_NUM THEN
1474: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
1475: fnd_message.set_token('PARAM','PERSON_ID');
1476: igs_ge_msg_stack.add;
1477: app_exception.raise_exception;

Line 1487: IF l_passport_rec.passport_number = FND_API.G_MISS_CHAR THEN

1483: igs_ge_msg_stack.add;
1484: app_exception.raise_exception;
1485: END IF;
1486:
1487: IF l_passport_rec.passport_number = FND_API.G_MISS_CHAR THEN
1488: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
1489: fnd_message.set_token('PARAM','PASSPORT_NUMBER');
1490: igs_ge_msg_stack.add;
1491: app_exception.raise_exception;

Line 1501: IF l_passport_rec.passport_expiry_date = FND_API.G_MISS_DATE THEN

1497: igs_ge_msg_stack.add;
1498: app_exception.raise_exception;
1499: END IF;
1500:
1501: IF l_passport_rec.passport_expiry_date = FND_API.G_MISS_DATE THEN
1502: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
1503: fnd_message.set_token('PARAM','PASSPORT_EXPIRY_DATE');
1504: igs_ge_msg_stack.add;
1505: app_exception.raise_exception;

Line 1510: IF l_passport_rec.passport_cntry_code = FND_API.G_MISS_CHAR THEN

1506: ELSIF l_passport_rec.passport_expiry_date IS NULL THEN
1507: l_passport_rec.passport_expiry_date := dup_pass_rec.passport_expiry_date;
1508: END IF;
1509:
1510: IF l_passport_rec.passport_cntry_code = FND_API.G_MISS_CHAR THEN
1511: fnd_message.set_name ('IGS', 'IGS_PS_LGCY_MANDATORY');
1512: fnd_message.set_token('PARAM','PASSPORT_CNTRY_CODE');
1513: igs_ge_msg_stack.add;
1514: app_exception.raise_exception;

Line 1557: RAISE FND_API.G_EXC_ERROR;

1553: X_ATTRIBUTE20 => NULL,
1554: X_MODE => 'R'
1555: );
1556: ELSE
1557: RAISE FND_API.G_EXC_ERROR;
1558: END IF;
1559:
1560: -- End Here
1561:

Line 1562: IF FND_API.To_Boolean( p_commit ) THEN

1558: END IF;
1559:
1560: -- End Here
1561:
1562: IF FND_API.To_Boolean( p_commit ) THEN
1563: COMMIT WORK;
1564: END IF;
1565:
1566: EXCEPTION

Line 1571: x_return_status := FND_API.G_RET_STS_ERROR ;

1567: WHEN E_RESOURCE_BUSY THEN
1568: ROLLBACK TO Update_Passport_PUB;
1569: fnd_message.set_name ('IGS', 'IGS_GE_RECORD_LOCKED');
1570: igs_ge_msg_stack.add;
1571: x_return_status := FND_API.G_RET_STS_ERROR ;
1572: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_FIRST, p_encoded => 'F');
1573: x_msg_count := 1;
1574: WHEN FND_API.G_EXC_ERROR THEN
1575: ROLLBACK TO Update_Passport_PUB;

Line 1574: WHEN FND_API.G_EXC_ERROR THEN

1570: igs_ge_msg_stack.add;
1571: x_return_status := FND_API.G_RET_STS_ERROR ;
1572: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_FIRST, p_encoded => 'F');
1573: x_msg_count := 1;
1574: WHEN FND_API.G_EXC_ERROR THEN
1575: ROLLBACK TO Update_Passport_PUB;
1576: x_return_status := FND_API.G_RET_STS_ERROR ;
1577: x_msg_data := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
1578: x_msg_count := 1;

Line 1576: x_return_status := FND_API.G_RET_STS_ERROR ;

1572: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_FIRST, p_encoded => 'F');
1573: x_msg_count := 1;
1574: WHEN FND_API.G_EXC_ERROR THEN
1575: ROLLBACK TO Update_Passport_PUB;
1576: x_return_status := FND_API.G_RET_STS_ERROR ;
1577: x_msg_data := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
1578: x_msg_count := 1;
1579: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1580: ROLLBACK TO Update_Passport_PUB;

Line 1579: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1575: ROLLBACK TO Update_Passport_PUB;
1576: x_return_status := FND_API.G_RET_STS_ERROR ;
1577: x_msg_data := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
1578: x_msg_count := 1;
1579: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1580: ROLLBACK TO Update_Passport_PUB;
1581: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1582: FND_MSG_PUB.Count_And_Get
1583: ( p_count => x_msg_count ,

Line 1581: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1577: x_msg_data := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
1578: x_msg_count := 1;
1579: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1580: ROLLBACK TO Update_Passport_PUB;
1581: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1582: FND_MSG_PUB.Count_And_Get
1583: ( p_count => x_msg_count ,
1584: p_data => x_msg_data
1585: );

Line 1593: x_return_status := FND_API.G_RET_STS_ERROR ;

1589: FND_MESSAGE.PARSE_ENCODED(FND_MESSAGE.GET_ENCODED, l_app, l_message_name);
1590:
1591: x_msg_count := 1;
1592: IF l_message_name IN('IGS_PE_VIS_ASOC_PASS_EXP','IGS_PE_PASSPORT_DUP_EXISTS','IGS_EN_INV','IGS_PS_LGCY_MANDATORY', 'IGS_PE_VIPS_UPD_ERR','IGS_PE_VIPS_COL_NONUPD') THEN
1593: x_return_status := FND_API.G_RET_STS_ERROR ;
1594: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_FIRST, p_encoded => 'F');
1595: ELSE
1596: x_msg_data := ' ' || SQLERRM;
1597: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 1597: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1593: x_return_status := FND_API.G_RET_STS_ERROR ;
1594: x_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_FIRST, p_encoded => 'F');
1595: ELSE
1596: x_msg_data := ' ' || SQLERRM;
1597: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1598: END IF;
1599:
1600: END Update_Passport;
1601: