125: l_message := 'TRUE';
126: return l_message;
127: EXCEPTION
128: WHEN INVALID_FORMAT THEN
129: fnd_message.set_name('PER','HR_JP_INVALID_FORMAT');
130: --Bug Fix:3153731, changed the token values of 'VALUE' and 'FORMAT'
131: fnd_message.set_token('VALUE',substr(p_value,1,lengthb(p_value)-2));
132: fnd_message.set_token('FORMAT',substr(p_format,1,6));
133: --
127: EXCEPTION
128: WHEN INVALID_FORMAT THEN
129: fnd_message.set_name('PER','HR_JP_INVALID_FORMAT');
130: --Bug Fix:3153731, changed the token values of 'VALUE' and 'FORMAT'
131: fnd_message.set_token('VALUE',substr(p_value,1,lengthb(p_value)-2));
132: fnd_message.set_token('FORMAT',substr(p_format,1,6));
133: --
134: l_message := fnd_message.get;
135: return l_message;
128: WHEN INVALID_FORMAT THEN
129: fnd_message.set_name('PER','HR_JP_INVALID_FORMAT');
130: --Bug Fix:3153731, changed the token values of 'VALUE' and 'FORMAT'
131: fnd_message.set_token('VALUE',substr(p_value,1,lengthb(p_value)-2));
132: fnd_message.set_token('FORMAT',substr(p_format,1,6));
133: --
134: l_message := fnd_message.get;
135: return l_message;
136: WHEN OTHERS THEN
130: --Bug Fix:3153731, changed the token values of 'VALUE' and 'FORMAT'
131: fnd_message.set_token('VALUE',substr(p_value,1,lengthb(p_value)-2));
132: fnd_message.set_token('FORMAT',substr(p_format,1,6));
133: --
134: l_message := fnd_message.get;
135: return l_message;
136: WHEN OTHERS THEN
137: l_message := SQLERRM;
138: return l_message;
230: l_message := 'TRUE';
231: return l_message;
232: EXCEPTION
233: WHEN INVALID_FORMAT THEN
234: fnd_message.set_name('PER','HR_JP_INVALID_FORMAT');
235: fnd_message.set_token('VALUE',p_district_code);
236: fnd_message.set_token('FORMAT',l_format);
237: l_message := fnd_message.get;
238: return l_message;
231: return l_message;
232: EXCEPTION
233: WHEN INVALID_FORMAT THEN
234: fnd_message.set_name('PER','HR_JP_INVALID_FORMAT');
235: fnd_message.set_token('VALUE',p_district_code);
236: fnd_message.set_token('FORMAT',l_format);
237: l_message := fnd_message.get;
238: return l_message;
239: WHEN INVALID_DISTRICT_CODE THEN
232: EXCEPTION
233: WHEN INVALID_FORMAT THEN
234: fnd_message.set_name('PER','HR_JP_INVALID_FORMAT');
235: fnd_message.set_token('VALUE',p_district_code);
236: fnd_message.set_token('FORMAT',l_format);
237: l_message := fnd_message.get;
238: return l_message;
239: WHEN INVALID_DISTRICT_CODE THEN
240: fnd_message.set_name('PER','HR_JP_DISTRICT_NOT_REGISTERED');
233: WHEN INVALID_FORMAT THEN
234: fnd_message.set_name('PER','HR_JP_INVALID_FORMAT');
235: fnd_message.set_token('VALUE',p_district_code);
236: fnd_message.set_token('FORMAT',l_format);
237: l_message := fnd_message.get;
238: return l_message;
239: WHEN INVALID_DISTRICT_CODE THEN
240: fnd_message.set_name('PER','HR_JP_DISTRICT_NOT_REGISTERED');
241: fnd_message.set_token('VALUE',p_district_code);
236: fnd_message.set_token('FORMAT',l_format);
237: l_message := fnd_message.get;
238: return l_message;
239: WHEN INVALID_DISTRICT_CODE THEN
240: fnd_message.set_name('PER','HR_JP_DISTRICT_NOT_REGISTERED');
241: fnd_message.set_token('VALUE',p_district_code);
242: l_message := fnd_message.get;
243: return l_message;
244: WHEN INVALID_CHECK_DIGIT THEN
237: l_message := fnd_message.get;
238: return l_message;
239: WHEN INVALID_DISTRICT_CODE THEN
240: fnd_message.set_name('PER','HR_JP_DISTRICT_NOT_REGISTERED');
241: fnd_message.set_token('VALUE',p_district_code);
242: l_message := fnd_message.get;
243: return l_message;
244: WHEN INVALID_CHECK_DIGIT THEN
245: fnd_message.set_name('PER','HR_JP_INVALID_CHECK_DIGIT');
238: return l_message;
239: WHEN INVALID_DISTRICT_CODE THEN
240: fnd_message.set_name('PER','HR_JP_DISTRICT_NOT_REGISTERED');
241: fnd_message.set_token('VALUE',p_district_code);
242: l_message := fnd_message.get;
243: return l_message;
244: WHEN INVALID_CHECK_DIGIT THEN
245: fnd_message.set_name('PER','HR_JP_INVALID_CHECK_DIGIT');
246: l_message := fnd_message.get;
241: fnd_message.set_token('VALUE',p_district_code);
242: l_message := fnd_message.get;
243: return l_message;
244: WHEN INVALID_CHECK_DIGIT THEN
245: fnd_message.set_name('PER','HR_JP_INVALID_CHECK_DIGIT');
246: l_message := fnd_message.get;
247: return l_message;
248: WHEN OTHERS THEN
249: l_message := SQLERRM;
242: l_message := fnd_message.get;
243: return l_message;
244: WHEN INVALID_CHECK_DIGIT THEN
245: fnd_message.set_name('PER','HR_JP_INVALID_CHECK_DIGIT');
246: l_message := fnd_message.get;
247: return l_message;
248: WHEN OTHERS THEN
249: l_message := SQLERRM;
250: return l_message;