[Home] [Help]
1: package body CE_VALIDATE_BANKINFO as
2: /* $Header: cevlbnkb.pls 120.80.12020000.14 2013/03/15 14:21:54 csutaria ship $ */
3:
4: -- bug 6856840
5: -- package variable to track whether bank ID needs to be mapped to Bank Num
30: IS
31: l_count_int number(8) :=0;
32: l_count_ext number(8) :=0;
33: BEGIN
34: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_end_date_check');
35: cep_standard.debug('branch end_date = ' || Xi_BRANCH_END_DATE);
36: SELECT COUNT(*)
37: INTO l_count_int
38: FROM ce_bank_accounts
50: FND_MESSAGE.set_token('FIELD1', l_count_int, true);
51: FND_MESSAGE.set_token('FIELD2', l_count_ext, true);
52: fnd_msg_pub.add;
53: END IF;
54: cep_standard.debug('<
56:
57: -- bug 7582842 : Added private function
58: FUNCTION CE_DISABLE_VALIDATION RETURN BOOLEAN
58: FUNCTION CE_DISABLE_VALIDATION RETURN BOOLEAN
59: AS
60: l_disable VARCHAR2(1) := 'N';
61: BEGIN
62: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_disable_validation');
63: l_disable := nvl(FND_PROFILE.value('CE_DISABLE_BANK_VAL'),'N');
64: cep_standard.debug('disable = '||l_disable);
65:
66: IF (l_disable = 'Y') THEN
99: l_bic varchar2(30) ;
100: l_string varchar2(30) ;
101:
102: BEGIN
103: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_bic');
104: -- Initialize message list if p_init_msg_list is set to TRUE.
105: IF FND_API.to_Boolean(p_init_msg_list) THEN
106: FND_MSG_PUB.initialize;
107: END IF;
164: BANK_NUM varchar2(60);
165: bank_count number;
166: BEGIN
167:
168: cep_standard.debug('>>CE_VALIDATE_BANKINFO.compare_bank_and_branch_num');
169:
170:
171: -- Bug 6856840: Added IF clause to handle cases where Bank ID is the Bank Number --
172: IF BANK_ID_IS_NUM = TRUE
243: ELSE
244: cep_standard.debug('COMPARE_BANK_AND_BRANCH_NUM: ' || ' passed_check');
245: END IF;
246:
247: cep_standard.debug('<
249:
250: EXCEPTION
251: WHEN OTHERS THEN
248: END IF; /* end of check for BANK_ID_IS_NUM*/
249:
250: EXCEPTION
251: WHEN OTHERS THEN
252: cep_standard.debug('CE_VALIDATE_BANKINFO.COMPARE_BANK_AND_BRANCH_NUM: Exception ' );
253: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
254: fnd_message.set_token('PROCEDURE', 'CE_VALIDATE_BANKINFO.compare_bank_and_branch_num');
255: fnd_msg_pub.add;
256: RAISE;
250: EXCEPTION
251: WHEN OTHERS THEN
252: cep_standard.debug('CE_VALIDATE_BANKINFO.COMPARE_BANK_AND_BRANCH_NUM: Exception ' );
253: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
254: fnd_message.set_token('PROCEDURE', 'CE_VALIDATE_BANKINFO.compare_bank_and_branch_num');
255: fnd_msg_pub.add;
256: RAISE;
257: END COMPARE_BANK_AND_BRANCH_NUM;
258:
276: cd_position number;
277: acct_cd number;
278:
279: BEGIN
280: cep_standard.debug('>>CE_VALIDATE_BANKINFO.COMPARE_ACCOUNT_NUM_AND_CD');
281:
282: cd_position := (length(Xi_account_num) - Xi_CD_pos_from_right);
283: acct_cd := substr(Xi_account_num, cd_position, Xi_CD_length);
284:
296: cep_standard.debug('COMPARE_ACCOUNT_NUM_AND_CD: ' || 'CD match');
297: RETURN TRUE;
298: END IF;
299:
300: cep_standard.debug('<
302: END COMPARE_ACCOUNT_NUM_AND_CD;
303:
304: /* --------------------------------------------------------------------
328:
329: l_taxid VARCHAR2(30);
330:
331: BEGIN
332: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_VAL_UNIQUE_TAX_PAYER_ID');
333:
334: OPEN CHECK_UNIQUE_TAXID_BK;
335: FETCH CHECK_UNIQUE_TAXID_BK INTO l_taxid;
336:
344: RETURN('FALSE');
345: cep_standard.debug('CE_VAL_UNIQUE_TAX_PAYER_ID false');
346: END IF;
347:
348: cep_standard.debug('<
350: END CE_VAL_UNIQUE_TAX_PAYER_ID;
351:
352: /* --------------------------------------------------------------------
412: l_taxid_type VARCHAR2(150);
413: l_entity_name VARCHAR2(80);
414:
415: BEGIN
416: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_check_cross_module_tax_id'||
417: 'ce_check_cross_module_tax_id - p_taxpayer_id ' || p_taxpayer_id);
418:
419: -- Checking cross module Banks/Customers
420: OPEN CHECK_CROSS_AR;
493: CLOSE CHECK_CROSS_AP;
494:
495: p_return_bk:='NA';
496:
497: cep_standard.debug('<
499: END ce_check_cross_module_tax_id;
500:
501: /* --------------------------------------------------------------------
519: l_var1 VARCHAR2(20);
520: l_val_digit VARCHAR2(2);
521: l_mod_value NUMBER(2);
522: BEGIN
523: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_TAX_ID_CHECK_ALGORITHM'|| '----------' ||
524: 'CE_VALIDATE_BANKINFO.CE_TAX_ID_CHECK_ALGORITHM ' ||p_COUNTRY );
525:
526: -- Check the Taxpayer ID Valdiation digit for Colombia
527: IF p_country='CO' THEN
520: l_val_digit VARCHAR2(2);
521: l_mod_value NUMBER(2);
522: BEGIN
523: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_TAX_ID_CHECK_ALGORITHM'|| '----------' ||
524: 'CE_VALIDATE_BANKINFO.CE_TAX_ID_CHECK_ALGORITHM ' ||p_COUNTRY );
525:
526: -- Check the Taxpayer ID Valdiation digit for Colombia
527: IF p_country='CO' THEN
528: l_var1:=LPAD(p_taxpayer_id,15,'0');
541: (TO_NUMBER(SUBSTR(l_var1,3,1))) *59 +
542: (TO_NUMBER(SUBSTR(l_var1,2,1))) *67 +
543: (TO_NUMBER(SUBSTR(l_var1,1,1))) *71),11));
544:
545: cep_standard.debug('CE_VALIDATE_BANKINFO.ce_tax_id_check_algorithm - l_mod_value: '|| l_mod_value);
546:
547: IF (l_mod_value IN (1,0)) THEN
548: l_val_digit:=l_mod_value;
549: ELSE
549: ELSE
550: l_val_digit:=11-l_mod_value;
551: END IF;
552:
553: cep_standard.debug('CE_VALIDATE_BANKINFO.ce_tax_id_check_algorithm - l_val_digit: '|| l_val_digit|| '----------' ||
554: 'CE_VALIDATE_BANKINFO.ce_tax_id_check_algorithm - p_tax_id_cd : '|| p_tax_id_cd );
555:
556: IF l_val_digit<> p_tax_id_cd THEN
557: cep_standard.debug('failed ce_tax_id_check_algorithm' );
550: l_val_digit:=11-l_mod_value;
551: END IF;
552:
553: cep_standard.debug('CE_VALIDATE_BANKINFO.ce_tax_id_check_algorithm - l_val_digit: '|| l_val_digit|| '----------' ||
554: 'CE_VALIDATE_BANKINFO.ce_tax_id_check_algorithm - p_tax_id_cd : '|| p_tax_id_cd );
555:
556: IF l_val_digit<> p_tax_id_cd THEN
557: cep_standard.debug('failed ce_tax_id_check_algorithm' );
558: RETURN('FALSE');
561: RETURN('TRUE');
562: END IF;
563: END IF;
564:
565: cep_standard.debug('<
567:
568:
569: /* --------------------------------------------------------------------
584:
585: temp_name number;
586:
587: BEGIN
588: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_UNIQUE_BRANCH_NAME');
589:
590: -- unique combination -> bank_id, branch_name, country --confirmed sql 6/25/02
591: SELECT COUNT(*) INTO temp_name
592: FROM HZ_PARTIES BankParty,
639: fnd_message.set_name('CE', 'CE_BANK_BRANCH_NAME_EXISTS');
640: fnd_msg_pub.add;
641: END IF;
642:
643: cep_standard.debug('<
645: END CE_UNIQUE_BRANCH_NAME;
646:
647: /* --------------------------------------------------------------------
661: Xi_BRANCH_ID IN varchar2) AS
662:
663: temp_number number;
664: BEGIN
665: cep_standard.debug('CE_UNIQUE_BRANCH_NAME: ' || '>>CE_VALIDATE_BANKINFO.CE_UNIQUE_BRANCH_NUMBER');
666:
667: -- unique combination -> bank_id, branch_number, country --confirmed sql 6/25/02
668:
669: SELECT COUNT(*) INTO temp_number
717: fnd_message.set_name('CE', 'CE_BANK_BRANCH_NUMBER_EXISTS');
718: fnd_msg_pub.add;
719: END IF;
720:
721: cep_standard.debug('CE_UNIQUE_BRANCH_NAME: ' || '<
723:
724: /* --------------------------------------------------------------------
725: | PRIVATE PROCEDURE |
737: Xi_BANK_ID IN varchar2,
738: Xi_BRANCH_ID IN varchar2) AS
739: temp_name_alt number;
740: BEGIN
741: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_UNIQUE_BRANCH_NAME_ALT');
742: -- unique combination -> bank_id, branch_name_alt, country bug 2363959
743: -- confirmed sql 6/25/02
744:
745: SELECT COUNT(*) INTO temp_name_alt
791: fnd_message.set_name('CE', 'CE_BANK_BRANCH_NAME_ALT_EXISTS');
792: fnd_msg_pub.add;
793: END IF;
794:
795: cep_standard.debug('<
797:
798:
799: /* --------------------------------------------------------------------
815: Xi_ACCOUNT_ID IN varchar2) AS
816:
817: temp_name number;
818: BEGIN
819: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_UNIQUE_ACCOUNT_NAME'||
820: 'Xi_ACCOUNT_NAME ' ||Xi_ACCOUNT_NAME ||
821: ', Xi_BRANCH_ID ' ||Xi_BRANCH_ID );
822:
823: -- unique combination -> bank_branch_id, bank account name --confirmed sql
834: fnd_msg_pub.add;
835: cep_standard.debug('CE_UNIQUE_ACCOUNT_NAME: ' || 'CE_BANK_ACCOUNT_NAME_EXISTS');
836: END IF;
837:
838: cep_standard.debug('<
840: END CE_UNIQUE_ACCOUNT_NAME;
841:
842:
865: COUNTRY_NAME VARCHAR2(2);
866: X_PASS_MAND_CHECK VARCHAR2(1);
867: x_init_count NUMBER; --bug 7460921: added
868: BEGIN
869: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_cd');
870:
871: -- initialize API return status to success.
872: x_return_status := fnd_api.g_ret_sts_success;
873: COUNTRY_NAME := X_COUNTRY_NAME;
871: -- initialize API return status to success.
872: x_return_status := fnd_api.g_ret_sts_success;
873: COUNTRY_NAME := X_COUNTRY_NAME;
874:
875: cep_standard.debug('CE_VALIDATE_BANKINFO.ce_validate_cd - COUNTRY_NAME: '|| COUNTRY_NAME||
876: 'CE_VALIDATE_BANKINFO.ce_validate_cd - P_INIT_MSG_LIST: '|| P_INIT_MSG_LIST);
877:
878: -- Initialize message list if p_init_msg_list is set to TRUE.
879: IF FND_API.to_Boolean(p_init_msg_list) THEN
872: x_return_status := fnd_api.g_ret_sts_success;
873: COUNTRY_NAME := X_COUNTRY_NAME;
874:
875: cep_standard.debug('CE_VALIDATE_BANKINFO.ce_validate_cd - COUNTRY_NAME: '|| COUNTRY_NAME||
876: 'CE_VALIDATE_BANKINFO.ce_validate_cd - P_INIT_MSG_LIST: '|| P_INIT_MSG_LIST);
877:
878: -- Initialize message list if p_init_msg_list is set to TRUE.
879: IF FND_API.to_Boolean(p_init_msg_list) THEN
880: x_init_count := 0;
898: ELSE
899: X_PASS_MAND_CHECK := ' ';
900: END IF;
901:
902: cep_standard.debug('CE_VALIDATE_BANKINFO.ce_validate_cd - X_PASS_MAND_CHECK: '|| X_PASS_MAND_CHECK);
903:
904: IF X_CD IS NOT NULL THEN -- Bug 6632733 Perform all the validations only if check digit is entered
905:
906: IF (COUNTRY_NAME = 'FR') THEN
903:
904: IF X_CD IS NOT NULL THEN -- Bug 6632733 Perform all the validations only if check digit is entered
905:
906: IF (COUNTRY_NAME = 'FR') THEN
907: CE_VALIDATE_BANKINFO.CE_VALIDATE_CD_FR(
908: X_CD,
909: X_PASS_MAND_CHECK,
910: X_BANK_NUMBER,
911: X_BRANCH_NUMBER,
911: X_BRANCH_NUMBER,
912: translate(X_ACCOUNT_NUMBER,'ABCDEFGHIJKLMNOPQRSTUVWXYZ ','123456789123456789234567890'));
913:
914: ELSIF (COUNTRY_NAME = 'ES') THEN
915: CE_VALIDATE_BANKINFO.CE_VALIDATE_CD_ES(X_CD,
916: X_PASS_MAND_CHECK,
917: X_BANK_NUMBER,
918: X_BRANCH_NUMBER,
919: translate(X_ACCOUNT_NUMBER,'ABCDEFGHIJKLMNOPQRSTUVWXYZ ','123456789123456789234567890'));
918: X_BRANCH_NUMBER,
919: translate(X_ACCOUNT_NUMBER,'ABCDEFGHIJKLMNOPQRSTUVWXYZ ','123456789123456789234567890'));
920:
921: ELSIF (COUNTRY_NAME = 'PT') THEN
922: CE_VALIDATE_BANKINFO.CE_VALIDATE_CD_PT(X_CD,
923: X_PASS_MAND_CHECK,
924: X_BANK_NUMBER,
925: X_BRANCH_NUMBER,
926: translate(X_ACCOUNT_NUMBER,'ABCDEFGHIJKLMNOPQRSTUVWXYZ ','123456789123456789234567890'));
926: translate(X_ACCOUNT_NUMBER,'ABCDEFGHIJKLMNOPQRSTUVWXYZ ','123456789123456789234567890'));
927: -- added 5/14/02
928:
929: ELSIF (COUNTRY_NAME = 'DE') THEN
930: CE_VALIDATE_BANKINFO.CE_VALIDATE_CD_DE(X_CD,
931: X_ACCOUNT_NUMBER);
932:
933: ELSIF (COUNTRY_NAME = 'GR') THEN
934: CE_VALIDATE_BANKINFO.CE_VALIDATE_CD_GR(X_CD,
930: CE_VALIDATE_BANKINFO.CE_VALIDATE_CD_DE(X_CD,
931: X_ACCOUNT_NUMBER);
932:
933: ELSIF (COUNTRY_NAME = 'GR') THEN
934: CE_VALIDATE_BANKINFO.CE_VALIDATE_CD_GR(X_CD,
935: X_PASS_MAND_CHECK,
936: X_BANK_NUMBER,
937: X_BRANCH_NUMBER,
938: translate(X_ACCOUNT_NUMBER,'ABCDEFGHIJKLMNOPQRSTUVWXYZ ','123456789123456789234567890'));
937: X_BRANCH_NUMBER,
938: translate(X_ACCOUNT_NUMBER,'ABCDEFGHIJKLMNOPQRSTUVWXYZ ','123456789123456789234567890'));
939:
940: ELSIF (COUNTRY_NAME = 'IS') THEN
941: CE_VALIDATE_BANKINFO.CE_VALIDATE_CD_IS(X_CD,
942: translate(X_ACCOUNT_NUMBER,'ABCDEFGHIJKLMNOPQRSTUVWXYZ ','123456789123456789234567890'));
943:
944: ELSIF (COUNTRY_NAME = 'IT') THEN
945: CE_VALIDATE_BANKINFO.CE_VALIDATE_CD_IT(X_CD,
941: CE_VALIDATE_BANKINFO.CE_VALIDATE_CD_IS(X_CD,
942: translate(X_ACCOUNT_NUMBER,'ABCDEFGHIJKLMNOPQRSTUVWXYZ ','123456789123456789234567890'));
943:
944: ELSIF (COUNTRY_NAME = 'IT') THEN
945: CE_VALIDATE_BANKINFO.CE_VALIDATE_CD_IT(X_CD,
946: X_PASS_MAND_CHECK,
947: X_BANK_NUMBER,
948: X_BRANCH_NUMBER,
949: -- Bug 6836343: Removed translate command as the substitution is done in
950: -- the procedure itself. Passing X_ACCOUNT_NUMBER directly
951: X_ACCOUNT_NUMBER);
952:
953: ELSIF (COUNTRY_NAME = 'LU') THEN
954: CE_VALIDATE_BANKINFO.CE_VALIDATE_CD_LU(X_CD,
955: X_BANK_NUMBER,
956: X_BRANCH_NUMBER,
957: X_ACCOUNT_NUMBER);
958:
956: X_BRANCH_NUMBER,
957: X_ACCOUNT_NUMBER);
958:
959: ELSIF (COUNTRY_NAME = 'SE') THEN
960: CE_VALIDATE_BANKINFO.CE_VALIDATE_CD_SE(X_CD,X_ACCOUNT_NUMBER);
961: END IF;
962:
963: /* Bug 11783906
964: ELSIF (COUNTRY_NAME = 'FI') THEN
961: END IF;
962:
963: /* Bug 11783906
964: ELSIF (COUNTRY_NAME = 'FI') THEN
965: CE_VALIDATE_BANKINFO.ce_validate_cd_fi(X_CD, X_BRANCH_NUMBER, X_ACCOUNT_NUMBER);
966:
967: END IF; */
968: END IF; -- End Bug 6632733
969:
975: IF x_msg_count > x_init_count THEN -- bug 7460921
976: x_return_status := fnd_api.g_ret_sts_error;
977: END IF;
978:
979: cep_standard.debug('CE_VALIDATE_BANKINFO.ce_validate_cd - P_COUNT: '|| x_msg_count);
980:
981: cep_standard.debug('<
983: EXCEPTION
977: END IF;
978:
979: cep_standard.debug('CE_VALIDATE_BANKINFO.ce_validate_cd - P_COUNT: '|| x_msg_count);
980:
981: cep_standard.debug('<
983: EXCEPTION
984: WHEN OTHERS THEN
985: cep_standard.debug('Exception: CE_VALIDATE_BANKINFO.ce_validate_cd ' ||X_COUNTRY_NAME );
981: cep_standard.debug('<
983: EXCEPTION
984: WHEN OTHERS THEN
985: cep_standard.debug('Exception: CE_VALIDATE_BANKINFO.ce_validate_cd ' ||X_COUNTRY_NAME );
986:
987: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
988: fnd_message.set_token('PROCEDURE', 'CE_VALIDATE_BANKINFO.cd_validate_cd');
989: fnd_msg_pub.add;
984: WHEN OTHERS THEN
985: cep_standard.debug('Exception: CE_VALIDATE_BANKINFO.ce_validate_cd ' ||X_COUNTRY_NAME );
986:
987: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
988: fnd_message.set_token('PROCEDURE', 'CE_VALIDATE_BANKINFO.cd_validate_cd');
989: fnd_msg_pub.add;
990: RAISE;
991: END CE_VALIDATE_CD;
992:
1029: l_count_before_custom NUMBER; -- 9250566: Added
1030: l_count_after_custom NUMBER; -- 9250566: Added
1031:
1032: BEGIN
1033: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_branch');
1034:
1035: -- initialize API return status to success.
1036: x_return_status := fnd_api.g_ret_sts_success;
1037:
1056: cep_standard.debug('X_PASS_MAND_CHECK: '|| X_PASS_MAND_CHECK);
1057: cep_standard.debug('Calling CE_VALIDATE_BRANCH_'||COUNTRY_NAME);
1058:
1059: IF (COUNTRY_NAME = 'AT') THEN
1060: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_AT(
1061: X_BRANCH_NUMBER,
1062: X_PASS_MAND_CHECK,
1063: l_value_out);
1064:
1062: X_PASS_MAND_CHECK,
1063: l_value_out);
1064:
1065: ELSIF (COUNTRY_NAME = 'ES') THEN
1066: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_ES(
1067: X_BRANCH_NUMBER,
1068: X_PASS_MAND_CHECK,
1069: l_value_out);
1070:
1068: X_PASS_MAND_CHECK,
1069: l_value_out);
1070:
1071: ELSIF (COUNTRY_NAME = 'FR') THEN
1072: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_FR(
1073: X_BRANCH_NUMBER,
1074: X_PASS_MAND_CHECK,
1075: l_value_out);
1076:
1074: X_PASS_MAND_CHECK,
1075: l_value_out);
1076:
1077: ELSIF (COUNTRY_NAME = 'PT') THEN
1078: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_PT(
1079: X_BRANCH_NUMBER,
1080: X_PASS_MAND_CHECK);
1081:
1082: ELSIF (COUNTRY_NAME = 'BR') THEN
1079: X_BRANCH_NUMBER,
1080: X_PASS_MAND_CHECK);
1081:
1082: ELSIF (COUNTRY_NAME = 'BR') THEN
1083: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_BR(
1084: X_BRANCH_NUMBER,
1085: X_PASS_MAND_CHECK,
1086: l_value_out);
1087:
1086: l_value_out);
1087:
1088: -- added 5/14/02
1089: ELSIF (COUNTRY_NAME = 'DE') THEN
1090: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_DE(
1091: X_BRANCH_NUMBER,
1092: X_BANK_ID);
1093:
1094: ELSIF (COUNTRY_NAME = 'GR') THEN
1091: X_BRANCH_NUMBER,
1092: X_BANK_ID);
1093:
1094: ELSIF (COUNTRY_NAME = 'GR') THEN
1095: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_GR(X_BRANCH_NUMBER);
1096:
1097: ELSIF (COUNTRY_NAME = 'IS') THEN
1098: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_IS(
1099: X_BRANCH_NUMBER,
1094: ELSIF (COUNTRY_NAME = 'GR') THEN
1095: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_GR(X_BRANCH_NUMBER);
1096:
1097: ELSIF (COUNTRY_NAME = 'IS') THEN
1098: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_IS(
1099: X_BRANCH_NUMBER,
1100: X_BANK_ID,
1101: l_value_out);
1102:
1100: X_BANK_ID,
1101: l_value_out);
1102:
1103: ELSIF (COUNTRY_NAME = 'IE') THEN
1104: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_IE(
1105: X_BRANCH_NUMBER,
1106: X_BANK_ID);
1107:
1108: ELSIF (COUNTRY_NAME = 'IT') THEN
1105: X_BRANCH_NUMBER,
1106: X_BANK_ID);
1107:
1108: ELSIF (COUNTRY_NAME = 'IT') THEN
1109: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_IT(
1110: X_BRANCH_NUMBER,
1111: X_PASS_MAND_CHECK);
1112:
1113: ELSIF (COUNTRY_NAME = 'LU') THEN
1110: X_BRANCH_NUMBER,
1111: X_PASS_MAND_CHECK);
1112:
1113: ELSIF (COUNTRY_NAME = 'LU') THEN
1114: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_LU(
1115: X_BRANCH_NUMBER,
1116: X_BANK_ID);
1117:
1118: ELSIF (COUNTRY_NAME = 'PL') THEN
1115: X_BRANCH_NUMBER,
1116: X_BANK_ID);
1117:
1118: ELSIF (COUNTRY_NAME = 'PL') THEN
1119: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_PL(
1120: X_BRANCH_NUMBER,
1121: X_BANK_ID);
1122:
1123: ELSIF (COUNTRY_NAME = 'SE') THEN
1120: X_BRANCH_NUMBER,
1121: X_BANK_ID);
1122:
1123: ELSIF (COUNTRY_NAME = 'SE') THEN
1124: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_SE(
1125: X_BRANCH_NUMBER,
1126: X_BANK_ID);
1127:
1128: ELSIF (COUNTRY_NAME = 'CH') THEN
1125: X_BRANCH_NUMBER,
1126: X_BANK_ID);
1127:
1128: ELSIF (COUNTRY_NAME = 'CH') THEN
1129: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_CH(
1130: X_BRANCH_NUMBER,
1131: X_BANK_ID);
1132:
1133: ELSIF (COUNTRY_NAME = 'GB') THEN
1130: X_BRANCH_NUMBER,
1131: X_BANK_ID);
1132:
1133: ELSIF (COUNTRY_NAME = 'GB') THEN
1134: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_GB(
1135: X_BRANCH_NUMBER,
1136: X_BANK_ID);
1137:
1138: ELSIF (COUNTRY_NAME = 'US') THEN
1135: X_BRANCH_NUMBER,
1136: X_BANK_ID);
1137:
1138: ELSIF (COUNTRY_NAME = 'US') THEN
1139: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_US(
1140: X_BRANCH_NUMBER,
1141: X_PASS_MAND_CHECK,
1142: l_value_out);
1143:
1142: l_value_out);
1143:
1144: -- added 10/19/04
1145: ELSIF (COUNTRY_NAME = 'AU') THEN
1146: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_AU(
1147: X_BRANCH_NUMBER,
1148: X_BANK_ID,
1149: X_PASS_MAND_CHECK);
1150:
1148: X_BANK_ID,
1149: X_PASS_MAND_CHECK);
1150:
1151: ELSIF (COUNTRY_NAME = 'IL') THEN
1152: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_IL(
1153: X_BRANCH_NUMBER,
1154: X_PASS_MAND_CHECK);
1155:
1156: ELSIF (COUNTRY_NAME = 'NZ') THEN
1153: X_BRANCH_NUMBER,
1154: X_PASS_MAND_CHECK);
1155:
1156: ELSIF (COUNTRY_NAME = 'NZ') THEN
1157: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_NZ(
1158: X_BRANCH_NUMBER,
1159: X_PASS_MAND_CHECK);
1160:
1161: ELSIF (COUNTRY_NAME = 'JP') THEN
1158: X_BRANCH_NUMBER,
1159: X_PASS_MAND_CHECK);
1160:
1161: ELSIF (COUNTRY_NAME = 'JP') THEN
1162: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_JP(
1163: X_BRANCH_NUMBER,
1164: X_BRANCH_NAME_ALT,
1165: X_PASS_MAND_CHECK);
1166:
1165: X_PASS_MAND_CHECK);
1166:
1167: -- 9249372: Added
1168: ELSIF (COUNTRY_NAME = 'FI') THEN
1169: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_FI(X_BRANCH_NUMBER);
1170:
1171: END IF;
1172:
1173: --Bug 15958504 branch end_date check
1170:
1171: END IF;
1172:
1173: --Bug 15958504 branch end_date check
1174: CE_VALIDATE_BANKINFO.ce_end_date_check(Xi_BRANCH_ID =>x_BRANCH_ID,
1175: Xi_BRANCH_END_DATE => X_BRANCH_END_DATE);
1176: -- UNIQUE VALIDATION CHECK for branch --
1177: -- bug 14610187: Unique validation check have been moved after the
1178: -- custom validations as they might modify the branch number.
1208: -- Bug 14242293: Code change(1/2) starts
1209: -- The uniqueness validation must be a combination of bank, branch name
1210: -- and branch number for all countries.
1211: cep_standard.debug('unqiue VALIDATION CHECK for branch: generic' );
1212: CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BRANCH(
1213: X_COUNTRY_NAME,
1214: X_VALUE_OUT, /* bug 14610187 - added X_VALUE_OUT instead of X_BRANCH_NUMBER */
1215: X_BRANCH_NAME,
1216: X_BANK_ID,
1219: -- country specific uniqueness checks --
1220: cep_standard.debug('unqiue VALIDATION CHECK for branch: country specific' );
1221: IF (COUNTRY_NAME = 'JP')
1222: THEN
1223: CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BRANCH_JP(
1224: X_COUNTRY_NAME,
1225: X_VALUE_OUT, /* bug 14610187 - added X_VALUE_OUT instead of X_BRANCH_NUMBER */
1226: X_BRANCH_NAME,
1227: X_BRANCH_NAME_ALT,
1265: x_return_status := fnd_api.g_ret_sts_error;
1266: END IF;
1267:
1268: cep_standard.debug('X_VALUE_OUT: '|| X_VALUE_OUT);
1269: cep_standard.debug('<
1271: EXCEPTION
1272: WHEN OTHERS THEN
1273: cep_standard.debug('EXCEPTION: ce_validate_branch ' ||X_COUNTRY_NAME );
1271: EXCEPTION
1272: WHEN OTHERS THEN
1273: cep_standard.debug('EXCEPTION: ce_validate_branch ' ||X_COUNTRY_NAME );
1274: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
1275: fnd_message.set_token('PROCEDURE', 'CE_VALIDATE_BANKINFO.cd_validate_branch');
1276: fnd_msg_pub.add;
1277: RAISE;
1278: END CE_VALIDATE_BRANCH;
1279:
1285: ) AS
1286: account_value VARCHAR2(30);
1287: l_bank_account_num VARCHAR2(30);
1288: BEGIN
1289: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_FORMAT_ELECTRONIC_NUM_BE');
1290:
1291: account_value:= ce_remove_formats(X_ACCOUNT_NUMBER);
1292:
1293: IF X_ACCOUNT_CLASSIFICATION = 'EXTERNAL' THEN
1305: cep_standard.debug('account_value ' ||account_value);
1306: X_ELECTRONIC_ACCT_NUM := account_value;
1307:
1308: cep_standard.debug('X_ELECTRONIC_ACCT_NUM ' ||X_ELECTRONIC_ACCT_NUM);
1309: cep_standard.debug('<
1311:
1312:
1313: -- Bug 11783906
1320: account_value VARCHAR2(30);
1321: account_pad_value VARCHAR2(30);
1322:
1323: BEGIN
1324: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_FORMAT_ELECTRONIC_NUM_FI');
1325:
1326: -- remove formatting characters
1327: account_value := ce_remove_formats(X_Account_Number);
1328: cep_standard.debug('account_value='||account_value);
1340:
1341: X_ELECTRONIC_ACCT_NUM := account_pad_value;
1342:
1343: cep_standard.debug('X_ELECTRONIC_ACCT_NUM ' ||X_ELECTRONIC_ACCT_NUM);
1344: cep_standard.debug('<
1346:
1347:
1348: /* ----------------------------------------------------------------------- */
1352: X_ELECTRONIC_ACCT_NUM OUT NOCOPY VARCHAR2
1353: ) AS
1354: account_value VARCHAR2(100);
1355: BEGIN
1356: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_FORMAT_ELECTRONIC_NUM_NL');
1357: SELECT decode(
1358: upper(substr(X_ACCOUNT_NUMBER, 1, 1)),
1359: 'P', upper(X_ACCOUNT_NUMBER),
1360: 'G', 'P' || substr(X_ACCOUNT_NUMBER, 2),
1366:
1367: X_ELECTRONIC_ACCT_NUM := account_value;
1368:
1369: cep_standard.debug('X_ELECTRONIC_ACCT_NUM ' ||X_ELECTRONIC_ACCT_NUM);
1370: cep_standard.debug('<
1372:
1373: /* ----------------------------------------------------------------------- */
1374: PROCEDURE CE_FORMAT_ELECTRONIC_NUM_NO(
1377: X_ELECTRONIC_ACCT_NUM OUT NOCOPY varchar2
1378: ) AS
1379: account_value varchar2(30);
1380: BEGIN
1381: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_FORMAT_ELECTRONIC_NUM_NO');
1382:
1383: account_value:= lpad(replace(replace(NVL(X_ACCOUNT_NUMBER,''),'.',''),' ',''),11,0);
1384: X_ELECTRONIC_ACCT_NUM := account_value;
1385:
1383: account_value:= lpad(replace(replace(NVL(X_ACCOUNT_NUMBER,''),'.',''),' ',''),11,0);
1384: X_ELECTRONIC_ACCT_NUM := account_value;
1385:
1386: cep_standard.debug('X_ELECTRONIC_ACCT_NUM ' ||X_ELECTRONIC_ACCT_NUM);
1387: cep_standard.debug('<
1389:
1390: /* ----------------------------------------------------------------------- */
1391: PROCEDURE CE_FORMAT_ELECTRONIC_NUM_SE(
1394: X_ELECTRONIC_ACCT_NUM OUT NOCOPY VARCHAR2
1395: ) AS
1396: account_value VARCHAR2(30);
1397: BEGIN
1398: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_FORMAT_ELECTRONIC_NUM_SE');
1399:
1400: account_value:= ce_remove_formats(X_ACCOUNT_NUMBER);
1401: X_ELECTRONIC_ACCT_NUM := account_value;
1402:
1400: account_value:= ce_remove_formats(X_ACCOUNT_NUMBER);
1401: X_ELECTRONIC_ACCT_NUM := account_value;
1402:
1403: cep_standard.debug('X_ELECTRONIC_ACCT_NUM ' ||X_ELECTRONIC_ACCT_NUM);
1404: cep_standard.debug('<
1406:
1407: /* --------------------------------------------------------------------
1408: | PUBLIC PROCEDURE |
1430: x_return_status IN OUT NOCOPY VARCHAR2
1431: ) AS
1432: country_name VARCHAR2(2);
1433: BEGIN
1434: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_FORMAT_ELECTRONIC_NUM');
1435: -- initialize API return status to success.
1436: x_return_status := fnd_api.g_ret_sts_success;
1437:
1438: COUNTRY_NAME := X_COUNTRY_NAME;
1449: IF FND_API.to_Boolean(p_init_msg_list) THEN
1450: FND_MSG_PUB.initialize;
1451: END IF;
1452: IF (COUNTRY_NAME = 'BE') THEN
1453: CE_VALIDATE_BANKINFO.CE_FORMAT_ELECTRONIC_NUM_BE(
1454: X_ACCOUNT_NUMBER ,
1455: X_ACCOUNT_CLASSIFICATION,
1456: X_ELECTRONIC_ACCT_NUM);
1457:
1456: X_ELECTRONIC_ACCT_NUM);
1457:
1458: ELSIF (COUNTRY_NAME = 'FI') THEN
1459: -- Bug 11783906
1460: CE_VALIDATE_BANKINFO.CE_FORMAT_ELECTRONIC_NUM_FI(
1461: X_ACCOUNT_NUMBER ,
1462: X_ACCOUNT_CLASSIFICATION,
1463: X_ELECTRONIC_ACCT_NUM);
1464:
1462: X_ACCOUNT_CLASSIFICATION,
1463: X_ELECTRONIC_ACCT_NUM);
1464:
1465: ELSIF (COUNTRY_NAME = 'NL') THEN
1466: CE_VALIDATE_BANKINFO.CE_FORMAT_ELECTRONIC_NUM_NL(
1467: X_ACCOUNT_NUMBER ,
1468: X_ACCOUNT_CLASSIFICATION,
1469: X_ELECTRONIC_ACCT_NUM);
1470:
1468: X_ACCOUNT_CLASSIFICATION,
1469: X_ELECTRONIC_ACCT_NUM);
1470:
1471: ELSIF (COUNTRY_NAME = 'NO') THEN
1472: CE_VALIDATE_BANKINFO.CE_FORMAT_ELECTRONIC_NUM_NO(
1473: X_ACCOUNT_NUMBER ,
1474: X_ACCOUNT_CLASSIFICATION,
1475: X_ELECTRONIC_ACCT_NUM);
1476:
1474: X_ACCOUNT_CLASSIFICATION,
1475: X_ELECTRONIC_ACCT_NUM);
1476:
1477: ELSIF (COUNTRY_NAME = 'SE') THEN
1478: CE_VALIDATE_BANKINFO.CE_FORMAT_ELECTRONIC_NUM_SE(
1479: X_ACCOUNT_NUMBER ,
1480: X_ACCOUNT_CLASSIFICATION,
1481: X_ELECTRONIC_ACCT_NUM);
1482:
1490: x_return_status := fnd_api.g_ret_sts_error;
1491: END IF;
1492:
1493: cep_standard.debug('P_COUNT: '|| x_msg_count);
1494: cep_standard.debug('<
1496: WHEN OTHERS THEN
1497: cep_standard.debug('EXCEPTION: CE_FORMAT_ELECTRONIC_NUM ' ||X_COUNTRY_NAME );
1498: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
1495: EXCEPTION
1496: WHEN OTHERS THEN
1497: cep_standard.debug('EXCEPTION: CE_FORMAT_ELECTRONIC_NUM ' ||X_COUNTRY_NAME );
1498: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
1499: fnd_message.set_token('PROCEDURE', 'CE_VALIDATE_BANKINFO.CE_FORMAT_ELECTRONIC_NUM');
1500: fnd_msg_pub.add;
1501: RAISE;
1502: END CE_FORMAT_ELECTRONIC_NUM;
1503:
1544: l_count_before_custom NUMBER; -- 9250566: Added
1545: l_count_after_custom NUMBER; -- 9250566: Added
1546:
1547: BEGIN
1548: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_account');
1549: -- initialize API return status to success.
1550: x_return_status := fnd_api.g_ret_sts_success;
1551:
1552: COUNTRY_NAME := X_COUNTRY_NAME;
1569:
1570: cep_standard.debug('X_PASS_MAND_CHECK: '|| X_PASS_MAND_CHECK);
1571:
1572: IF (COUNTRY_NAME = 'AT') THEN
1573: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_AT(
1574: X_ACCOUNT_NUMBER,
1575: X_PASS_MAND_CHECK,
1576: l_value_out);
1577:
1575: X_PASS_MAND_CHECK,
1576: l_value_out);
1577:
1578: ELSIF (COUNTRY_NAME = 'DK') THEN
1579: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_DK(
1580: X_ACCOUNT_NUMBER,
1581: X_PASS_MAND_CHECK,
1582: l_value_out);
1583:
1581: X_PASS_MAND_CHECK,
1582: l_value_out);
1583:
1584: ELSIF (COUNTRY_NAME = 'NO') THEN
1585: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_NO(
1586: X_ACCOUNT_NUMBER,
1587: X_PASS_MAND_CHECK);
1588:
1589: ELSIF (COUNTRY_NAME = 'ES') THEN
1586: X_ACCOUNT_NUMBER,
1587: X_PASS_MAND_CHECK);
1588:
1589: ELSIF (COUNTRY_NAME = 'ES') THEN
1590: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_ES(
1591: X_ACCOUNT_NUMBER,
1592: X_PASS_MAND_CHECK,
1593: l_value_out);
1594:
1592: X_PASS_MAND_CHECK,
1593: l_value_out);
1594:
1595: ELSIF (COUNTRY_NAME = 'NL') THEN
1596: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_NL(
1597: X_ACCOUNT_NUMBER,
1598: X_PASS_MAND_CHECK);
1599:
1600: ELSIF (COUNTRY_NAME = 'FR') THEN
1597: X_ACCOUNT_NUMBER,
1598: X_PASS_MAND_CHECK);
1599:
1600: ELSIF (COUNTRY_NAME = 'FR') THEN
1601: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_FR(
1602: X_ACCOUNT_NUMBER,
1603: X_PASS_MAND_CHECK,
1604: l_value_out);
1605:
1603: X_PASS_MAND_CHECK,
1604: l_value_out);
1605:
1606: ELSIF (COUNTRY_NAME = 'BE') THEN
1607: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_BE(
1608: X_ACCOUNT_NUMBER,
1609: X_PASS_MAND_CHECK);
1610:
1611: ELSIF (COUNTRY_NAME = 'PT') THEN
1608: X_ACCOUNT_NUMBER,
1609: X_PASS_MAND_CHECK);
1610:
1611: ELSIF (COUNTRY_NAME = 'PT') THEN
1612: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_PT(
1613: X_ACCOUNT_NUMBER,
1614: X_PASS_MAND_CHECK,
1615: l_value_out);
1616:
1614: X_PASS_MAND_CHECK,
1615: l_value_out);
1616:
1617: ELSIF (COUNTRY_NAME = 'FI') THEN -- 8897744 Removed AND (X_BRANCH_NUMBER='LMP')
1618: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_FI(
1619: X_ACCOUNT_NUMBER,
1620: X_PASS_MAND_CHECK);
1621:
1622: -- added 5/14/02
1620: X_PASS_MAND_CHECK);
1621:
1622: -- added 5/14/02
1623: ELSIF (COUNTRY_NAME = 'DE') THEN
1624: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_DE(
1625: X_ACCOUNT_NUMBER,
1626: l_value_out );
1627:
1628: ELSIF (COUNTRY_NAME = 'GR') THEN
1625: X_ACCOUNT_NUMBER,
1626: l_value_out );
1627:
1628: ELSIF (COUNTRY_NAME = 'GR') THEN
1629: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_GR(
1630: X_ACCOUNT_NUMBER,
1631: l_value_out);
1632:
1633: ELSIF (COUNTRY_NAME = 'IS') THEN
1630: X_ACCOUNT_NUMBER,
1631: l_value_out);
1632:
1633: ELSIF (COUNTRY_NAME = 'IS') THEN
1634: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_IS(
1635: X_ACCOUNT_NUMBER,
1636: l_value_out );
1637:
1638: ELSIF (COUNTRY_NAME = 'IE') THEN
1635: X_ACCOUNT_NUMBER,
1636: l_value_out );
1637:
1638: ELSIF (COUNTRY_NAME = 'IE') THEN
1639: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_IE(X_ACCOUNT_NUMBER);
1640:
1641: ELSIF (COUNTRY_NAME = 'IT') THEN
1642: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_IT(X_ACCOUNT_NUMBER,l_value_out);
1643:
1638: ELSIF (COUNTRY_NAME = 'IE') THEN
1639: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_IE(X_ACCOUNT_NUMBER);
1640:
1641: ELSIF (COUNTRY_NAME = 'IT') THEN
1642: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_IT(X_ACCOUNT_NUMBER,l_value_out);
1643:
1644: ELSIF (COUNTRY_NAME = 'LU') THEN
1645: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_LU(X_ACCOUNT_NUMBER);
1646:
1641: ELSIF (COUNTRY_NAME = 'IT') THEN
1642: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_IT(X_ACCOUNT_NUMBER,l_value_out);
1643:
1644: ELSIF (COUNTRY_NAME = 'LU') THEN
1645: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_LU(X_ACCOUNT_NUMBER);
1646:
1647: ELSIF (COUNTRY_NAME = 'PL') THEN
1648: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_PL(X_ACCOUNT_NUMBER);
1649:
1644: ELSIF (COUNTRY_NAME = 'LU') THEN
1645: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_LU(X_ACCOUNT_NUMBER);
1646:
1647: ELSIF (COUNTRY_NAME = 'PL') THEN
1648: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_PL(X_ACCOUNT_NUMBER);
1649:
1650: ELSIF (COUNTRY_NAME = 'SE') THEN
1651: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_SE(X_ACCOUNT_NUMBER);
1652:
1647: ELSIF (COUNTRY_NAME = 'PL') THEN
1648: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_PL(X_ACCOUNT_NUMBER);
1649:
1650: ELSIF (COUNTRY_NAME = 'SE') THEN
1651: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_SE(X_ACCOUNT_NUMBER);
1652:
1653: ELSIF (COUNTRY_NAME = 'CH') THEN
1654: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_CH(
1655: X_ACCOUNT_NUMBER,
1650: ELSIF (COUNTRY_NAME = 'SE') THEN
1651: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_SE(X_ACCOUNT_NUMBER);
1652:
1653: ELSIF (COUNTRY_NAME = 'CH') THEN
1654: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_CH(
1655: X_ACCOUNT_NUMBER,
1656: X_ACCOUNT_TYPE );
1657:
1658: ELSIF (COUNTRY_NAME = 'GB') THEN
1655: X_ACCOUNT_NUMBER,
1656: X_ACCOUNT_TYPE );
1657:
1658: ELSIF (COUNTRY_NAME = 'GB') THEN
1659: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_GB(
1660: X_ACCOUNT_NUMBER,
1661: X_BRANCH_NUMBER, ----Bug16234978
1662: l_value_out);
1663:
1661: X_BRANCH_NUMBER, ----Bug16234978
1662: l_value_out);
1663:
1664: ELSIF (COUNTRY_NAME = 'BR') THEN
1665: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_BR(
1666: X_ACCOUNT_NUMBER,
1667: X_SECONDARY_ACCOUNT_REFERENCE);
1668:
1669: ELSIF (COUNTRY_NAME = 'AU') THEN
1666: X_ACCOUNT_NUMBER,
1667: X_SECONDARY_ACCOUNT_REFERENCE);
1668:
1669: ELSIF (COUNTRY_NAME = 'AU') THEN
1670: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_AU(
1671: X_ACCOUNT_NUMBER,
1672: X_CURRENCY_CODE);
1673:
1674: ELSIF (COUNTRY_NAME = 'IL') THEN
1671: X_ACCOUNT_NUMBER,
1672: X_CURRENCY_CODE);
1673:
1674: ELSIF (COUNTRY_NAME = 'IL') THEN
1675: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_IL(X_ACCOUNT_NUMBER);
1676:
1677: ELSIF (COUNTRY_NAME = 'NZ') THEN
1678: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_NZ(
1679: X_ACCOUNT_NUMBER,
1674: ELSIF (COUNTRY_NAME = 'IL') THEN
1675: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_IL(X_ACCOUNT_NUMBER);
1676:
1677: ELSIF (COUNTRY_NAME = 'NZ') THEN
1678: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_NZ(
1679: X_ACCOUNT_NUMBER,
1680: X_ACCOUNT_SUFFIX);
1681:
1682: ELSIF (COUNTRY_NAME = 'JP') THEN
1679: X_ACCOUNT_NUMBER,
1680: X_ACCOUNT_SUFFIX);
1681:
1682: ELSIF (COUNTRY_NAME = 'JP') THEN
1683: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_JP(X_ACCOUNT_NUMBER,
1684: X_ACCOUNT_TYPE );
1685: END IF; /* country account check */
1686:
1687: /* UNIQUE VALIDATION CHECK for account */
1687: /* UNIQUE VALIDATION CHECK for account */
1688: cep_standard.debug('UNIQUE_VALIDATION CHECK for account');
1689:
1690: IF (COUNTRY_NAME = 'JP') THEN
1691: CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_ACCOUNT_JP(
1692: X_ACCOUNT_NUMBER,
1693: X_CURRENCY_CODE,
1694: X_ACCOUNT_TYPE,
1695: X_ACCOUNT_NAME,
1696: X_BRANCH_ID,
1697: X_ACCOUNT_ID);
1698:
1699: ELSIF (COUNTRY_NAME = 'NZ') THEN
1700: CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_ACCOUNT_NZ(
1701: X_ACCOUNT_NUMBER,
1702: X_CURRENCY_CODE,
1703: X_ACCOUNT_SUFFIX,
1704: X_ACCOUNT_NAME,
1705: X_BRANCH_ID,
1706: X_ACCOUNT_ID);
1707:
1708: ELSE
1709: cep_standard.debug('call CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_ACCOUNT' );
1710: CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_ACCOUNT(
1711: X_ACCOUNT_NUMBER,
1712: X_CURRENCY_CODE,
1713: X_ACCOUNT_NAME,
1706: X_ACCOUNT_ID);
1707:
1708: ELSE
1709: cep_standard.debug('call CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_ACCOUNT' );
1710: CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_ACCOUNT(
1711: X_ACCOUNT_NUMBER,
1712: X_CURRENCY_CODE,
1713: X_ACCOUNT_NAME,
1714: X_BRANCH_ID,
1809: END IF;
1810: cep_standard.debug('CE_VALIDATE_ACCOUNT: P_COUNT: '|| x_msg_count);
1811: cep_standard.debug('X_VALUE_OUT: '|| X_VALUE_OUT);
1812:
1813: cep_standard.debug('<
1815: WHEN OTHERS THEN
1816: cep_standard.debug('EXCEPTION: ce_validate_account ' ||X_COUNTRY_NAME );
1817: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
1814: EXCEPTION
1815: WHEN OTHERS THEN
1816: cep_standard.debug('EXCEPTION: ce_validate_account ' ||X_COUNTRY_NAME );
1817: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
1818: fnd_message.set_token('PROCEDURE', 'CE_VALIDATE_BANKINFO.ce_validate_account');
1819: fnd_msg_pub.add;
1820: RAISE;
1821: END CE_VALIDATE_ACCOUNT;
1822:
1854: l_count_before_custom NUMBER; -- 9250566: Added
1855: l_count_after_custom NUMBER; -- 9250566: Added
1856:
1857: BEGIN
1858: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_bank');
1859: -- initialize API return status to success.
1860: x_return_status := fnd_api.g_ret_sts_success;
1861:
1862: COUNTRY_NAME := X_COUNTRY_NAME;
1879:
1880: cep_standard.debug('X_PASS_MAND_CHECK: '|| X_PASS_MAND_CHECK);
1881:
1882: IF (COUNTRY_NAME = 'ES') THEN
1883: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_ES(
1884: X_BANK_NUMBER,
1885: X_PASS_MAND_CHECK,
1886: l_value_out);
1887:
1885: X_PASS_MAND_CHECK,
1886: l_value_out);
1887:
1888: ELSIF (COUNTRY_NAME = 'FR') THEN
1889: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_FR(
1890: X_BANK_NUMBER,
1891: X_PASS_MAND_CHECK,
1892: l_value_out);
1893:
1891: X_PASS_MAND_CHECK,
1892: l_value_out);
1893:
1894: ELSIF (COUNTRY_NAME = 'PT') THEN
1895: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_PT(
1896: X_BANK_NUMBER,
1897: X_PASS_MAND_CHECK);
1898:
1899: ELSIF (COUNTRY_NAME = 'BR') THEN
1896: X_BANK_NUMBER,
1897: X_PASS_MAND_CHECK);
1898:
1899: ELSIF (COUNTRY_NAME = 'BR') THEN
1900: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_BR(
1901: X_BANK_NUMBER,
1902: X_PASS_MAND_CHECK,
1903: l_value_out);
1904:
1903: l_value_out);
1904:
1905: -- Added 5/14/02
1906: ELSIF (COUNTRY_NAME = 'DE') THEN
1907: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_DE(X_BANK_NUMBER);
1908:
1909: ELSIF (COUNTRY_NAME = 'GR') THEN
1910: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_GR(X_BANK_NUMBER);
1911:
1906: ELSIF (COUNTRY_NAME = 'DE') THEN
1907: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_DE(X_BANK_NUMBER);
1908:
1909: ELSIF (COUNTRY_NAME = 'GR') THEN
1910: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_GR(X_BANK_NUMBER);
1911:
1912: ELSIF (COUNTRY_NAME = 'IS') THEN
1913: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_IS(
1914: X_BANK_NUMBER,
1909: ELSIF (COUNTRY_NAME = 'GR') THEN
1910: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_GR(X_BANK_NUMBER);
1911:
1912: ELSIF (COUNTRY_NAME = 'IS') THEN
1913: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_IS(
1914: X_BANK_NUMBER,
1915: l_value_out);
1916:
1917: ELSIF (COUNTRY_NAME = 'IE') THEN
1914: X_BANK_NUMBER,
1915: l_value_out);
1916:
1917: ELSIF (COUNTRY_NAME = 'IE') THEN
1918: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_IE(X_BANK_NUMBER);
1919:
1920: ELSIF (COUNTRY_NAME = 'IT') THEN
1921: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_IT(
1922: X_BANK_NUMBER,
1917: ELSIF (COUNTRY_NAME = 'IE') THEN
1918: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_IE(X_BANK_NUMBER);
1919:
1920: ELSIF (COUNTRY_NAME = 'IT') THEN
1921: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_IT(
1922: X_BANK_NUMBER,
1923: X_PASS_MAND_CHECK);
1924:
1925: ELSIF (COUNTRY_NAME = 'LU') THEN
1922: X_BANK_NUMBER,
1923: X_PASS_MAND_CHECK);
1924:
1925: ELSIF (COUNTRY_NAME = 'LU') THEN
1926: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_LU(X_BANK_NUMBER);
1927:
1928: ELSIF (COUNTRY_NAME = 'PL') THEN
1929: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_PL(X_BANK_NUMBER);
1930:
1925: ELSIF (COUNTRY_NAME = 'LU') THEN
1926: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_LU(X_BANK_NUMBER);
1927:
1928: ELSIF (COUNTRY_NAME = 'PL') THEN
1929: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_PL(X_BANK_NUMBER);
1930:
1931: ELSIF (COUNTRY_NAME = 'SE') THEN
1932: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_SE(X_BANK_NUMBER);
1933:
1928: ELSIF (COUNTRY_NAME = 'PL') THEN
1929: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_PL(X_BANK_NUMBER);
1930:
1931: ELSIF (COUNTRY_NAME = 'SE') THEN
1932: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_SE(X_BANK_NUMBER);
1933:
1934: ELSIF (COUNTRY_NAME = 'CH') THEN
1935: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_CH(X_BANK_NUMBER);
1936:
1931: ELSIF (COUNTRY_NAME = 'SE') THEN
1932: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_SE(X_BANK_NUMBER);
1933:
1934: ELSIF (COUNTRY_NAME = 'CH') THEN
1935: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_CH(X_BANK_NUMBER);
1936:
1937: ELSIF (COUNTRY_NAME = 'GB') THEN
1938: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_GB(X_BANK_NUMBER);
1939:
1934: ELSIF (COUNTRY_NAME = 'CH') THEN
1935: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_CH(X_BANK_NUMBER);
1936:
1937: ELSIF (COUNTRY_NAME = 'GB') THEN
1938: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_GB(X_BANK_NUMBER);
1939:
1940: ELSIF (COUNTRY_NAME = 'CO') THEN
1941: -- 10171134
1942: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_CO(
1938: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_GB(X_BANK_NUMBER);
1939:
1940: ELSIF (COUNTRY_NAME = 'CO') THEN
1941: -- 10171134
1942: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_CO(
1943: X_COUNTRY_NAME,
1944: X_BANK_NAME ,
1945: X_TAX_PAYER_ID,
1946: X_BANK_ID);
1946: X_BANK_ID);
1947:
1948: -- Added 10/19/04
1949: ELSIF (COUNTRY_NAME = 'AU') THEN
1950: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_AU(X_BANK_NUMBER);
1951:
1952: ELSIF (COUNTRY_NAME = 'IL') THEN
1953: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_IL(
1954: X_BANK_NUMBER,
1949: ELSIF (COUNTRY_NAME = 'AU') THEN
1950: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_AU(X_BANK_NUMBER);
1951:
1952: ELSIF (COUNTRY_NAME = 'IL') THEN
1953: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_IL(
1954: X_BANK_NUMBER,
1955: X_PASS_MAND_CHECK);
1956:
1957: ELSIF (COUNTRY_NAME = 'NZ') THEN
1954: X_BANK_NUMBER,
1955: X_PASS_MAND_CHECK);
1956:
1957: ELSIF (COUNTRY_NAME = 'NZ') THEN
1958: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_NZ(
1959: X_BANK_NUMBER,
1960: X_PASS_MAND_CHECK);
1961:
1962: ELSIF (COUNTRY_NAME = 'JP') THEN
1959: X_BANK_NUMBER,
1960: X_PASS_MAND_CHECK);
1961:
1962: ELSIF (COUNTRY_NAME = 'JP') THEN
1963: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_JP(
1964: X_BANK_NUMBER,
1965: X_BANK_NAME_ALT,
1966: X_PASS_MAND_CHECK);
1967: -- 8266356: Added
1965: X_BANK_NAME_ALT,
1966: X_PASS_MAND_CHECK);
1967: -- 8266356: Added
1968: ELSIF (COUNTRY_NAME = 'AT') THEN
1969: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_AT(
1970: X_BANK_NUMBER,
1971: X_PASS_MAND_CHECK,
1972: l_value_out);
1973: END IF; /* country check for bank */
1975: /* UNIQUE VALIDATION CHECK for bank */
1976: cep_standard.debug('UNIQUE VALIDATION CHECK for bank' );
1977:
1978: IF (COUNTRY_NAME = 'JP') THEN
1979: cep_standard.debug('call CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BANK_JP');
1980: CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BANK_JP(
1981: X_COUNTRY_NAME,
1982: X_BANK_NUMBER ,
1983: X_BANK_NAME ,
1976: cep_standard.debug('UNIQUE VALIDATION CHECK for bank' );
1977:
1978: IF (COUNTRY_NAME = 'JP') THEN
1979: cep_standard.debug('call CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BANK_JP');
1980: CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BANK_JP(
1981: X_COUNTRY_NAME,
1982: X_BANK_NUMBER ,
1983: X_BANK_NAME ,
1984: X_BANK_NAME_ALT,
2038: IF X_MSG_COUNT > 0 THEN
2039: x_return_status := fnd_api.g_ret_sts_error;
2040: END IF;
2041:
2042: cep_standard.debug('CE_VALIDATE_BANKINFO.ce_validate_bank - P_COUNT: '||X_MSG_COUNT);
2043: cep_standard.debug('X_VALUE_OUT: '|| X_VALUE_OUT);
2044: cep_standard.debug('<
2046: EXCEPTION
2040: END IF;
2041:
2042: cep_standard.debug('CE_VALIDATE_BANKINFO.ce_validate_bank - P_COUNT: '||X_MSG_COUNT);
2043: cep_standard.debug('X_VALUE_OUT: '|| X_VALUE_OUT);
2044: cep_standard.debug('<
2046: EXCEPTION
2047: WHEN OTHERS THEN
2048: cep_standard.debug('CE_VALIDATE_BANKINFO.ce_validate_bank ' ||X_COUNTRY_NAME );
2044: cep_standard.debug('<
2046: EXCEPTION
2047: WHEN OTHERS THEN
2048: cep_standard.debug('CE_VALIDATE_BANKINFO.ce_validate_bank ' ||X_COUNTRY_NAME );
2049: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
2050: fnd_message.set_token('PROCEDURE', 'CE_VALIDATE_BANKINFO.cd_validate_bank');
2051: fnd_msg_pub.add;
2052: RAISE;
2046: EXCEPTION
2047: WHEN OTHERS THEN
2048: cep_standard.debug('CE_VALIDATE_BANKINFO.ce_validate_bank ' ||X_COUNTRY_NAME );
2049: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
2050: fnd_message.set_token('PROCEDURE', 'CE_VALIDATE_BANKINFO.cd_validate_bank');
2051: fnd_msg_pub.add;
2052: RAISE;
2053: END CE_VALIDATE_BANK;
2054:
2099: field_name VARCHAR2(100) DEFAULT NULL;
2100: mesg_name VARCHAR2(100) DEFAULT NULL;
2101: length_val VARCHAR2(100) DEFAULT NULL;
2102: BEGIN
2103: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_FAILED_CHECK');
2104:
2105: -- Setting the field name as per call --
2106: IF p_Field = 'ACCOUNT_NUM' THEN field_token := 'CE_TOKEN_ACCOUNT_NUM';
2107: ELSIF p_Field = 'ACCOUNT_SUFFIX' THEN field_token := 'CE_TOKEN_ACCOUNT_SUFFIX';
2155:
2156: -- populate the message queue
2157: FND_MSG_PUB.add;
2158:
2159: cep_standard.debug('<
2161:
2162: /* --------------------------------------------------------------------
2163: | PRIVATE PROCEDURE |
2180:
2181: mesg_name VARCHAR2(30);
2182:
2183: BEGIN
2184: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_FAILED_MANDATORY');
2185:
2186: IF p_Field = 'BANK_NUM' THEN mesg_name := 'CE_ENTER_BANK_NUM';
2187: ELSIF p_Field = 'BRANCH_NUM' THEN mesg_name := 'CE_ENTER_BRANCH_NUM';
2188: ELSIF p_Field = 'TAX_PAYER_ID' THEN mesg_name := 'CE_ENTER_TAX_PAYER_ID';
2196:
2197: FND_MESSAGE.set_name('CE', mesg_name);
2198: FND_MSG_PUB.add;
2199:
2200: cep_standard.debug('<
2202:
2203: /* --------------------------------------------------------------------
2204: | PRIVATE PROCEDURE |
2234: ac_value VARCHAR2(30);
2235: br_value VARCHAR2(30);
2236:
2237: BEGIN
2238: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_cd_pt');
2239:
2240: -- 7582842: Disable validations using profile option
2241: IF CE_DISABLE_VALIDATION THEN
2242: cep_standard.debug('validations disabled. no check done');
2287: ELSE
2288: ce_failed_check('CHECK_DIGIT','LENGTH','2');
2289: END IF; /* end of length check */
2290:
2291: cep_standard.debug('<
2293:
2294:
2295: /* ---------------------------------------------------------------------
2311: ac_value VARCHAR2(30);
2312: br_value VARCHAR2(30);
2313:
2314: BEGIN
2315: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_cd_es');
2316:
2317: -- 7582842: Disable validations using profile option
2318: IF CE_DISABLE_VALIDATION THEN
2319: cep_standard.debug('validations disabled. no check done');
2372: ELSE
2373: ce_failed_check('CHECK_DIGIT','NUMERIC');
2374: END IF; /* end of numeric check */
2375:
2376: cep_standard.debug('<
2378:
2379: /* ---------------------------------------------------------------------
2380: | CD Validation: FRANCE |
2397: br_value varchar2(30);
2398:
2399:
2400: BEGIN
2401: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_cd_fr');
2402:
2403: -- 7582842: Disable validations using profile option
2404: IF CE_DISABLE_VALIDATION THEN
2405: cep_standard.debug('validations disabled. no check done');
2433: ELSE
2434: ce_failed_check('CHECK_DIGIT','LENGTH','2');
2435: END IF; /* end of length check */
2436:
2437: cep_standard.debug('<
2439: END CE_VALIDATE_CD_FR;
2440:
2441: /* ---------------------------------------------------------------------
2450: cd_value VARCHAR2(50);
2451: ac_value VARCHAR2(50);
2452:
2453: BEGIN
2454: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_VALIDATE_CD_DE');
2455:
2456: -- 7582842: Disable validations using profile option
2457: IF CE_DISABLE_VALIDATION THEN
2458: cep_standard.debug('validations disabled. no check done');
2480: ce_failed_check('CHECK_DIGIT','LENGTH','1');
2481: END IF; /* end of length check */
2482: END IF;
2483:
2484: cep_standard.debug('<
2486:
2487:
2488: /* ---------------------------------------------------------------------
2500: calc_value NUMBER(30);
2501: cd_value VARCHAR2(20);
2502:
2503: BEGIN
2504: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_cd_gr');
2505:
2506: -- 7582842: Disable validations using profile option
2507: IF CE_DISABLE_VALIDATION THEN
2508: cep_standard.debug('validations disabled. no check done');
2522: ELSE
2523: ce_failed_check('CHECK_DIGIT','LENGTH','1');
2524: END IF; /* end of length check */
2525:
2526: cep_standard.debug('<
2528:
2529: /* ---------------------------------------------------------------------
2530: | CD Validation: ICELAND |
2539: cd_value VARCHAR2(50);
2540: ac_value VARCHAR2(50);
2541:
2542: BEGIN
2543: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_cd_is');
2544:
2545: -- 7582842: Disable validations using profile option
2546: IF CE_DISABLE_VALIDATION THEN
2547: cep_standard.debug('validations disabled. no check done');
2564: ELSE
2565: ce_failed_check('CHECK_DIGIT','LENGTH','1');
2566: END IF; /* end of length check */
2567:
2568: cep_standard.debug('<
2570:
2571: /* ---------------------------------------------------------------------
2572: | CD Validation: ITALY |
2700: /* MAIN SECTION */
2701: /****************/
2702: BEGIN
2703:
2704: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_cd_it');
2705: cep_standard.debug('Xi_X_ACCOUNT_NUMBER: '||Xi_X_ACCOUNT_NUMBER);
2706:
2707: -- 7582842: Disable validations using profile option
2708: IF CE_DISABLE_VALIDATION THEN
2753: ELSE
2754: ce_failed_check('CHECK_DIGIT','LENGTH','1');
2755: END IF; /* end of length check */
2756:
2757: cep_standard.debug('<
2759:
2760: /* ---------------------------------------------------------------------
2761: | CD Validation: LUXEMBOURG |
2770: account_value VARCHAR2(30);
2771: check_digit VARCHAR2(2);
2772:
2773: BEGIN
2774: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_cd_lu');
2775:
2776: -- 7582842: Disable validations using profile option
2777: IF CE_DISABLE_VALIDATION THEN
2778: cep_standard.debug('validations disabled. no check done');
2794: ELSE
2795: ce_failed_check('CHECK_DIGIT','LENGTH','2');
2796: END IF; /* end of length check */
2797:
2798: cep_standard.debug('<
2800:
2801: /* ---------------------------------------------------------------------
2802: | CD Validation: SWEDEN |
2809: calc_value number(30);
2810: cd_value varchar2(20);
2811:
2812: BEGIN
2813: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_cd_se');
2814:
2815: -- 7582842: Disable validations using profile option
2816: IF CE_DISABLE_VALIDATION THEN
2817: cep_standard.debug('validations disabled. no check done');
2833: ELSE
2834: ce_failed_check('CHECK_DIGIT','LENGTH','1');
2835: END IF; /* end of length check */
2836:
2837: cep_standard.debug('<
2839:
2840: -- 9249372: Added ce_validate_cd_fi
2841: /* ---------------------------------------------------------------------
2857: int_val NUMBER;
2858: weighted_sum NUMBER;
2859: digit NUMBER;
2860: BEGIN
2861: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_cd_fi');
2862:
2863: -- 7582842: Disable validations using profile option
2864: IF CE_DISABLE_VALIDATION THEN
2865: cep_standard.debug('validations disabled. no check done');
2929: ELSE
2930: ce_failed_check('CHECK_DIGIT','LENGTH','1');
2931: END IF; /* length check */
2932:
2933: cep_standard.debug('<
2935:
2936:
2937:
2965: branch_value VARCHAR2(30);
2966: numeric_result VARCHAR2(40);
2967:
2968: BEGIN
2969: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_branch_at');
2970:
2971: Xo_VALUE_OUT := Xi_BRANCH_NUMBER;
2972:
2973: -- 7582842: Disable validations using profile option
2997: ce_failed_check('BRANCH_NUM','LENGTH','5');
2998: END IF; /* end of length check */
2999: END IF;
3000:
3001: cep_standard.debug('<
3003:
3004: /* ---------------------------------------------------------------------
3005: | Branch Number Validation: PORTUGAL |
3011: branch_value VARCHAR2(30);
3012: numeric_result VARCHAR2(40);
3013:
3014: BEGIN
3015: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_branch_pt');
3016:
3017: -- 7582842: Disable validations using profile option
3018: IF CE_DISABLE_VALIDATION THEN
3019: cep_standard.debug('validations disabled. no check done');
3042: ce_failed_check('BRANCH_NUM','LENGTH','4');
3043: END IF; /* end of length check */
3044: END IF; /* end of mandatory check */
3045:
3046: cep_standard.debug('<
3048:
3049: /* ---------------------------------------------------------------------
3050: | Branch Number Validation: FRANCE |
3058: branch_value VARCHAR2(30);
3059: numeric_result VARCHAR2(40);
3060:
3061: BEGIN
3062: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_branch_fr');
3063:
3064:
3065: Xo_VALUE_OUT := Xi_BRANCH_NUMBER;
3066: -- 7582842: Disable validations using profile option
3092: END IF; /* end of numeric check */
3093: END IF; /* end of length check */
3094: END IF; /* end of mandatory check */
3095:
3096: cep_standard.debug('<
3098:
3099: /* ---------------------------------------------------------------------
3100: | Branch Number Validation: SPAIN |
3108: BRANCH_VALUE varchar2(30);
3109: NUMERIC_RESULT varchar2(40);
3110:
3111: BEGIN
3112: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_branch_es');
3113:
3114: Xo_VALUE_OUT := Xi_BRANCH_NUMBER;
3115: -- 7582842: Disable validations using profile option
3116: IF CE_DISABLE_VALIDATION THEN
3142: END IF; /* end of numeric check */
3143: END IF; /* end of length check */
3144: END IF; /* end of mandatory check */
3145:
3146: cep_standard.debug('<
3148:
3149: /* ---------------------------------------------------------------------
3150: | Branch Number Validation: BRAZIL |
3158: branch_value VARCHAR2(30);
3159: numeric_result VARCHAR2(40);
3160:
3161: BEGIN
3162: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_branch_br');
3163:
3164: -- 6083246: Brazil Branch number is not standardized and there should be
3165: -- no validation for this field.
3166: Xo_VALUE_OUT := Xi_BRANCH_NUMBER ;
3200: END IF; -- end of length check
3201: END IF; -- end of mandatory check
3202: ----*/
3203:
3204: cep_standard.debug('<
3206:
3207: /* ---------------------------------------------------------------------
3208: | Branch Number Validation: GERMANY |
3215: branch_num VARCHAR2(30);
3216: numeric_result VARCHAR2(40);
3217:
3218: BEGIN
3219: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_branch_de');
3220:
3221: -- 7582842: Disable validations using profile option
3222: IF CE_DISABLE_VALIDATION THEN
3223: cep_standard.debug('validations disabled. no check done');
3244: ce_failed_check('BRANCH_NUM','LENGTH','8');
3245: END IF; /* end of length check */
3246: END IF;
3247:
3248: cep_standard.debug('<
3250:
3251: /* ---------------------------------------------------------------------
3252: | Branch Number Validation: GREECE |
3258: branch_value VARCHAR2(30);
3259: numeric_result VARCHAR2(40);
3260:
3261: BEGIN
3262: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_branch_gr');
3263:
3264: -- 7582842: Disable validations using profile option
3265: IF CE_DISABLE_VALIDATION THEN
3266: cep_standard.debug('validations disabled. no check done');
3285: END IF; /* end of numeric check */
3286: END IF; /* end of length check */
3287: END IF; /* end of null check */
3288:
3289: cep_standard.debug('<
3291:
3292: /* ---------------------------------------------------------------------
3293: | Branch Number Validation: ICELAND |
3301: branch_num VARCHAR2(60);
3302: numeric_result VARCHAR2(40);
3303:
3304: BEGIN
3305: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_branch_is');
3306:
3307: Xo_VALUE_OUT := Xi_BRANCH_NUMBER;
3308: -- 7582842: Disable validations using profile option
3309: IF CE_DISABLE_VALIDATION THEN
3335: ELSE
3336: ce_passed_check('BRANCH','IS');
3337: END IF; /* end of null check */
3338:
3339: cep_standard.debug('<
3341:
3342:
3343: /* ---------------------------------------------------------------------
3351: branch_num VARCHAR2(60);
3352: numeric_result VARCHAR2(40);
3353:
3354: BEGIN
3355: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_branch_ie');
3356:
3357: -- 7582842: Disable validations using profile option
3358: IF CE_DISABLE_VALIDATION THEN
3359: cep_standard.debug('validations disabled. no check done');
3383: ELSE
3384: ce_passed_check('BRANCH','IE');
3385: END IF; /* end of null check */
3386:
3387: cep_standard.debug('<
3389:
3390: /* ---------------------------------------------------------------------
3391: | Branch Number Validation: ITALY |
3398: branch_value VARCHAR2(30);
3399: numeric_result VARCHAR2(40);
3400:
3401: BEGIN
3402: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_branch_it');
3403:
3404: -- 7582842: Disable validations using profile option
3405: IF CE_DISABLE_VALIDATION THEN
3406: cep_standard.debug('validations disabled. no check done');
3429: ce_failed_check('BRANCH_NUM','LENGTH','5');
3430: END IF; /* end of length check */
3431: END IF; /* end of mandatory check */
3432:
3433: cep_standard.debug('<
3435:
3436: /* ---------------------------------------------------------------------
3437: | Branch Number Validation: LUXEMBOURG |
3443: branch_num VARCHAR2(60);
3444: numeric_result VARCHAR2(40);
3445:
3446: BEGIN
3447: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_branch_lu');
3448:
3449: -- 7582842: Disable validations using profile option
3450: IF CE_DISABLE_VALIDATION THEN
3451: cep_standard.debug('validations disabled. no check done');
3475: ELSE
3476: ce_passed_check('BRANCH','LU');
3477: END IF; /* end of null check */
3478:
3479: cep_standard.debug('<
3481:
3482: /* ---------------------------------------------------------------------
3483: | Branch Number Validation: POLAND |
3491: numeric_result VARCHAR2(40);
3492: cal_cd1 NUMBER;
3493:
3494: BEGIN
3495: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_branch_pl');
3496:
3497: -- 7582842: Disable validations using profile option
3498: IF CE_DISABLE_VALIDATION THEN
3499: cep_standard.debug('validations disabled. no check done');
3524: ELSE
3525: ce_passed_check('BRANCH','PL');
3526: END IF; /* end of null check */
3527:
3528: cep_standard.debug('<
3530:
3531: /* ---------------------------------------------------------------------
3532: | Branch Number Validation: SWEDEN |
3539: branch_num VARCHAR2(60);
3540: numeric_result VARCHAR2(40);
3541:
3542: BEGIN
3543: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_branch_se');
3544:
3545: -- 7582842: Disable validations using profile option
3546: IF CE_DISABLE_VALIDATION THEN
3547: cep_standard.debug('validations disabled. no check done');
3575: ELSE
3576: ce_passed_check('BRANCH','SE');
3577: END IF; /* end of null check */
3578:
3579: cep_standard.debug('<
3581:
3582:
3583: /* ---------------------------------------------------------------------
3591: branch_num VARCHAR2(60);
3592: numeric_result VARCHAR2(40);
3593:
3594: BEGIN
3595: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_branch_ch');
3596:
3597: -- 7582842: Disable validations using profile option
3598: IF CE_DISABLE_VALIDATION THEN
3599: cep_standard.debug('validations disabled. no check done');
3631: ELSE
3632: ce_passed_check('BRANCH','CH');
3633: END IF; /* end of null check */
3634:
3635: cep_standard.debug('<
3637:
3638: /* ---------------------------------------------------------------------
3639: | Branch Number Validation: UNITED KINGDOM |
3646: branch_num VARCHAR2(60);
3647: numeric_result VARCHAR2(40);
3648:
3649: BEGIN
3650: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_branch_gb');
3651:
3652: -- 7582842: Disable validations using profile option
3653: IF CE_DISABLE_VALIDATION THEN
3654: cep_standard.debug('validations disabled. no check done');
3677: ELSE
3678: ce_passed_check('BRANCH','GB');
3679: END IF; /* end of null check */
3680:
3681: cep_standard.debug('<
3683:
3684: /* ---------------------------------------------------------------------
3685: | Branch Number Validation: UNITED STATES |
3698: l_mod_value NUMBER;
3699: numeric_result VARCHAR2(40);
3700:
3701: BEGIN
3702: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_branch_us');
3703:
3704: Xo_VALUE_OUT := Xi_BRANCH_NUMBER;
3705: -- 7582842: Disable validations using profile option
3706: IF CE_DISABLE_VALIDATION THEN
3762: ELSE
3763: ce_passed_check('BRANCH','US');
3764: END IF; /* end of null check */
3765:
3766: cep_standard.debug('<
3768:
3769: /* ---------------------------------------------------------------------
3770: | Branch Number Validation: AUSTRALIA |
3781: valid_branch_length number;
3782: numeric_result varchar2(40);
3783:
3784: BEGIN
3785: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_branch_au');
3786:
3787: -- 7582842: Disable validations using profile option
3788: IF CE_DISABLE_VALIDATION THEN
3789: cep_standard.debug('validations disabled. no check done');
3832: END IF; /* end of length check */
3833:
3834: END IF; /* end of mandatory check */
3835:
3836: cep_standard.debug('<
3838:
3839: /* ---------------------------------------------------------------------
3840: | Branch Number Validation: ISRAEL |
3847: branch_value VARCHAR2(30);
3848: numeric_result VARCHAR2(40);
3849:
3850: BEGIN
3851: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_branch_il');
3852:
3853: -- 7582842: Disable validations using profile option
3854: IF CE_DISABLE_VALIDATION THEN
3855: cep_standard.debug('validations disabled. no check done');
3878: ce_failed_check('BRANCH_NUM','LENGTH','3');
3879: END IF; /* end of length check */
3880: END IF; /* end of mandatory check */
3881:
3882: cep_standard.debug('<
3884:
3885: /* ---------------------------------------------------------------------
3886: | Branch Number Validation: NEW ZEALAND |
3893: branch_value VARCHAR2(30);
3894: numeric_result VARCHAR2(40);
3895:
3896: BEGIN
3897: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_branch_nz');
3898:
3899: -- 7582842: Disable validations using profile option
3900: IF CE_DISABLE_VALIDATION THEN
3901: cep_standard.debug('validations disabled. no check done');
3925: ce_failed_check('BRANCH_NUM','LENGTH','4');
3926: END IF; /* end of length check */
3927: END IF; /* end of mandatory check */
3928:
3929: cep_standard.debug('<
3931:
3932: /* ---------------------------------------------------------------------
3933: | Branch Number Validation: JAPAN |
3941: branch_value VARCHAR2(30);
3942: numeric_result VARCHAR2(40);
3943:
3944: BEGIN
3945: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_branch_jp');
3946:
3947: -- 7582842: This validation fires irrespective of disable profile
3948: -- Check that Branch Name Alt has been entered --
3949: IF (Xi_BRANCH_NAME_ALT IS NULL)
3980: ce_failed_check('BRANCH_NUM','LENGTH','3');
3981: END IF; /* end of length check */
3982: END IF; /* end of mandatory check */
3983:
3984: cep_standard.debug('<
3986:
3987: -- Bug 9249372: Added
3988: /* ---------------------------------------------------------------------
3994:
3995: branch_value VARCHAR2(30);
3996: numeric_result VARCHAR2(40);
3997: BEGIN
3998: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_branch_fi');
3999:
4000: -- 7582842: Disable validations using profile option
4001: IF CE_DISABLE_VALIDATION THEN
4002: cep_standard.debug('branch number validations disabled.');
4022: ce_failed_check('BRANCH_NUM','LENGTH','6');
4023: END IF; /* end of length check */
4024: END IF; /* end of mandatory check */
4025:
4026: cep_standard.debug('<
4028:
4029: /* --------------------------------------------------------------------
4030: | PRIVATE PROCEDURE |
4056: account_value VARCHAR2(30);
4057: numeric_result VARCHAR2(30);
4058:
4059: BEGIN
4060: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_account_at');
4061:
4062: Xo_VALUE_OUT := Xi_ACCOUNT_NUMBER ;
4063: -- 7582842: Disable validations using profile option
4064: IF CE_DISABLE_VALIDATION THEN
4082: THEN
4083: ce_failed_check('ACCOUNT_NUM','NUMERIC');
4084: END IF;
4085:
4086: cep_standard.debug('<
4088:
4089: /* ---------------------------------------------------------------------
4090: | Account Number Validation: PORTUGAL |
4096: Xo_VALUE_OUT out nocopy varchar2
4097: ) AS
4098: account_value VARCHAR2(30);
4099: BEGIN
4100: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_account_pt');
4101:
4102: Xo_VALUE_OUT := Xi_ACCOUNT_NUMBER;
4103: -- 7582842: Disable validations using profile option
4104: IF CE_DISABLE_VALIDATION THEN
4119: THEN
4120: ce_failed_check('ACCOUNT_NUM','NUMERIC');
4121: END IF;
4122:
4123: cep_standard.debug('<
4125:
4126: /* ---------------------------------------------------------------------
4127: | Account Number Validation: BELGIUM |
4139: check_digit VARCHAR2(2);
4140: conced VARCHAR2(30);
4141:
4142: BEGIN
4143: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_account_be');
4144:
4145: -- 7582842: Disable validations using profile option
4146: IF CE_DISABLE_VALIDATION THEN
4147: cep_standard.debug('validations disabled. no check done');
4194: ELSE
4195: ce_failed_check('ACCOUNT_NUM','LENGTH','12');
4196: END IF; /* end of length check */
4197:
4198: cep_standard.debug('<
4200:
4201:
4202: /* ---------------------------------------------------------------------
4210: account_value varchar2(30);
4211: numeric_result varchar2(30);
4212:
4213: BEGIN
4214: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_account_dk');
4215:
4216: Xo_VALUE_OUT := Xi_ACCOUNT_NUMBER;
4217: -- 7582842: Disable validations using profile option
4218: IF CE_DISABLE_VALIDATION THEN
4235: ELSE
4236: ce_failed_check('ACCOUNT_NUM','LENGTH_MAX','10');
4237: END IF; /* end of length check */
4238:
4239: cep_standard.debug('<
4241:
4242: /* ---------------------------------------------------------------------
4243: | Account Number Validation: FRANCE |
4251:
4252: ACCOUNT_VALUE varchar2(30);
4253:
4254: BEGIN
4255: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_account_fr');
4256:
4257: Xo_VALUE_OUT := Xi_ACCOUNT_NUMBER;
4258: -- 7582842: Disable validations using profile option
4259: IF CE_DISABLE_VALIDATION THEN
4274: THEN
4275: ce_failed_check('ACCOUNT_NUM','ALPHANUM');
4276: END IF;
4277:
4278: cep_standard.debug('<
4280:
4281:
4282: /* ---------------------------------------------------------------------
4313: /**************************/
4314: /* MAIN SECTION */
4315: /**************************/
4316: BEGIN
4317: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_account_nl');
4318:
4319: -- 7582842: Disable validations using profile option
4320: IF CE_DISABLE_VALIDATION THEN
4321: cep_standard.debug('validations disabled. no check done');
4400: END IF; /* end of length check */
4401:
4402: END IF; /* end of 'Postgiro' check */
4403:
4404: cep_standard.debug('<
4406:
4407: /* ---------------------------------------------------------------------
4408: | Account Number Validation: SPAIN |
4416:
4417: account_value VARCHAR2(30);
4418:
4419: BEGIN
4420: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_account_es');
4421:
4422: Xo_VALUE_OUT := Xi_ACCOUNT_NUMBER; -- 12998039: Prevent auto-uppercase conversion
4423: ACCOUNT_VALUE := upper(Xi_ACCOUNT_NUMBER);
4424:
4439: THEN
4440: ce_failed_check('ACCOUNT_NUM','NUMERIC');
4441: END IF;
4442:
4443: cep_standard.debug('<
4445:
4446: /* ---------------------------------------------------------------------+
4447: | Account Number Validation: NORWAY |
4457: calc_cd NUMBER;
4458: check_digit VARCHAR2(20);
4459:
4460: BEGIN
4461: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_account_no');
4462:
4463: -- 7582842: Disable validations using profile option
4464: IF CE_DISABLE_VALIDATION THEN
4465: cep_standard.debug('validations disabled. no check done');
4515: ELSE
4516: ce_failed_check('ACCOUNT_NUM','LENGTH','11');
4517: END IF; /* end of length check */
4518:
4519: cep_standard.debug('<
4521:
4522: /* ---------------------------------------------------------------------
4523: | Account Number Validation: FINLAND |
4534: weighted_sum NUMBER;
4535: digit NUMBER;
4536:
4537: BEGIN
4538: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_account_fi');
4539:
4540: -- 7582842: Disable validations using profile option
4541: IF CE_DISABLE_VALIDATION THEN
4542: cep_standard.debug('validations disabled. no check done');
4612: --Bug 14635098: Token parameter changed to 14
4613: ce_failed_check('ACCOUNT_NUM','LENGTH_MAX','14');
4614: END IF; -- End Max Length check
4615:
4616: cep_standard.debug('<
4618:
4619: /* ---------------------------------------------------------------------
4620: | Account Number Validation: GERMANY |
4628: account_value VARCHAR2(60);
4629: numeric_result VARCHAR2(40);
4630:
4631: BEGIN
4632: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_DE');
4633:
4634: Xo_VALUE_OUT := Xi_ACCOUNT_NUMBER; -- 12998039: Prevent auto-uppercase conversion
4635: account_value := upper(Xi_ACCOUNT_NUMBER );
4636:
4651: THEN
4652: ce_failed_check('ACCOUNT_NUM','NUMERIC');
4653: END IF;
4654:
4655: cep_standard.debug('<
4657:
4658: /* ---------------------------------------------------------------------
4659: | Account Number Validation: GREECE |
4666: account_value VARCHAR2(30);
4667: numeric_result VARCHAR2(40);
4668:
4669: BEGIN
4670: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_GR');
4671:
4672: Xo_VALUE_OUT := Xi_ACCOUNT_NUMBER;
4673: -- 7582842: Disable validations using profile option
4674: IF CE_DISABLE_VALIDATION THEN
4691: Xo_VALUE_OUT := lpad(account_value,16,0);
4692: ce_passed_check('ACCOUNT','GR');
4693: END IF; /* end of length check */
4694:
4695: cep_standard.debug('<
4697:
4698: /* ---------------------------------------------------------------------
4699: | Account Number Validation: ICELAND |
4710: ac_cd_value VARCHAR2(50);
4711: numeric_result VARCHAR2(40);
4712:
4713: BEGIN
4714: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_account_is');
4715:
4716: Xo_VALUE_OUT := Xi_ACCOUNT_NUMBER;
4717: -- 7582842: Disable validations using profile option
4718: IF CE_DISABLE_VALIDATION THEN
4765: ELSE
4766: ce_failed_check('ACCOUNT_NUM','LENGTH_MAX','18');
4767: END IF; /* end of length check */
4768:
4769: cep_standard.debug('<
4771:
4772: /* ---------------------------------------------------------------------
4773: | Account Number Validation: IRELAND |
4779: account_value VARCHAR2(30);
4780: numeric_result VARCHAR2(40);
4781:
4782: BEGIN
4783: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_account_ie');
4784:
4785: -- 7582842: Disable validations using profile option
4786: IF CE_DISABLE_VALIDATION THEN
4787: cep_standard.debug('validations disabled. no check done');
4805: ELSE
4806: ce_failed_check('ACCOUNT_NUM','LENGTH','8');
4807: END IF; /* end of length check */
4808:
4809: cep_standard.debug('<
4811:
4812: /* ---------------------------------------------------------------------
4813: | Account Number Validation: ITALY |
4819:
4820: account_value VARCHAR2(50);
4821:
4822: BEGIN
4823: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_account_it');
4824:
4825: Xo_VALUE_OUT := Xi_ACCOUNT_NUMBER;
4826: -- 7582842: Disable validations using profile option
4827: IF CE_DISABLE_VALIDATION THEN
4840: ELSE
4841: ce_failed_check('ACCOUNT_NUM','LENGTH_MAX','12');
4842: END IF; /* end of length check */
4843:
4844: cep_standard.debug('<
4846:
4847: /* ---------------------------------------------------------------------
4848: | Account Number Validation: LUXEMBOURG |
4853: account_value varchar2(30);
4854: numeric_result varchar2(40);
4855:
4856: BEGIN
4857: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_account_lu');
4858:
4859: -- 7582842: Disable validations using profile option
4860: IF CE_DISABLE_VALIDATION THEN
4861: cep_standard.debug('validations disabled. no check done');
4875: -- Bug 7570051 : Correct length token
4876: ce_failed_check('ACCOUNT_NUM','LENGTH','13');
4877: END IF; /* end of length check */
4878:
4879: cep_standard.debug('<
4881:
4882: /* ---------------------------------------------------------------------
4883: | Account Number Validation: POLAND |
4888: ) AS
4889: account_value VARCHAR2(30);
4890:
4891: BEGIN
4892: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_account_pl');
4893:
4894: -- 7582842: Disable validations using profile option
4895: IF CE_DISABLE_VALIDATION THEN
4896: cep_standard.debug('validations disabled. no check done');
4910: THEN
4911: ce_failed_check('ACCOUNT_NUM','NUMERIC');
4912: END IF;
4913:
4914: cep_standard.debug('<
4916:
4917: /* ---------------------------------------------------------------------
4918: | Account Number Validation: SWEDEN |
4923: account_value VARCHAR2(30);
4924: numeric_result VARCHAR2(40);
4925:
4926: BEGIN
4927: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_account_se');
4928:
4929: -- 7582842: Disable validations using profile option
4930: IF CE_DISABLE_VALIDATION THEN
4931: cep_standard.debug('validations disabled. no check done');
4948: ELSE
4949: ce_failed_check('ACCOUNT_NUM','LENGTH_MAX','16'); -- 8246542
4950: END IF; /* end of length check */
4951:
4952: cep_standard.debug('<
4954:
4955: /* ---------------------------------------------------------------------
4956: | Account Number Validation: SWITZERLAND |
4963:
4964: account_value VARCHAR2(30);
4965:
4966: BEGIN
4967: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_account_ch');
4968:
4969: --8707415 Removed mandatory check for the account type, removed the code
4970: -- 7582842: Disable validations using profile option
4971: IF CE_DISABLE_VALIDATION THEN
4984: IF NOT regexp_like(account_value,'^[a-zA-Z0-9]*$') THEN
4985: ce_failed_check('ACCOUNT_NUM','ALPHANUM');
4986: END IF;
4987:
4988: cep_standard.debug('<
4990:
4991: /* ---------------------------------------------------------------------
4992: | Account Number Validation: UNITED KINGDOM |
5001: numeric_result VARCHAR2(40);
5002: l_return_status VARCHAR2(1); ---Bug16234978
5003: branch_num VARCHAR2(8); ---Bug16234978
5004: BEGIN
5005: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_account_gb');
5006:
5007: Xo_VALUE_OUT := Xi_ACCOUNT_NUMBER;
5008: -- 7582842: Disable validations using profile option
5009: IF CE_DISABLE_VALIDATION THEN
5026: /* Bug 16234978 Code change (2/2) starts */
5027: branch_num := upper(replace(Xi_BRANCH_NUMBER,' ',''));
5028: branch_num := replace(branch_num,'-','');
5029: IF branch_num IS NOT NULL then
5030: CE_VALIDATE_BANKINFO.ce_validate_mod_gb(Xi_ACCOUNT_NUMBER => account_value,
5031: Xi_SORT_CODE => branch_num,
5032: Xo_RETURN_STATUS => l_return_status);
5033: END IF;
5034: cep_standard.debug('l_return_status = '||l_return_status);
5044: ELSE
5045: ce_failed_check('ACCOUNT_NUM','LENGTH_MAX','8');
5046: END IF; /* end of length check */
5047:
5048: cep_standard.debug('<
5050:
5051: /* ---------------------------------------------------------------------
5052: | Account Number Validation: BRAZIL |
5058: account_ref VARCHAR2(30);
5059: numeric_result VARCHAR2(40);
5060: l_account_num VARCHAR2(40); -- Bug 16035273
5061: BEGIN
5062: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_account_br');
5063: -- 7582842: Disable validations using profile option
5064: IF CE_DISABLE_VALIDATION THEN -- Bug 11065718
5065: cep_standard.debug('validations disabled. no check done');
5066: RETURN;
5094: END IF;
5095: /* end of length check */
5096: END IF;
5097: /* end of not null check */
5098: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_account_br');
5099: END CE_VALIDATE_ACCOUNT_BR;
5100:
5101: /* ---------------------------------------------------------------------
5102: | Account Number Validation: AUSTRALIA |
5109: account_value VARCHAR2(30);
5110: numeric_result VARCHAR2(40);
5111:
5112: BEGIN
5113: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_account_au');
5114:
5115: -- 7582842: Disable validations using profile option
5116: IF CE_DISABLE_VALIDATION THEN
5117: cep_standard.debug('validations disabled. no check done');
5146: ce_passed_check('ACCOUNT','AU');
5147: END IF; /* end of currency check */
5148: END IF; /* end of length check */
5149:
5150: cep_standard.debug('<
5152:
5153: /* ---------------------------------------------------------------------
5154: | Account Number Validation: ISRAEL |
5160: account_value VARCHAR2(30);
5161: numeric_result VARCHAR2(40);
5162:
5163: BEGIN
5164: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_account_il');
5165:
5166: -- 7582842: Disable validations using profile option
5167: IF CE_DISABLE_VALIDATION THEN
5168: cep_standard.debug('validations disabled. no check done');
5185: ELSE
5186: ce_failed_check('ACCOUNT_NUM','LENGTH_MAX','9');
5187: END IF; /* end of length check */
5188:
5189: cep_standard.debug('<
5191:
5192: /* ---------------------------------------------------------------------
5193: | Account Number Validation: NEW ZEALAND |
5201: account_suffix VARCHAR2(30);
5202: numeric_result VARCHAR2(40);
5203:
5204: BEGIN
5205: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_account_nz');
5206:
5207: -- bug 8416679, relaxed account validations for New Zealand
5208: -- -- check account number
5209: -- account_value := upper(Xi_ACCOUNT_NUMBER );
5249: -- ELSE
5250: -- ce_failed_mandatory('ACCOUNT_SUFFIX');
5251: -- END IF; /* end of mandatory check */
5252: --
5253: cep_standard.debug('<
5255:
5256: /* ---------------------------------------------------------------------
5257: | Account Number Validation: JAPAN |
5261: Xi_ACCOUNT_TYPE in varchar2
5262: ) AS
5263:
5264: BEGIN
5265: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_account_jp');
5266:
5267: -- 7582842: No Checks on Account number. Disable profile option does not
5268: -- apply here.
5269:
5276: ce_failed_mandatory('ACCOUNT_TYPE');
5277: END if;
5278:
5279:
5280: cep_standard.debug('<
5282:
5283: /* --------------------------------------------------------------------
5284: | PRIVATE PROCEDURE |
5310: bank_value VARCHAR2(30);
5311: numeric_result VARCHAR2(40);
5312:
5313: BEGIN
5314: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_bank_es');
5315:
5316: Xo_VALUE_OUT := Xi_BANK_NUMBER;
5317: -- 7582842: Disable validations using profile option
5318: IF CE_DISABLE_VALIDATION THEN
5347: END IF; /* end of numeric check */
5348: END IF; /* end of length check */
5349: END IF; /* end of mandatory check */
5350:
5351: cep_standard.debug('<
5353:
5354: /* ---------------------------------------------------------------------
5355: | Bank Number Validation: FRANCE |
5362: BANK_VALUE varchar2(30);
5363: numeric_result varchar2(40);
5364:
5365: BEGIN
5366: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_bank_fr');
5367:
5368: Xo_VALUE_OUT := Xi_BANK_NUMBER;
5369: -- 7582842: Disable validations using profile option
5370: IF CE_DISABLE_VALIDATION THEN
5402: END IF; /* end of numeric check */
5403: END IF; /* end of length check */
5404: END IF; /* end of mandatory check */
5405:
5406: cep_standard.debug('<
5408: END CE_VALIDATE_BANK_FR;
5409:
5410: /* ---------------------------------------------------------------------
5418: bank_value VARCHAR2(30);
5419: numeric_result VARCHAR2(40);
5420:
5421: BEGIN
5422: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_bank_pt');
5423:
5424: -- 7582842: Disable validations using profile option
5425: IF CE_DISABLE_VALIDATION THEN
5426: cep_standard.debug('validations disabled. no check done');
5452: END IF; /* end of length check */
5453:
5454: END IF; /* end of mandatory check */
5455:
5456: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_bank_pt');
5457: END CE_VALIDATE_BANK_PT;
5458:
5459: /* ---------------------------------------------------------------------
5460: | Bank Number Validation: BRAZIL |
5468: bank_value VARCHAR2(30);
5469: numeric_result VARCHAR2(40);
5470:
5471: BEGIN
5472: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_bank_br');
5473:
5474: Xo_VALUE_OUT := Xi_BANK_NUMBER;
5475: -- 7582842: Disable validations using profile option
5476: IF CE_DISABLE_VALIDATION THEN
5505: END IF; /* end of numeric check */
5506: END IF; /* end of length check */
5507: END IF; /* end of mandatory check */
5508:
5509: cep_standard.debug('<
5511:
5512: /* ---------------------------------------------------------------------
5513: | Bank Number Validation: GERMANY |
5518: BANK_NUM varchar2(30);
5519: numeric_result varchar2(40);
5520:
5521: BEGIN
5522: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_bank_de');
5523:
5524: -- 7582842: Disable validations using profile option
5525: IF CE_DISABLE_VALIDATION THEN
5526: cep_standard.debug('validations disabled. no check done');
5546: ce_failed_check('BANK_NUM','LENGTH','8');
5547: END IF; /* end of length check */
5548: END IF;
5549:
5550: cep_standard.debug('<
5552:
5553: /* ---------------------------------------------------------------------
5554: | Bank Number Validation: GREECE |
5560: BANK_VALUE varchar2(30);
5561: numeric_result varchar2(40);
5562:
5563: BEGIN
5564: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_bank_gr');
5565:
5566: -- 7582842: Disable validations using profile option
5567: IF CE_DISABLE_VALIDATION THEN
5568: cep_standard.debug('validations disabled. no check done');
5589: ce_failed_check('BANK_NUM','LENGTH_MAX', '3');
5590: END IF; /* end of length check */
5591: END IF;
5592:
5593: cep_standard.debug('<
5595:
5596: /* ---------------------------------------------------------------------
5597: | Bank Number Validation: ICELAND |
5604: BANK_NUM varchar2(60);
5605: numeric_result varchar2(40);
5606:
5607: BEGIN
5608: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_bank_is');
5609:
5610: Xo_VALUE_OUT := Xi_BANK_NUMBER;
5611: -- 7582842: Disable validations using profile option
5612: IF CE_DISABLE_VALIDATION THEN
5634: ce_failed_check('BANK_NUM','LENGTH_MAX','4');
5635: END IF; /* end of length check */
5636: END IF;
5637:
5638: cep_standard.debug('<
5640:
5641: /* ---------------------------------------------------------------------
5642: | Bank Number Validation: IRELAND |
5648: bank_num VARCHAR2(60);
5649: numeric_result VARCHAR2(40);
5650:
5651: BEGIN
5652: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_bank_ie');
5653:
5654: -- 7582842: Disable validations using profile option
5655: IF CE_DISABLE_VALIDATION THEN
5656: cep_standard.debug('validations disabled. no check done');
5680: END IF; /* end of length check */
5681:
5682: END IF;
5683:
5684: cep_standard.debug('<
5686:
5687: /* ---------------------------------------------------------------------
5688: | Bank Number Validation: ITALY |
5695: bank_value VARCHAR2(30);
5696: numeric_result VARCHAR2(40);
5697:
5698: BEGIN
5699: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_bank_it');
5700:
5701: -- 7582842: Disable validations using profile option
5702: IF CE_DISABLE_VALIDATION THEN
5703: cep_standard.debug('validations disabled. no check done');
5731: END IF; /* end of length check */
5732:
5733: END IF; /* end of mandatory check */
5734:
5735: cep_standard.debug('<
5737:
5738: /* ---------------------------------------------------------------------
5739: | Bank Number Validation: LUXEMBOURG |
5745: bank_num VARCHAR2(60);
5746: numeric_result VARCHAR2(40);
5747:
5748: BEGIN
5749: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_bank_lu');
5750:
5751: -- 7582842: Disable validations using profile option
5752: IF CE_DISABLE_VALIDATION THEN
5753: cep_standard.debug('validations disabled. no check done');
5778: END IF; /* end of length check */
5779:
5780: END IF;
5781:
5782: cep_standard.debug('<
5784:
5785: /* ---------------------------------------------------------------------
5786: | Bank Number Validation: POLAND |
5793: numeric_result VARCHAR2(40);
5794: cal_cd1 NUMBER;
5795:
5796: BEGIN
5797: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_bank_pl');
5798:
5799: -- 7582842: Disable validations using profile option
5800: IF CE_DISABLE_VALIDATION THEN
5801: cep_standard.debug('validations disabled. no check done');
5826: END IF; /* end of length check */
5827:
5828: END IF;
5829:
5830: cep_standard.debug('<
5832:
5833: /* ---------------------------------------------------------------------
5834: | Bank Number Validation: SWEDEN |
5840: bank_num VARCHAR2(60);
5841: numeric_result VARCHAR2(40);
5842:
5843: BEGIN
5844: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_bank_se');
5845:
5846: -- 7582842: Disable validations using profile option
5847: IF CE_DISABLE_VALIDATION THEN
5848: cep_standard.debug('validations disabled. no check done');
5873: END IF; /* end of numeric check */
5874: END IF; /* end of length check */
5875: END IF;
5876:
5877: cep_standard.debug('<
5879:
5880: /* ---------------------------------------------------------------------
5881: | Bank Number Validation: SWITZERLAND |
5887: bank_num VARCHAR2(60);
5888: numeric_result VARCHAR2(40);
5889:
5890: BEGIN
5891: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_bank_ch');
5892:
5893: -- 7582842: Disable validations using profile option
5894: IF CE_DISABLE_VALIDATION THEN
5895: cep_standard.debug('validations disabled. no check done');
5920: END IF; /* end of numeric check */
5921: END IF; /* end of length check */
5922: END IF;
5923:
5924: cep_standard.debug('<
5926:
5927: /* ---------------------------------------------------------------------
5928: | Bank Number Validation: UNITED KINGDOM |
5934: bank_num VARCHAR2(60);
5935: numeric_result VARCHAR2(40);
5936:
5937: BEGIN
5938: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_bank_gb');
5939:
5940: -- 7582842: Disable validations using profile option
5941: IF CE_DISABLE_VALIDATION THEN
5942: cep_standard.debug('validations disabled. no check done');
5964: ce_failed_check('BANK_NUM','LENGTH','6');
5965: END IF; /* end of length check */
5966: END IF;
5967:
5968: cep_standard.debug('<
5970:
5971: /* ---------------------------------------------------------------------
5972: | Bank Number Validation: COLUMBIA |
5990: l_cust VARCHAR(10);
5991: l_bank VARCHAR(10);
5992:
5993: BEGIN
5994: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_CO');
5995:
5996: -- 7582842: No validations on bank number. Disable profile will not apply
5997: -- here.
5998:
6013: THEN
6014: /* its numeric so continue.. Bug 8614674 replaced tax_id with tax_id1 as it is
6015: stored with check digit */
6016: -- Bug 10171134
6017: IF CE_VALIDATE_BANKINFO.CE_VAL_UNIQUE_TAX_PAYER_ID(
6018: Xi_COUNTRY_NAME,TAX_ID1,Xi_BANK_ID) = 'TRUE'
6019: THEN
6020: CE_VALIDATE_BANKINFO.CE_CHECK_CROSS_MODULE_TAX_ID(
6021: Xi_COUNTRY_NAME,
6016: -- Bug 10171134
6017: IF CE_VALIDATE_BANKINFO.CE_VAL_UNIQUE_TAX_PAYER_ID(
6018: Xi_COUNTRY_NAME,TAX_ID1,Xi_BANK_ID) = 'TRUE'
6019: THEN
6020: CE_VALIDATE_BANKINFO.CE_CHECK_CROSS_MODULE_TAX_ID(
6021: Xi_COUNTRY_NAME,
6022: Xi_BANK_NAME,
6023: TAX_ID,
6024: l_cust,
6068: ELSE
6069: ce_failed_mandatory('TAX_PAYER_ID');
6070: END IF; /* end of mandatory check */
6071:
6072: cep_standard.debug('<
6074:
6075: /* ---------------------------------------------------------------------
6076: | Bank Number Validation: AUSTRALIA |
6081: BANK_NUM varchar2(60);
6082: numeric_result varchar2(40);
6083:
6084: BEGIN
6085: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_bank_au');
6086:
6087: -- 7582842: Disable validations using profile option
6088: IF CE_DISABLE_VALIDATION THEN
6089: cep_standard.debug('validations disabled. no check done');
6116: ELSE
6117: ce_passed_check('BANK','AU');
6118: END IF;
6119:
6120: cep_standard.debug('<
6122:
6123: /* ---------------------------------------------------------------------
6124: | Bank Number Validation: ISRAEL |
6131: bank_value VARCHAR2(30);
6132: numeric_result VARCHAR2(40);
6133:
6134: BEGIN
6135: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_bank_il');
6136:
6137: -- 7582842: Disable validations using profile option
6138: IF CE_DISABLE_VALIDATION THEN
6139: cep_standard.debug('validations disabled. no check done');
6168: END IF; /* end of length check */
6169:
6170: END IF; /* end of mandatory check */
6171:
6172: cep_standard.debug('<
6174:
6175: /* ---------------------------------------------------------------------
6176: | Bank Number Validation: NEW ZEALAND |
6183: bank_value VARCHAR2(30);
6184: numeric_result VARCHAR2(40);
6185:
6186: BEGIN
6187: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_bank_nz');
6188:
6189: -- 7582842: Disable validations using profile option
6190: IF CE_DISABLE_VALIDATION THEN
6191: cep_standard.debug('validations disabled. no check done');
6219: END IF; /* end of length check */
6220:
6221: END IF; /* end of mandatory check */
6222:
6223: cep_standard.debug('<
6225:
6226: /* ---------------------------------------------------------------------
6227: | Bank Number Validation: JAPAN |
6235: bank_value VARCHAR2(30);
6236: numeric_result VARCHAR2(40);
6237:
6238: BEGIN
6239: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_bank_jp');
6240:
6241: -- check that BANK_NAME_ALT is also entered
6242: -- 7582842: This check is done irrespective of the disable profile option
6243: IF (Xi_BANK_NAME_ALT is null) THEN
6278: END IF; /* end of length check */
6279:
6280: END IF; /* end of mandatory check for bank num */
6281:
6282: cep_standard.debug('<
6284:
6285: -- 8266356: Added procedure
6286: /* ---------------------------------------------------------------------
6295: bank_value VARCHAR2(30);
6296: numeric_result VARCHAR2(40);
6297:
6298: BEGIN
6299: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_bank_at');
6300:
6301: Xo_VALUE_OUT := Xi_BANK_NUMBER;
6302: -- 7582842: Disable validations using profile option
6303: IF CE_DISABLE_VALIDATION THEN
6326: ce_failed_check('BANK_NUM','LENGTH','5');
6327: END IF; /* end of length check */
6328: END IF;
6329:
6330: cep_standard.debug('<
6332:
6333: /* --------------------------------------------------------------------
6334: | PRIVATE PROCEDURE |
6350: Xi_ACCOUNT_ID in NUMBER
6351: ) AS
6352: temp_number number;
6353: BEGIN
6354: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_ACCOUNT');
6355:
6356: -- unique combination -> bank_branch_id, bank account number, currency code
6357: -- due to upgrade changes, the unique combination was changed to:
6358: -- bank_branch_id, bank account number, currency code, and account name
6373: END IF;
6374:
6375: -- unique combination -> bank_branch_id, bank account name
6376: -- Bug 7836516 removed this check
6377: cep_standard.debug('<
6379: END CE_VALIDATE_UNIQUE_ACCOUNT;
6380:
6381: /* -------------------------------------------------------------------- */
6389: Xi_ACCOUNT_ID in NUMBER
6390: )AS
6391: temp_number NUMBER;
6392: BEGIN
6393: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_ACCOUNT_JP');
6394:
6395: -- unique combination -> bank_branch_id, bank account number, currency code, account type
6396: -- due to upgrade changes account name was added to the unique combination
6397: SELECT count(*) INTO temp_number
6413:
6414: -- unique combination -> bank_branch_id, bank account name
6415: -- Bug 7836516 removed this check
6416:
6417: cep_standard.debug('<
6419: END CE_VALIDATE_UNIQUE_ACCOUNT_JP;
6420:
6421: /* -------------------------------------------------------------------- */
6430:
6431: temp_number NUMBER;
6432:
6433: BEGIN
6434: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_ACCOUNT_NZ');
6435:
6436: -- unique combination -> bank_branch_id, bank account number, currency code, account suffix
6437: -- due to upgrade changes account name was added to the unique combination
6438: SELECT COUNT(*) INTO temp_number
6454:
6455: -- unique combination -> bank_branch_id, bank account name
6456: -- Bug 7836516 removed this check
6457:
6458: cep_standard.debug('<
6460:
6461:
6462: /* --------------------------------------------------------------------
6479: Xi_BRANCH_ID in number
6480: ) AS
6481: l_temp_number NUMBER;
6482: BEGIN
6483: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BRANCH');
6484: SELECT COUNT(*)
6485: INTO l_temp_number
6486: FROM HZ_PARTIES BankParty,
6487: HZ_PARTIES BranchParty,
6533: fnd_msg_pub.add;
6534: END IF;
6535:
6536:
6537: cep_standard.debug('<
6539:
6540: PROCEDURE CE_VALIDATE_UNIQUE_BRANCH_JP(
6541: Xi_COUNTRY_NAME IN VARCHAR2,
6545: Xi_BANK_ID IN NUMBER,
6546: Xi_BRANCH_ID IN NUMBER
6547: ) AS
6548: BEGIN
6549: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BRANCH_JP');
6550: -- unique combination -> bank_id, branch_name_alt, country bug 2363959
6551: CE_VALIDATE_BANKINFO.CE_UNIQUE_BRANCH_NAME_ALT(
6552: Xi_COUNTRY_NAME,
6553: Xi_BRANCH_NAME_ALT,
6547: ) AS
6548: BEGIN
6549: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BRANCH_JP');
6550: -- unique combination -> bank_id, branch_name_alt, country bug 2363959
6551: CE_VALIDATE_BANKINFO.CE_UNIQUE_BRANCH_NAME_ALT(
6552: Xi_COUNTRY_NAME,
6553: Xi_BRANCH_NAME_ALT,
6554: Xi_BANK_ID,
6555: Xi_BRANCH_ID);
6553: Xi_BRANCH_NAME_ALT,
6554: Xi_BANK_ID,
6555: Xi_BRANCH_ID);
6556:
6557: cep_standard.debug('<
6559:
6560: PROCEDURE CE_VALIDATE_UNIQUE_BRANCH_DE(
6561: Xi_BRANCH_NUMBER in varchar2,
6600: temp_number number;
6601: temp_name number;
6602: temp_name_alt number;
6603: BEGIN
6604: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BANK_JP');
6605: -- unique combination -> bank_name_alt, country bug 2363959 --confirmed sql 6/28/02
6606: SELECT COUNT(*)
6607: INTO temp_name_alt
6608: FROM HZ_PARTIES HzPartyBankEO,
6629: fnd_message.set_name('CE', 'CE_BANK_NAME_ALT_EXISTS');
6630: fnd_msg_pub.add;
6631: END IF;
6632:
6633: cep_standard.debug('<
6635:
6636: -- added 10/25/04
6637: /* --------------------------------------------------------------------
6668: begin
6669: cep_standard.debug('CE_VALIDATE_MISC_EFT_NUM: ' || 'pass_check');
6670: end pass_check;
6671: BEGIN
6672: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_VALIDATE_MISC_EFT_NUM');
6673:
6674: -- initialize API return status to success.
6675: x_return_status := fnd_api.g_ret_sts_success;
6676:
6713: IF x_msg_count > 0 THEN
6714: x_return_status := fnd_api.g_ret_sts_error;
6715: END IF;
6716:
6717: cep_standard.debug('CE_VALIDATE_BANKINFO.ce_validate_misc_eft_num - P_COUNT: '|| x_msg_count);
6718: cep_standard.debug('<
6720: EXCEPTION
6721: WHEN OTHERS THEN
6714: x_return_status := fnd_api.g_ret_sts_error;
6715: END IF;
6716:
6717: cep_standard.debug('CE_VALIDATE_BANKINFO.ce_validate_misc_eft_num - P_COUNT: '|| x_msg_count);
6718: cep_standard.debug('<
6720: EXCEPTION
6721: WHEN OTHERS THEN
6722: cep_standard.debug('CE_VALIDATE_BANKINFO.CE_VALIDATE_MISC_EFT_NUM ' ||X_COUNTRY_NAME );
6718: cep_standard.debug('<
6720: EXCEPTION
6721: WHEN OTHERS THEN
6722: cep_standard.debug('CE_VALIDATE_BANKINFO.CE_VALIDATE_MISC_EFT_NUM ' ||X_COUNTRY_NAME );
6723: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
6724: fnd_message.set_token('PROCEDURE', 'CE_VALIDATE_BANKINFO.cd_validate_misc_eft_num');
6725: fnd_msg_pub.add;
6726: RAISE;
6720: EXCEPTION
6721: WHEN OTHERS THEN
6722: cep_standard.debug('CE_VALIDATE_BANKINFO.CE_VALIDATE_MISC_EFT_NUM ' ||X_COUNTRY_NAME );
6723: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
6724: fnd_message.set_token('PROCEDURE', 'CE_VALIDATE_BANKINFO.cd_validate_misc_eft_num');
6725: fnd_msg_pub.add;
6726: RAISE;
6727: END CE_VALIDATE_MISC_EFT_NUM;
6728:
6753: cep_standard.debug('pass_check');
6754: end pass_check;
6755:
6756: BEGIN
6757: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_VALIDATE_MISC_ACCT_HLDR_ALT');
6758:
6759: -- initialize API return status to success.
6760: x_return_status := fnd_api.g_ret_sts_success;
6761:
6785:
6786: IF x_msg_count > 0 THEN
6787: x_return_status := fnd_api.g_ret_sts_error;
6788: END IF;
6789: cep_standard.debug('CE_VALIDATE_BANKINFO.ce_validate_misc_acct_hldr_alt - P_COUNT: '|| x_msg_count);
6790:
6791: cep_standard.debug('<
6793: WHEN OTHERS THEN
6787: x_return_status := fnd_api.g_ret_sts_error;
6788: END IF;
6789: cep_standard.debug('CE_VALIDATE_BANKINFO.ce_validate_misc_acct_hldr_alt - P_COUNT: '|| x_msg_count);
6790:
6791: cep_standard.debug('<
6793: WHEN OTHERS THEN
6794: cep_standard.debug('CE_VALIDATE_BANKINFO.CE_VALIDATE_MISC_ACCT_HLDR_ALT ' ||X_COUNTRY_NAME );
6795: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
6790:
6791: cep_standard.debug('<
6793: WHEN OTHERS THEN
6794: cep_standard.debug('CE_VALIDATE_BANKINFO.CE_VALIDATE_MISC_ACCT_HLDR_ALT ' ||X_COUNTRY_NAME );
6795: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
6796: fnd_message.set_token('PROCEDURE', 'CE_VALIDATE_BANKINFO.cd_validate_misc_acct_hldr_alt');
6797: fnd_msg_pub.add;
6798: RAISE;
6792: EXCEPTION
6793: WHEN OTHERS THEN
6794: cep_standard.debug('CE_VALIDATE_BANKINFO.CE_VALIDATE_MISC_ACCT_HLDR_ALT ' ||X_COUNTRY_NAME );
6795: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
6796: fnd_message.set_token('PROCEDURE', 'CE_VALIDATE_BANKINFO.cd_validate_misc_acct_hldr_alt');
6797: fnd_msg_pub.add;
6798: RAISE;
6799: END CE_VALIDATE_MISC_ACCT_HLDR_ALT;
6800:
6807: ) AS
6808: branch_num VARCHAR2(100);
6809: numeric_result VARCHAR2(100);
6810: BEGIN
6811: cep_standard.debug('>>CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_IS_FORMAT');
6812:
6813: Xo_VALUE_OUT := Xi_BRANCH_NUMBER;
6814: -- 7582842: Disable validations using profile option
6815: IF CE_DISABLE_VALIDATION THEN
6836: ce_failed_check('BRANCH_NUM','LENGTH_MAX','4');
6837: END IF; /* end of length check */
6838: END IF; /* end of null check */
6839:
6840: cep_standard.debug('<
6842:
6843: /* --------------------------------------------------------------------
6844: | PRIVATE PROCEDURE |
6871: cep_standard.debug('GET_BRANCH_NUM_FORMAT: ' || 'CE_ENTER_BRANCH_NUM');
6872: end fail_mandatory;
6873:
6874: BEGIN
6875: cep_standard.debug('>>CE_VALIDATE_BANKINFO.GET_BRANCH_NUM_FORMAT');
6876:
6877: -- initialize API return status to success.
6878: x_return_status := fnd_api.g_ret_sts_success;
6879:
6896:
6897: cep_standard.debug('GET_BRANCH_NUM_FORMAT - X_PASS_MAND_CHECK: '|| X_PASS_MAND_CHECK);
6898: IF (X_PASS_MAND_CHECK = 'P') THEN
6899: IF (COUNTRY_NAME = 'AT') THEN
6900: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_AT(
6901: X_BRANCH_NUMBER,
6902: X_PASS_MAND_CHECK,
6903: X_VALUE_OUT);
6904:
6902: X_PASS_MAND_CHECK,
6903: X_VALUE_OUT);
6904:
6905: ELSIF (COUNTRY_NAME = 'ES') THEN
6906: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_ES(
6907: X_BRANCH_NUMBER,
6908: X_PASS_MAND_CHECK,
6909: X_VALUE_OUT);
6910:
6908: X_PASS_MAND_CHECK,
6909: X_VALUE_OUT);
6910:
6911: ELSIF (COUNTRY_NAME = 'FR') THEN
6912: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_FR(
6913: X_BRANCH_NUMBER,
6914: X_PASS_MAND_CHECK,
6915: X_VALUE_OUT);
6916:
6914: X_PASS_MAND_CHECK,
6915: X_VALUE_OUT);
6916:
6917: ELSIF (COUNTRY_NAME = 'BR') THEN
6918: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_BR(
6919: X_BRANCH_NUMBER,
6920: X_PASS_MAND_CHECK,
6921: X_VALUE_OUT);
6922:
6920: X_PASS_MAND_CHECK,
6921: X_VALUE_OUT);
6922:
6923: ELSIF (COUNTRY_NAME = 'IS') THEN
6924: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_IS_FORMAT(
6925: X_BRANCH_NUMBER,
6926: X_VALUE_OUT);
6927:
6928: ELSIF (COUNTRY_NAME = 'US') THEN
6925: X_BRANCH_NUMBER,
6926: X_VALUE_OUT);
6927:
6928: ELSIF (COUNTRY_NAME = 'US') THEN
6929: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_US(
6930: X_BRANCH_NUMBER,
6931: X_PASS_MAND_CHECK,
6932: X_VALUE_OUT);
6933:
6946: END IF;
6947:
6948: cep_standard.debug('P_COUNT: '|| x_msg_count );
6949: cep_standard.debug('X_VALUE_OUT: '|| X_VALUE_OUT);
6950: cep_standard.debug('<
6952: EXCEPTION
6953: WHEN OTHERS THEN
6954: cep_standard.debug('CE_VALIDATE_BANKINFO.GET_BRANCH_NUM_FORMAT ' ||X_COUNTRY_NAME );
6950: cep_standard.debug('<
6952: EXCEPTION
6953: WHEN OTHERS THEN
6954: cep_standard.debug('CE_VALIDATE_BANKINFO.GET_BRANCH_NUM_FORMAT ' ||X_COUNTRY_NAME );
6955: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
6956: fnd_message.set_token('PROCEDURE', 'CE_VALIDATE_BANKINFO.GET_BRANCH_NUM_FORMAT');
6957: fnd_msg_pub.add;
6958: RAISE;
6952: EXCEPTION
6953: WHEN OTHERS THEN
6954: cep_standard.debug('CE_VALIDATE_BANKINFO.GET_BRANCH_NUM_FORMAT ' ||X_COUNTRY_NAME );
6955: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
6956: fnd_message.set_token('PROCEDURE', 'CE_VALIDATE_BANKINFO.GET_BRANCH_NUM_FORMAT');
6957: fnd_msg_pub.add;
6958: RAISE;
6959: END GET_BRANCH_NUM_FORMAT;
6960:
6979: Xi_BANK_NUM IN varchar2,
6980: Xo_VALUE_OUT OUT NOCOPY varchar2
6981: ) AS
6982: BEGIN
6983: cep_standard.debug('<
6985: -- setting global variable to map Bank ID as Bank Number instead
6986: -- of party ID
6987: BANK_ID_IS_NUM := TRUE;
6989: Xo_VALUE_OUT := Xi_BRANCH_NUM;
6990: -- depending upon country code call the appropriate function
6991: IF Xi_COUNTRY = 'AU'
6992: THEN
6993: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_AU(
6994: Xi_BRANCH_NUMBER => Xi_BRANCH_NUM,
6995: Xi_BANK_ID => Xi_BANK_NUM,
6996: Xi_PASS_MAND_CHECK => 'P');
6997:
6996: Xi_PASS_MAND_CHECK => 'P');
6997:
6998: ELSIF Xi_COUNTRY = 'DE'
6999: THEN
7000: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_DE(
7001: Xi_BRANCH_NUMBER => Xi_BRANCH_NUM,
7002: Xi_BANK_ID => Xi_BANK_NUM);
7003:
7004: ELSIF Xi_COUNTRY = 'IS'
7002: Xi_BANK_ID => Xi_BANK_NUM);
7003:
7004: ELSIF Xi_COUNTRY = 'IS'
7005: THEN
7006: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_IS(
7007: Xi_BRANCH_NUMBER => Xi_BRANCH_NUM,
7008: Xi_BANK_ID => Xi_BANK_NUM,
7009: Xo_VALUE_OUT => Xo_VALUE_OUT);
7010:
7009: Xo_VALUE_OUT => Xo_VALUE_OUT);
7010:
7011: ELSIF Xi_COUNTRY = 'IE'
7012: THEN
7013: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_IE(
7014: Xi_BRANCH_NUMBER => Xi_BRANCH_NUM,
7015: Xi_BANK_ID => Xi_BANK_NUM);
7016:
7017: ELSIF Xi_COUNTRY = 'LU'
7015: Xi_BANK_ID => Xi_BANK_NUM);
7016:
7017: ELSIF Xi_COUNTRY = 'LU'
7018: THEN
7019: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_LU(
7020: Xi_BRANCH_NUMBER => Xi_BRANCH_NUM,
7021: Xi_BANK_ID => Xi_BANK_NUM);
7022:
7023: ELSIF Xi_COUNTRY = 'PL'
7021: Xi_BANK_ID => Xi_BANK_NUM);
7022:
7023: ELSIF Xi_COUNTRY = 'PL'
7024: THEN
7025: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_PL(
7026: Xi_BRANCH_NUMBER => Xi_BRANCH_NUM,
7027: Xi_BANK_ID => Xi_BANK_NUM);
7028:
7029: ELSIF Xi_COUNTRY = 'SE'
7027: Xi_BANK_ID => Xi_BANK_NUM);
7028:
7029: ELSIF Xi_COUNTRY = 'SE'
7030: THEN
7031: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_SE(
7032: Xi_BRANCH_NUMBER => Xi_BRANCH_NUM,
7033: Xi_BANK_ID => Xi_BANK_NUM);
7034:
7035: ELSIF Xi_COUNTRY = 'CH'
7033: Xi_BANK_ID => Xi_BANK_NUM);
7034:
7035: ELSIF Xi_COUNTRY = 'CH'
7036: THEN
7037: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_CH(
7038: Xi_BRANCH_NUMBER => Xi_BRANCH_NUM,
7039: Xi_BANK_ID => Xi_BANK_NUM);
7040:
7041: ELSIF Xi_COUNTRY = 'GB'
7039: Xi_BANK_ID => Xi_BANK_NUM);
7040:
7041: ELSIF Xi_COUNTRY = 'GB'
7042: THEN
7043: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_GB(
7044: Xi_BRANCH_NUMBER => Xi_BRANCH_NUM,
7045: Xi_BANK_ID => Xi_BANK_NUM);
7046: END IF;
7047:
7047:
7048: -- resetting the variable
7049: BANK_ID_IS_NUM := FALSE;
7050:
7051: cep_standard.debug('<
7053:
7054: -- 7582842: The following procedures are no longer used by CE:
7055: -- 1) UPD_BANK_UNIQUE
7083: ) AS
7084: COUNTRY_NAME VARCHAR2(2);
7085: X_PASS_MAND_CHECK VARCHAR2(1);
7086: BEGIN
7087: cep_standard.debug('>>CE_VALIDATE_BANKINFO.upd_bank_unique');
7088: -- initialize API return status to success.
7089: x_return_status := fnd_api.g_ret_sts_success;
7090:
7091: COUNTRY_NAME := X_COUNTRY_NAME;
7104: /* UNIQUE VALIDATION CHECK for bank */
7105: cep_standard.debug('UNIQUE VALIDATION CHECK for bank' );
7106:
7107: IF (COUNTRY_NAME = 'JP') THEN
7108: cep_standard.debug('call CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BANK_JP' );
7109:
7110: CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BANK_JP(
7111: X_COUNTRY_NAME,
7112: X_BANK_NUMBER ,
7106:
7107: IF (COUNTRY_NAME = 'JP') THEN
7108: cep_standard.debug('call CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BANK_JP' );
7109:
7110: CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BANK_JP(
7111: X_COUNTRY_NAME,
7112: X_BANK_NUMBER ,
7113: X_BANK_NAME ,
7114: X_BANK_NAME_ALT,
7125: IF x_msg_count > 0 THEN
7126: x_return_status := fnd_api.g_ret_sts_error;
7127: END IF;
7128:
7129: cep_standard.debug('CE_VALIDATE_BANKINFO.upd_bank_unique - P_COUNT: '|| x_msg_count);
7130: cep_standard.debug('X_VALUE_OUT: '|| X_VALUE_OUT);
7131: cep_standard.debug('<
7133: WHEN OTHERS THEN
7127: END IF;
7128:
7129: cep_standard.debug('CE_VALIDATE_BANKINFO.upd_bank_unique - P_COUNT: '|| x_msg_count);
7130: cep_standard.debug('X_VALUE_OUT: '|| X_VALUE_OUT);
7131: cep_standard.debug('<
7133: WHEN OTHERS THEN
7134: cep_standard.debug('CE_VALIDATE_BANKINFO.upd_bank_unique ' ||X_COUNTRY_NAME );
7135: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
7130: cep_standard.debug('X_VALUE_OUT: '|| X_VALUE_OUT);
7131: cep_standard.debug('<
7133: WHEN OTHERS THEN
7134: cep_standard.debug('CE_VALIDATE_BANKINFO.upd_bank_unique ' ||X_COUNTRY_NAME );
7135: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
7136: fnd_message.set_token('PROCEDURE', 'CE_VALIDATE_BANKINFO.upd_bank_unique');
7137: fnd_msg_pub.add;
7138: RAISE;
7132: EXCEPTION
7133: WHEN OTHERS THEN
7134: cep_standard.debug('CE_VALIDATE_BANKINFO.upd_bank_unique ' ||X_COUNTRY_NAME );
7135: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
7136: fnd_message.set_token('PROCEDURE', 'CE_VALIDATE_BANKINFO.upd_bank_unique');
7137: fnd_msg_pub.add;
7138: RAISE;
7139: END UPD_BANK_UNIQUE;
7140:
7169: l_count_before_custom NUMBER; -- 9250566: Added
7170: l_count_after_custom NUMBER; -- 9250566: Added
7171:
7172: BEGIN
7173: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_bank');
7174:
7175: -- initialize API return status to success.
7176: x_return_status := fnd_api.g_ret_sts_success;
7177:
7185: IF FND_API.to_Boolean(p_init_msg_list) THEN
7186: FND_MSG_PUB.initialize;
7187: END IF;
7188:
7189: cep_standard.debug('CE_VALIDATE_BANKINFO.upd_bank_validate - P_INIT_MSG_LIST: '|| P_INIT_MSG_LIST);
7190:
7191: /* We must validate the Bank Number */
7192: IF X_BANK_NUMBER is null THEN
7193: X_PASS_MAND_CHECK := 'F';
7195: X_PASS_MAND_CHECK := 'P';
7196: END IF;
7197:
7198: IF (COUNTRY_NAME = 'ES') THEN
7199: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_ES(
7200: X_BANK_NUMBER,
7201: X_PASS_MAND_CHECK,
7202: l_value_out);
7203:
7201: X_PASS_MAND_CHECK,
7202: l_value_out);
7203:
7204: ELSIF (COUNTRY_NAME = 'FR') THEN
7205: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_FR(
7206: X_BANK_NUMBER,
7207: X_PASS_MAND_CHECK,
7208: l_value_out);
7209:
7207: X_PASS_MAND_CHECK,
7208: l_value_out);
7209:
7210: ELSIF (COUNTRY_NAME = 'PT') THEN
7211: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_PT(
7212: X_BANK_NUMBER,
7213: X_PASS_MAND_CHECK);
7214:
7215: ELSIF (COUNTRY_NAME = 'BR') THEN
7212: X_BANK_NUMBER,
7213: X_PASS_MAND_CHECK);
7214:
7215: ELSIF (COUNTRY_NAME = 'BR') THEN
7216: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_BR(
7217: X_BANK_NUMBER,
7218: X_PASS_MAND_CHECK,
7219: l_value_out);
7220:
7219: l_value_out);
7220:
7221: -- Added 5/14/02
7222: ELSIF (COUNTRY_NAME = 'DE') THEN
7223: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_DE(X_BANK_NUMBER);
7224:
7225: ELSIF (COUNTRY_NAME = 'GR') THEN
7226: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_GR(X_BANK_NUMBER);
7227:
7222: ELSIF (COUNTRY_NAME = 'DE') THEN
7223: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_DE(X_BANK_NUMBER);
7224:
7225: ELSIF (COUNTRY_NAME = 'GR') THEN
7226: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_GR(X_BANK_NUMBER);
7227:
7228: ELSIF (COUNTRY_NAME = 'IS') THEN
7229: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_IS(
7230: X_BANK_NUMBER,
7225: ELSIF (COUNTRY_NAME = 'GR') THEN
7226: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_GR(X_BANK_NUMBER);
7227:
7228: ELSIF (COUNTRY_NAME = 'IS') THEN
7229: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_IS(
7230: X_BANK_NUMBER,
7231: l_value_out);
7232:
7233: ELSIF (COUNTRY_NAME = 'IE') THEN
7230: X_BANK_NUMBER,
7231: l_value_out);
7232:
7233: ELSIF (COUNTRY_NAME = 'IE') THEN
7234: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_IE(X_BANK_NUMBER);
7235:
7236: ELSIF (COUNTRY_NAME = 'IT') THEN
7237: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_IT(
7238: X_BANK_NUMBER,
7233: ELSIF (COUNTRY_NAME = 'IE') THEN
7234: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_IE(X_BANK_NUMBER);
7235:
7236: ELSIF (COUNTRY_NAME = 'IT') THEN
7237: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_IT(
7238: X_BANK_NUMBER,
7239: X_PASS_MAND_CHECK);
7240:
7241: ELSIF (COUNTRY_NAME = 'LU') THEN
7238: X_BANK_NUMBER,
7239: X_PASS_MAND_CHECK);
7240:
7241: ELSIF (COUNTRY_NAME = 'LU') THEN
7242: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_LU(X_BANK_NUMBER);
7243:
7244:
7245: ELSIF (COUNTRY_NAME = 'PL') THEN
7246: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_PL(X_BANK_NUMBER);
7242: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_LU(X_BANK_NUMBER);
7243:
7244:
7245: ELSIF (COUNTRY_NAME = 'PL') THEN
7246: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_PL(X_BANK_NUMBER);
7247:
7248: ELSIF (COUNTRY_NAME = 'SE') THEN
7249: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_SE(X_BANK_NUMBER);
7250:
7245: ELSIF (COUNTRY_NAME = 'PL') THEN
7246: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_PL(X_BANK_NUMBER);
7247:
7248: ELSIF (COUNTRY_NAME = 'SE') THEN
7249: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_SE(X_BANK_NUMBER);
7250:
7251: ELSIF (COUNTRY_NAME = 'CH') THEN
7252: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_CH(X_BANK_NUMBER);
7253:
7248: ELSIF (COUNTRY_NAME = 'SE') THEN
7249: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_SE(X_BANK_NUMBER);
7250:
7251: ELSIF (COUNTRY_NAME = 'CH') THEN
7252: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_CH(X_BANK_NUMBER);
7253:
7254: ELSIF (COUNTRY_NAME = 'GB') THEN
7255: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_GB(X_BANK_NUMBER);
7256:
7251: ELSIF (COUNTRY_NAME = 'CH') THEN
7252: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_CH(X_BANK_NUMBER);
7253:
7254: ELSIF (COUNTRY_NAME = 'GB') THEN
7255: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_GB(X_BANK_NUMBER);
7256:
7257: ELSIF (COUNTRY_NAME = 'CO') THEN
7258: --Bug 10171134
7259: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_CO(
7255: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_GB(X_BANK_NUMBER);
7256:
7257: ELSIF (COUNTRY_NAME = 'CO') THEN
7258: --Bug 10171134
7259: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_CO(
7260: X_COUNTRY_NAME,
7261: X_BANK_NAME ,
7262: X_TAX_PAYER_ID,
7263: X_BANK_ID);
7263: X_BANK_ID);
7264:
7265: -- Added 10/19/04
7266: ELSIF (COUNTRY_NAME = 'AU') THEN
7267: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_AU(X_BANK_NUMBER);
7268:
7269: ELSIF (COUNTRY_NAME = 'IL') THEN
7270: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_IL(
7271: X_BANK_NUMBER,
7266: ELSIF (COUNTRY_NAME = 'AU') THEN
7267: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_AU(X_BANK_NUMBER);
7268:
7269: ELSIF (COUNTRY_NAME = 'IL') THEN
7270: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_IL(
7271: X_BANK_NUMBER,
7272: X_PASS_MAND_CHECK);
7273:
7274: ELSIF (COUNTRY_NAME = 'NZ') THEN
7271: X_BANK_NUMBER,
7272: X_PASS_MAND_CHECK);
7273:
7274: ELSIF (COUNTRY_NAME = 'NZ') THEN
7275: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_NZ(
7276: X_BANK_NUMBER,
7277: X_PASS_MAND_CHECK);
7278:
7279: ELSIF (COUNTRY_NAME = 'JP') THEN
7276: X_BANK_NUMBER,
7277: X_PASS_MAND_CHECK);
7278:
7279: ELSIF (COUNTRY_NAME = 'JP') THEN
7280: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_JP(
7281: X_BANK_NUMBER,
7282: X_BANK_NAME_ALT,
7283: X_PASS_MAND_CHECK);
7284:
7283: X_PASS_MAND_CHECK);
7284:
7285: -- 8266356: Added
7286: ELSIF (COUNTRY_NAME = 'AT') THEN
7287: CE_VALIDATE_BANKINFO.CE_VALIDATE_BANK_AT(
7288: X_BANK_NUMBER,
7289: X_PASS_MAND_CHECK,
7290: l_value_out);
7291:
7345: IF x_msg_count > 0 THEN
7346: x_return_status := fnd_api.g_ret_sts_error;
7347: END IF;
7348:
7349: cep_standard.debug('CE_VALIDATE_BANKINFO.upd_bank_validate - P_COUNT: '|| x_msg_count);
7350: cep_standard.debug('X_VALUE_OUT: '|| X_VALUE_OUT);
7351: cep_standard.debug('<
7353: WHEN OTHERS THEN
7347: END IF;
7348:
7349: cep_standard.debug('CE_VALIDATE_BANKINFO.upd_bank_validate - P_COUNT: '|| x_msg_count);
7350: cep_standard.debug('X_VALUE_OUT: '|| X_VALUE_OUT);
7351: cep_standard.debug('<
7353: WHEN OTHERS THEN
7354: cep_standard.debug('EXCEPTION: upd_bank_validate' ||X_COUNTRY_NAME );
7355: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
7352: EXCEPTION
7353: WHEN OTHERS THEN
7354: cep_standard.debug('EXCEPTION: upd_bank_validate' ||X_COUNTRY_NAME );
7355: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
7356: fnd_message.set_token('PROCEDURE', 'CE_VALIDATE_BANKINFO.upd_bank_validate');
7357: fnd_msg_pub.add;
7358: RAISE;
7359: END UPD_BANK_VALIDATE;
7360:
7386: X_PASS_MAND_CHECK VARCHAR2(1);
7387:
7388: BEGIN
7389:
7390: cep_standard.debug('>>CE_VALIDATE_BANKINFO.upd_branch_unique');
7391:
7392: -- initialize API return status to success.
7393: x_return_status := fnd_api.g_ret_sts_success;
7394:
7394:
7395: COUNTRY_NAME := X_COUNTRY_NAME;
7396: X_VALUE_OUT := X_BRANCH_NUMBER;
7397:
7398: cep_standard.debug('CE_VALIDATE_BANKINFO.upd_branch_unique - COUNTRY_NAME: '|| COUNTRY_NAME||
7399: ', X_VALUE_OUT: '|| X_VALUE_OUT);
7400:
7401: -- Initialize message list if p_init_msg_list is set to TRUE.
7402: IF FND_API.to_Boolean(p_init_msg_list) THEN
7410: -- 11/30/05 unique validation for US and Germany bank branches should not
7411: -- be removed
7412: -- 02/04/12 bug 13641238: changes to unique validation for US
7413: IF (COUNTRY_NAME = 'JP') THEN
7414: cep_standard.debug('call CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BRANCH_JP' );
7415:
7416: CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BRANCH_JP(
7417: X_COUNTRY_NAME,
7418: X_BRANCH_NUMBER,
7412: -- 02/04/12 bug 13641238: changes to unique validation for US
7413: IF (COUNTRY_NAME = 'JP') THEN
7414: cep_standard.debug('call CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BRANCH_JP' );
7415:
7416: CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BRANCH_JP(
7417: X_COUNTRY_NAME,
7418: X_BRANCH_NUMBER,
7419: X_BRANCH_NAME,
7420: X_BRANCH_NAME_ALT,
7422: X_BRANCH_ID);
7423:
7424: -- bug 13641238: Added call for US
7425: ELSIF (COUNTRY_NAME = 'US') THEN
7426: cep_standard.debug('call CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BRANCH_US');
7427:
7428: CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BRANCH_US(
7429: Xi_BRANCH_NUMBER => X_BRANCH_NUMBER,
7430: Xi_BRANCH_NAME => X_BRANCH_NAME,
7424: -- bug 13641238: Added call for US
7425: ELSIF (COUNTRY_NAME = 'US') THEN
7426: cep_standard.debug('call CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BRANCH_US');
7427:
7428: CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BRANCH_US(
7429: Xi_BRANCH_NUMBER => X_BRANCH_NUMBER,
7430: Xi_BRANCH_NAME => X_BRANCH_NAME,
7431: Xi_BANK_ID => X_BANK_ID,
7432: Xi_BRANCH_ID => X_BRANCH_ID);
7430: Xi_BRANCH_NAME => X_BRANCH_NAME,
7431: Xi_BANK_ID => X_BANK_ID,
7432: Xi_BRANCH_ID => X_BRANCH_ID);
7433: ELSE
7434: cep_standard.debug('call CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BRANCH' );
7435:
7436: CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BRANCH(
7437: X_COUNTRY_NAME,
7438: X_BRANCH_NUMBER,
7432: Xi_BRANCH_ID => X_BRANCH_ID);
7433: ELSE
7434: cep_standard.debug('call CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BRANCH' );
7435:
7436: CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_BRANCH(
7437: X_COUNTRY_NAME,
7438: X_BRANCH_NUMBER,
7439: X_BRANCH_NAME,
7440: X_BANK_ID,
7450: IF x_msg_count > 0 THEN
7451: x_return_status := fnd_api.g_ret_sts_error;
7452: END IF;
7453:
7454: cep_standard.debug('CE_VALIDATE_BANKINFO.upd_branch_unique - P_COUNT: '|| x_msg_count||
7455: ' X_VALUE_OUT: '|| X_VALUE_OUT||
7456: '<
7458: EXCEPTION
7452: END IF;
7453:
7454: cep_standard.debug('CE_VALIDATE_BANKINFO.upd_branch_unique - P_COUNT: '|| x_msg_count||
7455: ' X_VALUE_OUT: '|| X_VALUE_OUT||
7456: '<
7458: EXCEPTION
7459: WHEN OTHERS THEN
7460: cep_standard.debug('EXCEPTION: upd_branch_unique ' ||X_COUNTRY_NAME );
7458: EXCEPTION
7459: WHEN OTHERS THEN
7460: cep_standard.debug('EXCEPTION: upd_branch_unique ' ||X_COUNTRY_NAME );
7461: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
7462: fnd_message.set_token('PROCEDURE', 'CE_VALIDATE_BANKINFO.upd_branch_unique');
7463: fnd_msg_pub.add;
7464: RAISE;
7465: END UPD_BRANCH_UNIQUE;
7466:
7501: l_count_after_custom NUMBER; -- 9250566: Added
7502:
7503: BEGIN
7504:
7505: cep_standard.debug('>>CE_VALIDATE_BANKINFO.upd_branch_validate');
7506:
7507: -- initialize API return status to success.
7508: x_return_status := fnd_api.g_ret_sts_success;
7509:
7527: cep_standard.debug('X_PASS_MAND_CHECK: '|| X_PASS_MAND_CHECK);
7528:
7529: cep_standard.debug('Calling CE_VALIDATE_BRANCH_'||COUNTRY_NAME);
7530: IF (COUNTRY_NAME = 'AT') THEN
7531: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_AT(
7532: X_BRANCH_NUMBER,
7533: X_PASS_MAND_CHECK,
7534: l_value_out);
7535:
7533: X_PASS_MAND_CHECK,
7534: l_value_out);
7535:
7536: ELSIF (COUNTRY_NAME = 'ES') THEN
7537: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_ES(
7538: X_BRANCH_NUMBER,
7539: X_PASS_MAND_CHECK,
7540: l_value_out);
7541:
7539: X_PASS_MAND_CHECK,
7540: l_value_out);
7541:
7542: ELSIF (COUNTRY_NAME = 'FR') THEN
7543: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_FR(
7544: X_BRANCH_NUMBER,
7545: X_PASS_MAND_CHECK,
7546: l_value_out);
7547:
7545: X_PASS_MAND_CHECK,
7546: l_value_out);
7547:
7548: ELSIF (COUNTRY_NAME = 'PT') THEN
7549: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_PT(
7550: X_BRANCH_NUMBER,
7551: X_PASS_MAND_CHECK);
7552:
7553: ELSIF (COUNTRY_NAME = 'BR') THEN
7550: X_BRANCH_NUMBER,
7551: X_PASS_MAND_CHECK);
7552:
7553: ELSIF (COUNTRY_NAME = 'BR') THEN
7554: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_BR(
7555: X_BRANCH_NUMBER,
7556: X_PASS_MAND_CHECK,
7557: l_value_out);
7558:
7557: l_value_out);
7558:
7559: -- added 5/14/02
7560: ELSIF (COUNTRY_NAME = 'DE') THEN
7561: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_DE(
7562: X_BRANCH_NUMBER,
7563: X_BANK_ID);
7564:
7565: ELSIF (COUNTRY_NAME = 'GR') THEN
7562: X_BRANCH_NUMBER,
7563: X_BANK_ID);
7564:
7565: ELSIF (COUNTRY_NAME = 'GR') THEN
7566: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_GR(X_BRANCH_NUMBER);
7567:
7568: ELSIF (COUNTRY_NAME = 'IS') THEN
7569: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_IS(
7570: X_BRANCH_NUMBER,
7565: ELSIF (COUNTRY_NAME = 'GR') THEN
7566: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_GR(X_BRANCH_NUMBER);
7567:
7568: ELSIF (COUNTRY_NAME = 'IS') THEN
7569: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_IS(
7570: X_BRANCH_NUMBER,
7571: X_BANK_ID,
7572: l_value_out);
7573:
7571: X_BANK_ID,
7572: l_value_out);
7573:
7574: ELSIF (COUNTRY_NAME = 'IE') THEN
7575: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_IE(
7576: X_BRANCH_NUMBER,
7577: X_BANK_ID);
7578:
7579: ELSIF (COUNTRY_NAME = 'IT') THEN
7576: X_BRANCH_NUMBER,
7577: X_BANK_ID);
7578:
7579: ELSIF (COUNTRY_NAME = 'IT') THEN
7580: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_IT(
7581: X_BRANCH_NUMBER,
7582: X_PASS_MAND_CHECK);
7583:
7584: ELSIF (COUNTRY_NAME = 'LU') THEN
7581: X_BRANCH_NUMBER,
7582: X_PASS_MAND_CHECK);
7583:
7584: ELSIF (COUNTRY_NAME = 'LU') THEN
7585: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_LU(
7586: X_BRANCH_NUMBER,
7587: X_BANK_ID);
7588:
7589: ELSIF (COUNTRY_NAME = 'PL') THEN
7586: X_BRANCH_NUMBER,
7587: X_BANK_ID);
7588:
7589: ELSIF (COUNTRY_NAME = 'PL') THEN
7590: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_PL(
7591: X_BRANCH_NUMBER,
7592: X_BANK_ID);
7593:
7594: ELSIF (COUNTRY_NAME = 'SE') THEN
7591: X_BRANCH_NUMBER,
7592: X_BANK_ID);
7593:
7594: ELSIF (COUNTRY_NAME = 'SE') THEN
7595: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_SE(
7596: X_BRANCH_NUMBER,
7597: X_BANK_ID);
7598:
7599: ELSIF (COUNTRY_NAME = 'CH') THEN
7596: X_BRANCH_NUMBER,
7597: X_BANK_ID);
7598:
7599: ELSIF (COUNTRY_NAME = 'CH') THEN
7600: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_CH(
7601: X_BRANCH_NUMBER,
7602: X_BANK_ID);
7603:
7604: ELSIF (COUNTRY_NAME = 'GB') THEN
7601: X_BRANCH_NUMBER,
7602: X_BANK_ID);
7603:
7604: ELSIF (COUNTRY_NAME = 'GB') THEN
7605: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_GB(
7606: X_BRANCH_NUMBER,
7607: X_BANK_ID);
7608:
7609: ELSIF (COUNTRY_NAME = 'US') THEN
7606: X_BRANCH_NUMBER,
7607: X_BANK_ID);
7608:
7609: ELSIF (COUNTRY_NAME = 'US') THEN
7610: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_US(
7611: X_BRANCH_NUMBER,
7612: X_PASS_MAND_CHECK,
7613: l_value_out);
7614:
7613: l_value_out);
7614:
7615: -- added 10/19/04
7616: ELSIF (COUNTRY_NAME = 'AU') THEN
7617: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_AU(X_BRANCH_NUMBER,
7618: X_BANK_ID,
7619: X_PASS_MAND_CHECK);
7620:
7621: ELSIF (COUNTRY_NAME = 'IL') THEN
7618: X_BANK_ID,
7619: X_PASS_MAND_CHECK);
7620:
7621: ELSIF (COUNTRY_NAME = 'IL') THEN
7622: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_IL(X_BRANCH_NUMBER,
7623: X_PASS_MAND_CHECK);
7624:
7625: ELSIF (COUNTRY_NAME = 'NZ') THEN
7626: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_NZ(X_BRANCH_NUMBER,
7622: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_IL(X_BRANCH_NUMBER,
7623: X_PASS_MAND_CHECK);
7624:
7625: ELSIF (COUNTRY_NAME = 'NZ') THEN
7626: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_NZ(X_BRANCH_NUMBER,
7627: X_PASS_MAND_CHECK);
7628:
7629: ELSIF (COUNTRY_NAME = 'JP') THEN
7630: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_JP(X_BRANCH_NUMBER,
7626: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_NZ(X_BRANCH_NUMBER,
7627: X_PASS_MAND_CHECK);
7628:
7629: ELSIF (COUNTRY_NAME = 'JP') THEN
7630: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_JP(X_BRANCH_NUMBER,
7631: X_BRANCH_NAME_ALT,
7632: X_PASS_MAND_CHECK);
7633:
7634: -- 9249372: Added
7632: X_PASS_MAND_CHECK);
7633:
7634: -- 9249372: Added
7635: ELSIF (COUNTRY_NAME = 'FI') THEN
7636: CE_VALIDATE_BANKINFO.CE_VALIDATE_BRANCH_FI(X_BRANCH_NUMBER);
7637:
7638: END IF;
7639:
7640: -- 9250566 ADDED 5/6 START -------------------------
7696: END IF;
7697:
7698: cep_standard.debug('P_COUNT: '|| x_msg_count);
7699: cep_standard.debug(' X_VALUE_OUT: '|| X_VALUE_OUT);
7700: cep_standard.debug('<
7702: EXCEPTION
7703: WHEN OTHERS THEN
7704: cep_standard.debug('EXCEPTION: upd_branch_validate ' ||X_COUNTRY_NAME );
7702: EXCEPTION
7703: WHEN OTHERS THEN
7704: cep_standard.debug('EXCEPTION: upd_branch_validate ' ||X_COUNTRY_NAME );
7705: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
7706: fnd_message.set_token('PROCEDURE', 'CE_VALIDATE_BANKINFO.upd_branch_validate');
7707: fnd_msg_pub.add;
7708: RAISE;
7709: END UPD_BRANCH_VALIDATE;
7710:
7737: ) AS
7738: COUNTRY_NAME VARCHAR2(2);
7739: X_PASS_MAND_CHECK VARCHAR2(1);
7740: BEGIN
7741: cep_standard.debug('>>CE_VALIDATE_BANKINFO.upd_account_unique');
7742:
7743: -- initialize API return status to success.
7744: x_return_status := fnd_api.g_ret_sts_success;
7745:
7757: /* UNIQUE VALIDATION CHECK for account */
7758: cep_standard.debug('UNIQUE_VALIDATION CHECK for account');
7759:
7760: IF (COUNTRY_NAME = 'JP') THEN
7761: CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_ACCOUNT_JP(
7762: X_ACCOUNT_NUMBER,
7763: X_CURRENCY_CODE,
7764: X_ACCOUNT_TYPE,
7765: X_ACCOUNT_NAME,
7766: X_BRANCH_ID,
7767: X_ACCOUNT_ID);
7768:
7769: ELSIF (COUNTRY_NAME = 'NZ') THEN
7770: CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_ACCOUNT_NZ(
7771: X_ACCOUNT_NUMBER,
7772: X_CURRENCY_CODE,
7773: X_ACCOUNT_SUFFIX,
7774: X_ACCOUNT_NAME,
7774: X_ACCOUNT_NAME,
7775: X_BRANCH_ID,
7776: X_ACCOUNT_ID);
7777: ELSE
7778: CE_VALIDATE_BANKINFO.CE_VALIDATE_UNIQUE_ACCOUNT(
7779: X_ACCOUNT_NUMBER,
7780: X_CURRENCY_CODE,
7781: X_ACCOUNT_NAME,
7782: X_BRANCH_ID,
7792: IF x_msg_count > 0 THEN
7793: x_return_status := fnd_api.g_ret_sts_error;
7794: END IF;
7795:
7796: cep_standard.debug('CE_VALIDATE_BANKINFO.upd_account_unique - P_COUNT: '|| x_msg_count);
7797: cep_standard.debug('X_VALUE_OUT: '|| X_VALUE_OUT);
7798: cep_standard.debug('<
7800: WHEN OTHERS THEN
7794: END IF;
7795:
7796: cep_standard.debug('CE_VALIDATE_BANKINFO.upd_account_unique - P_COUNT: '|| x_msg_count);
7797: cep_standard.debug('X_VALUE_OUT: '|| X_VALUE_OUT);
7798: cep_standard.debug('<
7800: WHEN OTHERS THEN
7801: cep_standard.debug('CE_VALIDATE_BANKINFO.upd_account_unique ' ||X_COUNTRY_NAME );
7802: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
7797: cep_standard.debug('X_VALUE_OUT: '|| X_VALUE_OUT);
7798: cep_standard.debug('<
7800: WHEN OTHERS THEN
7801: cep_standard.debug('CE_VALIDATE_BANKINFO.upd_account_unique ' ||X_COUNTRY_NAME );
7802: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
7803: fnd_message.set_token('PROCEDURE', 'CE_VALIDATE_BANKINFO.upd_account_unique');
7804: fnd_msg_pub.add;
7805: RAISE;
7799: EXCEPTION
7800: WHEN OTHERS THEN
7801: cep_standard.debug('CE_VALIDATE_BANKINFO.upd_account_unique ' ||X_COUNTRY_NAME );
7802: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
7803: fnd_message.set_token('PROCEDURE', 'CE_VALIDATE_BANKINFO.upd_account_unique');
7804: fnd_msg_pub.add;
7805: RAISE;
7806: END UPD_ACCOUNT_UNIQUE;
7807:
7845: l_count_before_custom NUMBER; -- 9250566: Added
7846: l_count_after_custom NUMBER; -- 9250566: Added
7847:
7848: BEGIN
7849: cep_standard.debug('>>CE_VALIDATE_BANKINFO.upd_account_validate');
7850: -- initialize API return status to success.
7851: x_return_status := fnd_api.g_ret_sts_success;
7852:
7853: COUNTRY_NAME := X_COUNTRY_NAME;
7869: X_PASS_MAND_CHECK := 'P';
7870: END IF;
7871:
7872: IF (COUNTRY_NAME = 'AT') THEN
7873: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_AT(
7874: X_ACCOUNT_NUMBER,
7875: X_PASS_MAND_CHECK,
7876: l_value_out);
7877:
7875: X_PASS_MAND_CHECK,
7876: l_value_out);
7877:
7878: ELSIF (COUNTRY_NAME = 'DK') THEN
7879: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_DK(
7880: X_ACCOUNT_NUMBER,
7881: X_PASS_MAND_CHECK,
7882: l_value_out);
7883:
7881: X_PASS_MAND_CHECK,
7882: l_value_out);
7883:
7884: ELSIF (COUNTRY_NAME = 'NO') THEN
7885: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_NO(
7886: X_ACCOUNT_NUMBER,
7887: X_PASS_MAND_CHECK);
7888:
7889: ELSIF (COUNTRY_NAME = 'ES') THEN
7886: X_ACCOUNT_NUMBER,
7887: X_PASS_MAND_CHECK);
7888:
7889: ELSIF (COUNTRY_NAME = 'ES') THEN
7890: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_ES(
7891: X_ACCOUNT_NUMBER,
7892: X_PASS_MAND_CHECK,
7893: l_value_out);
7894:
7892: X_PASS_MAND_CHECK,
7893: l_value_out);
7894:
7895: ELSIF (COUNTRY_NAME = 'NL') THEN
7896: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_NL(
7897: X_ACCOUNT_NUMBER,
7898: X_PASS_MAND_CHECK);
7899:
7900: ELSIF (COUNTRY_NAME = 'FR') THEN
7897: X_ACCOUNT_NUMBER,
7898: X_PASS_MAND_CHECK);
7899:
7900: ELSIF (COUNTRY_NAME = 'FR') THEN
7901: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_FR(
7902: X_ACCOUNT_NUMBER,
7903: X_PASS_MAND_CHECK,
7904: l_value_out);
7905:
7903: X_PASS_MAND_CHECK,
7904: l_value_out);
7905:
7906: ELSIF (COUNTRY_NAME = 'BE') THEN
7907: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_BE(
7908: X_ACCOUNT_NUMBER,
7909: X_PASS_MAND_CHECK);
7910:
7911: ELSIF (COUNTRY_NAME = 'PT') THEN
7908: X_ACCOUNT_NUMBER,
7909: X_PASS_MAND_CHECK);
7910:
7911: ELSIF (COUNTRY_NAME = 'PT') THEN
7912: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_PT(
7913: X_ACCOUNT_NUMBER,
7914: X_PASS_MAND_CHECK,
7915: l_value_out);
7916:
7914: X_PASS_MAND_CHECK,
7915: l_value_out);
7916:
7917: ELSIF (COUNTRY_NAME = 'FI') THEN -- 8897744 Removed AND (X_BRANCH_NUMBER='LMP')
7918: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_FI(
7919: X_ACCOUNT_NUMBER,
7920: X_PASS_MAND_CHECK);
7921:
7922: -- added 5/14/02
7920: X_PASS_MAND_CHECK);
7921:
7922: -- added 5/14/02
7923: ELSIF (COUNTRY_NAME = 'DE') THEN
7924: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_DE(
7925: X_ACCOUNT_NUMBER,
7926: l_value_out );
7927:
7928: ELSIF (COUNTRY_NAME = 'GR') THEN
7925: X_ACCOUNT_NUMBER,
7926: l_value_out );
7927:
7928: ELSIF (COUNTRY_NAME = 'GR') THEN
7929: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_GR(
7930: X_ACCOUNT_NUMBER,
7931: l_value_out);
7932:
7933: ELSIF (COUNTRY_NAME = 'IS') THEN
7930: X_ACCOUNT_NUMBER,
7931: l_value_out);
7932:
7933: ELSIF (COUNTRY_NAME = 'IS') THEN
7934: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_IS(
7935: X_ACCOUNT_NUMBER,
7936: l_value_out );
7937:
7938: ELSIF (COUNTRY_NAME = 'IE') THEN
7935: X_ACCOUNT_NUMBER,
7936: l_value_out );
7937:
7938: ELSIF (COUNTRY_NAME = 'IE') THEN
7939: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_IE(X_ACCOUNT_NUMBER);
7940:
7941: ELSIF (COUNTRY_NAME = 'IT') THEN
7942: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_IT(
7943: X_ACCOUNT_NUMBER,
7938: ELSIF (COUNTRY_NAME = 'IE') THEN
7939: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_IE(X_ACCOUNT_NUMBER);
7940:
7941: ELSIF (COUNTRY_NAME = 'IT') THEN
7942: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_IT(
7943: X_ACCOUNT_NUMBER,
7944: l_value_out);
7945:
7946: ELSIF (COUNTRY_NAME = 'LU') THEN
7943: X_ACCOUNT_NUMBER,
7944: l_value_out);
7945:
7946: ELSIF (COUNTRY_NAME = 'LU') THEN
7947: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_LU(X_ACCOUNT_NUMBER);
7948:
7949: ELSIF (COUNTRY_NAME = 'PL') THEN
7950: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_PL(X_ACCOUNT_NUMBER);
7951:
7946: ELSIF (COUNTRY_NAME = 'LU') THEN
7947: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_LU(X_ACCOUNT_NUMBER);
7948:
7949: ELSIF (COUNTRY_NAME = 'PL') THEN
7950: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_PL(X_ACCOUNT_NUMBER);
7951:
7952: ELSIF (COUNTRY_NAME = 'SE') THEN
7953: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_SE(X_ACCOUNT_NUMBER);
7954:
7949: ELSIF (COUNTRY_NAME = 'PL') THEN
7950: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_PL(X_ACCOUNT_NUMBER);
7951:
7952: ELSIF (COUNTRY_NAME = 'SE') THEN
7953: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_SE(X_ACCOUNT_NUMBER);
7954:
7955: ELSIF (COUNTRY_NAME = 'CH') THEN
7956: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_CH(
7957: X_ACCOUNT_NUMBER,
7952: ELSIF (COUNTRY_NAME = 'SE') THEN
7953: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_SE(X_ACCOUNT_NUMBER);
7954:
7955: ELSIF (COUNTRY_NAME = 'CH') THEN
7956: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_CH(
7957: X_ACCOUNT_NUMBER,
7958: X_ACCOUNT_TYPE );
7959:
7960: ELSIF (COUNTRY_NAME = 'GB') THEN
7957: X_ACCOUNT_NUMBER,
7958: X_ACCOUNT_TYPE );
7959:
7960: ELSIF (COUNTRY_NAME = 'GB') THEN
7961: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_GB(
7962: X_ACCOUNT_NUMBER,
7963: X_BRANCH_NUMBER, ---Bug16234978
7964: l_value_out);
7965:
7963: X_BRANCH_NUMBER, ---Bug16234978
7964: l_value_out);
7965:
7966: ELSIF (COUNTRY_NAME = 'BR') THEN
7967: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_BR(
7968: X_ACCOUNT_NUMBER,
7969: X_SECONDARY_ACCOUNT_REFERENCE);
7970:
7971: -- added 10/19/04
7969: X_SECONDARY_ACCOUNT_REFERENCE);
7970:
7971: -- added 10/19/04
7972: ELSIF (COUNTRY_NAME = 'AU') THEN
7973: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_AU(
7974: X_ACCOUNT_NUMBER,
7975: X_CURRENCY_CODE);
7976:
7977: ELSIF (COUNTRY_NAME = 'IL') THEN
7974: X_ACCOUNT_NUMBER,
7975: X_CURRENCY_CODE);
7976:
7977: ELSIF (COUNTRY_NAME = 'IL') THEN
7978: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_IL(X_ACCOUNT_NUMBER);
7979:
7980: ELSIF (COUNTRY_NAME = 'NZ') THEN
7981: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_NZ(
7982: X_ACCOUNT_NUMBER,
7977: ELSIF (COUNTRY_NAME = 'IL') THEN
7978: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_IL(X_ACCOUNT_NUMBER);
7979:
7980: ELSIF (COUNTRY_NAME = 'NZ') THEN
7981: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_NZ(
7982: X_ACCOUNT_NUMBER,
7983: X_ACCOUNT_SUFFIX);
7984:
7985: ELSIF (COUNTRY_NAME = 'JP') THEN
7982: X_ACCOUNT_NUMBER,
7983: X_ACCOUNT_SUFFIX);
7984:
7985: ELSIF (COUNTRY_NAME = 'JP') THEN
7986: CE_VALIDATE_BANKINFO.CE_VALIDATE_ACCOUNT_JP(
7987: X_ACCOUNT_NUMBER,
7988: X_ACCOUNT_TYPE );
7989:
7990: END IF; /* country account check */
8075: IF x_msg_count > 0 THEN
8076: x_return_status := fnd_api.g_ret_sts_error;
8077: END IF;
8078:
8079: cep_standard.debug('CE_VALIDATE_BANKINFO.upd_account_validate - P_COUNT: '|| x_msg_count);
8080: cep_standard.debug('X_VALUE_OUT: '|| X_VALUE_OUT);
8081: cep_standard.debug('<
8083: WHEN OTHERS THEN
8077: END IF;
8078:
8079: cep_standard.debug('CE_VALIDATE_BANKINFO.upd_account_validate - P_COUNT: '|| x_msg_count);
8080: cep_standard.debug('X_VALUE_OUT: '|| X_VALUE_OUT);
8081: cep_standard.debug('<
8083: WHEN OTHERS THEN
8084: cep_standard.debug('EXCEPTION: upd_account_validate ' ||X_COUNTRY_NAME );
8085: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
8082: EXCEPTION
8083: WHEN OTHERS THEN
8084: cep_standard.debug('EXCEPTION: upd_account_validate ' ||X_COUNTRY_NAME );
8085: FND_MESSAGE.set_name('CE', 'CE_UNHANDLED_EXCEPTION');
8086: fnd_message.set_token('PROCEDURE', 'CE_VALIDATE_BANKINFO.upd_account_validate');
8087: fnd_msg_pub.add;
8088: RAISE;
8089: END UPD_ACCOUNT_VALIDATE;
8090:
8118: /* -------------------------------------------------------------------
8119: | Public Function: IS_BIC_VALID |
8120: | Description: This function can be used to validate a BIC Value |
8121: | All errors are stored in the FND message stack |
8122: | Calls: CE_VALIDATE_BANKINFO.ce_validate_bic |
8123: | Parameters: p_in_BIC - BIC value to be validated |
8124: | Returns: 'Y' - BIC is valid |
8125: | 'N' - BIC is not valid |
8126: --------------------------------------------------------------------*/
8132:
8133: BEGIN
8134: l_return_status := fnd_api.g_ret_sts_success;
8135:
8136: CE_VALIDATE_BANKINFO.ce_validate_bic(
8137: X_bic_code => p_in_BIC
8138: ,P_init_msg_list => FND_API.g_false
8139: ,X_msg_count => l_msg_count
8140: ,X_msg_data => l_msg_data
8152: /* -------------------------------------------------------------------
8153: | Public Procedure: CE_VALIDATE_MOD_GB |
8154: | Description: Modulus check validation for UK Bank account |
8155: | numbers. |
8156: | Called by: CE_VALIDATE_BANKINFO.ce_validate_account_gb |
8157: | Parameters: Xi_ACCOUNT_NUMBER - Account number to be validated|
8158: | Xi_SORT_CODE - Branch number |
8159: | Xo_RETURN_STATUS - OUT parameter |
8160: --------------------------------------------------------------------*/
8291: return l_mod_res;
8292: end calccheckdigit;
8293:
8294: begin
8295: cep_standard.debug('>>CE_VALIDATE_BANKINFO.ce_validate_mod_gb');
8296: -- initialize API return status to success.
8297: Xo_return_status := fnd_api.g_ret_sts_success;
8298:
8299: open c_modulus_checks(xi_sort_code);
8539: else
8540: Xo_return_status := fnd_api.g_ret_sts_error;
8541: cep_standard.debug('Account #'||xi_account_number||' is invalid.');
8542: end if;
8543: cep_standard.debug('<
8545: /* Bug 16234978 Code change (1/2) ends */
8546:
8547: END CE_VALIDATE_BANKINFO;
8543: cep_standard.debug('<
8545: /* Bug 16234978 Code change (1/2) ends */
8546:
8547: END CE_VALIDATE_BANKINFO;