52: /* ame_util.inputNumStringToCanonNumString validates and formats the amount. */
53: amount := ame_util.inputNumStringToCanonNumString(inputNumberStringIn => amount,
54: currencyCodeIn => currencyCode);
55: if not ame_util.isCurrencyCodeValid(currencyCodeIn => currencyCode) then
56: fnd_message.set_name('PER', 'AME_400151_ATT_STA_CURR_INV');
57: fnd_message.raise_error;
58: end if;
59: if not ame_util.isConversionTypeValid(conversionTypeIn => conversionType) then
60: fnd_message.set_name('PER', 'AME_400150_ATT_STA_CONV_INV');
53: amount := ame_util.inputNumStringToCanonNumString(inputNumberStringIn => amount,
54: currencyCodeIn => currencyCode);
55: if not ame_util.isCurrencyCodeValid(currencyCodeIn => currencyCode) then
56: fnd_message.set_name('PER', 'AME_400151_ATT_STA_CURR_INV');
57: fnd_message.raise_error;
58: end if;
59: if not ame_util.isConversionTypeValid(conversionTypeIn => conversionType) then
60: fnd_message.set_name('PER', 'AME_400150_ATT_STA_CONV_INV');
61: fnd_message.raise_error;
56: fnd_message.set_name('PER', 'AME_400151_ATT_STA_CURR_INV');
57: fnd_message.raise_error;
58: end if;
59: if not ame_util.isConversionTypeValid(conversionTypeIn => conversionType) then
60: fnd_message.set_name('PER', 'AME_400150_ATT_STA_CONV_INV');
61: fnd_message.raise_error;
62: end if;
63: return(amount || ',' || currencyCode || ',' || conversionType);
64: exception
57: fnd_message.raise_error;
58: end if;
59: if not ame_util.isConversionTypeValid(conversionTypeIn => conversionType) then
60: fnd_message.set_name('PER', 'AME_400150_ATT_STA_CONV_INV');
61: fnd_message.raise_error;
62: end if;
63: return(amount || ',' || currencyCode || ',' || conversionType);
64: exception
65: when app_exception.application_exception then
149: open c_sel1;
150: fetch c_sel1 into l_exists;
151: if c_sel1%notfound then
152: close c_sel1;
153: fnd_message.set_name('PER','AME_400521_ATT_NO_IC_USG_EXIST');
154: fnd_message.raise_error;
155: end if;
156: close c_sel1;
157:
150: fetch c_sel1 into l_exists;
151: if c_sel1%notfound then
152: close c_sel1;
153: fnd_message.set_name('PER','AME_400521_ATT_NO_IC_USG_EXIST');
154: fnd_message.raise_error;
155: end if;
156: close c_sel1;
157:
158: exception
218: where approver_type_id = l_approver_type_id and
219: sysdate between start_date and
220: nvl(end_date - ame_util.oneSecond, sysdate) ;
221: if l_orig_system = 'POS' then
222: fnd_message.set_name('PER','AME_400522_ATT_NO_APPR_TYP_USG');
223: fnd_message.raise_error;
224: end if;
225: end if;
226: end if;
219: sysdate between start_date and
220: nvl(end_date - ame_util.oneSecond, sysdate) ;
221: if l_orig_system = 'POS' then
222: fnd_message.set_name('PER','AME_400522_ATT_NO_APPR_TYP_USG');
223: fnd_message.raise_error;
224: end if;
225: end if;
226: end if;
227:
253: from fnd_flex_value_sets
254: where flex_value_set_id = p_value_set_id and
255: instr(flex_value_set_name,'$') = 0 ;
256: if l_count = 0 then
257: fnd_message.set_name('PER','AME_400553_VAL_SET_ID_NOT_EX');
258: fnd_message.raise_error;
259: end if;
260: end if;
261:
254: where flex_value_set_id = p_value_set_id and
255: instr(flex_value_set_name,'$') = 0 ;
256: if l_count = 0 then
257: fnd_message.set_name('PER','AME_400553_VAL_SET_ID_NOT_EX');
258: fnd_message.raise_error;
259: end if;
260: end if;
261:
262: exception
294: nvl(end_date - ame_util.oneSecond, sysdate) ;
295: if (l_attribute_type = ame_util.booleanAttributeType)
296: or (l_attribute_type = ame_util.dateAttributeType) then
297: if p_value_set_id is not null then
298: fnd_message.set_name('PER','AME_400554_VAL_SET_ID_NULL');
299: fnd_message.raise_error;
300: end if;
301: elsif p_value_set_id is not null then
302: select format_type into l_format_type
295: if (l_attribute_type = ame_util.booleanAttributeType)
296: or (l_attribute_type = ame_util.dateAttributeType) then
297: if p_value_set_id is not null then
298: fnd_message.set_name('PER','AME_400554_VAL_SET_ID_NULL');
299: fnd_message.raise_error;
300: end if;
301: elsif p_value_set_id is not null then
302: select format_type into l_format_type
303: from fnd_flex_value_sets
306:
307: if ((l_attribute_type = ame_util.currencyAttributeType)
308: or (l_attribute_type = ame_util.numberAttributeType)) and
309: l_format_type <> 'N' then
310: fnd_message.set_name('PER','AME_400555_INV_VAL_SET_FORMAT');
311: fnd_message.raise_error;
312: elsif (l_attribute_type = ame_util.stringAttributeType) and
313: l_format_type <> 'C' then
314: fnd_message.set_name('PER','AME_400555_INV_VAL_SET_FORMAT');
307: if ((l_attribute_type = ame_util.currencyAttributeType)
308: or (l_attribute_type = ame_util.numberAttributeType)) and
309: l_format_type <> 'N' then
310: fnd_message.set_name('PER','AME_400555_INV_VAL_SET_FORMAT');
311: fnd_message.raise_error;
312: elsif (l_attribute_type = ame_util.stringAttributeType) and
313: l_format_type <> 'C' then
314: fnd_message.set_name('PER','AME_400555_INV_VAL_SET_FORMAT');
315: fnd_message.raise_error;
310: fnd_message.set_name('PER','AME_400555_INV_VAL_SET_FORMAT');
311: fnd_message.raise_error;
312: elsif (l_attribute_type = ame_util.stringAttributeType) and
313: l_format_type <> 'C' then
314: fnd_message.set_name('PER','AME_400555_INV_VAL_SET_FORMAT');
315: fnd_message.raise_error;
316: end if;
317: end if;
318: exception
311: fnd_message.raise_error;
312: elsif (l_attribute_type = ame_util.stringAttributeType) and
313: l_format_type <> 'C' then
314: fnd_message.set_name('PER','AME_400555_INV_VAL_SET_FORMAT');
315: fnd_message.raise_error;
316: end if;
317: end if;
318: exception
319: when app_exception.application_exception then
377: open c_sel1;
378: fetch c_sel1 into l_exists;
379: if c_sel1%notfound then
380: close c_sel1;
381: fnd_message.set_name('PER','AME_400473_INV_ATTRIBUTE_ID');
382: fnd_message.raise_error;
383: end if;
384: close c_sel1;
385: exception
378: fetch c_sel1 into l_exists;
379: if c_sel1%notfound then
380: close c_sel1;
381: fnd_message.set_name('PER','AME_400473_INV_ATTRIBUTE_ID');
382: fnd_message.raise_error;
383: end if;
384: close c_sel1;
385: exception
386: when app_exception.application_exception then
438: open c_sel1;
439: fetch c_sel1 into l_exists;
440: if c_sel1%notfound then
441: close c_sel1;
442: fnd_message.set_name('PER','AME_400474_INV_APPLICATION_ID');
443: fnd_message.raise_error;
444: end if;
445: close c_sel1;
446: exception
439: fetch c_sel1 into l_exists;
440: if c_sel1%notfound then
441: close c_sel1;
442: fnd_message.set_name('PER','AME_400474_INV_APPLICATION_ID');
443: fnd_message.raise_error;
444: end if;
445: close c_sel1;
446: exception
447: when app_exception.application_exception then
508: fetch c_sel1 into tempCount;
509: if c_sel1%found and
510: tempCount > 0 then
511: close c_sel1;
512: fnd_message.set_name('PER','AME_400031_ATT_EXISTS_HD');
513: fnd_message.raise_error;
514: end if;
515: close c_sel1;
516: exception
509: if c_sel1%found and
510: tempCount > 0 then
511: close c_sel1;
512: fnd_message.set_name('PER','AME_400031_ATT_EXISTS_HD');
513: fnd_message.raise_error;
514: end if;
515: close c_sel1;
516: exception
517: when app_exception.application_exception then
557: l_proc varchar2(72) := g_package||'chk_is_static';
558: begin
559: if NOT (p_is_static = ame_util.booleanTrue or
560: (p_is_static = ame_util.booleanFalse )) then
561: fnd_message.set_name('PER','AME_400475_INV_USAGE_TYPE');
562: fnd_message.raise_error;
563: end if;
564: exception
565: when app_exception.application_exception then
558: begin
559: if NOT (p_is_static = ame_util.booleanTrue or
560: (p_is_static = ame_util.booleanFalse )) then
561: fnd_message.set_name('PER','AME_400475_INV_USAGE_TYPE');
562: fnd_message.raise_error;
563: end if;
564: exception
565: when app_exception.application_exception then
566: if hr_multi_message.exception_add
616: -- Check that the query string does not contain any transaction id placeholder
617: queryString := ame_util.removeReturns(stringIn => p_query_string,
618: replaceWithSpaces => false);
619: if(instrb(upper(p_query_string), upper(ame_util.transactionIdPlaceholder))) > 0 then
620: fnd_message.set_name('PER','AME_400159_ATT_STAT_NOT_PLC');
621: fnd_message.raise_error;
622: end if;
623: else /* dynamic usage (actual query string) */
624: if(p_query_string is null) then
617: queryString := ame_util.removeReturns(stringIn => p_query_string,
618: replaceWithSpaces => false);
619: if(instrb(upper(p_query_string), upper(ame_util.transactionIdPlaceholder))) > 0 then
620: fnd_message.set_name('PER','AME_400159_ATT_STAT_NOT_PLC');
621: fnd_message.raise_error;
622: end if;
623: else /* dynamic usage (actual query string) */
624: if(p_query_string is null) then
625: fnd_message.set_name('PER','AME_400671_DYN_ATT_EMP_USAGE');
621: fnd_message.raise_error;
622: end if;
623: else /* dynamic usage (actual query string) */
624: if(p_query_string is null) then
625: fnd_message.set_name('PER','AME_400671_DYN_ATT_EMP_USAGE');
626: fnd_message.raise_error;
627: end if;
628: if(instrb(p_query_string, ';', 1, 1) > 0) or
629: (instrb(p_query_string, '--', 1, 1) > 0) or
622: end if;
623: else /* dynamic usage (actual query string) */
624: if(p_query_string is null) then
625: fnd_message.set_name('PER','AME_400671_DYN_ATT_EMP_USAGE');
626: fnd_message.raise_error;
627: end if;
628: if(instrb(p_query_string, ';', 1, 1) > 0) or
629: (instrb(p_query_string, '--', 1, 1) > 0) or
630: (instrb(p_query_string, '/*', 1, 1) > 0) or
628: if(instrb(p_query_string, ';', 1, 1) > 0) or
629: (instrb(p_query_string, '--', 1, 1) > 0) or
630: (instrb(p_query_string, '/*', 1, 1) > 0) or
631: (instrb(p_query_string, '*/', 1, 1) > 0) then
632: fnd_message.set_name('PER','AME_400165_ATT_DYN_USG_COMM');
633: fnd_message.raise_error;
634: end if;
635: tempInt := 1;
636: queryString := upper(p_query_string);
629: (instrb(p_query_string, '--', 1, 1) > 0) or
630: (instrb(p_query_string, '/*', 1, 1) > 0) or
631: (instrb(p_query_string, '*/', 1, 1) > 0) then
632: fnd_message.set_name('PER','AME_400165_ATT_DYN_USG_COMM');
633: fnd_message.raise_error;
634: end if;
635: tempInt := 1;
636: queryString := upper(p_query_string);
637: upperTransIdPlaceholder := upper(ame_util.transactionIdPlaceholder);
643: end if;
644: transIdPlaceholderPosition2 :=
645: instrb(p_query_string, ame_util.transactionIdPlaceholder, 1, tempInt);
646: if(transIdPlaceholderPosition <> transIdPlaceholderPosition2) then
647: fnd_message.set_name('PER','AME_400414_DYNAMIC_ATTR_USAGES');
648: fnd_message.raise_error;
649: end if;
650: tempInt := tempInt + 1;
651: end loop;
644: transIdPlaceholderPosition2 :=
645: instrb(p_query_string, ame_util.transactionIdPlaceholder, 1, tempInt);
646: if(transIdPlaceholderPosition <> transIdPlaceholderPosition2) then
647: fnd_message.set_name('PER','AME_400414_DYNAMIC_ATTR_USAGES');
648: fnd_message.raise_error;
649: end if;
650: tempInt := tempInt + 1;
651: end loop;
652: if(ame_util.isArgumentTooLong(tableNameIn => 'ame_attribute_usages',
651: end loop;
652: if(ame_util.isArgumentTooLong(tableNameIn => 'ame_attribute_usages',
653: columnNameIn => 'query_string',
654: argumentIn => p_query_string)) then
655: fnd_message.set_name('PER','AME_400163_ATT_USAGE_LONG');
656: fnd_message.raise_error;
657: end if;
658: /* The following utility handles the error. So nothing needs to be done here */
659: ame_util.checkForSqlInjection(queryStringIn => queryString);
652: if(ame_util.isArgumentTooLong(tableNameIn => 'ame_attribute_usages',
653: columnNameIn => 'query_string',
654: argumentIn => p_query_string)) then
655: fnd_message.set_name('PER','AME_400163_ATT_USAGE_LONG');
656: fnd_message.raise_error;
657: end if;
658: /* The following utility handles the error. So nothing needs to be done here */
659: ame_util.checkForSqlInjection(queryStringIn => queryString);
660: end if;
749: if(l_comma1Location = 0 or
750: l_comma2Location = 0 or
751: l_comma1Location < 2 or
752: l_comma2Location < 4) then
753: fnd_message.set_name('PER', 'AME_400670_BAD_STAT_CURR_USG');
754: fnd_message.set_token('ATTRIBUTE',l_attribute_name);
755: fnd_message.raise_error;
756: end if;
757: l_amount := substrb(p_query_string, 1, l_comma1Location - 1);
750: l_comma2Location = 0 or
751: l_comma1Location < 2 or
752: l_comma2Location < 4) then
753: fnd_message.set_name('PER', 'AME_400670_BAD_STAT_CURR_USG');
754: fnd_message.set_token('ATTRIBUTE',l_attribute_name);
755: fnd_message.raise_error;
756: end if;
757: l_amount := substrb(p_query_string, 1, l_comma1Location - 1);
758: l_currencyCode := substrb(p_query_string, l_comma1Location + 1, l_comma2Location - l_comma1Location - 1);
751: l_comma1Location < 2 or
752: l_comma2Location < 4) then
753: fnd_message.set_name('PER', 'AME_400670_BAD_STAT_CURR_USG');
754: fnd_message.set_token('ATTRIBUTE',l_attribute_name);
755: fnd_message.raise_error;
756: end if;
757: l_amount := substrb(p_query_string, 1, l_comma1Location - 1);
758: l_currencyCode := substrb(p_query_string, l_comma1Location + 1, l_comma2Location - l_comma1Location - 1);
759: l_conversionType := substrb(p_query_string, l_comma2Location + 1, lengthb(p_query_string) - l_comma2Location);
757: l_amount := substrb(p_query_string, 1, l_comma1Location - 1);
758: l_currencyCode := substrb(p_query_string, l_comma1Location + 1, l_comma2Location - l_comma1Location - 1);
759: l_conversionType := substrb(p_query_string, l_comma2Location + 1, lengthb(p_query_string) - l_comma2Location);
760: if not ame_util.isCurrencyCodeValid(currencyCodeIn => l_currencyCode) then
761: fnd_message.set_name('PER', 'AME_400151_ATT_STA_CURR_INV');
762: fnd_message.raise_error;
763: end if;
764: l_tmpAmount := replace(l_amount,',','.');
765: hr_chkfmt.checkformat(value => l_tmpAmount,
758: l_currencyCode := substrb(p_query_string, l_comma1Location + 1, l_comma2Location - l_comma1Location - 1);
759: l_conversionType := substrb(p_query_string, l_comma2Location + 1, lengthb(p_query_string) - l_comma2Location);
760: if not ame_util.isCurrencyCodeValid(currencyCodeIn => l_currencyCode) then
761: fnd_message.set_name('PER', 'AME_400151_ATT_STA_CURR_INV');
762: fnd_message.raise_error;
763: end if;
764: l_tmpAmount := replace(l_amount,',','.');
765: hr_chkfmt.checkformat(value => l_tmpAmount,
766: format => 'M',
770: nullok => 'Y',
771: rgeflg => l_rgeflg,
772: curcode => l_currencyCode);
773: if not ame_util.isConversionTypeValid(conversionTypeIn => l_conversionType) then
774: fnd_message.set_name('PER', 'AME_400150_ATT_STA_CONV_INV');
775: fnd_message.raise_error;
776: end if;
777: else
778: fnd_message.set_name('PER', 'AME_400670_BAD_STAT_CURR_USG');
771: rgeflg => l_rgeflg,
772: curcode => l_currencyCode);
773: if not ame_util.isConversionTypeValid(conversionTypeIn => l_conversionType) then
774: fnd_message.set_name('PER', 'AME_400150_ATT_STA_CONV_INV');
775: fnd_message.raise_error;
776: end if;
777: else
778: fnd_message.set_name('PER', 'AME_400670_BAD_STAT_CURR_USG');
779: fnd_message.set_token('ATTRIBUTE',l_attribute_name);
774: fnd_message.set_name('PER', 'AME_400150_ATT_STA_CONV_INV');
775: fnd_message.raise_error;
776: end if;
777: else
778: fnd_message.set_name('PER', 'AME_400670_BAD_STAT_CURR_USG');
779: fnd_message.set_token('ATTRIBUTE',l_attribute_name);
780: fnd_message.raise_error;
781: end if;
782: elsif(l_attribute_type = ame_util.numberAttributeType) then
775: fnd_message.raise_error;
776: end if;
777: else
778: fnd_message.set_name('PER', 'AME_400670_BAD_STAT_CURR_USG');
779: fnd_message.set_token('ATTRIBUTE',l_attribute_name);
780: fnd_message.raise_error;
781: end if;
782: elsif(l_attribute_type = ame_util.numberAttributeType) then
783: if p_query_string is not null and not isNumber(p_query_string) then
776: end if;
777: else
778: fnd_message.set_name('PER', 'AME_400670_BAD_STAT_CURR_USG');
779: fnd_message.set_token('ATTRIBUTE',l_attribute_name);
780: fnd_message.raise_error;
781: end if;
782: elsif(l_attribute_type = ame_util.numberAttributeType) then
783: if p_query_string is not null and not isNumber(p_query_string) then
784: fnd_message.set_name('PER','AME_400516_ATT_STAT_USG_NUM');
780: fnd_message.raise_error;
781: end if;
782: elsif(l_attribute_type = ame_util.numberAttributeType) then
783: if p_query_string is not null and not isNumber(p_query_string) then
784: fnd_message.set_name('PER','AME_400516_ATT_STAT_USG_NUM');
785: fnd_message.raise_error;
786: elsif p_query_string is not null then
787: l_tmpQueryString := replace(p_query_string,',','.');
788: hr_chkfmt.checkformat(value => l_tmpQueryString,
781: end if;
782: elsif(l_attribute_type = ame_util.numberAttributeType) then
783: if p_query_string is not null and not isNumber(p_query_string) then
784: fnd_message.set_name('PER','AME_400516_ATT_STAT_USG_NUM');
785: fnd_message.raise_error;
786: elsif p_query_string is not null then
787: l_tmpQueryString := replace(p_query_string,',','.');
788: hr_chkfmt.checkformat(value => l_tmpQueryString,
789: format => 'N',
795: curcode => null);
796: end if;
797: elsif(l_attribute_type = ame_util.stringAttributeType) then
798: if(instrb(p_query_string, '''') > 0) or length(p_query_string) > ame_util.stringTypeLength then
799: fnd_message.set_name('PER','AME_400166_ATT_STAT_USG_STRING');
800: fnd_message.raise_error;
801: end if;
802: begin
803: select name
796: end if;
797: elsif(l_attribute_type = ame_util.stringAttributeType) then
798: if(instrb(p_query_string, '''') > 0) or length(p_query_string) > ame_util.stringTypeLength then
799: fnd_message.set_name('PER','AME_400166_ATT_STAT_USG_STRING');
800: fnd_message.raise_error;
801: end if;
802: begin
803: select name
804: into l_attr_name
808: if l_attr_name = 'REJECTION_RESPONSE' and p_query_string is not null then
809: if p_query_string not in ('STOP_ALL_ITEMS'
810: ,'CONTINUE_ALL_OTHER_ITEMS'
811: ,'CONTINUE_OTHER_SUBORDINATE_ITEMS') then
812: fnd_message.set_name('PER','AME_400785_REJ_RESP_USG_INV');
813: fnd_message.raise_error;
814: end if;
815: end if;
816: exception
809: if p_query_string not in ('STOP_ALL_ITEMS'
810: ,'CONTINUE_ALL_OTHER_ITEMS'
811: ,'CONTINUE_OTHER_SUBORDINATE_ITEMS') then
812: fnd_message.set_name('PER','AME_400785_REJ_RESP_USG_INV');
813: fnd_message.raise_error;
814: end if;
815: end if;
816: exception
817: when no_data_found then
820: elsif(l_attribute_type = ame_util.booleanAttributeType) then
821: if trim(p_query_string) IN ('true','false') then
822: querystring :=lower(trim( p_query_string));
823: else
824: fnd_message.set_name('PER','AME_400167_ATT_STAT_USG_BOOL');
825: fnd_message.raise_error;
826: end if;
827: elsif(l_attribute_type = ame_util.dateAttributeType) then
828: /* check to make sure the user entered the date in the correct format */
821: if trim(p_query_string) IN ('true','false') then
822: querystring :=lower(trim( p_query_string));
823: else
824: fnd_message.set_name('PER','AME_400167_ATT_STAT_USG_BOOL');
825: fnd_message.raise_error;
826: end if;
827: elsif(l_attribute_type = ame_util.dateAttributeType) then
828: /* check to make sure the user entered the date in the correct format */
829: begin
829: begin
830: if(p_query_string is not null) then
831: if instrb(p_query_string, ':', 1, 5) = 0 or
832: not chk_ame_date_format(p_query_string) then
833: fnd_message.set_name('PER','AME_400168_ATT_STAT_USG_DATE');
834: fnd_message.raise_error;
835: end if;
836: end if;
837: exception
830: if(p_query_string is not null) then
831: if instrb(p_query_string, ':', 1, 5) = 0 or
832: not chk_ame_date_format(p_query_string) then
833: fnd_message.set_name('PER','AME_400168_ATT_STAT_USG_DATE');
834: fnd_message.raise_error;
835: end if;
836: end if;
837: exception
838: when app_exception.application_exception then
853: if(comma1Location = 0 or
854: comma2Location = 0 or
855: comma1Location < 2 or
856: comma2Location < 4) then
857: fnd_message.set_name('PER','AME_400515_QUERY_INVALID');
858: fnd_message.raise_error;
859: end if;
860: end if;
861: begin
854: comma2Location = 0 or
855: comma1Location < 2 or
856: comma2Location < 4) then
857: fnd_message.set_name('PER','AME_400515_QUERY_INVALID');
858: fnd_message.raise_error;
859: end if;
860: end if;
861: begin
862: select ame_util2.specialObject
879: ,p_columns => l_columns
880: ,p_object => l_object
881: );
882: if l_valid <> 'Y' then
883: fnd_message.set_name('PER','AME_400817_INV_ATTR_QRY');
884: fnd_message.set_token('ATTR_NAME', l_attribute_name);
885: fnd_message.raise_error;
886: end if;
887: end if;
880: ,p_object => l_object
881: );
882: if l_valid <> 'Y' then
883: fnd_message.set_name('PER','AME_400817_INV_ATTR_QRY');
884: fnd_message.set_token('ATTR_NAME', l_attribute_name);
885: fnd_message.raise_error;
886: end if;
887: end if;
888: exception
881: );
882: if l_valid <> 'Y' then
883: fnd_message.set_name('PER','AME_400817_INV_ATTR_QRY');
884: fnd_message.set_token('ATTR_NAME', l_attribute_name);
885: fnd_message.raise_error;
886: end if;
887: end if;
888: exception
889: when app_exception.application_exception then
926: ( p_use_count in ame_attribute_usages.use_count%type) is
927: l_proc varchar2(72) := g_package||'chk_use_count';
928: begin
929: if p_use_count <> 0 then
930: fnd_message.set_name('PER','AME_400039_ATT_TTYPE_USES');
931: -- Create a new error message to indicate that the value of use_count is invalid
932: fnd_message.raise_error;
933: end if;
934: exception
928: begin
929: if p_use_count <> 0 then
930: fnd_message.set_name('PER','AME_400039_ATT_TTYPE_USES');
931: -- Create a new error message to indicate that the value of use_count is invalid
932: fnd_message.raise_error;
933: end if;
934: exception
935: when app_exception.application_exception then
936: if hr_multi_message.exception_add
975: l_proc varchar2(72) := g_package||'chk_user_editable';
976: begin
977: if NOT (p_user_editable = ame_util.booleanTrue or
978: (p_user_editable = ame_util.booleanFalse )) then
979: fnd_message.set_name('PER','AME_400476_INV_USER_EDITABLE');
980: fnd_message.raise_error;
981: end if;
982: exception
983: when app_exception.application_exception then
976: begin
977: if NOT (p_user_editable = ame_util.booleanTrue or
978: (p_user_editable = ame_util.booleanFalse )) then
979: fnd_message.set_name('PER','AME_400476_INV_USER_EDITABLE');
980: fnd_message.raise_error;
981: end if;
982: exception
983: when app_exception.application_exception then
984: if hr_multi_message.exception_add
1033: ,p_application_id => p_rec.application_id
1034: ,p_effective_date => p_effective_date
1035: ,p_object_version_number => p_rec.object_version_number
1036: ) THEN
1037: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
1038: fnd_message.set_token('PROCEDURE ', l_proc);
1039: fnd_message.set_token('STEP ', '5');
1040: fnd_message.raise_error;
1041: END IF;
1034: ,p_effective_date => p_effective_date
1035: ,p_object_version_number => p_rec.object_version_number
1036: ) THEN
1037: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
1038: fnd_message.set_token('PROCEDURE ', l_proc);
1039: fnd_message.set_token('STEP ', '5');
1040: fnd_message.raise_error;
1041: END IF;
1042: --
1035: ,p_object_version_number => p_rec.object_version_number
1036: ) THEN
1037: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
1038: fnd_message.set_token('PROCEDURE ', l_proc);
1039: fnd_message.set_token('STEP ', '5');
1040: fnd_message.raise_error;
1041: END IF;
1042: --
1043: if (ame_atu_shd.g_old_rec.user_editable <> p_rec.user_editable) then
1036: ) THEN
1037: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
1038: fnd_message.set_token('PROCEDURE ', l_proc);
1039: fnd_message.set_token('STEP ', '5');
1040: fnd_message.raise_error;
1041: END IF;
1042: --
1043: if (ame_atu_shd.g_old_rec.user_editable <> p_rec.user_editable) then
1044: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
1040: fnd_message.raise_error;
1041: END IF;
1042: --
1043: if (ame_atu_shd.g_old_rec.user_editable <> p_rec.user_editable) then
1044: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
1045: fnd_message.set_token('FIELD_NAME ', 'USER_EDITABLE');
1046: fnd_message.set_token('PROCEDURE ', l_proc);
1047: fnd_message.set_token('STEP ', '5');
1048: fnd_message.raise_error;
1041: END IF;
1042: --
1043: if (ame_atu_shd.g_old_rec.user_editable <> p_rec.user_editable) then
1044: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
1045: fnd_message.set_token('FIELD_NAME ', 'USER_EDITABLE');
1046: fnd_message.set_token('PROCEDURE ', l_proc);
1047: fnd_message.set_token('STEP ', '5');
1048: fnd_message.raise_error;
1049: end if;
1042: --
1043: if (ame_atu_shd.g_old_rec.user_editable <> p_rec.user_editable) then
1044: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
1045: fnd_message.set_token('FIELD_NAME ', 'USER_EDITABLE');
1046: fnd_message.set_token('PROCEDURE ', l_proc);
1047: fnd_message.set_token('STEP ', '5');
1048: fnd_message.raise_error;
1049: end if;
1050: if (ame_atu_shd.g_old_rec.user_editable = ame_util.booleanFalse) then
1043: if (ame_atu_shd.g_old_rec.user_editable <> p_rec.user_editable) then
1044: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
1045: fnd_message.set_token('FIELD_NAME ', 'USER_EDITABLE');
1046: fnd_message.set_token('PROCEDURE ', l_proc);
1047: fnd_message.set_token('STEP ', '5');
1048: fnd_message.raise_error;
1049: end if;
1050: if (ame_atu_shd.g_old_rec.user_editable = ame_util.booleanFalse) then
1051: if (ame_atu_shd.g_old_rec.is_static <> p_rec.is_static) then
1044: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
1045: fnd_message.set_token('FIELD_NAME ', 'USER_EDITABLE');
1046: fnd_message.set_token('PROCEDURE ', l_proc);
1047: fnd_message.set_token('STEP ', '5');
1048: fnd_message.raise_error;
1049: end if;
1050: if (ame_atu_shd.g_old_rec.user_editable = ame_util.booleanFalse) then
1051: if (ame_atu_shd.g_old_rec.is_static <> p_rec.is_static) then
1052: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
1048: fnd_message.raise_error;
1049: end if;
1050: if (ame_atu_shd.g_old_rec.user_editable = ame_util.booleanFalse) then
1051: if (ame_atu_shd.g_old_rec.is_static <> p_rec.is_static) then
1052: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
1053: fnd_message.set_token('FIELD_NAME ', 'IS_STATIC');
1054: fnd_message.set_token('PROCEDURE ', l_proc);
1055: fnd_message.set_token('STEP ', '5');
1056: fnd_message.raise_error;
1049: end if;
1050: if (ame_atu_shd.g_old_rec.user_editable = ame_util.booleanFalse) then
1051: if (ame_atu_shd.g_old_rec.is_static <> p_rec.is_static) then
1052: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
1053: fnd_message.set_token('FIELD_NAME ', 'IS_STATIC');
1054: fnd_message.set_token('PROCEDURE ', l_proc);
1055: fnd_message.set_token('STEP ', '5');
1056: fnd_message.raise_error;
1057: end if;
1050: if (ame_atu_shd.g_old_rec.user_editable = ame_util.booleanFalse) then
1051: if (ame_atu_shd.g_old_rec.is_static <> p_rec.is_static) then
1052: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
1053: fnd_message.set_token('FIELD_NAME ', 'IS_STATIC');
1054: fnd_message.set_token('PROCEDURE ', l_proc);
1055: fnd_message.set_token('STEP ', '5');
1056: fnd_message.raise_error;
1057: end if;
1058: if (ame_atu_shd.g_old_rec.query_string <> p_rec.query_string) then
1051: if (ame_atu_shd.g_old_rec.is_static <> p_rec.is_static) then
1052: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
1053: fnd_message.set_token('FIELD_NAME ', 'IS_STATIC');
1054: fnd_message.set_token('PROCEDURE ', l_proc);
1055: fnd_message.set_token('STEP ', '5');
1056: fnd_message.raise_error;
1057: end if;
1058: if (ame_atu_shd.g_old_rec.query_string <> p_rec.query_string) then
1059: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
1052: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
1053: fnd_message.set_token('FIELD_NAME ', 'IS_STATIC');
1054: fnd_message.set_token('PROCEDURE ', l_proc);
1055: fnd_message.set_token('STEP ', '5');
1056: fnd_message.raise_error;
1057: end if;
1058: if (ame_atu_shd.g_old_rec.query_string <> p_rec.query_string) then
1059: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
1060: fnd_message.set_token('FIELD_NAME ', 'QUERY_STRING');
1055: fnd_message.set_token('STEP ', '5');
1056: fnd_message.raise_error;
1057: end if;
1058: if (ame_atu_shd.g_old_rec.query_string <> p_rec.query_string) then
1059: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
1060: fnd_message.set_token('FIELD_NAME ', 'QUERY_STRING');
1061: fnd_message.set_token('PROCEDURE ', l_proc);
1062: fnd_message.set_token('STEP ', '5');
1063: fnd_message.raise_error;
1056: fnd_message.raise_error;
1057: end if;
1058: if (ame_atu_shd.g_old_rec.query_string <> p_rec.query_string) then
1059: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
1060: fnd_message.set_token('FIELD_NAME ', 'QUERY_STRING');
1061: fnd_message.set_token('PROCEDURE ', l_proc);
1062: fnd_message.set_token('STEP ', '5');
1063: fnd_message.raise_error;
1064: end if;
1057: end if;
1058: if (ame_atu_shd.g_old_rec.query_string <> p_rec.query_string) then
1059: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
1060: fnd_message.set_token('FIELD_NAME ', 'QUERY_STRING');
1061: fnd_message.set_token('PROCEDURE ', l_proc);
1062: fnd_message.set_token('STEP ', '5');
1063: fnd_message.raise_error;
1064: end if;
1065: end if;
1058: if (ame_atu_shd.g_old_rec.query_string <> p_rec.query_string) then
1059: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
1060: fnd_message.set_token('FIELD_NAME ', 'QUERY_STRING');
1061: fnd_message.set_token('PROCEDURE ', l_proc);
1062: fnd_message.set_token('STEP ', '5');
1063: fnd_message.raise_error;
1064: end if;
1065: end if;
1066: --
1059: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
1060: fnd_message.set_token('FIELD_NAME ', 'QUERY_STRING');
1061: fnd_message.set_token('PROCEDURE ', l_proc);
1062: fnd_message.set_token('STEP ', '5');
1063: fnd_message.raise_error;
1064: end if;
1065: end if;
1066: --
1067: End chk_non_updateable_args;
1144: if (instr(DBMS_UTILITY.FORMAT_CALL_STACK,'AME_TRANS_TYPE_API'||fnd_global.local_chr(10)) <> 0) then
1145: return;
1146: end if;
1147: if (ame_atu_shd.g_old_rec.user_editable = ame_util.booleanFalse) then
1148: fnd_message.set_name('PER', 'AME_400477_CANNOT_DEL_SEEDED');
1149: fnd_message.raise_error;
1150: end if;
1151:
1152: open c_sel1;
1145: return;
1146: end if;
1147: if (ame_atu_shd.g_old_rec.user_editable = ame_util.booleanFalse) then
1148: fnd_message.set_name('PER', 'AME_400477_CANNOT_DEL_SEEDED');
1149: fnd_message.raise_error;
1150: end if;
1151:
1152: open c_sel1;
1153: fetch c_sel1 into l_use_count;
1153: fetch c_sel1 into l_use_count;
1154: close c_sel1;
1155:
1156: if l_use_count > 0 then
1157: fnd_message.set_name('PER','AME_400171_ATT_IS_IN_USE');
1158: fnd_message.raise_error;
1159: else
1160: open c_sel2;
1161: fetch c_sel2 into l_exists;
1154: close c_sel1;
1155:
1156: if l_use_count > 0 then
1157: fnd_message.set_name('PER','AME_400171_ATT_IS_IN_USE');
1158: fnd_message.raise_error;
1159: else
1160: open c_sel2;
1161: fetch c_sel2 into l_exists;
1162: l_seededDb := ame_utility_pkg.check_seeddb;
1161: fetch c_sel2 into l_exists;
1162: l_seededDb := ame_utility_pkg.check_seeddb;
1163: if c_sel2%found and l_seededDb = 'N' then
1164: close c_sel2;
1165: fnd_message.set_name('PER','AME_400170_ATT_MAND_CANT_DEL');
1166: fnd_message.raise_error;
1167: end if;
1168: close c_sel2;
1169: end if;
1162: l_seededDb := ame_utility_pkg.check_seeddb;
1163: if c_sel2%found and l_seededDb = 'N' then
1164: close c_sel2;
1165: fnd_message.set_name('PER','AME_400170_ATT_MAND_CANT_DEL');
1166: fnd_message.raise_error;
1167: end if;
1168: close c_sel2;
1169: end if;
1170:
1171: -- open c_sel3;
1172: -- fetch c_sel3 into l_use_count;
1173: -- if c_sel3%found then
1174: -- close c_sel3;
1175: -- fnd_message.set_name('PER', 'AME_400477_CANNOT_DEL_SEEDED');
1176: -- fnd_message.set_token('OBJECT', 'ATTRIBUTE USAGE');
1177: -- fnd_message.raise_error;
1178: -- end if;
1179: -- close c_sel3;
1172: -- fetch c_sel3 into l_use_count;
1173: -- if c_sel3%found then
1174: -- close c_sel3;
1175: -- fnd_message.set_name('PER', 'AME_400477_CANNOT_DEL_SEEDED');
1176: -- fnd_message.set_token('OBJECT', 'ATTRIBUTE USAGE');
1177: -- fnd_message.raise_error;
1178: -- end if;
1179: -- close c_sel3;
1180:
1173: -- if c_sel3%found then
1174: -- close c_sel3;
1175: -- fnd_message.set_name('PER', 'AME_400477_CANNOT_DEL_SEEDED');
1176: -- fnd_message.set_token('OBJECT', 'ATTRIBUTE USAGE');
1177: -- fnd_message.raise_error;
1178: -- end if;
1179: -- close c_sel3;
1180:
1181: exception
1256: --
1257: -- An unhandled or unexpected error has occurred which
1258: -- we must report
1259: --
1260: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
1261: fnd_message.set_token('PROCEDURE', l_proc);
1262: fnd_message.set_token('STEP','15');
1263: fnd_message.raise_error;
1264: End dt_update_validate;
1257: -- An unhandled or unexpected error has occurred which
1258: -- we must report
1259: --
1260: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
1261: fnd_message.set_token('PROCEDURE', l_proc);
1262: fnd_message.set_token('STEP','15');
1263: fnd_message.raise_error;
1264: End dt_update_validate;
1265: --
1258: -- we must report
1259: --
1260: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
1261: fnd_message.set_token('PROCEDURE', l_proc);
1262: fnd_message.set_token('STEP','15');
1263: fnd_message.raise_error;
1264: End dt_update_validate;
1265: --
1266: -- ----------------------------------------------------------------------------
1259: --
1260: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
1261: fnd_message.set_token('PROCEDURE', l_proc);
1262: fnd_message.set_token('STEP','15');
1263: fnd_message.raise_error;
1264: End dt_update_validate;
1265: --
1266: -- ----------------------------------------------------------------------------
1267: -- |--------------------------< dt_delete_validate >--------------------------|
1354: --
1355: -- An unhandled or unexpected error has occurred which
1356: -- we must report
1357: --
1358: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
1359: fnd_message.set_token('PROCEDURE', l_proc);
1360: fnd_message.set_token('STEP','15');
1361: fnd_message.raise_error;
1362: --
1355: -- An unhandled or unexpected error has occurred which
1356: -- we must report
1357: --
1358: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
1359: fnd_message.set_token('PROCEDURE', l_proc);
1360: fnd_message.set_token('STEP','15');
1361: fnd_message.raise_error;
1362: --
1363: End dt_delete_validate;
1356: -- we must report
1357: --
1358: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
1359: fnd_message.set_token('PROCEDURE', l_proc);
1360: fnd_message.set_token('STEP','15');
1361: fnd_message.raise_error;
1362: --
1363: End dt_delete_validate;
1364: --
1357: --
1358: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
1359: fnd_message.set_token('PROCEDURE', l_proc);
1360: fnd_message.set_token('STEP','15');
1361: fnd_message.raise_error;
1362: --
1363: End dt_delete_validate;
1364: --
1365: -- ----------------------------------------------------------------------------