38: fetch c_text into p_text;
39: close c_text;
40:
41: if p_Error_code = 'XTR_MANDATORY' then
42: FND_MESSAGE.Set_Name('XTR','XTR_MANDATORY_FIELD');
43: FND_MESSAGE.Set_Token('FIELD', p_text);
44:
45: elsif p_Error_code = 'XTR_INV_LIMIT_CODE' then
46: FND_MESSAGE.Set_Name('XTR','XTR_INV_LIMIT_CODE_FIELD');
39: close c_text;
40:
41: if p_Error_code = 'XTR_MANDATORY' then
42: FND_MESSAGE.Set_Name('XTR','XTR_MANDATORY_FIELD');
43: FND_MESSAGE.Set_Token('FIELD', p_text);
44:
45: elsif p_Error_code = 'XTR_INV_LIMIT_CODE' then
46: FND_MESSAGE.Set_Name('XTR','XTR_INV_LIMIT_CODE_FIELD');
47: FND_MESSAGE.Set_Token('LIMIT_CODE', p_text);
42: FND_MESSAGE.Set_Name('XTR','XTR_MANDATORY_FIELD');
43: FND_MESSAGE.Set_Token('FIELD', p_text);
44:
45: elsif p_Error_code = 'XTR_INV_LIMIT_CODE' then
46: FND_MESSAGE.Set_Name('XTR','XTR_INV_LIMIT_CODE_FIELD');
47: FND_MESSAGE.Set_Token('LIMIT_CODE', p_text);
48:
49: elsif p_Error_code = 'XTR_IMP_DEAL_REVAL_EXIST' then
50: FND_MESSAGE.Set_Name ('XTR', 'XTR_DEAL_REVAL_DONE');
43: FND_MESSAGE.Set_Token('FIELD', p_text);
44:
45: elsif p_Error_code = 'XTR_INV_LIMIT_CODE' then
46: FND_MESSAGE.Set_Name('XTR','XTR_INV_LIMIT_CODE_FIELD');
47: FND_MESSAGE.Set_Token('LIMIT_CODE', p_text);
48:
49: elsif p_Error_code = 'XTR_IMP_DEAL_REVAL_EXIST' then
50: FND_MESSAGE.Set_Name ('XTR', 'XTR_DEAL_REVAL_DONE');
51: FND_MESSAGE.Set_Token ('DATE',p_field_name);
46: FND_MESSAGE.Set_Name('XTR','XTR_INV_LIMIT_CODE_FIELD');
47: FND_MESSAGE.Set_Token('LIMIT_CODE', p_text);
48:
49: elsif p_Error_code = 'XTR_IMP_DEAL_REVAL_EXIST' then
50: FND_MESSAGE.Set_Name ('XTR', 'XTR_DEAL_REVAL_DONE');
51: FND_MESSAGE.Set_Token ('DATE',p_field_name);
52:
53: elsif p_Error_code = 'XTR_IMP_DEAL_ACCRUAL_EXIST' then
54: FND_MESSAGE.Set_Name ('XTR', 'XTR_DEAL_ACCRLS_EXIST');
47: FND_MESSAGE.Set_Token('LIMIT_CODE', p_text);
48:
49: elsif p_Error_code = 'XTR_IMP_DEAL_REVAL_EXIST' then
50: FND_MESSAGE.Set_Name ('XTR', 'XTR_DEAL_REVAL_DONE');
51: FND_MESSAGE.Set_Token ('DATE',p_field_name);
52:
53: elsif p_Error_code = 'XTR_IMP_DEAL_ACCRUAL_EXIST' then
54: FND_MESSAGE.Set_Name ('XTR', 'XTR_DEAL_ACCRLS_EXIST');
55: FND_MESSAGE.Set_Token ('DATE',p_field_name);
50: FND_MESSAGE.Set_Name ('XTR', 'XTR_DEAL_REVAL_DONE');
51: FND_MESSAGE.Set_Token ('DATE',p_field_name);
52:
53: elsif p_Error_code = 'XTR_IMP_DEAL_ACCRUAL_EXIST' then
54: FND_MESSAGE.Set_Name ('XTR', 'XTR_DEAL_ACCRLS_EXIST');
55: FND_MESSAGE.Set_Token ('DATE',p_field_name);
56:
57: elsif p_Error_code in ('XTR_INV_DESC_FLEX_API',
58: 'XTR_INV_DESC_FLEX_CONTEXT','XTR_INV_DESC_FLEX') then
51: FND_MESSAGE.Set_Token ('DATE',p_field_name);
52:
53: elsif p_Error_code = 'XTR_IMP_DEAL_ACCRUAL_EXIST' then
54: FND_MESSAGE.Set_Name ('XTR', 'XTR_DEAL_ACCRLS_EXIST');
55: FND_MESSAGE.Set_Token ('DATE',p_field_name);
56:
57: elsif p_Error_code in ('XTR_INV_DESC_FLEX_API',
58: 'XTR_INV_DESC_FLEX_CONTEXT','XTR_INV_DESC_FLEX') then
59: FND_MESSAGE.Set_Name ('XTR', 'XTR_INV_DESC_FLEX_API');
55: FND_MESSAGE.Set_Token ('DATE',p_field_name);
56:
57: elsif p_Error_code in ('XTR_INV_DESC_FLEX_API',
58: 'XTR_INV_DESC_FLEX_CONTEXT','XTR_INV_DESC_FLEX') then
59: FND_MESSAGE.Set_Name ('XTR', 'XTR_INV_DESC_FLEX_API');
60:
61: elsif p_Error_code = 'XTR_LIMIT_EXCEEDED' then
62: null;
63: -- do nothing, return error to calling form to handle limits checks.
62: null;
63: -- do nothing, return error to calling form to handle limits checks.
64: end if;
65: else
66: FND_MESSAGE.Set_Name('XTR', p_Error_Code);
67: end if;
68:
69: APP_EXCEPTION.raise_exception;
70: end if;