242: WHERE name = p_nit_rec.nit_name; -- Bug 8589204 Removed the UPPER fn
243:
244: FND_FILE.PUT_LINE(FND_FILE.log,'p_nit_rec.nit_name : '||p_nit_rec.nit_name);
245:
246: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_NAME_EXISTS');
247: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
248: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
249: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
250: l_message_text := FND_MESSAGE.GET;
243:
244: FND_FILE.PUT_LINE(FND_FILE.log,'p_nit_rec.nit_name : '||p_nit_rec.nit_name);
245:
246: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_NAME_EXISTS');
247: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
248: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
249: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
250: l_message_text := FND_MESSAGE.GET;
251: Insert_Error_Rec(l_message_text);
244: FND_FILE.PUT_LINE(FND_FILE.log,'p_nit_rec.nit_name : '||p_nit_rec.nit_name);
245:
246: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_NAME_EXISTS');
247: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
248: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
249: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
250: l_message_text := FND_MESSAGE.GET;
251: Insert_Error_Rec(l_message_text);
252: l_nit_valid := FALSE;
245:
246: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_NAME_EXISTS');
247: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
248: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
249: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
250: l_message_text := FND_MESSAGE.GET;
251: Insert_Error_Rec(l_message_text);
252: l_nit_valid := FALSE;
253:
246: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_NAME_EXISTS');
247: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
248: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
249: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
250: l_message_text := FND_MESSAGE.GET;
251: Insert_Error_Rec(l_message_text);
252: l_nit_valid := FALSE;
253:
254: END IF;
263:
264: -- master NIT does not exist
265: -- validate NIT and insert new NIT record
266: IF jg_taxid_val_pkg.check_length('CO',14,p_nit_rec.nit) = 'FALSE' THEN
267: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_MAX_DIGITS');
268: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
269: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
270: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
271: l_message_text := FND_MESSAGE.GET;
264: -- master NIT does not exist
265: -- validate NIT and insert new NIT record
266: IF jg_taxid_val_pkg.check_length('CO',14,p_nit_rec.nit) = 'FALSE' THEN
267: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_MAX_DIGITS');
268: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
269: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
270: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
271: l_message_text := FND_MESSAGE.GET;
272: Insert_Error_Rec(l_message_text);
265: -- validate NIT and insert new NIT record
266: IF jg_taxid_val_pkg.check_length('CO',14,p_nit_rec.nit) = 'FALSE' THEN
267: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_MAX_DIGITS');
268: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
269: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
270: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
271: l_message_text := FND_MESSAGE.GET;
272: Insert_Error_Rec(l_message_text);
273: l_nit_valid := FALSE;
266: IF jg_taxid_val_pkg.check_length('CO',14,p_nit_rec.nit) = 'FALSE' THEN
267: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_MAX_DIGITS');
268: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
269: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
270: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
271: l_message_text := FND_MESSAGE.GET;
272: Insert_Error_Rec(l_message_text);
273: l_nit_valid := FALSE;
274: END IF; /*check_length*/
267: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_MAX_DIGITS');
268: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
269: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
270: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
271: l_message_text := FND_MESSAGE.GET;
272: Insert_Error_Rec(l_message_text);
273: l_nit_valid := FALSE;
274: END IF; /*check_length*/
275:
275:
276: IF p_nit_rec.nit IS NULL THEN
277: FND_FILE.PUT_LINE(FND_FILE.log,'NIT Null Check : p_nit_rec.nit : '||p_nit_rec.nit);
278:
279: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_REQUIRED');
280: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
281: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
282: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
283: l_message_text := FND_MESSAGE.GET;
276: IF p_nit_rec.nit IS NULL THEN
277: FND_FILE.PUT_LINE(FND_FILE.log,'NIT Null Check : p_nit_rec.nit : '||p_nit_rec.nit);
278:
279: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_REQUIRED');
280: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
281: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
282: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
283: l_message_text := FND_MESSAGE.GET;
284: Insert_Error_Rec(l_message_text);
277: FND_FILE.PUT_LINE(FND_FILE.log,'NIT Null Check : p_nit_rec.nit : '||p_nit_rec.nit);
278:
279: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_REQUIRED');
280: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
281: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
282: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
283: l_message_text := FND_MESSAGE.GET;
284: Insert_Error_Rec(l_message_text);
285: l_nit_valid := FALSE;
278:
279: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_REQUIRED');
280: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
281: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
282: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
283: l_message_text := FND_MESSAGE.GET;
284: Insert_Error_Rec(l_message_text);
285: l_nit_valid := FALSE;
286:
279: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_REQUIRED');
280: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
281: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
282: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
283: l_message_text := FND_MESSAGE.GET;
284: Insert_Error_Rec(l_message_text);
285: l_nit_valid := FALSE;
286:
287: ELSE
285: l_nit_valid := FALSE;
286:
287: ELSE
288: IF jg_taxid_val_pkg.check_numeric(p_nit_rec.nit) = 'FALSE' THEN
289: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_INVALID_NIT');
290: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
291: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
292: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
293: l_message_text := FND_MESSAGE.GET;
286:
287: ELSE
288: IF jg_taxid_val_pkg.check_numeric(p_nit_rec.nit) = 'FALSE' THEN
289: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_INVALID_NIT');
290: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
291: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
292: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
293: l_message_text := FND_MESSAGE.GET;
294:
287: ELSE
288: IF jg_taxid_val_pkg.check_numeric(p_nit_rec.nit) = 'FALSE' THEN
289: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_INVALID_NIT');
290: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
291: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
292: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
293: l_message_text := FND_MESSAGE.GET;
294:
295: Insert_Error_Rec(l_message_text);
288: IF jg_taxid_val_pkg.check_numeric(p_nit_rec.nit) = 'FALSE' THEN
289: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_INVALID_NIT');
290: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
291: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
292: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
293: l_message_text := FND_MESSAGE.GET;
294:
295: Insert_Error_Rec(l_message_text);
296: l_nit_valid := FALSE;
289: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_INVALID_NIT');
290: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
291: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
292: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
293: l_message_text := FND_MESSAGE.GET;
294:
295: Insert_Error_Rec(l_message_text);
296: l_nit_valid := FALSE;
297:
298: ELSE /* nit is numeric */
299: IF (p_nit_rec.verifying_digit IS NOT NULL) THEN
300: IF jg_taxid_val_pkg.check_algorithm(p_nit_rec.nit,'CO',
301: p_nit_rec.verifying_digit) = 'FALSE' THEN
302: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_VER_DIGIT_INVALID');
303: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',
304: p_identifier_type,TRUE);
305: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
306: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
299: IF (p_nit_rec.verifying_digit IS NOT NULL) THEN
300: IF jg_taxid_val_pkg.check_algorithm(p_nit_rec.nit,'CO',
301: p_nit_rec.verifying_digit) = 'FALSE' THEN
302: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_VER_DIGIT_INVALID');
303: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',
304: p_identifier_type,TRUE);
305: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
306: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
307: l_message_text := FND_MESSAGE.GET;
301: p_nit_rec.verifying_digit) = 'FALSE' THEN
302: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_VER_DIGIT_INVALID');
303: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',
304: p_identifier_type,TRUE);
305: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
306: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
307: l_message_text := FND_MESSAGE.GET;
308: Insert_Error_Rec(l_message_text);
309: l_nit_valid := FALSE;
302: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_VER_DIGIT_INVALID');
303: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',
304: p_identifier_type,TRUE);
305: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
306: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
307: l_message_text := FND_MESSAGE.GET;
308: Insert_Error_Rec(l_message_text);
309: l_nit_valid := FALSE;
310: END IF; /* validate_algorithm for verifying digit*/
303: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',
304: p_identifier_type,TRUE);
305: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
306: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
307: l_message_text := FND_MESSAGE.GET;
308: Insert_Error_Rec(l_message_text);
309: l_nit_valid := FALSE;
310: END IF; /* validate_algorithm for verifying digit*/
311: END IF; /* v_digit not NULL */
313: END IF; /* nit is NULL */
314:
315: IF (p_nit_rec.nit_type = 'LEGAL_ENTITY' AND
316: p_nit_rec.verifying_digit IS NULL) THEN
317: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_VER_DIGIT_REQUIRED');
318: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
319: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
320: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
321: l_message_text := FND_MESSAGE.GET;
314:
315: IF (p_nit_rec.nit_type = 'LEGAL_ENTITY' AND
316: p_nit_rec.verifying_digit IS NULL) THEN
317: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_VER_DIGIT_REQUIRED');
318: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
319: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
320: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
321: l_message_text := FND_MESSAGE.GET;
322: Insert_Error_Rec(l_message_text);
315: IF (p_nit_rec.nit_type = 'LEGAL_ENTITY' AND
316: p_nit_rec.verifying_digit IS NULL) THEN
317: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_VER_DIGIT_REQUIRED');
318: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
319: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
320: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
321: l_message_text := FND_MESSAGE.GET;
322: Insert_Error_Rec(l_message_text);
323: l_nit_valid := FALSE;
316: p_nit_rec.verifying_digit IS NULL) THEN
317: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_VER_DIGIT_REQUIRED');
318: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
319: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
320: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
321: l_message_text := FND_MESSAGE.GET;
322: Insert_Error_Rec(l_message_text);
323: l_nit_valid := FALSE;
324: END IF;
317: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_VER_DIGIT_REQUIRED');
318: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
319: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
320: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
321: l_message_text := FND_MESSAGE.GET;
322: Insert_Error_Rec(l_message_text);
323: l_nit_valid := FALSE;
324: END IF;
325:
324: END IF;
325:
326: IF (p_nit_rec.nit_type IS NULL) OR (p_nit_rec.nit_type NOT IN
327: ('LEGAL_ENTITY','INDIVIDUAL','FOREIGN_ENTITY','MERCHANT')) THEN -- ER 9435028
328: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_TYPE_REQUIRED');
329: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
330: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
331: FND_MESSAGE.SET_TOKEN('TAXID_TYPE', 'LEGAL_ENTITY, INDIVIDUAL, MERCHANT and FOREIGN_ENTITY'); -- ER 9435028
332: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
325:
326: IF (p_nit_rec.nit_type IS NULL) OR (p_nit_rec.nit_type NOT IN
327: ('LEGAL_ENTITY','INDIVIDUAL','FOREIGN_ENTITY','MERCHANT')) THEN -- ER 9435028
328: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_TYPE_REQUIRED');
329: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
330: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
331: FND_MESSAGE.SET_TOKEN('TAXID_TYPE', 'LEGAL_ENTITY, INDIVIDUAL, MERCHANT and FOREIGN_ENTITY'); -- ER 9435028
332: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
333: l_message_text := FND_MESSAGE.GET;
326: IF (p_nit_rec.nit_type IS NULL) OR (p_nit_rec.nit_type NOT IN
327: ('LEGAL_ENTITY','INDIVIDUAL','FOREIGN_ENTITY','MERCHANT')) THEN -- ER 9435028
328: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_TYPE_REQUIRED');
329: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
330: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
331: FND_MESSAGE.SET_TOKEN('TAXID_TYPE', 'LEGAL_ENTITY, INDIVIDUAL, MERCHANT and FOREIGN_ENTITY'); -- ER 9435028
332: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
333: l_message_text := FND_MESSAGE.GET;
334: Insert_Error_Rec(l_message_text);
327: ('LEGAL_ENTITY','INDIVIDUAL','FOREIGN_ENTITY','MERCHANT')) THEN -- ER 9435028
328: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_TYPE_REQUIRED');
329: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
330: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
331: FND_MESSAGE.SET_TOKEN('TAXID_TYPE', 'LEGAL_ENTITY, INDIVIDUAL, MERCHANT and FOREIGN_ENTITY'); -- ER 9435028
332: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
333: l_message_text := FND_MESSAGE.GET;
334: Insert_Error_Rec(l_message_text);
335: l_nit_valid := FALSE;
328: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_TYPE_REQUIRED');
329: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
330: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
331: FND_MESSAGE.SET_TOKEN('TAXID_TYPE', 'LEGAL_ENTITY, INDIVIDUAL, MERCHANT and FOREIGN_ENTITY'); -- ER 9435028
332: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
333: l_message_text := FND_MESSAGE.GET;
334: Insert_Error_Rec(l_message_text);
335: l_nit_valid := FALSE;
336: END IF;
329: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
330: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
331: FND_MESSAGE.SET_TOKEN('TAXID_TYPE', 'LEGAL_ENTITY, INDIVIDUAL, MERCHANT and FOREIGN_ENTITY'); -- ER 9435028
332: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
333: l_message_text := FND_MESSAGE.GET;
334: Insert_Error_Rec(l_message_text);
335: l_nit_valid := FALSE;
336: END IF;
337:
335: l_nit_valid := FALSE;
336: END IF;
337:
338: IF p_nit_rec.nit_name IS NULL THEN
339: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_NAME_REQUIRED');
340: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
341: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
342: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
343: l_message_text := FND_MESSAGE.GET;
336: END IF;
337:
338: IF p_nit_rec.nit_name IS NULL THEN
339: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_NAME_REQUIRED');
340: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
341: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
342: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
343: l_message_text := FND_MESSAGE.GET;
344: Insert_Error_Rec(l_message_text);
337:
338: IF p_nit_rec.nit_name IS NULL THEN
339: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_NAME_REQUIRED');
340: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
341: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
342: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
343: l_message_text := FND_MESSAGE.GET;
344: Insert_Error_Rec(l_message_text);
345: l_nit_valid := FALSE;
338: IF p_nit_rec.nit_name IS NULL THEN
339: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_NAME_REQUIRED');
340: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
341: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
342: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
343: l_message_text := FND_MESSAGE.GET;
344: Insert_Error_Rec(l_message_text);
345: l_nit_valid := FALSE;
346: END IF;
339: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_NAME_REQUIRED');
340: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
341: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
342: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
343: l_message_text := FND_MESSAGE.GET;
344: Insert_Error_Rec(l_message_text);
345: l_nit_valid := FALSE;
346: END IF;
347:
395:
396: FND_FILE.PUT_LINE(FND_FILE.log,'in the conditoin l_nit valid and p_nit_rec.nit <> l_master_nit_rec.nit');
397:
398:
399: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_MASTER_NIT_MISMATCH');
400: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
401: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
402: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
403: l_message_text := FND_MESSAGE.GET;
396: FND_FILE.PUT_LINE(FND_FILE.log,'in the conditoin l_nit valid and p_nit_rec.nit <> l_master_nit_rec.nit');
397:
398:
399: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_MASTER_NIT_MISMATCH');
400: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
401: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
402: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
403: l_message_text := FND_MESSAGE.GET;
404: Insert_Error_Rec(l_message_text);
397:
398:
399: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_MASTER_NIT_MISMATCH');
400: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
401: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
402: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
403: l_message_text := FND_MESSAGE.GET;
404: Insert_Error_Rec(l_message_text);
405: FND_FILE.PUT_LINE(FND_FILE.log,'inserted in insert_error_rec');
398:
399: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_MASTER_NIT_MISMATCH');
400: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
401: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
402: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
403: l_message_text := FND_MESSAGE.GET;
404: Insert_Error_Rec(l_message_text);
405: FND_FILE.PUT_LINE(FND_FILE.log,'inserted in insert_error_rec');
406: l_nit_valid := FALSE;
399: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_MASTER_NIT_MISMATCH');
400: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
401: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);
402: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
403: l_message_text := FND_MESSAGE.GET;
404: Insert_Error_Rec(l_message_text);
405: FND_FILE.PUT_LINE(FND_FILE.log,'inserted in insert_error_rec');
406: l_nit_valid := FALSE;
407: END IF;
465: -- summary because of which the AR, AP or PO routine couldn't process
466: -- it and passed the record on to the GL routine
467:
468: l_add_text := 'JL_CO_GL_0_NIT_TRX_CREATED';
469: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NO_IMPORT_REF');
470: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
471: l_message_text := FND_MESSAGE.GET;
472: Insert_Error_Rec(l_message_text);
473:
466: -- it and passed the record on to the GL routine
467:
468: l_add_text := 'JL_CO_GL_0_NIT_TRX_CREATED';
469: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NO_IMPORT_REF');
470: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
471: l_message_text := FND_MESSAGE.GET;
472: Insert_Error_Rec(l_message_text);
473:
474: -- Bug 9710493 Start
467:
468: l_add_text := 'JL_CO_GL_0_NIT_TRX_CREATED';
469: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NO_IMPORT_REF');
470: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
471: l_message_text := FND_MESSAGE.GET;
472: Insert_Error_Rec(l_message_text);
473:
474: -- Bug 9710493 Start
475: ELSIF p_journal_rec.source = 'Payables' Then
507: -- summary because of which the AP routine couldn't process
508: -- it and passed the record on to the GL routine
509:
510: l_add_text := 'JL_CO_GL_0_NIT_TRX_CREATED';
511: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NO_IMPORT_REF');
512: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
513: l_message_text := FND_MESSAGE.GET;
514: Insert_Error_Rec(l_message_text);
515: End If;
508: -- it and passed the record on to the GL routine
509:
510: l_add_text := 'JL_CO_GL_0_NIT_TRX_CREATED';
511: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NO_IMPORT_REF');
512: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
513: l_message_text := FND_MESSAGE.GET;
514: Insert_Error_Rec(l_message_text);
515: End If;
516: -- Bug 9710493 End
509:
510: l_add_text := 'JL_CO_GL_0_NIT_TRX_CREATED';
511: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NO_IMPORT_REF');
512: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
513: l_message_text := FND_MESSAGE.GET;
514: Insert_Error_Rec(l_message_text);
515: End If;
516: -- Bug 9710493 End
517: ELSIF g_nit_rec.nit_id IS NULL THEN /* Third party # is not valid */
516: -- Bug 9710493 End
517: ELSIF g_nit_rec.nit_id IS NULL THEN /* Third party # is not valid */
518:
519: l_add_text := 'JL_CO_GL_0_NIT_TRX_CREATED';
520: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_INVALID_NIT');
521: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',NULL);
522: FND_MESSAGE.SET_TOKEN('IDENTIFIER',NULL);
523: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
524: l_message_text := FND_MESSAGE.GET;
517: ELSIF g_nit_rec.nit_id IS NULL THEN /* Third party # is not valid */
518:
519: l_add_text := 'JL_CO_GL_0_NIT_TRX_CREATED';
520: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_INVALID_NIT');
521: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',NULL);
522: FND_MESSAGE.SET_TOKEN('IDENTIFIER',NULL);
523: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
524: l_message_text := FND_MESSAGE.GET;
525: Insert_Error_Rec(l_message_text);
518:
519: l_add_text := 'JL_CO_GL_0_NIT_TRX_CREATED';
520: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_INVALID_NIT');
521: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',NULL);
522: FND_MESSAGE.SET_TOKEN('IDENTIFIER',NULL);
523: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
524: l_message_text := FND_MESSAGE.GET;
525: Insert_Error_Rec(l_message_text);
526:
519: l_add_text := 'JL_CO_GL_0_NIT_TRX_CREATED';
520: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_INVALID_NIT');
521: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',NULL);
522: FND_MESSAGE.SET_TOKEN('IDENTIFIER',NULL);
523: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
524: l_message_text := FND_MESSAGE.GET;
525: Insert_Error_Rec(l_message_text);
526:
527: ELSIF p_journal_rec.ext_nit = '0' THEN
520: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_INVALID_NIT');
521: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',NULL);
522: FND_MESSAGE.SET_TOKEN('IDENTIFIER',NULL);
523: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
524: l_message_text := FND_MESSAGE.GET;
525: Insert_Error_Rec(l_message_text);
526:
527: ELSIF p_journal_rec.ext_nit = '0' THEN
528: -- Not calling NIT_VALIDATION function because the only nit info
529: -- entered by the user in Enter Journals form is NIT# hence it
530: -- isn't necessary to do exhaustive NIT validation
531:
532: l_add_text := 'JL_CO_GL_0_NIT_TRX_CREATED';
533: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_REQUIRED');
534: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',NULL);
535: FND_MESSAGE.SET_TOKEN('IDENTIFIER',NULL);
536: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
537: l_message_text := FND_MESSAGE.GET;
530: -- isn't necessary to do exhaustive NIT validation
531:
532: l_add_text := 'JL_CO_GL_0_NIT_TRX_CREATED';
533: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_REQUIRED');
534: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',NULL);
535: FND_MESSAGE.SET_TOKEN('IDENTIFIER',NULL);
536: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
537: l_message_text := FND_MESSAGE.GET;
538: Insert_Error_Rec(l_message_text);
531:
532: l_add_text := 'JL_CO_GL_0_NIT_TRX_CREATED';
533: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_REQUIRED');
534: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',NULL);
535: FND_MESSAGE.SET_TOKEN('IDENTIFIER',NULL);
536: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
537: l_message_text := FND_MESSAGE.GET;
538: Insert_Error_Rec(l_message_text);
539:
532: l_add_text := 'JL_CO_GL_0_NIT_TRX_CREATED';
533: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_REQUIRED');
534: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',NULL);
535: FND_MESSAGE.SET_TOKEN('IDENTIFIER',NULL);
536: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
537: l_message_text := FND_MESSAGE.GET;
538: Insert_Error_Rec(l_message_text);
539:
540: END IF;
533: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_REQUIRED');
534: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',NULL);
535: FND_MESSAGE.SET_TOKEN('IDENTIFIER',NULL);
536: FND_MESSAGE.SET_TOKEN('ADD_TEXT',l_add_text,TRUE);
537: l_message_text := FND_MESSAGE.GET;
538: Insert_Error_Rec(l_message_text);
539:
540: END IF;
541:
3355: IF l_request_id = 0 THEN
3356: FND_FILE.PUT_LINE(FND_FILE.log,
3357: 'CONC-REQUEST SUBMISSION FAILED');
3358: ELSE
3359: FND_MESSAGE.SET_NAME('SQLGL','GL_REQUEST_SUBMITTED');
3360: FND_MESSAGE.SET_TOKEN('REQUEST_ID',l_request_id,FALSE);
3361: l_message_text := FND_MESSAGE.GET;
3362: FND_FILE.PUT_LINE(FND_FILE.log,
3363: 'Submitted Third Party Balances Error Report. '
3356: FND_FILE.PUT_LINE(FND_FILE.log,
3357: 'CONC-REQUEST SUBMISSION FAILED');
3358: ELSE
3359: FND_MESSAGE.SET_NAME('SQLGL','GL_REQUEST_SUBMITTED');
3360: FND_MESSAGE.SET_TOKEN('REQUEST_ID',l_request_id,FALSE);
3361: l_message_text := FND_MESSAGE.GET;
3362: FND_FILE.PUT_LINE(FND_FILE.log,
3363: 'Submitted Third Party Balances Error Report. '
3364: || l_message_text);
3357: 'CONC-REQUEST SUBMISSION FAILED');
3358: ELSE
3359: FND_MESSAGE.SET_NAME('SQLGL','GL_REQUEST_SUBMITTED');
3360: FND_MESSAGE.SET_TOKEN('REQUEST_ID',l_request_id,FALSE);
3361: l_message_text := FND_MESSAGE.GET;
3362: FND_FILE.PUT_LINE(FND_FILE.log,
3363: 'Submitted Third Party Balances Error Report. '
3364: || l_message_text);
3365: END IF;