[Home] [Help]
536: SELECT 'Y' INTO l_dummy
537: FROM HZ_CUST_ACCOUNTS
538: WHERE CUST_ACCOUNT_ID = p_cust_account_rec.cust_account_id;
539:
540: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
541: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_id' );
542: FND_MSG_PUB.ADD;
543: x_return_status := FND_API.G_RET_STS_ERROR;
544: EXCEPTION
537: FROM HZ_CUST_ACCOUNTS
538: WHERE CUST_ACCOUNT_ID = p_cust_account_rec.cust_account_id;
539:
540: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
541: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_id' );
542: FND_MSG_PUB.ADD;
543: x_return_status := FND_API.G_RET_STS_ERROR;
544: EXCEPTION
545: WHEN NO_DATA_FOUND THEN
615: IF l_profile = 'Y' THEN
616: IF p_cust_account_rec.account_number IS NOT NULL AND
617: p_cust_account_rec.account_number <> FND_API.G_MISS_CHAR
618: THEN
619: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_ACCOUNT_NUMBER_AUTO_ON' );
620: FND_MSG_PUB.ADD;
621: x_return_status := FND_API.G_RET_STS_ERROR;
622: END IF;
623:
640: THEN
641: IF p_cust_account_rec.account_number IS NULL OR
642: p_cust_account_rec.account_number = FND_API.G_MISS_CHAR
643: THEN
644: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
645: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'account_number' );
646: FND_MSG_PUB.ADD;
647: x_return_status := FND_API.G_RET_STS_ERROR;
648: END IF;
641: IF p_cust_account_rec.account_number IS NULL OR
642: p_cust_account_rec.account_number = FND_API.G_MISS_CHAR
643: THEN
644: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
645: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'account_number' );
646: FND_MSG_PUB.ADD;
647: x_return_status := FND_API.G_RET_STS_ERROR;
648: END IF;
649:
727:
728: IF p_create_update_flag = 'C' OR
729: ( p_create_update_flag = 'U' AND l_rowid <> p_rowid )
730: THEN
731: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
732: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'account_number' );
733: FND_MSG_PUB.ADD;
734: x_return_status := FND_API.G_RET_STS_ERROR;
735: END IF;
728: IF p_create_update_flag = 'C' OR
729: ( p_create_update_flag = 'U' AND l_rowid <> p_rowid )
730: THEN
731: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
732: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'account_number' );
733: FND_MSG_PUB.ADD;
734: x_return_status := FND_API.G_RET_STS_ERROR;
735: END IF;
736: EXCEPTION
788: SELECT 'Y' INTO l_dummy
789: FROM HZ_CUST_ACCOUNTS
790: WHERE ORIG_SYSTEM_REFERENCE = p_cust_account_rec.orig_system_reference;
791:
792: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
793: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'orig_system_reference' );
794: FND_MSG_PUB.ADD;
795: x_return_status := FND_API.G_RET_STS_ERROR;
796: EXCEPTION
789: FROM HZ_CUST_ACCOUNTS
790: WHERE ORIG_SYSTEM_REFERENCE = p_cust_account_rec.orig_system_reference;
791:
792: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
793: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'orig_system_reference' );
794: FND_MSG_PUB.ADD;
795: x_return_status := FND_API.G_RET_STS_ERROR;
796: EXCEPTION
797: WHEN NO_DATA_FOUND THEN
1150: /*
1151: IF p_cust_account_rec.tax_code IS NOT NULL AND
1152: p_cust_account_rec.tax_code <> FND_API.G_MISS_CHAR
1153: THEN
1154: FND_MESSAGE.SET_NAME('AR','HZ_API_COLUMN_SHOULD_BE_NULL');
1155: FND_MESSAGE.SET_TOKEN('COLUMN','TAX_CODE');
1156: FND_MESSAGE.SET_TOKEN('TABLE','HZ_CUST_ACCOUNTS');
1157: FND_MSG_PUB.ADD;
1158: x_return_status := FND_API.G_RET_STS_ERROR;
1151: IF p_cust_account_rec.tax_code IS NOT NULL AND
1152: p_cust_account_rec.tax_code <> FND_API.G_MISS_CHAR
1153: THEN
1154: FND_MESSAGE.SET_NAME('AR','HZ_API_COLUMN_SHOULD_BE_NULL');
1155: FND_MESSAGE.SET_TOKEN('COLUMN','TAX_CODE');
1156: FND_MESSAGE.SET_TOKEN('TABLE','HZ_CUST_ACCOUNTS');
1157: FND_MSG_PUB.ADD;
1158: x_return_status := FND_API.G_RET_STS_ERROR;
1159: END IF;
1152: p_cust_account_rec.tax_code <> FND_API.G_MISS_CHAR
1153: THEN
1154: FND_MESSAGE.SET_NAME('AR','HZ_API_COLUMN_SHOULD_BE_NULL');
1155: FND_MESSAGE.SET_TOKEN('COLUMN','TAX_CODE');
1156: FND_MESSAGE.SET_TOKEN('TABLE','HZ_CUST_ACCOUNTS');
1157: FND_MSG_PUB.ADD;
1158: x_return_status := FND_API.G_RET_STS_ERROR;
1159: END IF;
1160: */
1192:
1193: IF p_cust_account_rec.order_type_id IS NOT NULL AND
1194: p_cust_account_rec.order_type_id <> FND_API.G_MISS_NUM
1195: THEN
1196: FND_MESSAGE.SET_NAME('AR','HZ_API_COLUMN_SHOULD_BE_NULL');
1197: FND_MESSAGE.SET_TOKEN('COLUMN','ORDER_TYPE_ID');
1198: FND_MESSAGE.SET_TOKEN('TABLE','HZ_CUST_ACCOUNTS');
1199: FND_MSG_PUB.ADD;
1200: x_return_status := FND_API.G_RET_STS_ERROR;
1193: IF p_cust_account_rec.order_type_id IS NOT NULL AND
1194: p_cust_account_rec.order_type_id <> FND_API.G_MISS_NUM
1195: THEN
1196: FND_MESSAGE.SET_NAME('AR','HZ_API_COLUMN_SHOULD_BE_NULL');
1197: FND_MESSAGE.SET_TOKEN('COLUMN','ORDER_TYPE_ID');
1198: FND_MESSAGE.SET_TOKEN('TABLE','HZ_CUST_ACCOUNTS');
1199: FND_MSG_PUB.ADD;
1200: x_return_status := FND_API.G_RET_STS_ERROR;
1201: END IF;
1194: p_cust_account_rec.order_type_id <> FND_API.G_MISS_NUM
1195: THEN
1196: FND_MESSAGE.SET_NAME('AR','HZ_API_COLUMN_SHOULD_BE_NULL');
1197: FND_MESSAGE.SET_TOKEN('COLUMN','ORDER_TYPE_ID');
1198: FND_MESSAGE.SET_TOKEN('TABLE','HZ_CUST_ACCOUNTS');
1199: FND_MSG_PUB.ADD;
1200: x_return_status := FND_API.G_RET_STS_ERROR;
1201: END IF;
1202:
1248:
1249: IF p_cust_account_rec.primary_salesrep_id IS NOT NULL AND
1250: p_cust_account_rec.primary_salesrep_id <> FND_API.G_MISS_NUM
1251: THEN
1252: FND_MESSAGE.SET_NAME('AR','HZ_API_COLUMN_SHOULD_BE_NULL');
1253: FND_MESSAGE.SET_TOKEN('COLUMN','PRIMARY_SALESREP_ID');
1254: FND_MESSAGE.SET_TOKEN('TABLE','HZ_CUST_ACCOUNTS');
1255: FND_MSG_PUB.ADD;
1256: x_return_status := FND_API.G_RET_STS_ERROR;
1249: IF p_cust_account_rec.primary_salesrep_id IS NOT NULL AND
1250: p_cust_account_rec.primary_salesrep_id <> FND_API.G_MISS_NUM
1251: THEN
1252: FND_MESSAGE.SET_NAME('AR','HZ_API_COLUMN_SHOULD_BE_NULL');
1253: FND_MESSAGE.SET_TOKEN('COLUMN','PRIMARY_SALESREP_ID');
1254: FND_MESSAGE.SET_TOKEN('TABLE','HZ_CUST_ACCOUNTS');
1255: FND_MSG_PUB.ADD;
1256: x_return_status := FND_API.G_RET_STS_ERROR;
1257: END IF;
1250: p_cust_account_rec.primary_salesrep_id <> FND_API.G_MISS_NUM
1251: THEN
1252: FND_MESSAGE.SET_NAME('AR','HZ_API_COLUMN_SHOULD_BE_NULL');
1253: FND_MESSAGE.SET_TOKEN('COLUMN','PRIMARY_SALESREP_ID');
1254: FND_MESSAGE.SET_TOKEN('TABLE','HZ_CUST_ACCOUNTS');
1255: FND_MSG_PUB.ADD;
1256: x_return_status := FND_API.G_RET_STS_ERROR;
1257: END IF;
1258:
1902: INTO l_dummy
1903: FROM DUAL;
1904: IF l_dummy <> 'Y'
1905: THEN
1906: FND_MESSAGE.SET_NAME('AR','HZ_API_VAL_DEP_FIELDS');
1907: FND_MESSAGE.SET_TOKEN('COLUMN1','ship_sets_include_lines_flag');
1908: FND_MESSAGE.SET_TOKEN('VALUE1','Y');
1909: FND_MESSAGE.SET_TOKEN('COLUMN2','arrivalsets_include_lines_flag');
1910: FND_MESSAGE.SET_TOKEN('VALUE2','N');
1903: FROM DUAL;
1904: IF l_dummy <> 'Y'
1905: THEN
1906: FND_MESSAGE.SET_NAME('AR','HZ_API_VAL_DEP_FIELDS');
1907: FND_MESSAGE.SET_TOKEN('COLUMN1','ship_sets_include_lines_flag');
1908: FND_MESSAGE.SET_TOKEN('VALUE1','Y');
1909: FND_MESSAGE.SET_TOKEN('COLUMN2','arrivalsets_include_lines_flag');
1910: FND_MESSAGE.SET_TOKEN('VALUE2','N');
1911: FND_MSG_PUB.ADD;
1904: IF l_dummy <> 'Y'
1905: THEN
1906: FND_MESSAGE.SET_NAME('AR','HZ_API_VAL_DEP_FIELDS');
1907: FND_MESSAGE.SET_TOKEN('COLUMN1','ship_sets_include_lines_flag');
1908: FND_MESSAGE.SET_TOKEN('VALUE1','Y');
1909: FND_MESSAGE.SET_TOKEN('COLUMN2','arrivalsets_include_lines_flag');
1910: FND_MESSAGE.SET_TOKEN('VALUE2','N');
1911: FND_MSG_PUB.ADD;
1912: x_return_status := FND_API.G_RET_STS_ERROR;
1905: THEN
1906: FND_MESSAGE.SET_NAME('AR','HZ_API_VAL_DEP_FIELDS');
1907: FND_MESSAGE.SET_TOKEN('COLUMN1','ship_sets_include_lines_flag');
1908: FND_MESSAGE.SET_TOKEN('VALUE1','Y');
1909: FND_MESSAGE.SET_TOKEN('COLUMN2','arrivalsets_include_lines_flag');
1910: FND_MESSAGE.SET_TOKEN('VALUE2','N');
1911: FND_MSG_PUB.ADD;
1912: x_return_status := FND_API.G_RET_STS_ERROR;
1913: END IF;
1906: FND_MESSAGE.SET_NAME('AR','HZ_API_VAL_DEP_FIELDS');
1907: FND_MESSAGE.SET_TOKEN('COLUMN1','ship_sets_include_lines_flag');
1908: FND_MESSAGE.SET_TOKEN('VALUE1','Y');
1909: FND_MESSAGE.SET_TOKEN('COLUMN2','arrivalsets_include_lines_flag');
1910: FND_MESSAGE.SET_TOKEN('VALUE2','N');
1911: FND_MSG_PUB.ADD;
1912: x_return_status := FND_API.G_RET_STS_ERROR;
1913: END IF;
1914: END ;
1991: INTO l_dummy
1992: FROM DUAL;
1993: IF l_dummy <> 'Y'
1994: THEN
1995: FND_MESSAGE.SET_NAME('AR','HZ_API_VAL_DEP_FIELDS');
1996: FND_MESSAGE.SET_TOKEN('COLUMN1','arrivalsets_include_lines_flag');
1997: FND_MESSAGE.SET_TOKEN('VALUE1','Y');
1998: FND_MESSAGE.SET_TOKEN('COLUMN2','ship_sets_include_lines_flag');
1999: FND_MESSAGE.SET_TOKEN('VALUE2','N');
1992: FROM DUAL;
1993: IF l_dummy <> 'Y'
1994: THEN
1995: FND_MESSAGE.SET_NAME('AR','HZ_API_VAL_DEP_FIELDS');
1996: FND_MESSAGE.SET_TOKEN('COLUMN1','arrivalsets_include_lines_flag');
1997: FND_MESSAGE.SET_TOKEN('VALUE1','Y');
1998: FND_MESSAGE.SET_TOKEN('COLUMN2','ship_sets_include_lines_flag');
1999: FND_MESSAGE.SET_TOKEN('VALUE2','N');
2000: FND_MSG_PUB.ADD;
1993: IF l_dummy <> 'Y'
1994: THEN
1995: FND_MESSAGE.SET_NAME('AR','HZ_API_VAL_DEP_FIELDS');
1996: FND_MESSAGE.SET_TOKEN('COLUMN1','arrivalsets_include_lines_flag');
1997: FND_MESSAGE.SET_TOKEN('VALUE1','Y');
1998: FND_MESSAGE.SET_TOKEN('COLUMN2','ship_sets_include_lines_flag');
1999: FND_MESSAGE.SET_TOKEN('VALUE2','N');
2000: FND_MSG_PUB.ADD;
2001: x_return_status := FND_API.G_RET_STS_ERROR;
1994: THEN
1995: FND_MESSAGE.SET_NAME('AR','HZ_API_VAL_DEP_FIELDS');
1996: FND_MESSAGE.SET_TOKEN('COLUMN1','arrivalsets_include_lines_flag');
1997: FND_MESSAGE.SET_TOKEN('VALUE1','Y');
1998: FND_MESSAGE.SET_TOKEN('COLUMN2','ship_sets_include_lines_flag');
1999: FND_MESSAGE.SET_TOKEN('VALUE2','N');
2000: FND_MSG_PUB.ADD;
2001: x_return_status := FND_API.G_RET_STS_ERROR;
2002: END IF;
1995: FND_MESSAGE.SET_NAME('AR','HZ_API_VAL_DEP_FIELDS');
1996: FND_MESSAGE.SET_TOKEN('COLUMN1','arrivalsets_include_lines_flag');
1997: FND_MESSAGE.SET_TOKEN('VALUE1','Y');
1998: FND_MESSAGE.SET_TOKEN('COLUMN2','ship_sets_include_lines_flag');
1999: FND_MESSAGE.SET_TOKEN('VALUE2','N');
2000: FND_MSG_PUB.ADD;
2001: x_return_status := FND_API.G_RET_STS_ERROR;
2002: END IF;
2003: END ;
2517: --Bug 2985448
2518: AND STATUS='A'
2519: AND ORG_ID = p_cust_acct_relate_rec.org_id; -- Bug 3456489
2520:
2521: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_REL_ALREADY_EXISTS' );
2522: FND_MSG_PUB.ADD;
2523: x_return_status := FND_API.G_RET_STS_ERROR;
2524:
2525: EXCEPTION
2907: SELECT 'Y' INTO l_dummy
2908: FROM HZ_CUSTOMER_PROFILES
2909: WHERE CUST_ACCOUNT_PROFILE_ID = p_customer_profile_rec.cust_account_profile_id;
2910:
2911: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
2912: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_profile_id' );
2913: FND_MSG_PUB.ADD;
2914: x_return_status := FND_API.G_RET_STS_ERROR;
2915: EXCEPTION
2908: FROM HZ_CUSTOMER_PROFILES
2909: WHERE CUST_ACCOUNT_PROFILE_ID = p_customer_profile_rec.cust_account_profile_id;
2910:
2911: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
2912: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_profile_id' );
2913: FND_MSG_PUB.ADD;
2914: x_return_status := FND_API.G_RET_STS_ERROR;
2915: EXCEPTION
2916: WHEN NO_DATA_FOUND THEN
3075: WHERE CUST_ACCOUNT_ID = p_customer_profile_rec.cust_account_id
3076: AND SITE_USE_ID IS NULL
3077: AND ROWNUM = 1;
3078:
3079: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
3080: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_id' );
3081: FND_MSG_PUB.ADD;
3082: x_return_status := FND_API.G_RET_STS_ERROR;
3083: EXCEPTION
3076: AND SITE_USE_ID IS NULL
3077: AND ROWNUM = 1;
3078:
3079: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
3080: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_id' );
3081: FND_MSG_PUB.ADD;
3082: x_return_status := FND_API.G_RET_STS_ERROR;
3083: EXCEPTION
3084: WHEN NO_DATA_FOUND THEN
3107: FROM HZ_CUSTOMER_PROFILES
3108: WHERE PARTY_ID = p_customer_profile_rec.party_id
3109: AND CUST_ACCOUNT_ID = -1;
3110:
3111: FND_MESSAGE.SET_NAME( 'AR', 'HZ_ONLY_ONE_PROF_AT_PARTY_LEV' );
3112: FND_MESSAGE.SET_TOKEN( 'PARTY_ID', p_customer_profile_rec.party_id );
3113: FND_MSG_PUB.ADD;
3114: x_return_status := FND_API.G_RET_STS_ERROR;
3115: EXCEPTION
3108: WHERE PARTY_ID = p_customer_profile_rec.party_id
3109: AND CUST_ACCOUNT_ID = -1;
3110:
3111: FND_MESSAGE.SET_NAME( 'AR', 'HZ_ONLY_ONE_PROF_AT_PARTY_LEV' );
3112: FND_MESSAGE.SET_TOKEN( 'PARTY_ID', p_customer_profile_rec.party_id );
3113: FND_MSG_PUB.ADD;
3114: x_return_status := FND_API.G_RET_STS_ERROR;
3115: EXCEPTION
3116: WHEN NO_DATA_FOUND THEN
3360: IF p_customer_profile_rec.profile_class_id IS NOT NULL AND
3361: p_customer_profile_rec.profile_class_id <> FND_API.G_MISS_NUM
3362: THEN
3363: IF p_customer_profile_rec.profile_class_id < 0 THEN
3364: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NEGATIVE_PROFILE_CLASS' );
3365: FND_MSG_PUB.ADD;
3366: x_return_status := FND_API.G_RET_STS_ERROR;
3367: ELSE
3368: BEGIN
3370: FROM HZ_CUST_PROFILE_CLASSES
3371: WHERE PROFILE_CLASS_ID = p_customer_profile_rec.profile_class_id;
3372:
3373: IF l_class_status <> 'A' THEN
3374: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INACTIVE_PROFILE_CLASS' );
3375: FND_MESSAGE.SET_TOKEN( 'NAME', l_profile_class_name );
3376: FND_MSG_PUB.ADD;
3377: x_return_status := FND_API.G_RET_STS_ERROR;
3378: END IF;
3371: WHERE PROFILE_CLASS_ID = p_customer_profile_rec.profile_class_id;
3372:
3373: IF l_class_status <> 'A' THEN
3374: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INACTIVE_PROFILE_CLASS' );
3375: FND_MESSAGE.SET_TOKEN( 'NAME', l_profile_class_name );
3376: FND_MSG_PUB.ADD;
3377: x_return_status := FND_API.G_RET_STS_ERROR;
3378: END IF;
3379: EXCEPTION
3377: x_return_status := FND_API.G_RET_STS_ERROR;
3378: END IF;
3379: EXCEPTION
3380: WHEN NO_DATA_FOUND THEN
3381: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
3382: FND_MESSAGE.SET_TOKEN( 'FK', 'profile_class_id' );
3383: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'profile_class_id' );
3384: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_profile_classes');
3385: FND_MSG_PUB.ADD;
3378: END IF;
3379: EXCEPTION
3380: WHEN NO_DATA_FOUND THEN
3381: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
3382: FND_MESSAGE.SET_TOKEN( 'FK', 'profile_class_id' );
3383: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'profile_class_id' );
3384: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_profile_classes');
3385: FND_MSG_PUB.ADD;
3386: x_return_status := FND_API.G_RET_STS_ERROR;
3379: EXCEPTION
3380: WHEN NO_DATA_FOUND THEN
3381: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
3382: FND_MESSAGE.SET_TOKEN( 'FK', 'profile_class_id' );
3383: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'profile_class_id' );
3384: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_profile_classes');
3385: FND_MSG_PUB.ADD;
3386: x_return_status := FND_API.G_RET_STS_ERROR;
3387: END;
3380: WHEN NO_DATA_FOUND THEN
3381: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
3382: FND_MESSAGE.SET_TOKEN( 'FK', 'profile_class_id' );
3383: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'profile_class_id' );
3384: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_profile_classes');
3385: FND_MSG_PUB.ADD;
3386: x_return_status := FND_API.G_RET_STS_ERROR;
3387: END;
3388: END IF;
3485: FROM HZ_CUST_ACCT_SITES_ALL
3486: WHERE CUST_ACCT_SITE_ID = l_cust_acct_site_id;
3487:
3488: IF l_cust_account_id <> p_customer_profile_rec.cust_account_id THEN
3489: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_ACCT_SITEUSE_MISMATCH' );
3490: FND_MSG_PUB.ADD;
3491: x_return_status := FND_API.G_RET_STS_ERROR;
3492: END IF;
3493:
3499: END IF;
3500:
3501: EXCEPTION
3502: WHEN NO_DATA_FOUND THEN
3503: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
3504: FND_MESSAGE.SET_TOKEN( 'FK', 'site_use_id' );
3505: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'site_use_id' );
3506: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_site_uses' );
3507: FND_MSG_PUB.ADD;
3500:
3501: EXCEPTION
3502: WHEN NO_DATA_FOUND THEN
3503: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
3504: FND_MESSAGE.SET_TOKEN( 'FK', 'site_use_id' );
3505: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'site_use_id' );
3506: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_site_uses' );
3507: FND_MSG_PUB.ADD;
3508: x_return_status := FND_API.G_RET_STS_ERROR;
3501: EXCEPTION
3502: WHEN NO_DATA_FOUND THEN
3503: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
3504: FND_MESSAGE.SET_TOKEN( 'FK', 'site_use_id' );
3505: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'site_use_id' );
3506: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_site_uses' );
3507: FND_MSG_PUB.ADD;
3508: x_return_status := FND_API.G_RET_STS_ERROR;
3509: END;
3502: WHEN NO_DATA_FOUND THEN
3503: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
3504: FND_MESSAGE.SET_TOKEN( 'FK', 'site_use_id' );
3505: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'site_use_id' );
3506: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_site_uses' );
3507: FND_MSG_PUB.ADD;
3508: x_return_status := FND_API.G_RET_STS_ERROR;
3509: END;
3510:
3522: WHERE CUST_ACCOUNT_ID = p_customer_profile_rec.cust_account_id
3523: AND SITE_USE_ID = p_customer_profile_rec.site_use_id
3524: AND ROWNUM = 1;
3525:
3526: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
3527: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_id' );
3528: FND_MSG_PUB.ADD;
3529: x_return_status := FND_API.G_RET_STS_ERROR;
3530: EXCEPTION
3523: AND SITE_USE_ID = p_customer_profile_rec.site_use_id
3524: AND ROWNUM = 1;
3525:
3526: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
3527: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_id' );
3528: FND_MSG_PUB.ADD;
3529: x_return_status := FND_API.G_RET_STS_ERROR;
3530: EXCEPTION
3531: WHEN NO_DATA_FOUND THEN
3546: p_customer_profile_rec.site_use_id IS NOT NULL AND
3547: p_customer_profile_rec.site_use_id <> FND_API.G_MISS_NUM AND
3548: p_customer_profile_rec.cust_account_id = -1
3549: THEN
3550: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NO_SITE_PROF_AT_PTY_LEV' );
3551: FND_MESSAGE.SET_TOKEN( 'PARTY_ID', p_customer_profile_rec.party_id );
3552: FND_MESSAGE.SET_TOKEN( 'SITE_USE_ID', p_customer_profile_rec.site_use_id );
3553: FND_MSG_PUB.ADD;
3554: x_return_status := FND_API.G_RET_STS_ERROR;
3547: p_customer_profile_rec.site_use_id <> FND_API.G_MISS_NUM AND
3548: p_customer_profile_rec.cust_account_id = -1
3549: THEN
3550: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NO_SITE_PROF_AT_PTY_LEV' );
3551: FND_MESSAGE.SET_TOKEN( 'PARTY_ID', p_customer_profile_rec.party_id );
3552: FND_MESSAGE.SET_TOKEN( 'SITE_USE_ID', p_customer_profile_rec.site_use_id );
3553: FND_MSG_PUB.ADD;
3554: x_return_status := FND_API.G_RET_STS_ERROR;
3555:
3548: p_customer_profile_rec.cust_account_id = -1
3549: THEN
3550: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NO_SITE_PROF_AT_PTY_LEV' );
3551: FND_MESSAGE.SET_TOKEN( 'PARTY_ID', p_customer_profile_rec.party_id );
3552: FND_MESSAGE.SET_TOKEN( 'SITE_USE_ID', p_customer_profile_rec.site_use_id );
3553: FND_MSG_PUB.ADD;
3554: x_return_status := FND_API.G_RET_STS_ERROR;
3555:
3556:
4195: THEN
4196: IF p_customer_profile_rec.tolerance > 100 OR
4197: p_customer_profile_rec.tolerance < -100
4198: THEN
4199: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VALUE_BETWEEN' );
4200: FND_MESSAGE.SET_TOKEN( 'COLUMN','tolerance');
4201: FND_MESSAGE.SET_TOKEN( 'VALUE1', '-100' );
4202: FND_MESSAGE.SET_TOKEN( 'VALUE2', '100' );
4203: FND_MSG_PUB.ADD;
4196: IF p_customer_profile_rec.tolerance > 100 OR
4197: p_customer_profile_rec.tolerance < -100
4198: THEN
4199: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VALUE_BETWEEN' );
4200: FND_MESSAGE.SET_TOKEN( 'COLUMN','tolerance');
4201: FND_MESSAGE.SET_TOKEN( 'VALUE1', '-100' );
4202: FND_MESSAGE.SET_TOKEN( 'VALUE2', '100' );
4203: FND_MSG_PUB.ADD;
4204: x_return_status := FND_API.G_RET_STS_ERROR;
4197: p_customer_profile_rec.tolerance < -100
4198: THEN
4199: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VALUE_BETWEEN' );
4200: FND_MESSAGE.SET_TOKEN( 'COLUMN','tolerance');
4201: FND_MESSAGE.SET_TOKEN( 'VALUE1', '-100' );
4202: FND_MESSAGE.SET_TOKEN( 'VALUE2', '100' );
4203: FND_MSG_PUB.ADD;
4204: x_return_status := FND_API.G_RET_STS_ERROR;
4205: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4198: THEN
4199: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VALUE_BETWEEN' );
4200: FND_MESSAGE.SET_TOKEN( 'COLUMN','tolerance');
4201: FND_MESSAGE.SET_TOKEN( 'VALUE1', '-100' );
4202: FND_MESSAGE.SET_TOKEN( 'VALUE2', '100' );
4203: FND_MSG_PUB.ADD;
4204: x_return_status := FND_API.G_RET_STS_ERROR;
4205: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4206: hz_utility_v2pub.debug(p_message=>'Tolerance should be between -100 and 100 .' ||
4231: THEN
4232: IF p_customer_profile_rec.percent_collectable > 100 OR
4233: p_customer_profile_rec.percent_collectable < 0
4234: THEN
4235: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VALUE_BETWEEN' );
4236: FND_MESSAGE.SET_TOKEN( 'COLUMN','percent_collectable');
4237: FND_MESSAGE.SET_TOKEN( 'VALUE1', '0' );
4238: FND_MESSAGE.SET_TOKEN( 'VALUE2', '100' );
4239: FND_MSG_PUB.ADD;
4232: IF p_customer_profile_rec.percent_collectable > 100 OR
4233: p_customer_profile_rec.percent_collectable < 0
4234: THEN
4235: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VALUE_BETWEEN' );
4236: FND_MESSAGE.SET_TOKEN( 'COLUMN','percent_collectable');
4237: FND_MESSAGE.SET_TOKEN( 'VALUE1', '0' );
4238: FND_MESSAGE.SET_TOKEN( 'VALUE2', '100' );
4239: FND_MSG_PUB.ADD;
4240: x_return_status := FND_API.G_RET_STS_ERROR;
4233: p_customer_profile_rec.percent_collectable < 0
4234: THEN
4235: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VALUE_BETWEEN' );
4236: FND_MESSAGE.SET_TOKEN( 'COLUMN','percent_collectable');
4237: FND_MESSAGE.SET_TOKEN( 'VALUE1', '0' );
4238: FND_MESSAGE.SET_TOKEN( 'VALUE2', '100' );
4239: FND_MSG_PUB.ADD;
4240: x_return_status := FND_API.G_RET_STS_ERROR;
4241:
4234: THEN
4235: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VALUE_BETWEEN' );
4236: FND_MESSAGE.SET_TOKEN( 'COLUMN','percent_collectable');
4237: FND_MESSAGE.SET_TOKEN( 'VALUE1', '0' );
4238: FND_MESSAGE.SET_TOKEN( 'VALUE2', '100' );
4239: FND_MSG_PUB.ADD;
4240: x_return_status := FND_API.G_RET_STS_ERROR;
4241:
4242: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4532: p_msg_level=>fnd_log.level_statement);
4533: END IF;
4534: /* IF fnd_profile.value('HZ_API_ERR_ON_OBSOLETE_COLUMN')='Y'
4535: THEN
4536: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OBSOLETE_COLUMN');
4537: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'dunning_letter_set_id' );
4538: FND_MSG_PUB.ADD;
4539: x_return_status := FND_API.G_RET_STS_ERROR;
4540: END IF; */
4533: END IF;
4534: /* IF fnd_profile.value('HZ_API_ERR_ON_OBSOLETE_COLUMN')='Y'
4535: THEN
4536: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OBSOLETE_COLUMN');
4537: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'dunning_letter_set_id' );
4538: FND_MSG_PUB.ADD;
4539: x_return_status := FND_API.G_RET_STS_ERROR;
4540: END IF; */
4541:
4787: THEN
4788: IF v_customer_profile_rec.discount_grace_days >= 0 AND
4789: v_customer_profile_rec.discount_grace_days <> FND_API.G_MISS_NUM
4790: THEN
4791: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
4792: FND_MESSAGE.SET_TOKEN( 'COLUMN1', 'discount_terms' );
4793: FND_MESSAGE.SET_TOKEN( 'VALUE1', 'N' );
4794: FND_MESSAGE.SET_TOKEN( 'COLUMN2', 'discount_grace_days');
4795: FND_MESSAGE.SET_TOKEN( 'VALUE2', 'NULL' );
4788: IF v_customer_profile_rec.discount_grace_days >= 0 AND
4789: v_customer_profile_rec.discount_grace_days <> FND_API.G_MISS_NUM
4790: THEN
4791: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
4792: FND_MESSAGE.SET_TOKEN( 'COLUMN1', 'discount_terms' );
4793: FND_MESSAGE.SET_TOKEN( 'VALUE1', 'N' );
4794: FND_MESSAGE.SET_TOKEN( 'COLUMN2', 'discount_grace_days');
4795: FND_MESSAGE.SET_TOKEN( 'VALUE2', 'NULL' );
4796: FND_MSG_PUB.ADD;
4789: v_customer_profile_rec.discount_grace_days <> FND_API.G_MISS_NUM
4790: THEN
4791: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
4792: FND_MESSAGE.SET_TOKEN( 'COLUMN1', 'discount_terms' );
4793: FND_MESSAGE.SET_TOKEN( 'VALUE1', 'N' );
4794: FND_MESSAGE.SET_TOKEN( 'COLUMN2', 'discount_grace_days');
4795: FND_MESSAGE.SET_TOKEN( 'VALUE2', 'NULL' );
4796: FND_MSG_PUB.ADD;
4797: x_return_status := FND_API.G_RET_STS_ERROR;
4790: THEN
4791: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
4792: FND_MESSAGE.SET_TOKEN( 'COLUMN1', 'discount_terms' );
4793: FND_MESSAGE.SET_TOKEN( 'VALUE1', 'N' );
4794: FND_MESSAGE.SET_TOKEN( 'COLUMN2', 'discount_grace_days');
4795: FND_MESSAGE.SET_TOKEN( 'VALUE2', 'NULL' );
4796: FND_MSG_PUB.ADD;
4797: x_return_status := FND_API.G_RET_STS_ERROR;
4798:
4791: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
4792: FND_MESSAGE.SET_TOKEN( 'COLUMN1', 'discount_terms' );
4793: FND_MESSAGE.SET_TOKEN( 'VALUE1', 'N' );
4794: FND_MESSAGE.SET_TOKEN( 'COLUMN2', 'discount_grace_days');
4795: FND_MESSAGE.SET_TOKEN( 'VALUE2', 'NULL' );
4796: FND_MSG_PUB.ADD;
4797: x_return_status := FND_API.G_RET_STS_ERROR;
4798:
4799: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4855: THEN
4856: IF v_customer_profile_rec.dunning_letter_set_id = FND_API.G_MISS_NUM OR
4857: v_customer_profile_rec.dunning_letter_set_id IS NULL
4858: THEN
4859: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MAND_DEP_FIELDS' );
4860: FND_MESSAGE.SET_TOKEN('COLUMN1', 'dunning_letters');
4861: FND_MESSAGE.SET_TOKEN('VALUE1', 'Y');
4862: FND_MESSAGE.SET_TOKEN('COLUMN2','dunning_letter_set_id');
4863: FND_MSG_PUB.ADD;
4856: IF v_customer_profile_rec.dunning_letter_set_id = FND_API.G_MISS_NUM OR
4857: v_customer_profile_rec.dunning_letter_set_id IS NULL
4858: THEN
4859: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MAND_DEP_FIELDS' );
4860: FND_MESSAGE.SET_TOKEN('COLUMN1', 'dunning_letters');
4861: FND_MESSAGE.SET_TOKEN('VALUE1', 'Y');
4862: FND_MESSAGE.SET_TOKEN('COLUMN2','dunning_letter_set_id');
4863: FND_MSG_PUB.ADD;
4864: x_return_status := FND_API.G_RET_STS_ERROR;
4857: v_customer_profile_rec.dunning_letter_set_id IS NULL
4858: THEN
4859: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MAND_DEP_FIELDS' );
4860: FND_MESSAGE.SET_TOKEN('COLUMN1', 'dunning_letters');
4861: FND_MESSAGE.SET_TOKEN('VALUE1', 'Y');
4862: FND_MESSAGE.SET_TOKEN('COLUMN2','dunning_letter_set_id');
4863: FND_MSG_PUB.ADD;
4864: x_return_status := FND_API.G_RET_STS_ERROR;
4865:
4858: THEN
4859: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MAND_DEP_FIELDS' );
4860: FND_MESSAGE.SET_TOKEN('COLUMN1', 'dunning_letters');
4861: FND_MESSAGE.SET_TOKEN('VALUE1', 'Y');
4862: FND_MESSAGE.SET_TOKEN('COLUMN2','dunning_letter_set_id');
4863: FND_MSG_PUB.ADD;
4864: x_return_status := FND_API.G_RET_STS_ERROR;
4865:
4866: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4878: THEN
4879: IF v_customer_profile_rec.dunning_letter_set_id >= 0 AND
4880: v_customer_profile_rec.dunning_letter_set_id <> FND_API.G_MISS_NUM
4881: THEN
4882: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
4883: FND_MESSAGE.SET_TOKEN('COLUMN1','dunning_letters');
4884: FND_MESSAGE.SET_TOKEN('VALUE1','N');
4885: FND_MESSAGE.SET_TOKEN('COLUMN2','dunning_letter_set_id');
4886: FND_MESSAGE.SET_TOKEN('VALUE2','NULL');
4879: IF v_customer_profile_rec.dunning_letter_set_id >= 0 AND
4880: v_customer_profile_rec.dunning_letter_set_id <> FND_API.G_MISS_NUM
4881: THEN
4882: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
4883: FND_MESSAGE.SET_TOKEN('COLUMN1','dunning_letters');
4884: FND_MESSAGE.SET_TOKEN('VALUE1','N');
4885: FND_MESSAGE.SET_TOKEN('COLUMN2','dunning_letter_set_id');
4886: FND_MESSAGE.SET_TOKEN('VALUE2','NULL');
4887: FND_MSG_PUB.ADD;
4880: v_customer_profile_rec.dunning_letter_set_id <> FND_API.G_MISS_NUM
4881: THEN
4882: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
4883: FND_MESSAGE.SET_TOKEN('COLUMN1','dunning_letters');
4884: FND_MESSAGE.SET_TOKEN('VALUE1','N');
4885: FND_MESSAGE.SET_TOKEN('COLUMN2','dunning_letter_set_id');
4886: FND_MESSAGE.SET_TOKEN('VALUE2','NULL');
4887: FND_MSG_PUB.ADD;
4888: x_return_status := FND_API.G_RET_STS_ERROR;
4881: THEN
4882: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
4883: FND_MESSAGE.SET_TOKEN('COLUMN1','dunning_letters');
4884: FND_MESSAGE.SET_TOKEN('VALUE1','N');
4885: FND_MESSAGE.SET_TOKEN('COLUMN2','dunning_letter_set_id');
4886: FND_MESSAGE.SET_TOKEN('VALUE2','NULL');
4887: FND_MSG_PUB.ADD;
4888: x_return_status := FND_API.G_RET_STS_ERROR;
4889:
4882: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
4883: FND_MESSAGE.SET_TOKEN('COLUMN1','dunning_letters');
4884: FND_MESSAGE.SET_TOKEN('VALUE1','N');
4885: FND_MESSAGE.SET_TOKEN('COLUMN2','dunning_letter_set_id');
4886: FND_MESSAGE.SET_TOKEN('VALUE2','NULL');
4887: FND_MSG_PUB.ADD;
4888: x_return_status := FND_API.G_RET_STS_ERROR;
4889:
4890: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4956: IF v_customer_profile_rec.send_statements = 'Y' THEN
4957: IF v_customer_profile_rec.statement_cycle_id = FND_API.G_MISS_NUM OR
4958: v_customer_profile_rec.statement_cycle_id IS NULL
4959: THEN
4960: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MAND_DEP_FIELDS' );
4961: FND_MESSAGE.SET_TOKEN( 'COLUMN1','send_statements');
4962: FND_MESSAGE.SET_TOKEN( 'VALUE1','Y');
4963: FND_MESSAGE.SET_TOKEN( 'COLUMN2','statement_cycle_id');
4964: FND_MSG_PUB.ADD;
4957: IF v_customer_profile_rec.statement_cycle_id = FND_API.G_MISS_NUM OR
4958: v_customer_profile_rec.statement_cycle_id IS NULL
4959: THEN
4960: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MAND_DEP_FIELDS' );
4961: FND_MESSAGE.SET_TOKEN( 'COLUMN1','send_statements');
4962: FND_MESSAGE.SET_TOKEN( 'VALUE1','Y');
4963: FND_MESSAGE.SET_TOKEN( 'COLUMN2','statement_cycle_id');
4964: FND_MSG_PUB.ADD;
4965: x_return_status := FND_API.G_RET_STS_ERROR;
4958: v_customer_profile_rec.statement_cycle_id IS NULL
4959: THEN
4960: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MAND_DEP_FIELDS' );
4961: FND_MESSAGE.SET_TOKEN( 'COLUMN1','send_statements');
4962: FND_MESSAGE.SET_TOKEN( 'VALUE1','Y');
4963: FND_MESSAGE.SET_TOKEN( 'COLUMN2','statement_cycle_id');
4964: FND_MSG_PUB.ADD;
4965: x_return_status := FND_API.G_RET_STS_ERROR;
4966:
4959: THEN
4960: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MAND_DEP_FIELDS' );
4961: FND_MESSAGE.SET_TOKEN( 'COLUMN1','send_statements');
4962: FND_MESSAGE.SET_TOKEN( 'VALUE1','Y');
4963: FND_MESSAGE.SET_TOKEN( 'COLUMN2','statement_cycle_id');
4964: FND_MSG_PUB.ADD;
4965: x_return_status := FND_API.G_RET_STS_ERROR;
4966:
4967: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4972: END IF;
4973:
4974: END IF;
4975: IF v_customer_profile_rec.credit_balance_statements IS NULL THEN
4976: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MAND_DEP_FIELDS' );
4977: FND_MESSAGE.SET_TOKEN( 'COLUMN1','send_statements');
4978: FND_MESSAGE.SET_TOKEN( 'VALUE1','Y');
4979: FND_MESSAGE.SET_TOKEN( 'COLUMN2','credit_balance_statements');
4980: FND_MSG_PUB.ADD;
4973:
4974: END IF;
4975: IF v_customer_profile_rec.credit_balance_statements IS NULL THEN
4976: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MAND_DEP_FIELDS' );
4977: FND_MESSAGE.SET_TOKEN( 'COLUMN1','send_statements');
4978: FND_MESSAGE.SET_TOKEN( 'VALUE1','Y');
4979: FND_MESSAGE.SET_TOKEN( 'COLUMN2','credit_balance_statements');
4980: FND_MSG_PUB.ADD;
4981: x_return_status := FND_API.G_RET_STS_ERROR;
4974: END IF;
4975: IF v_customer_profile_rec.credit_balance_statements IS NULL THEN
4976: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MAND_DEP_FIELDS' );
4977: FND_MESSAGE.SET_TOKEN( 'COLUMN1','send_statements');
4978: FND_MESSAGE.SET_TOKEN( 'VALUE1','Y');
4979: FND_MESSAGE.SET_TOKEN( 'COLUMN2','credit_balance_statements');
4980: FND_MSG_PUB.ADD;
4981: x_return_status := FND_API.G_RET_STS_ERROR;
4982:
4975: IF v_customer_profile_rec.credit_balance_statements IS NULL THEN
4976: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MAND_DEP_FIELDS' );
4977: FND_MESSAGE.SET_TOKEN( 'COLUMN1','send_statements');
4978: FND_MESSAGE.SET_TOKEN( 'VALUE1','Y');
4979: FND_MESSAGE.SET_TOKEN( 'COLUMN2','credit_balance_statements');
4980: FND_MSG_PUB.ADD;
4981: x_return_status := FND_API.G_RET_STS_ERROR;
4982:
4983: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4996: THEN
4997: IF v_customer_profile_rec.statement_cycle_id >= 0 AND
4998: v_customer_profile_rec.statement_cycle_id <> FND_API.G_MISS_NUM
4999: THEN
5000: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
5001: FND_MESSAGE.SET_TOKEN('COLUMN1', 'send_statements');
5002: FND_MESSAGE.SET_TOKEN('VALUE1', 'N');
5003: FND_MESSAGE.SET_TOKEN('COLUMN2','statement_cycle_id');
5004: FND_MESSAGE.SET_TOKEN('VALUE2', 'NULL');
4997: IF v_customer_profile_rec.statement_cycle_id >= 0 AND
4998: v_customer_profile_rec.statement_cycle_id <> FND_API.G_MISS_NUM
4999: THEN
5000: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
5001: FND_MESSAGE.SET_TOKEN('COLUMN1', 'send_statements');
5002: FND_MESSAGE.SET_TOKEN('VALUE1', 'N');
5003: FND_MESSAGE.SET_TOKEN('COLUMN2','statement_cycle_id');
5004: FND_MESSAGE.SET_TOKEN('VALUE2', 'NULL');
5005: FND_MSG_PUB.ADD;
4998: v_customer_profile_rec.statement_cycle_id <> FND_API.G_MISS_NUM
4999: THEN
5000: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
5001: FND_MESSAGE.SET_TOKEN('COLUMN1', 'send_statements');
5002: FND_MESSAGE.SET_TOKEN('VALUE1', 'N');
5003: FND_MESSAGE.SET_TOKEN('COLUMN2','statement_cycle_id');
5004: FND_MESSAGE.SET_TOKEN('VALUE2', 'NULL');
5005: FND_MSG_PUB.ADD;
5006: x_return_status := FND_API.G_RET_STS_ERROR;
4999: THEN
5000: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
5001: FND_MESSAGE.SET_TOKEN('COLUMN1', 'send_statements');
5002: FND_MESSAGE.SET_TOKEN('VALUE1', 'N');
5003: FND_MESSAGE.SET_TOKEN('COLUMN2','statement_cycle_id');
5004: FND_MESSAGE.SET_TOKEN('VALUE2', 'NULL');
5005: FND_MSG_PUB.ADD;
5006: x_return_status := FND_API.G_RET_STS_ERROR;
5007:
5000: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
5001: FND_MESSAGE.SET_TOKEN('COLUMN1', 'send_statements');
5002: FND_MESSAGE.SET_TOKEN('VALUE1', 'N');
5003: FND_MESSAGE.SET_TOKEN('COLUMN2','statement_cycle_id');
5004: FND_MESSAGE.SET_TOKEN('VALUE2', 'NULL');
5005: FND_MSG_PUB.ADD;
5006: x_return_status := FND_API.G_RET_STS_ERROR;
5007:
5008: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5015: END IF;
5016: IF v_customer_profile_rec.credit_balance_statements <> 'N' AND
5017: v_customer_profile_rec.credit_balance_statements IS NOT NULL
5018: THEN
5019: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
5020: FND_MESSAGE.SET_TOKEN('COLUMN1','send_statements');
5021: FND_MESSAGE.SET_TOKEN('VALUE1','N');
5022: FND_MESSAGE.SET_TOKEN('COLUMN2','credit_balance_statements');
5023: FND_MESSAGE.SET_TOKEN('VALUE2','N');
5016: IF v_customer_profile_rec.credit_balance_statements <> 'N' AND
5017: v_customer_profile_rec.credit_balance_statements IS NOT NULL
5018: THEN
5019: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
5020: FND_MESSAGE.SET_TOKEN('COLUMN1','send_statements');
5021: FND_MESSAGE.SET_TOKEN('VALUE1','N');
5022: FND_MESSAGE.SET_TOKEN('COLUMN2','credit_balance_statements');
5023: FND_MESSAGE.SET_TOKEN('VALUE2','N');
5024: FND_MSG_PUB.ADD;
5017: v_customer_profile_rec.credit_balance_statements IS NOT NULL
5018: THEN
5019: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
5020: FND_MESSAGE.SET_TOKEN('COLUMN1','send_statements');
5021: FND_MESSAGE.SET_TOKEN('VALUE1','N');
5022: FND_MESSAGE.SET_TOKEN('COLUMN2','credit_balance_statements');
5023: FND_MESSAGE.SET_TOKEN('VALUE2','N');
5024: FND_MSG_PUB.ADD;
5025: x_return_status := FND_API.G_RET_STS_ERROR;
5018: THEN
5019: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
5020: FND_MESSAGE.SET_TOKEN('COLUMN1','send_statements');
5021: FND_MESSAGE.SET_TOKEN('VALUE1','N');
5022: FND_MESSAGE.SET_TOKEN('COLUMN2','credit_balance_statements');
5023: FND_MESSAGE.SET_TOKEN('VALUE2','N');
5024: FND_MSG_PUB.ADD;
5025: x_return_status := FND_API.G_RET_STS_ERROR;
5026:
5019: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
5020: FND_MESSAGE.SET_TOKEN('COLUMN1','send_statements');
5021: FND_MESSAGE.SET_TOKEN('VALUE1','N');
5022: FND_MESSAGE.SET_TOKEN('COLUMN2','credit_balance_statements');
5023: FND_MESSAGE.SET_TOKEN('VALUE2','N');
5024: FND_MSG_PUB.ADD;
5025: x_return_status := FND_API.G_RET_STS_ERROR;
5026:
5027: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5105: ('LATE', 'OVERDUE_LATE', 'OVERDUE') THEN
5106: IF v_customer_profile_rec.interest_period_days = FND_API.G_MISS_NUM OR
5107: v_customer_profile_rec.interest_period_days IS NULL
5108: THEN
5109: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_INT_CHARGES_Y' );
5110: FND_MSG_PUB.ADD;
5111: x_return_status := FND_API.G_RET_STS_ERROR;
5112: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5113: hz_utility_v2pub.debug(p_message=>'interest_period_days cannot be NULL when interest_charges is Y.' || 'x_return_status = ' || x_return_status,
5141: THEN
5142: IF v_customer_profile_rec.interest_period_days >= 0 AND
5143: v_customer_profile_rec.interest_period_days <> FND_API.G_MISS_NUM
5144: THEN
5145: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
5146: FND_MESSAGE.SET_TOKEN( 'COLUMN1','interest_charges');
5147: FND_MESSAGE.SET_TOKEN( 'VALUE1','N');
5148: FND_MESSAGE.SET_TOKEN( 'COLUMN2','interest_period_days');
5149: FND_MESSAGE.SET_TOKEN( 'VALUE2','NULL');
5142: IF v_customer_profile_rec.interest_period_days >= 0 AND
5143: v_customer_profile_rec.interest_period_days <> FND_API.G_MISS_NUM
5144: THEN
5145: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
5146: FND_MESSAGE.SET_TOKEN( 'COLUMN1','interest_charges');
5147: FND_MESSAGE.SET_TOKEN( 'VALUE1','N');
5148: FND_MESSAGE.SET_TOKEN( 'COLUMN2','interest_period_days');
5149: FND_MESSAGE.SET_TOKEN( 'VALUE2','NULL');
5150: FND_MSG_PUB.ADD;
5143: v_customer_profile_rec.interest_period_days <> FND_API.G_MISS_NUM
5144: THEN
5145: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
5146: FND_MESSAGE.SET_TOKEN( 'COLUMN1','interest_charges');
5147: FND_MESSAGE.SET_TOKEN( 'VALUE1','N');
5148: FND_MESSAGE.SET_TOKEN( 'COLUMN2','interest_period_days');
5149: FND_MESSAGE.SET_TOKEN( 'VALUE2','NULL');
5150: FND_MSG_PUB.ADD;
5151: x_return_status := FND_API.G_RET_STS_ERROR;
5144: THEN
5145: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
5146: FND_MESSAGE.SET_TOKEN( 'COLUMN1','interest_charges');
5147: FND_MESSAGE.SET_TOKEN( 'VALUE1','N');
5148: FND_MESSAGE.SET_TOKEN( 'COLUMN2','interest_period_days');
5149: FND_MESSAGE.SET_TOKEN( 'VALUE2','NULL');
5150: FND_MSG_PUB.ADD;
5151: x_return_status := FND_API.G_RET_STS_ERROR;
5152:
5145: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
5146: FND_MESSAGE.SET_TOKEN( 'COLUMN1','interest_charges');
5147: FND_MESSAGE.SET_TOKEN( 'VALUE1','N');
5148: FND_MESSAGE.SET_TOKEN( 'COLUMN2','interest_period_days');
5149: FND_MESSAGE.SET_TOKEN( 'VALUE2','NULL');
5150: FND_MSG_PUB.ADD;
5151: x_return_status := FND_API.G_RET_STS_ERROR;
5152:
5153: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5159:
5160: END IF;
5161: IF v_customer_profile_rec.charge_on_finance_charge_flag = 'Y'
5162: THEN
5163: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
5164: FND_MESSAGE.SET_TOKEN( 'COLUMN1','interest_charges');
5165: FND_MESSAGE.SET_TOKEN( 'VALUE1','N');
5166: FND_MESSAGE.SET_TOKEN( 'COLUMN2','charge_on_finance_charge_flag');
5167: FND_MESSAGE.SET_TOKEN( 'VALUE2','N');
5160: END IF;
5161: IF v_customer_profile_rec.charge_on_finance_charge_flag = 'Y'
5162: THEN
5163: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
5164: FND_MESSAGE.SET_TOKEN( 'COLUMN1','interest_charges');
5165: FND_MESSAGE.SET_TOKEN( 'VALUE1','N');
5166: FND_MESSAGE.SET_TOKEN( 'COLUMN2','charge_on_finance_charge_flag');
5167: FND_MESSAGE.SET_TOKEN( 'VALUE2','N');
5168: FND_MSG_PUB.ADD;
5161: IF v_customer_profile_rec.charge_on_finance_charge_flag = 'Y'
5162: THEN
5163: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
5164: FND_MESSAGE.SET_TOKEN( 'COLUMN1','interest_charges');
5165: FND_MESSAGE.SET_TOKEN( 'VALUE1','N');
5166: FND_MESSAGE.SET_TOKEN( 'COLUMN2','charge_on_finance_charge_flag');
5167: FND_MESSAGE.SET_TOKEN( 'VALUE2','N');
5168: FND_MSG_PUB.ADD;
5169: x_return_status := FND_API.G_RET_STS_ERROR;
5162: THEN
5163: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
5164: FND_MESSAGE.SET_TOKEN( 'COLUMN1','interest_charges');
5165: FND_MESSAGE.SET_TOKEN( 'VALUE1','N');
5166: FND_MESSAGE.SET_TOKEN( 'COLUMN2','charge_on_finance_charge_flag');
5167: FND_MESSAGE.SET_TOKEN( 'VALUE2','N');
5168: FND_MSG_PUB.ADD;
5169: x_return_status := FND_API.G_RET_STS_ERROR;
5170:
5163: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_DEP_FIELDS' );
5164: FND_MESSAGE.SET_TOKEN( 'COLUMN1','interest_charges');
5165: FND_MESSAGE.SET_TOKEN( 'VALUE1','N');
5166: FND_MESSAGE.SET_TOKEN( 'COLUMN2','charge_on_finance_charge_flag');
5167: FND_MESSAGE.SET_TOKEN( 'VALUE2','N');
5168: FND_MSG_PUB.ADD;
5169: x_return_status := FND_API.G_RET_STS_ERROR;
5170:
5171: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5470: ((p_customer_profile_rec.late_charge_type = 'ADJ') AND
5471: (p_customer_profile_rec.late_charge_term_id IS NOT NULL AND p_customer_profile_rec.late_charge_term_id <> FND_API.G_MISS_NUM))) THEN
5472: -- Late charge payment term is required when
5473: -- late charge type is debit memo or interest invoice
5474: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_LC_PAY_TERM' );
5475: FND_MSG_PUB.ADD;
5476: x_return_status := FND_API.G_RET_STS_ERROR;
5477: END IF;
5478:
5513: IF ((p_customer_profile_rec.late_charge_type = 'ADJ') AND
5514: (p_customer_profile_rec.message_text_id IS NOT NULL AND p_customer_profile_rec.message_text_id <> FND_API.G_MISS_NUM)) THEN
5515: -- Message text can be entered only when
5516: -- late charge type is debit memo or interest invoice
5517: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_MSG_FOR_LC_TYPE' );
5518: FND_MSG_PUB.ADD;
5519: x_return_status := FND_API.G_RET_STS_ERROR;
5520: END IF;
5521:
5689: SELECT 'Y' INTO l_dummy
5690: FROM HZ_CUST_PROFILE_AMTS
5691: WHERE CUST_ACCT_PROFILE_AMT_ID = p_cust_profile_amt_rec.cust_acct_profile_amt_id;
5692:
5693: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
5694: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_acct_profile_amt_id' );
5695: FND_MSG_PUB.ADD;
5696: x_return_status := FND_API.G_RET_STS_ERROR;
5697: EXCEPTION
5690: FROM HZ_CUST_PROFILE_AMTS
5691: WHERE CUST_ACCT_PROFILE_AMT_ID = p_cust_profile_amt_rec.cust_acct_profile_amt_id;
5692:
5693: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
5694: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_acct_profile_amt_id' );
5695: FND_MSG_PUB.ADD;
5696: x_return_status := FND_API.G_RET_STS_ERROR;
5697: EXCEPTION
5698: WHEN NO_DATA_FOUND THEN
5785: WHERE CUST_ACCOUNT_PROFILE_ID = p_cust_profile_amt_rec.cust_account_profile_id;
5786:
5787: EXCEPTION
5788: WHEN NO_DATA_FOUND THEN
5789: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
5790: FND_MESSAGE.SET_TOKEN( 'FK', 'cust_account_profile_id' );
5791: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_profile_id' );
5792: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_customer_profiles' );
5793: FND_MSG_PUB.ADD;
5786:
5787: EXCEPTION
5788: WHEN NO_DATA_FOUND THEN
5789: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
5790: FND_MESSAGE.SET_TOKEN( 'FK', 'cust_account_profile_id' );
5791: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_profile_id' );
5792: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_customer_profiles' );
5793: FND_MSG_PUB.ADD;
5794: x_return_status := FND_API.G_RET_STS_ERROR;
5787: EXCEPTION
5788: WHEN NO_DATA_FOUND THEN
5789: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
5790: FND_MESSAGE.SET_TOKEN( 'FK', 'cust_account_profile_id' );
5791: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_profile_id' );
5792: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_customer_profiles' );
5793: FND_MSG_PUB.ADD;
5794: x_return_status := FND_API.G_RET_STS_ERROR;
5795: END;
5788: WHEN NO_DATA_FOUND THEN
5789: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
5790: FND_MESSAGE.SET_TOKEN( 'FK', 'cust_account_profile_id' );
5791: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_profile_id' );
5792: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_customer_profiles' );
5793: FND_MSG_PUB.ADD;
5794: x_return_status := FND_API.G_RET_STS_ERROR;
5795: END;
5796:
5883:
5884: -- cross reference checking
5885:
5886: IF p_cust_profile_amt_rec.cust_account_id <> l_cust_account_id THEN
5887: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_PROF_AMT_IDS_MISMATCH' );
5888: FND_MESSAGE.SET_TOKEN( 'ENTITY', 'customer' );
5889: FND_MSG_PUB.ADD;
5890: x_return_status := FND_API.G_RET_STS_ERROR;
5891: END IF;
5884: -- cross reference checking
5885:
5886: IF p_cust_profile_amt_rec.cust_account_id <> l_cust_account_id THEN
5887: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_PROF_AMT_IDS_MISMATCH' );
5888: FND_MESSAGE.SET_TOKEN( 'ENTITY', 'customer' );
5889: FND_MSG_PUB.ADD;
5890: x_return_status := FND_API.G_RET_STS_ERROR;
5891: END IF;
5892:
5982: WHERE CUST_ACCOUNT_PROFILE_ID = p_cust_profile_amt_rec.cust_account_profile_id
5983: AND CURRENCY_CODE = p_cust_profile_amt_rec.currency_code
5984: AND ROWNUM = 1;
5985:
5986: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
5987: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_profile_id - currency_code' );
5988: FND_MSG_PUB.ADD;
5989: x_return_status := FND_API.G_RET_STS_ERROR;
5990: EXCEPTION
5983: AND CURRENCY_CODE = p_cust_profile_amt_rec.currency_code
5984: AND ROWNUM = 1;
5985:
5986: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
5987: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_profile_id - currency_code' );
5988: FND_MSG_PUB.ADD;
5989: x_return_status := FND_API.G_RET_STS_ERROR;
5990: EXCEPTION
5991: WHEN NO_DATA_FOUND THEN
6062: ( ( p_cust_profile_amt_rec.site_use_id IS NULL OR
6063: p_cust_profile_amt_rec.site_use_id = FND_API.G_MISS_NUM ) AND
6064: l_site_use_id IS NOT NULL )
6065: THEN
6066: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_PROF_AMT_IDS_MISMATCH' );
6067: FND_MESSAGE.SET_TOKEN( 'ENTITY', 'site use' );
6068: FND_MSG_PUB.ADD;
6069: x_return_status := FND_API.G_RET_STS_ERROR;
6070: END IF;
6063: p_cust_profile_amt_rec.site_use_id = FND_API.G_MISS_NUM ) AND
6064: l_site_use_id IS NOT NULL )
6065: THEN
6066: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_PROF_AMT_IDS_MISMATCH' );
6067: FND_MESSAGE.SET_TOKEN( 'ENTITY', 'site use' );
6068: FND_MSG_PUB.ADD;
6069: x_return_status := FND_API.G_RET_STS_ERROR;
6070: END IF;
6071:
6138: )
6139: THEN
6140: IF p_cust_profile_amt_rec.overall_credit_limit < p_cust_profile_amt_rec.trx_credit_limit
6141: THEN
6142: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_OVERALL_CREDIT' );
6143: FND_MSG_PUB.ADD;
6144: x_return_status := FND_API.G_RET_STS_ERROR;
6145:
6146: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6379:
6380: IF v_cust_profile_amt_rec.min_fc_invoice_overdue_type = 'AMOUNT' THEN
6381: IF (v_cust_profile_amt_rec.min_fc_invoice_amount IS NULL OR
6382: v_cust_profile_amt_rec.min_fc_invoice_percent IS NOT NULL) THEN
6383: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_LC_INVALID_PERCENT' );
6384: FND_MSG_PUB.ADD;
6385: x_return_status := FND_API.G_RET_STS_ERROR;
6386: END IF;
6387: ELSIF v_cust_profile_amt_rec.min_fc_invoice_overdue_type = 'PERCENT' THEN
6386: END IF;
6387: ELSIF v_cust_profile_amt_rec.min_fc_invoice_overdue_type = 'PERCENT' THEN
6388: IF (v_cust_profile_amt_rec.min_fc_invoice_amount IS NOT NULL OR
6389: v_cust_profile_amt_rec.min_fc_invoice_percent IS NULL) THEN
6390: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_LC_INVALID_PERCENT' );
6391: FND_MSG_PUB.ADD;
6392: x_return_status := FND_API.G_RET_STS_ERROR;
6393: ELSE
6394: check_less_than_100 (
6405: END IF;
6406: ELSE
6407: IF (v_cust_profile_amt_rec.min_fc_invoice_amount IS NOT NULL OR
6408: v_cust_profile_amt_rec.min_fc_invoice_percent IS NOT NULL) THEN
6409: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_LC_INVALID_PERCENT' );
6410: FND_MSG_PUB.ADD;
6411: x_return_status := FND_API.G_RET_STS_ERROR;
6412: END IF;
6413: END IF;
6460:
6461: IF v_cust_profile_amt_rec.min_fc_balance_overdue_type = 'AMOUNT' THEN
6462: IF (v_cust_profile_amt_rec.min_fc_balance_amount IS NULL OR
6463: v_cust_profile_amt_rec.min_fc_balance_percent IS NOT NULL) THEN
6464: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_LC_INVALID_BAL_AMT' );
6465: FND_MSG_PUB.ADD;
6466: x_return_status := FND_API.G_RET_STS_ERROR;
6467: END IF;
6468: ELSIF v_cust_profile_amt_rec.min_fc_balance_overdue_type = 'PERCENT' THEN
6467: END IF;
6468: ELSIF v_cust_profile_amt_rec.min_fc_balance_overdue_type = 'PERCENT' THEN
6469: IF (v_cust_profile_amt_rec.min_fc_balance_amount IS NOT NULL OR
6470: v_cust_profile_amt_rec.min_fc_balance_percent IS NULL) THEN
6471: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_LC_INVALID_BAL_AMT' );
6472: FND_MSG_PUB.ADD;
6473: x_return_status := FND_API.G_RET_STS_ERROR;
6474: ELSE
6475: check_less_than_100 (
6486: END IF;
6487: ELSE
6488: IF (v_cust_profile_amt_rec.min_fc_balance_amount IS NOT NULL OR
6489: v_cust_profile_amt_rec.min_fc_balance_percent IS NOT NULL) THEN
6490: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_LC_INVALID_BAL_AMT' );
6491: FND_MSG_PUB.ADD;
6492: x_return_status := FND_API.G_RET_STS_ERROR;
6493: END IF;
6494: END IF;
6549: IF v_cust_profile_amt_rec.interest_type = 'FIXED_RATE' THEN
6550: IF (v_cust_profile_amt_rec.interest_rate IS NULL OR
6551: v_cust_profile_amt_rec.interest_fixed_amount IS NOT NULL OR
6552: v_cust_profile_amt_rec.interest_schedule_id IS NOT NULL) THEN
6553: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_LC_INVALID_INT_RATE' );
6554: FND_MSG_PUB.ADD;
6555: x_return_status := FND_API.G_RET_STS_ERROR;
6556: ELSE
6557: check_less_than_100 (
6569: ELSIF v_cust_profile_amt_rec.interest_type = 'FIXED_AMOUNT' THEN
6570: IF (v_cust_profile_amt_rec.interest_rate IS NOT NULL OR
6571: v_cust_profile_amt_rec.interest_fixed_amount IS NULL OR
6572: v_cust_profile_amt_rec.interest_schedule_id IS NOT NULL) THEN
6573: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_LC_INVALID_INT_RATE' );
6574: FND_MSG_PUB.ADD;
6575: x_return_status := FND_API.G_RET_STS_ERROR;
6576: END IF;
6577: /*6469663 Late charge enhacement handling case oftier basis calculation*/
6578: ELSIF v_cust_profile_amt_rec.interest_type IN ( 'CHARGES_SCHEDULE','CHARGE_PER_TIER') THEN
6579: IF (v_cust_profile_amt_rec.interest_rate IS NOT NULL OR
6580: v_cust_profile_amt_rec.interest_fixed_amount IS NOT NULL OR
6581: v_cust_profile_amt_rec.interest_schedule_id IS NULL) THEN
6582: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_LC_INVALID_INT_RATE' );
6583: FND_MSG_PUB.ADD;
6584: x_return_status := FND_API.G_RET_STS_ERROR;
6585: ELSE
6586: check_charge_schedule_id_fk (
6598: ELSE
6599: IF (v_cust_profile_amt_rec.interest_rate IS NOT NULL OR
6600: v_cust_profile_amt_rec.interest_fixed_amount IS NOT NULL OR
6601: v_cust_profile_amt_rec.interest_schedule_id IS NOT NULL) THEN
6602: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_LC_INVALID_INT_RATE' );
6603: FND_MSG_PUB.ADD;
6604: x_return_status := FND_API.G_RET_STS_ERROR;
6605: END IF;
6606: END IF;
6661: IF v_cust_profile_amt_rec.penalty_type = 'FIXED_RATE' THEN
6662: IF (v_cust_profile_amt_rec.penalty_rate IS NULL OR
6663: v_cust_profile_amt_rec.penalty_fixed_amount IS NOT NULL OR
6664: v_cust_profile_amt_rec.penalty_schedule_id IS NOT NULL) THEN
6665: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_LC_INVALID_PEN_RATE' );
6666: FND_MSG_PUB.ADD;
6667: x_return_status := FND_API.G_RET_STS_ERROR;
6668: ELSE
6669: check_less_than_100 (
6681: ELSIF v_cust_profile_amt_rec.penalty_type = 'FIXED_AMOUNT' THEN
6682: IF (v_cust_profile_amt_rec.penalty_rate IS NOT NULL OR
6683: v_cust_profile_amt_rec.penalty_fixed_amount IS NULL OR
6684: v_cust_profile_amt_rec.penalty_schedule_id IS NOT NULL) THEN
6685: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_LC_INVALID_PEN_RATE' );
6686: FND_MSG_PUB.ADD;
6687: x_return_status := FND_API.G_RET_STS_ERROR;
6688: END IF;
6689: /*6469663 Late charge enhacement handling case oftier basis calculation*/
6690: ELSIF v_cust_profile_amt_rec.penalty_type IN ('CHARGES_SCHEDULE','CHARGE_PER_TIER') THEN
6691: IF (v_cust_profile_amt_rec.penalty_rate IS NOT NULL OR
6692: v_cust_profile_amt_rec.penalty_fixed_amount IS NOT NULL OR
6693: v_cust_profile_amt_rec.penalty_schedule_id IS NULL) THEN
6694: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_LC_INVALID_PEN_RATE' );
6695: FND_MSG_PUB.ADD;
6696: x_return_status := FND_API.G_RET_STS_ERROR;
6697: ELSE
6698: check_charge_schedule_id_fk (
6710: ELSE
6711: IF (v_cust_profile_amt_rec.penalty_rate IS NOT NULL OR
6712: v_cust_profile_amt_rec.penalty_fixed_amount IS NOT NULL OR
6713: v_cust_profile_amt_rec.penalty_schedule_id IS NOT NULL) THEN
6714: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_LC_INVALID_PEN_RATE' );
6715: FND_MSG_PUB.ADD;
6716: x_return_status := FND_API.G_RET_STS_ERROR;
6717: END IF;
6718: END IF;
6858: p_prefix =>l_debug_prefix,
6859: p_msg_level=>fnd_log.level_statement);
6860: END IF;
6861:
6862: FND_MESSAGE.SET_NAME( 'AR', 'HZ_PARTY_SITE_MISSMATCH' );
6863: FND_MESSAGE.SET_TOKEN( 'ADDRESS_PARTY_NAME', l_site_party_name );
6864: FND_MESSAGE.SET_TOKEN( 'ACCOUNT_PARTY_NAME', l_account_party_name );
6865: FND_MESSAGE.SET_TOKEN( 'ACCOUNT_NUMBER', l_account_number );
6866: FND_MSG_PUB.ADD;
6859: p_msg_level=>fnd_log.level_statement);
6860: END IF;
6861:
6862: FND_MESSAGE.SET_NAME( 'AR', 'HZ_PARTY_SITE_MISSMATCH' );
6863: FND_MESSAGE.SET_TOKEN( 'ADDRESS_PARTY_NAME', l_site_party_name );
6864: FND_MESSAGE.SET_TOKEN( 'ACCOUNT_PARTY_NAME', l_account_party_name );
6865: FND_MESSAGE.SET_TOKEN( 'ACCOUNT_NUMBER', l_account_number );
6866: FND_MSG_PUB.ADD;
6867: x_return_status := FND_API.G_RET_STS_ERROR;
6860: END IF;
6861:
6862: FND_MESSAGE.SET_NAME( 'AR', 'HZ_PARTY_SITE_MISSMATCH' );
6863: FND_MESSAGE.SET_TOKEN( 'ADDRESS_PARTY_NAME', l_site_party_name );
6864: FND_MESSAGE.SET_TOKEN( 'ACCOUNT_PARTY_NAME', l_account_party_name );
6865: FND_MESSAGE.SET_TOKEN( 'ACCOUNT_NUMBER', l_account_number );
6866: FND_MSG_PUB.ADD;
6867: x_return_status := FND_API.G_RET_STS_ERROR;
6868: END;
6861:
6862: FND_MESSAGE.SET_NAME( 'AR', 'HZ_PARTY_SITE_MISSMATCH' );
6863: FND_MESSAGE.SET_TOKEN( 'ADDRESS_PARTY_NAME', l_site_party_name );
6864: FND_MESSAGE.SET_TOKEN( 'ACCOUNT_PARTY_NAME', l_account_party_name );
6865: FND_MESSAGE.SET_TOKEN( 'ACCOUNT_NUMBER', l_account_number );
6866: FND_MSG_PUB.ADD;
6867: x_return_status := FND_API.G_RET_STS_ERROR;
6868: END;
6869: ELSE
6886: ' with combination of '||l_account_party_id||'(subject_id) and '||l_site_party_id||'(object_id)',
6887: p_prefix =>l_debug_prefix,
6888: p_msg_level=>fnd_log.level_statement);
6889: END IF;
6890: FND_MESSAGE.SET_NAME( 'AR', 'HZ_PARTY_SITE_MISSMATCH' );
6891: FND_MESSAGE.SET_TOKEN( 'ADDRESS_PARTY_NAME', l_site_party_name );
6892: FND_MESSAGE.SET_TOKEN( 'ACCOUNT_PARTY_NAME', l_account_party_name );
6893: FND_MESSAGE.SET_TOKEN( 'ACCOUNT_NUMBER', l_account_number );
6894: FND_MSG_PUB.ADD;
6887: p_prefix =>l_debug_prefix,
6888: p_msg_level=>fnd_log.level_statement);
6889: END IF;
6890: FND_MESSAGE.SET_NAME( 'AR', 'HZ_PARTY_SITE_MISSMATCH' );
6891: FND_MESSAGE.SET_TOKEN( 'ADDRESS_PARTY_NAME', l_site_party_name );
6892: FND_MESSAGE.SET_TOKEN( 'ACCOUNT_PARTY_NAME', l_account_party_name );
6893: FND_MESSAGE.SET_TOKEN( 'ACCOUNT_NUMBER', l_account_number );
6894: FND_MSG_PUB.ADD;
6895: x_return_status := FND_API.G_RET_STS_ERROR;
6888: p_msg_level=>fnd_log.level_statement);
6889: END IF;
6890: FND_MESSAGE.SET_NAME( 'AR', 'HZ_PARTY_SITE_MISSMATCH' );
6891: FND_MESSAGE.SET_TOKEN( 'ADDRESS_PARTY_NAME', l_site_party_name );
6892: FND_MESSAGE.SET_TOKEN( 'ACCOUNT_PARTY_NAME', l_account_party_name );
6893: FND_MESSAGE.SET_TOKEN( 'ACCOUNT_NUMBER', l_account_number );
6894: FND_MSG_PUB.ADD;
6895: x_return_status := FND_API.G_RET_STS_ERROR;
6896: END;
6889: END IF;
6890: FND_MESSAGE.SET_NAME( 'AR', 'HZ_PARTY_SITE_MISSMATCH' );
6891: FND_MESSAGE.SET_TOKEN( 'ADDRESS_PARTY_NAME', l_site_party_name );
6892: FND_MESSAGE.SET_TOKEN( 'ACCOUNT_PARTY_NAME', l_account_party_name );
6893: FND_MESSAGE.SET_TOKEN( 'ACCOUNT_NUMBER', l_account_number );
6894: FND_MSG_PUB.ADD;
6895: x_return_status := FND_API.G_RET_STS_ERROR;
6896: END;
6897: END IF;
7031: SELECT 'Y' INTO l_dummy
7032: FROM HZ_CUST_ACCT_SITES_ALL -- Bug 3456489
7033: WHERE CUST_ACCT_SITE_ID = p_cust_acct_site_rec.cust_acct_site_id;
7034:
7035: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
7036: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_acct_site_id' );
7037: FND_MSG_PUB.ADD;
7038: x_return_status := FND_API.G_RET_STS_ERROR;
7039: EXCEPTION
7032: FROM HZ_CUST_ACCT_SITES_ALL -- Bug 3456489
7033: WHERE CUST_ACCT_SITE_ID = p_cust_acct_site_rec.cust_acct_site_id;
7034:
7035: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
7036: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_acct_site_id' );
7037: FND_MSG_PUB.ADD;
7038: x_return_status := FND_API.G_RET_STS_ERROR;
7039: EXCEPTION
7040: WHEN NO_DATA_FOUND THEN
7224: AND CONTENT_SOURCE_TYPE = HZ_PARTY_V2PUB.G_MISS_CONTENT_SOURCE_TYPE;
7225:
7226: EXCEPTION
7227: WHEN NO_DATA_FOUND THEN
7228: FND_MESSAGE.SET_NAME( 'AR', 'HZ_LOC_CONTENT_INVALID' );
7229: FND_MSG_PUB.ADD;
7230: x_return_status := FND_API.G_RET_STS_ERROR;
7231: END;
7232:
7267: AND PARTY_SITE_ID = p_cust_acct_site_rec.party_site_id
7268: AND ORG_ID = p_cust_acct_site_rec.org_id -- Bug 3456489
7269: AND ROWNUM = 1;
7270:
7271: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
7272: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_id - party_site_id' );
7273: FND_MSG_PUB.ADD;
7274: x_return_status := FND_API.G_RET_STS_ERROR;
7275: EXCEPTION
7268: AND ORG_ID = p_cust_acct_site_rec.org_id -- Bug 3456489
7269: AND ROWNUM = 1;
7270:
7271: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
7272: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_id - party_site_id' );
7273: FND_MSG_PUB.ADD;
7274: x_return_status := FND_API.G_RET_STS_ERROR;
7275: EXCEPTION
7276: WHEN NO_DATA_FOUND THEN
7316: FROM HZ_CUST_ACCT_SITES_ALL
7317: WHERE ORIG_SYSTEM_REFERENCE = p_cust_acct_site_rec.orig_system_reference
7318: AND ORG_ID = p_cust_acct_site_rec.org_id;
7319:
7320: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
7321: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'orig_system_reference' );
7322: FND_MSG_PUB.ADD;
7323: x_return_status := FND_API.G_RET_STS_ERROR;
7324: EXCEPTION
7317: WHERE ORIG_SYSTEM_REFERENCE = p_cust_acct_site_rec.orig_system_reference
7318: AND ORG_ID = p_cust_acct_site_rec.org_id;
7319:
7320: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
7321: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'orig_system_reference' );
7322: FND_MSG_PUB.ADD;
7323: x_return_status := FND_API.G_RET_STS_ERROR;
7324: EXCEPTION
7325: WHEN NO_DATA_FOUND THEN
7422:
7423: IF p_create_update_flag = 'C' OR
7424: ( p_create_update_flag = 'U' AND l_rowid <> p_rowid )
7425: THEN
7426: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
7427: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'tp_header_id' );
7428: FND_MSG_PUB.ADD;
7429: x_return_status := FND_API.G_RET_STS_ERROR;
7430: END IF;
7423: IF p_create_update_flag = 'C' OR
7424: ( p_create_update_flag = 'U' AND l_rowid <> p_rowid )
7425: THEN
7426: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
7427: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'tp_header_id' );
7428: FND_MSG_PUB.ADD;
7429: x_return_status := FND_API.G_RET_STS_ERROR;
7430: END IF;
7431: EXCEPTION
7550: AND INSTALLED_FLAG IN ('B', 'I')
7551: AND ROWNUM = 1;
7552: EXCEPTION
7553: WHEN NO_DATA_FOUND THEN
7554: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
7555: FND_MESSAGE.SET_TOKEN( 'FK', 'language' );
7556: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'language_code' );
7557: FND_MESSAGE.SET_TOKEN( 'TABLE', 'fnd_languages(installed)' );
7558: FND_MSG_PUB.ADD;
7551: AND ROWNUM = 1;
7552: EXCEPTION
7553: WHEN NO_DATA_FOUND THEN
7554: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
7555: FND_MESSAGE.SET_TOKEN( 'FK', 'language' );
7556: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'language_code' );
7557: FND_MESSAGE.SET_TOKEN( 'TABLE', 'fnd_languages(installed)' );
7558: FND_MSG_PUB.ADD;
7559: x_return_status := FND_API.G_RET_STS_ERROR;
7552: EXCEPTION
7553: WHEN NO_DATA_FOUND THEN
7554: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
7555: FND_MESSAGE.SET_TOKEN( 'FK', 'language' );
7556: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'language_code' );
7557: FND_MESSAGE.SET_TOKEN( 'TABLE', 'fnd_languages(installed)' );
7558: FND_MSG_PUB.ADD;
7559: x_return_status := FND_API.G_RET_STS_ERROR;
7560: END;
7553: WHEN NO_DATA_FOUND THEN
7554: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
7555: FND_MESSAGE.SET_TOKEN( 'FK', 'language' );
7556: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'language_code' );
7557: FND_MESSAGE.SET_TOKEN( 'TABLE', 'fnd_languages(installed)' );
7558: FND_MSG_PUB.ADD;
7559: x_return_status := FND_API.G_RET_STS_ERROR;
7560: END;
7561:
7674: and addr.ece_tp_location_code = p_cust_acct_site_rec.ece_tp_location_code
7675: and org_id = p_cust_acct_site_rec.org_id; -- Bug 3456489
7676:
7677: IF l_count > 0 THEN
7678: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_ADDR_EDI_LOC_EXISTS' );
7679: FND_MSG_PUB.ADD;
7680: x_return_status := FND_API.G_RET_STS_ERROR;
7681: END IF;
7682: END IF;
7693: and addr.cust_acct_site_id <> p_cust_acct_site_rec.cust_acct_site_id
7694: and org_id = p_cust_acct_site_rec.org_id; -- Bug 3456489
7695:
7696: IF l_count > 0 THEN
7697: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_ADDR_EDI_LOC_EXISTS' );
7698: FND_MSG_PUB.ADD;
7699: x_return_status := FND_API.G_RET_STS_ERROR;
7700: END IF;
7701: END IF;
7874: SELECT 'Y' INTO l_dummy
7875: FROM HZ_CUST_SITE_USES_ALL
7876: WHERE SITE_USE_ID = p_cust_site_use_rec.site_use_id;
7877:
7878: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
7879: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_site_use_id' );
7880: FND_MSG_PUB.ADD;
7881: x_return_status := FND_API.G_RET_STS_ERROR;
7882: EXCEPTION
7875: FROM HZ_CUST_SITE_USES_ALL
7876: WHERE SITE_USE_ID = p_cust_site_use_rec.site_use_id;
7877:
7878: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
7879: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_site_use_id' );
7880: FND_MSG_PUB.ADD;
7881: x_return_status := FND_API.G_RET_STS_ERROR;
7882: EXCEPTION
7883: WHEN NO_DATA_FOUND THEN
8136: AND su.org_id = p_cust_site_use_rec.org_id -- Bug 3456489
8137: AND ROWNUM = 1;
8138:
8139: IF l_site_use_code = 'DUN' THEN
8140: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_ONE_ACTIVE_DUN_SITE' );
8141: ELSIF l_site_use_code = 'LEGAL' THEN
8142: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_ONE_ACTIVE_LEGAL_SITE' );
8143: ELSIF l_site_use_code = 'STMTS' THEN
8144: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_ONE_ACTIVE_STMTS_SITE' );
8138:
8139: IF l_site_use_code = 'DUN' THEN
8140: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_ONE_ACTIVE_DUN_SITE' );
8141: ELSIF l_site_use_code = 'LEGAL' THEN
8142: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_ONE_ACTIVE_LEGAL_SITE' );
8143: ELSIF l_site_use_code = 'STMTS' THEN
8144: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_ONE_ACTIVE_STMTS_SITE' );
8145: END IF;
8146:
8140: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_ONE_ACTIVE_DUN_SITE' );
8141: ELSIF l_site_use_code = 'LEGAL' THEN
8142: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_ONE_ACTIVE_LEGAL_SITE' );
8143: ELSIF l_site_use_code = 'STMTS' THEN
8144: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_ONE_ACTIVE_STMTS_SITE' );
8145: END IF;
8146:
8147: FND_MSG_PUB.ADD;
8148: x_return_status := FND_API.G_RET_STS_ERROR;
8176: AND STATUS = 'A'
8177: AND ORG_ID = p_cust_site_use_rec.org_id -- Bug 3456489
8178: AND ROWNUM = 1;
8179:
8180: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
8181: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_acct_site_id - site_use_code' );
8182: FND_MSG_PUB.ADD;
8183: x_return_status := FND_API.G_RET_STS_ERROR;
8184: EXCEPTION
8177: AND ORG_ID = p_cust_site_use_rec.org_id -- Bug 3456489
8178: AND ROWNUM = 1;
8179:
8180: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
8181: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_acct_site_id - site_use_code' );
8182: FND_MSG_PUB.ADD;
8183: x_return_status := FND_API.G_RET_STS_ERROR;
8184: EXCEPTION
8185: WHEN NO_DATA_FOUND THEN
8228: IF p_cust_site_use_rec.location IS NULL OR
8229: p_cust_site_use_rec.location = FND_API.G_MISS_CHAR
8230: THEN
8231: IF l_profile = 'N' THEN
8232: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
8233: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'location' );
8234: FND_MSG_PUB.ADD;
8235: x_return_status := FND_API.G_RET_STS_ERROR;
8236: END IF;
8229: p_cust_site_use_rec.location = FND_API.G_MISS_CHAR
8230: THEN
8231: IF l_profile = 'N' THEN
8232: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
8233: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'location' );
8234: FND_MSG_PUB.ADD;
8235: x_return_status := FND_API.G_RET_STS_ERROR;
8236: END IF;
8237:
8284: AND su.org_id = p_cust_site_use_rec.org_id -- Bug 3456489
8285: AND ROWNUM = 1;
8286:
8287:
8288: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_DUP_CODE_LOCATION' );
8289: FND_MSG_PUB.ADD;
8290: x_return_status := FND_API.G_RET_STS_ERROR;
8291:
8292: EXCEPTION
8362: WHERE RELATED_CUST_ACCOUNT_ID = l_cust_account_id
8363: AND BILL_TO_FLAG = 'Y' );
8364: EXCEPTION
8365: WHEN NO_DATA_FOUND THEN
8366: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_BILL_TO_SITE_USE_F' );
8367: FND_MSG_PUB.ADD;
8368: x_return_status := FND_API.G_RET_STS_ERROR;
8369: END;
8370:
8375: p_msg_level=>fnd_log.level_statement);
8376: END IF;
8377:
8378: ELSE
8379: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_BILL_TO_SITE_USE_S' );
8380: FND_MSG_PUB.ADD;
8381: x_return_status := FND_API.G_RET_STS_ERROR;
8382: END IF;
8383: END IF;
8401: AND hsu.status = 'A'
8402: AND hsu.bill_to_site_use_id = p_cust_site_use_rec.site_use_id
8403: AND rownum = 1;
8404:
8405: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_SHIP_TO_SITES_EXIST' );
8406: FND_MSG_PUB.ADD;
8407: x_return_status := FND_API.G_RET_STS_ERROR;
8408:
8409: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8585: AND ( p_create_update_flag = 'C' OR
8586: (p_create_update_flag = 'U' AND su.ROWID <> p_rowid ))
8587: AND ROWNUM = 1;
8588:
8589: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_ONE_PRIMARY_SU' );
8590: FND_MESSAGE.SET_TOKEN( 'SITE_CODE', l_site_use_code );
8591: FND_MSG_PUB.ADD;
8592: x_return_status := FND_API.G_RET_STS_ERROR;
8593:
8586: (p_create_update_flag = 'U' AND su.ROWID <> p_rowid ))
8587: AND ROWNUM = 1;
8588:
8589: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_ONE_PRIMARY_SU' );
8590: FND_MESSAGE.SET_TOKEN( 'SITE_CODE', l_site_use_code );
8591: FND_MSG_PUB.ADD;
8592: x_return_status := FND_API.G_RET_STS_ERROR;
8593:
8594: EXCEPTION
8639: END IF;
8640: END IF;
8641:
8642: IF l_error THEN
8643: fnd_message.set_name('AR', 'HZ_API_INACTIVE_CANNOT_PRIM');
8644: fnd_message.set_token('ENTITY', 'Site Use');
8645: -- fnd_message.set_token('COLUMN1', 'primary_flag');
8646: -- fnd_message.set_token('COLUMN2', 'status');
8647: fnd_msg_pub.add;
8640: END IF;
8641:
8642: IF l_error THEN
8643: fnd_message.set_name('AR', 'HZ_API_INACTIVE_CANNOT_PRIM');
8644: fnd_message.set_token('ENTITY', 'Site Use');
8645: -- fnd_message.set_token('COLUMN1', 'primary_flag');
8646: -- fnd_message.set_token('COLUMN2', 'status');
8647: fnd_msg_pub.add;
8648: x_return_status := FND_API.G_RET_STS_ERROR;
8641:
8642: IF l_error THEN
8643: fnd_message.set_name('AR', 'HZ_API_INACTIVE_CANNOT_PRIM');
8644: fnd_message.set_token('ENTITY', 'Site Use');
8645: -- fnd_message.set_token('COLUMN1', 'primary_flag');
8646: -- fnd_message.set_token('COLUMN2', 'status');
8647: fnd_msg_pub.add;
8648: x_return_status := FND_API.G_RET_STS_ERROR;
8649: -- reset l_error for later use.
8642: IF l_error THEN
8643: fnd_message.set_name('AR', 'HZ_API_INACTIVE_CANNOT_PRIM');
8644: fnd_message.set_token('ENTITY', 'Site Use');
8645: -- fnd_message.set_token('COLUMN1', 'primary_flag');
8646: -- fnd_message.set_token('COLUMN2', 'status');
8647: fnd_msg_pub.add;
8648: x_return_status := FND_API.G_RET_STS_ERROR;
8649: -- reset l_error for later use.
8650: l_error := FALSE;
8740: INTO l_dummy
8741: FROM DUAL;
8742: IF l_dummy <> 'Y'
8743: THEN
8744: FND_MESSAGE.SET_NAME('AR','HZ_API_VAL_DEP_FIELDS');
8745: FND_MESSAGE.SET_TOKEN('COLUMN1','ship_sets_include_lines_flag');
8746: FND_MESSAGE.SET_TOKEN('VALUE1','Y');
8747: FND_MESSAGE.SET_TOKEN('COLUMN2','arrivalsets_include_lines_flag');
8748: FND_MESSAGE.SET_TOKEN('VALUE2','N');
8741: FROM DUAL;
8742: IF l_dummy <> 'Y'
8743: THEN
8744: FND_MESSAGE.SET_NAME('AR','HZ_API_VAL_DEP_FIELDS');
8745: FND_MESSAGE.SET_TOKEN('COLUMN1','ship_sets_include_lines_flag');
8746: FND_MESSAGE.SET_TOKEN('VALUE1','Y');
8747: FND_MESSAGE.SET_TOKEN('COLUMN2','arrivalsets_include_lines_flag');
8748: FND_MESSAGE.SET_TOKEN('VALUE2','N');
8749: FND_MSG_PUB.ADD;
8742: IF l_dummy <> 'Y'
8743: THEN
8744: FND_MESSAGE.SET_NAME('AR','HZ_API_VAL_DEP_FIELDS');
8745: FND_MESSAGE.SET_TOKEN('COLUMN1','ship_sets_include_lines_flag');
8746: FND_MESSAGE.SET_TOKEN('VALUE1','Y');
8747: FND_MESSAGE.SET_TOKEN('COLUMN2','arrivalsets_include_lines_flag');
8748: FND_MESSAGE.SET_TOKEN('VALUE2','N');
8749: FND_MSG_PUB.ADD;
8750: x_return_status := FND_API.G_RET_STS_ERROR;
8743: THEN
8744: FND_MESSAGE.SET_NAME('AR','HZ_API_VAL_DEP_FIELDS');
8745: FND_MESSAGE.SET_TOKEN('COLUMN1','ship_sets_include_lines_flag');
8746: FND_MESSAGE.SET_TOKEN('VALUE1','Y');
8747: FND_MESSAGE.SET_TOKEN('COLUMN2','arrivalsets_include_lines_flag');
8748: FND_MESSAGE.SET_TOKEN('VALUE2','N');
8749: FND_MSG_PUB.ADD;
8750: x_return_status := FND_API.G_RET_STS_ERROR;
8751: END IF;
8744: FND_MESSAGE.SET_NAME('AR','HZ_API_VAL_DEP_FIELDS');
8745: FND_MESSAGE.SET_TOKEN('COLUMN1','ship_sets_include_lines_flag');
8746: FND_MESSAGE.SET_TOKEN('VALUE1','Y');
8747: FND_MESSAGE.SET_TOKEN('COLUMN2','arrivalsets_include_lines_flag');
8748: FND_MESSAGE.SET_TOKEN('VALUE2','N');
8749: FND_MSG_PUB.ADD;
8750: x_return_status := FND_API.G_RET_STS_ERROR;
8751: END IF;
8752: END ;
8809: INTO l_dummy
8810: FROM DUAL;
8811: IF l_dummy <> 'Y'
8812: THEN
8813: FND_MESSAGE.SET_NAME('AR','HZ_API_VAL_DEP_FIELDS');
8814: FND_MESSAGE.SET_TOKEN('COLUMN1','arrivalsets_include_lines_flag');
8815: FND_MESSAGE.SET_TOKEN('VALUE1','Y');
8816: FND_MESSAGE.SET_TOKEN('COLUMN2','ship_sets_include_lines_flag');
8817: FND_MESSAGE.SET_TOKEN('VALUE2','N');
8810: FROM DUAL;
8811: IF l_dummy <> 'Y'
8812: THEN
8813: FND_MESSAGE.SET_NAME('AR','HZ_API_VAL_DEP_FIELDS');
8814: FND_MESSAGE.SET_TOKEN('COLUMN1','arrivalsets_include_lines_flag');
8815: FND_MESSAGE.SET_TOKEN('VALUE1','Y');
8816: FND_MESSAGE.SET_TOKEN('COLUMN2','ship_sets_include_lines_flag');
8817: FND_MESSAGE.SET_TOKEN('VALUE2','N');
8818: FND_MSG_PUB.ADD;
8811: IF l_dummy <> 'Y'
8812: THEN
8813: FND_MESSAGE.SET_NAME('AR','HZ_API_VAL_DEP_FIELDS');
8814: FND_MESSAGE.SET_TOKEN('COLUMN1','arrivalsets_include_lines_flag');
8815: FND_MESSAGE.SET_TOKEN('VALUE1','Y');
8816: FND_MESSAGE.SET_TOKEN('COLUMN2','ship_sets_include_lines_flag');
8817: FND_MESSAGE.SET_TOKEN('VALUE2','N');
8818: FND_MSG_PUB.ADD;
8819: x_return_status := FND_API.G_RET_STS_ERROR;
8812: THEN
8813: FND_MESSAGE.SET_NAME('AR','HZ_API_VAL_DEP_FIELDS');
8814: FND_MESSAGE.SET_TOKEN('COLUMN1','arrivalsets_include_lines_flag');
8815: FND_MESSAGE.SET_TOKEN('VALUE1','Y');
8816: FND_MESSAGE.SET_TOKEN('COLUMN2','ship_sets_include_lines_flag');
8817: FND_MESSAGE.SET_TOKEN('VALUE2','N');
8818: FND_MSG_PUB.ADD;
8819: x_return_status := FND_API.G_RET_STS_ERROR;
8820: END IF;
8813: FND_MESSAGE.SET_NAME('AR','HZ_API_VAL_DEP_FIELDS');
8814: FND_MESSAGE.SET_TOKEN('COLUMN1','arrivalsets_include_lines_flag');
8815: FND_MESSAGE.SET_TOKEN('VALUE1','Y');
8816: FND_MESSAGE.SET_TOKEN('COLUMN2','ship_sets_include_lines_flag');
8817: FND_MESSAGE.SET_TOKEN('VALUE2','N');
8818: FND_MSG_PUB.ADD;
8819: x_return_status := FND_API.G_RET_STS_ERROR;
8820: END IF;
8821: END ;
9326: p_cust_site_use_rec.gl_id_unbilled <> FND_API.G_MISS_NUM ) OR
9327: ( p_cust_site_use_rec.gl_id_unearned IS NOT NULL AND
9328: p_cust_site_use_rec.gl_id_unearned <> FND_API.G_MISS_NUM )
9329: THEN
9330: FND_MESSAGE.SET_NAME( 'AR', 'AR_AUTO_CCID_INVALID' );
9331: FND_MSG_PUB.ADD;
9332: x_return_status := FND_API.G_RET_STS_ERROR;
9333: END IF;
9334:
9354: p_cust_site_use_rec.gl_id_remittance <> FND_API.G_MISS_NUM ) OR
9355: ( p_cust_site_use_rec.gl_id_factor IS NOT NULL AND
9356: p_cust_site_use_rec.gl_id_factor <> FND_API.G_MISS_NUM )
9357: THEN
9358: FND_MESSAGE.SET_NAME( 'AR', 'AR_AUTO_CCID_INVALID' );
9359: FND_MSG_PUB.ADD;
9360: x_return_status := FND_API.G_RET_STS_ERROR;
9361: END IF;
9362:
9377: THEN
9378: IF ( p_cust_site_use_rec.gl_id_rec IS NOT NULL AND
9379: p_cust_site_use_rec.gl_id_rec <> FND_API.G_MISS_NUM )
9380: THEN
9381: FND_MESSAGE.SET_NAME( 'AR', 'AR_AUTO_CCID_INVALID' );
9382: FND_MSG_PUB.ADD;
9383: x_return_status := FND_API.G_RET_STS_ERROR;
9384: END IF;
9385:
9812: SELECT 'Y' INTO l_dummy
9813: FROM HZ_CUST_ACCOUNT_ROLES
9814: WHERE CUST_ACCOUNT_ROLE_ID = p_cust_account_role_rec.cust_account_role_id;
9815:
9816: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
9817: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_role_id' );
9818: FND_MSG_PUB.ADD;
9819: x_return_status := FND_API.G_RET_STS_ERROR;
9820: EXCEPTION
9813: FROM HZ_CUST_ACCOUNT_ROLES
9814: WHERE CUST_ACCOUNT_ROLE_ID = p_cust_account_role_rec.cust_account_role_id;
9815:
9816: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
9817: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_role_id' );
9818: FND_MSG_PUB.ADD;
9819: x_return_status := FND_API.G_RET_STS_ERROR;
9820: EXCEPTION
9821: WHEN NO_DATA_FOUND THEN
10045: x_return_status := FND_API.G_RET_STS_ERROR;
10046: END;
10047:
10048: IF l_cust_account_id <> p_cust_account_role_rec.cust_account_id THEN
10049: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_ACCT_SITE_MISSMATCH' );
10050: FND_MSG_PUB.ADD;
10051: x_return_status := FND_API.G_RET_STS_ERROR;
10052: END IF;
10053:
10052: END IF;
10053:
10054: EXCEPTION
10055: WHEN NO_DATA_FOUND THEN
10056: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
10057: FND_MESSAGE.SET_TOKEN( 'FK', 'cust_acct_site_id' );
10058: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_acct_site_id' );
10059: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_acct_sites' );
10060: FND_MSG_PUB.ADD;
10053:
10054: EXCEPTION
10055: WHEN NO_DATA_FOUND THEN
10056: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
10057: FND_MESSAGE.SET_TOKEN( 'FK', 'cust_acct_site_id' );
10058: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_acct_site_id' );
10059: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_acct_sites' );
10060: FND_MSG_PUB.ADD;
10061: x_return_status := FND_API.G_RET_STS_ERROR;
10054: EXCEPTION
10055: WHEN NO_DATA_FOUND THEN
10056: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
10057: FND_MESSAGE.SET_TOKEN( 'FK', 'cust_acct_site_id' );
10058: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_acct_site_id' );
10059: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_acct_sites' );
10060: FND_MSG_PUB.ADD;
10061: x_return_status := FND_API.G_RET_STS_ERROR;
10062: END;
10055: WHEN NO_DATA_FOUND THEN
10056: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
10057: FND_MESSAGE.SET_TOKEN( 'FK', 'cust_acct_site_id' );
10058: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_acct_site_id' );
10059: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_acct_sites' );
10060: FND_MSG_PUB.ADD;
10061: x_return_status := FND_API.G_RET_STS_ERROR;
10062: END;
10063:
10162: AND ROLE_TYPE = p_cust_account_role_rec.role_type
10163: AND STATUS='A' -- Bug 4624292
10164: AND ROWNUM = 1;
10165:
10166: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
10167: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_id - party_id - role_type' );
10168: FND_MSG_PUB.ADD;
10169: x_return_status := FND_API.G_RET_STS_ERROR;
10170: EXCEPTION
10163: AND STATUS='A' -- Bug 4624292
10164: AND ROWNUM = 1;
10165:
10166: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
10167: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_id - party_id - role_type' );
10168: FND_MSG_PUB.ADD;
10169: x_return_status := FND_API.G_RET_STS_ERROR;
10170: EXCEPTION
10171: WHEN NO_DATA_FOUND THEN
10188: AND ROLE_TYPE = p_cust_account_role_rec.role_type
10189: AND STATUS='A' -- Bug 4624292
10190: AND ROWNUM = 1;
10191:
10192: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
10193: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_acct_site_id - party_id - role_type' );
10194: FND_MSG_PUB.ADD;
10195: x_return_status := FND_API.G_RET_STS_ERROR;
10196: EXCEPTION
10189: AND STATUS='A' -- Bug 4624292
10190: AND ROWNUM = 1;
10191:
10192: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
10193: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_acct_site_id - party_id - role_type' );
10194: FND_MSG_PUB.ADD;
10195: x_return_status := FND_API.G_RET_STS_ERROR;
10196: EXCEPTION
10197: WHEN NO_DATA_FOUND THEN
10223: AND STATUS='A'
10224: AND ROWID<>p_rowid
10225: AND ROWNUM = 1;
10226:
10227: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
10228: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_acct_site_id - party_id - role_type' );
10229: FND_MSG_PUB.ADD;
10230: x_return_status := FND_API.G_RET_STS_ERROR;
10231: EXCEPTION
10224: AND ROWID<>p_rowid
10225: AND ROWNUM = 1;
10226:
10227: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
10228: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_acct_site_id - party_id - role_type' );
10229: FND_MSG_PUB.ADD;
10230: x_return_status := FND_API.G_RET_STS_ERROR;
10231: EXCEPTION
10232: WHEN NO_DATA_FOUND THEN
10252: AND STATUS='A'
10253: AND ROWID<>p_rowid
10254: AND ROWNUM = 1;
10255:
10256: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
10257: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_id - party_id - role_type' );
10258: FND_MSG_PUB.ADD;
10259: x_return_status := FND_API.G_RET_STS_ERROR;
10260: EXCEPTION
10253: AND ROWID<>p_rowid
10254: AND ROWNUM = 1;
10255:
10256: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
10257: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_id - party_id - role_type' );
10258: FND_MSG_PUB.ADD;
10259: x_return_status := FND_API.G_RET_STS_ERROR;
10260: EXCEPTION
10261: WHEN NO_DATA_FOUND THEN
10386: AND ( p_create_update_flag = 'C' OR
10387: p_create_update_flag = 'U' AND ROWID <> p_rowid )
10388: AND ROWNUM = 1;
10389:
10390: FND_MESSAGE.SET_NAME( 'AR', 'HZ_CUST_ACCT_ROLE_PRIMARY' );
10391: FND_MESSAGE.SET_TOKEN( 'ENTITY', 'account' );
10392: FND_MSG_PUB.ADD;
10393: x_return_status := FND_API.G_RET_STS_ERROR;
10394: EXCEPTION
10387: p_create_update_flag = 'U' AND ROWID <> p_rowid )
10388: AND ROWNUM = 1;
10389:
10390: FND_MESSAGE.SET_NAME( 'AR', 'HZ_CUST_ACCT_ROLE_PRIMARY' );
10391: FND_MESSAGE.SET_TOKEN( 'ENTITY', 'account' );
10392: FND_MSG_PUB.ADD;
10393: x_return_status := FND_API.G_RET_STS_ERROR;
10394: EXCEPTION
10395: WHEN NO_DATA_FOUND THEN
10413: AND ( p_create_update_flag = 'C' OR
10414: p_create_update_flag = 'U' AND ROWID <> p_rowid )
10415: AND ROWNUM = 1;
10416:
10417: FND_MESSAGE.SET_NAME( 'AR', 'HZ_CUST_ACCT_ROLE_PRIMARY' );
10418: FND_MESSAGE.SET_TOKEN( 'ENTITY', 'account site' );
10419: FND_MSG_PUB.ADD;
10420: x_return_status := FND_API.G_RET_STS_ERROR;
10421: EXCEPTION
10414: p_create_update_flag = 'U' AND ROWID <> p_rowid )
10415: AND ROWNUM = 1;
10416:
10417: FND_MESSAGE.SET_NAME( 'AR', 'HZ_CUST_ACCT_ROLE_PRIMARY' );
10418: FND_MESSAGE.SET_TOKEN( 'ENTITY', 'account site' );
10419: FND_MSG_PUB.ADD;
10420: x_return_status := FND_API.G_RET_STS_ERROR;
10421: EXCEPTION
10422: WHEN NO_DATA_FOUND THEN
10616: SELECT 'Y' INTO l_dummy
10617: FROM HZ_ROLE_RESPONSIBILITY
10618: WHERE RESPONSIBILITY_ID = p_role_responsibility_rec.responsibility_id;
10619:
10620: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
10621: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'responsibility_id' );
10622: FND_MSG_PUB.ADD;
10623: x_return_status := FND_API.G_RET_STS_ERROR;
10624: EXCEPTION
10617: FROM HZ_ROLE_RESPONSIBILITY
10618: WHERE RESPONSIBILITY_ID = p_role_responsibility_rec.responsibility_id;
10619:
10620: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
10621: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'responsibility_id' );
10622: FND_MSG_PUB.ADD;
10623: x_return_status := FND_API.G_RET_STS_ERROR;
10624: EXCEPTION
10625: WHEN NO_DATA_FOUND THEN
10787: AND ( p_create_update_flag = 'C' OR
10788: ( p_create_update_flag = 'U' AND ROWID <> p_rowid ) )
10789: AND ROWNUM = 1;
10790:
10791: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
10792: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_role_id - responsibility_type' );
10793: FND_MSG_PUB.ADD;
10794: x_return_status := FND_API.G_RET_STS_ERROR;
10795: EXCEPTION
10788: ( p_create_update_flag = 'U' AND ROWID <> p_rowid ) )
10789: AND ROWNUM = 1;
10790:
10791: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DUPLICATE_COLUMN' );
10792: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_role_id - responsibility_type' );
10793: FND_MSG_PUB.ADD;
10794: x_return_status := FND_API.G_RET_STS_ERROR;
10795: EXCEPTION
10796: WHEN NO_DATA_FOUND THEN
10884: AND ( p_create_update_flag = 'C' OR
10885: p_create_update_flag = 'U' AND ROWID <> p_rowid )
10886: AND ROWNUM = 1;
10887:
10888: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_ROLE_PRIMARY' );
10889: FND_MSG_PUB.ADD;
10890: x_return_status := FND_API.G_RET_STS_ERROR;
10891: EXCEPTION
10892: WHEN NO_DATA_FOUND THEN
10965: END IF;
10966:
10967: EXCEPTION
10968: WHEN NO_DATA_FOUND THEN
10969: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
10970: FND_MESSAGE.SET_TOKEN( 'FK', 'cust_account_id' );
10971: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
10972: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_accounts' );
10973: FND_MSG_PUB.ADD;
10966:
10967: EXCEPTION
10968: WHEN NO_DATA_FOUND THEN
10969: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
10970: FND_MESSAGE.SET_TOKEN( 'FK', 'cust_account_id' );
10971: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
10972: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_accounts' );
10973: FND_MSG_PUB.ADD;
10974: x_return_status := FND_API.G_RET_STS_ERROR;
10967: EXCEPTION
10968: WHEN NO_DATA_FOUND THEN
10969: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
10970: FND_MESSAGE.SET_TOKEN( 'FK', 'cust_account_id' );
10971: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
10972: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_accounts' );
10973: FND_MSG_PUB.ADD;
10974: x_return_status := FND_API.G_RET_STS_ERROR;
10975:
10968: WHEN NO_DATA_FOUND THEN
10969: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
10970: FND_MESSAGE.SET_TOKEN( 'FK', 'cust_account_id' );
10971: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
10972: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_accounts' );
10973: FND_MSG_PUB.ADD;
10974: x_return_status := FND_API.G_RET_STS_ERROR;
10975:
10976: END check_cust_account_fk;
11000: AND ORG_ID = p_org_id; -- Bug 3456489
11001:
11002: EXCEPTION
11003: WHEN NO_DATA_FOUND THEN
11004: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11005: FND_MESSAGE.SET_TOKEN( 'FK', 'cust_acct_site_id' );
11006: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11007: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_acct_sites' );
11008: FND_MSG_PUB.ADD;
11001:
11002: EXCEPTION
11003: WHEN NO_DATA_FOUND THEN
11004: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11005: FND_MESSAGE.SET_TOKEN( 'FK', 'cust_acct_site_id' );
11006: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11007: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_acct_sites' );
11008: FND_MSG_PUB.ADD;
11009: x_return_status := FND_API.G_RET_STS_ERROR;
11002: EXCEPTION
11003: WHEN NO_DATA_FOUND THEN
11004: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11005: FND_MESSAGE.SET_TOKEN( 'FK', 'cust_acct_site_id' );
11006: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11007: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_acct_sites' );
11008: FND_MSG_PUB.ADD;
11009: x_return_status := FND_API.G_RET_STS_ERROR;
11010:
11003: WHEN NO_DATA_FOUND THEN
11004: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11005: FND_MESSAGE.SET_TOKEN( 'FK', 'cust_acct_site_id' );
11006: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11007: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_acct_sites' );
11008: FND_MSG_PUB.ADD;
11009: x_return_status := FND_API.G_RET_STS_ERROR;
11010:
11011: END check_cust_acct_site_fk;
11034: END;
11035:
11036: EXCEPTION
11037: WHEN NO_DATA_FOUND THEN
11038: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11039: FND_MESSAGE.SET_TOKEN( 'FK', 'site_use_id' );
11040: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11041: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_site_uses' );
11042: FND_MSG_PUB.ADD;
11035:
11036: EXCEPTION
11037: WHEN NO_DATA_FOUND THEN
11038: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11039: FND_MESSAGE.SET_TOKEN( 'FK', 'site_use_id' );
11040: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11041: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_site_uses' );
11042: FND_MSG_PUB.ADD;
11043: x_return_status := FND_API.G_RET_STS_ERROR;
11036: EXCEPTION
11037: WHEN NO_DATA_FOUND THEN
11038: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11039: FND_MESSAGE.SET_TOKEN( 'FK', 'site_use_id' );
11040: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11041: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_site_uses' );
11042: FND_MSG_PUB.ADD;
11043: x_return_status := FND_API.G_RET_STS_ERROR;
11044:
11037: WHEN NO_DATA_FOUND THEN
11038: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11039: FND_MESSAGE.SET_TOKEN( 'FK', 'site_use_id' );
11040: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11041: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_site_uses' );
11042: FND_MSG_PUB.ADD;
11043: x_return_status := FND_API.G_RET_STS_ERROR;
11044:
11045: END check_cust_site_use_fk;
11058: AND CUST_ACCOUNT_ID = p_customer_id;
11059:
11060: EXCEPTION
11061: WHEN NO_DATA_FOUND THEN
11062: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11063: FND_MESSAGE.SET_TOKEN( 'FK', 'contact_id' );
11064: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11065: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_account_roles' );
11066: FND_MSG_PUB.ADD;
11059:
11060: EXCEPTION
11061: WHEN NO_DATA_FOUND THEN
11062: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11063: FND_MESSAGE.SET_TOKEN( 'FK', 'contact_id' );
11064: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11065: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_account_roles' );
11066: FND_MSG_PUB.ADD;
11067: x_return_status := FND_API.G_RET_STS_ERROR;
11060: EXCEPTION
11061: WHEN NO_DATA_FOUND THEN
11062: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11063: FND_MESSAGE.SET_TOKEN( 'FK', 'contact_id' );
11064: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11065: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_account_roles' );
11066: FND_MSG_PUB.ADD;
11067: x_return_status := FND_API.G_RET_STS_ERROR;
11068:
11061: WHEN NO_DATA_FOUND THEN
11062: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11063: FND_MESSAGE.SET_TOKEN( 'FK', 'contact_id' );
11064: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11065: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_account_roles' );
11066: FND_MSG_PUB.ADD;
11067: x_return_status := FND_API.G_RET_STS_ERROR;
11068:
11069: END check_cust_site_use_cont_fk;
11082: WHERE CUST_ACCOUNT_ROLE_ID = p_column_value;
11083:
11084: EXCEPTION
11085: WHEN NO_DATA_FOUND THEN
11086: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11087: FND_MESSAGE.SET_TOKEN( 'FK', 'cust_account_role_id' );
11088: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11089: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_account_roles' );
11090: FND_MSG_PUB.ADD;
11083:
11084: EXCEPTION
11085: WHEN NO_DATA_FOUND THEN
11086: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11087: FND_MESSAGE.SET_TOKEN( 'FK', 'cust_account_role_id' );
11088: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11089: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_account_roles' );
11090: FND_MSG_PUB.ADD;
11091: x_return_status := FND_API.G_RET_STS_ERROR;
11084: EXCEPTION
11085: WHEN NO_DATA_FOUND THEN
11086: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11087: FND_MESSAGE.SET_TOKEN( 'FK', 'cust_account_role_id' );
11088: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11089: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_account_roles' );
11090: FND_MSG_PUB.ADD;
11091: x_return_status := FND_API.G_RET_STS_ERROR;
11092:
11085: WHEN NO_DATA_FOUND THEN
11086: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11087: FND_MESSAGE.SET_TOKEN( 'FK', 'cust_account_role_id' );
11088: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11089: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_account_roles' );
11090: FND_MSG_PUB.ADD;
11091: x_return_status := FND_API.G_RET_STS_ERROR;
11092:
11093: END check_cust_account_role_fk;
11115: AND ROWNUM = 1;
11116:
11117: EXCEPTION
11118: WHEN NO_DATA_FOUND THEN
11119: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11120: FND_MESSAGE.SET_TOKEN( 'FK', 'person_id' );
11121: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11122: FND_MESSAGE.SET_TOKEN( 'TABLE', 'per_all_people_f' );
11123: FND_MSG_PUB.ADD;
11116:
11117: EXCEPTION
11118: WHEN NO_DATA_FOUND THEN
11119: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11120: FND_MESSAGE.SET_TOKEN( 'FK', 'person_id' );
11121: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11122: FND_MESSAGE.SET_TOKEN( 'TABLE', 'per_all_people_f' );
11123: FND_MSG_PUB.ADD;
11124: x_return_status := FND_API.G_RET_STS_ERROR;
11117: EXCEPTION
11118: WHEN NO_DATA_FOUND THEN
11119: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11120: FND_MESSAGE.SET_TOKEN( 'FK', 'person_id' );
11121: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11122: FND_MESSAGE.SET_TOKEN( 'TABLE', 'per_all_people_f' );
11123: FND_MSG_PUB.ADD;
11124: x_return_status := FND_API.G_RET_STS_ERROR;
11125:
11118: WHEN NO_DATA_FOUND THEN
11119: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11120: FND_MESSAGE.SET_TOKEN( 'FK', 'person_id' );
11121: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11122: FND_MESSAGE.SET_TOKEN( 'TABLE', 'per_all_people_f' );
11123: FND_MSG_PUB.ADD;
11124: x_return_status := FND_API.G_RET_STS_ERROR;
11125:
11126: END check_per_all_people_f_fk;
11140: WHERE COLLECTOR_ID = p_column_value;
11141:
11142: EXCEPTION
11143: WHEN NO_DATA_FOUND THEN
11144: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11145: FND_MESSAGE.SET_TOKEN( 'FK', 'collector_id' );
11146: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11147: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_collectors');
11148: FND_MSG_PUB.ADD;
11141:
11142: EXCEPTION
11143: WHEN NO_DATA_FOUND THEN
11144: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11145: FND_MESSAGE.SET_TOKEN( 'FK', 'collector_id' );
11146: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11147: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_collectors');
11148: FND_MSG_PUB.ADD;
11149: x_return_status := FND_API.G_RET_STS_ERROR;
11142: EXCEPTION
11143: WHEN NO_DATA_FOUND THEN
11144: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11145: FND_MESSAGE.SET_TOKEN( 'FK', 'collector_id' );
11146: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11147: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_collectors');
11148: FND_MSG_PUB.ADD;
11149: x_return_status := FND_API.G_RET_STS_ERROR;
11150:
11143: WHEN NO_DATA_FOUND THEN
11144: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11145: FND_MESSAGE.SET_TOKEN( 'FK', 'collector_id' );
11146: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11147: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_collectors');
11148: FND_MSG_PUB.ADD;
11149: x_return_status := FND_API.G_RET_STS_ERROR;
11150:
11151: END check_collector_fk;
11165: WHERE PARTY_ID = p_column_value;
11166:
11167: EXCEPTION
11168: WHEN NO_DATA_FOUND THEN
11169: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11170: FND_MESSAGE.SET_TOKEN( 'FK', 'party_id' );
11171: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11172: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_parties' );
11173: FND_MSG_PUB.ADD;
11166:
11167: EXCEPTION
11168: WHEN NO_DATA_FOUND THEN
11169: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11170: FND_MESSAGE.SET_TOKEN( 'FK', 'party_id' );
11171: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11172: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_parties' );
11173: FND_MSG_PUB.ADD;
11174: x_return_status := FND_API.G_RET_STS_ERROR;
11167: EXCEPTION
11168: WHEN NO_DATA_FOUND THEN
11169: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11170: FND_MESSAGE.SET_TOKEN( 'FK', 'party_id' );
11171: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11172: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_parties' );
11173: FND_MSG_PUB.ADD;
11174: x_return_status := FND_API.G_RET_STS_ERROR;
11175:
11168: WHEN NO_DATA_FOUND THEN
11169: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11170: FND_MESSAGE.SET_TOKEN( 'FK', 'party_id' );
11171: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11172: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_parties' );
11173: FND_MSG_PUB.ADD;
11174: x_return_status := FND_API.G_RET_STS_ERROR;
11175:
11176: END check_party_fk;
11190: FROM HZ_PARTY_SITES
11191: WHERE PARTY_SITE_ID = p_column_value;
11192: EXCEPTION
11193: WHEN NO_DATA_FOUND THEN
11194: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11195: FND_MESSAGE.SET_TOKEN( 'FK', 'party_site_id' );
11196: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11197: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_party_sites' );
11198: FND_MSG_PUB.ADD;
11191: WHERE PARTY_SITE_ID = p_column_value;
11192: EXCEPTION
11193: WHEN NO_DATA_FOUND THEN
11194: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11195: FND_MESSAGE.SET_TOKEN( 'FK', 'party_site_id' );
11196: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11197: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_party_sites' );
11198: FND_MSG_PUB.ADD;
11199: x_return_status := FND_API.G_RET_STS_ERROR;
11192: EXCEPTION
11193: WHEN NO_DATA_FOUND THEN
11194: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11195: FND_MESSAGE.SET_TOKEN( 'FK', 'party_site_id' );
11196: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11197: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_party_sites' );
11198: FND_MSG_PUB.ADD;
11199: x_return_status := FND_API.G_RET_STS_ERROR;
11200: END;
11193: WHEN NO_DATA_FOUND THEN
11194: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11195: FND_MESSAGE.SET_TOKEN( 'FK', 'party_site_id' );
11196: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11197: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_party_sites' );
11198: FND_MSG_PUB.ADD;
11199: x_return_status := FND_API.G_RET_STS_ERROR;
11200: END;
11201:
11220: AND TRUNC(NVL(END_DATE_ACTIVE,SYSDATE));
11221:
11222: EXCEPTION
11223: WHEN NO_DATA_FOUND THEN
11224: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11225: FND_MESSAGE.SET_TOKEN( 'FK', 'currency_code' );
11226: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11227: FND_MESSAGE.SET_TOKEN( 'TABLE', 'fnd_currencies' );
11228: FND_MSG_PUB.ADD;
11221:
11222: EXCEPTION
11223: WHEN NO_DATA_FOUND THEN
11224: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11225: FND_MESSAGE.SET_TOKEN( 'FK', 'currency_code' );
11226: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11227: FND_MESSAGE.SET_TOKEN( 'TABLE', 'fnd_currencies' );
11228: FND_MSG_PUB.ADD;
11229: x_return_status := FND_API.G_RET_STS_ERROR;
11222: EXCEPTION
11223: WHEN NO_DATA_FOUND THEN
11224: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11225: FND_MESSAGE.SET_TOKEN( 'FK', 'currency_code' );
11226: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11227: FND_MESSAGE.SET_TOKEN( 'TABLE', 'fnd_currencies' );
11228: FND_MSG_PUB.ADD;
11229: x_return_status := FND_API.G_RET_STS_ERROR;
11230:
11223: WHEN NO_DATA_FOUND THEN
11224: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11225: FND_MESSAGE.SET_TOKEN( 'FK', 'currency_code' );
11226: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11227: FND_MESSAGE.SET_TOKEN( 'TABLE', 'fnd_currencies' );
11228: FND_MSG_PUB.ADD;
11229: x_return_status := FND_API.G_RET_STS_ERROR;
11230:
11231: END check_currency_fk;
11249: SELECT MIN(ORG_ID) INTO l_org_id
11250: FROM AR_SYSTEM_PARAMETERS;
11251:
11252: IF l_org_id IS NOT NULL THEN
11253: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_COLUMN_SHOULD_BE_NULL' );
11254: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11255: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_accounts' );
11256: FND_MSG_PUB.ADD;
11257: x_return_status := FND_API.G_RET_STS_ERROR;
11250: FROM AR_SYSTEM_PARAMETERS;
11251:
11252: IF l_org_id IS NOT NULL THEN
11253: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_COLUMN_SHOULD_BE_NULL' );
11254: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11255: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_accounts' );
11256: FND_MSG_PUB.ADD;
11257: x_return_status := FND_API.G_RET_STS_ERROR;
11258:
11251:
11252: IF l_org_id IS NOT NULL THEN
11253: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_COLUMN_SHOULD_BE_NULL' );
11254: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11255: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_accounts' );
11256: FND_MSG_PUB.ADD;
11257: x_return_status := FND_API.G_RET_STS_ERROR;
11258:
11259: RETURN;
11261:
11262: --Bug Fix 2183072 Handled the exception
11263: EXCEPTION
11264: WHEN NO_DATA_FOUND THEN
11265: FND_MESSAGE.SET_NAME( 'AR', 'AR_NO_ROW_IN_SYSTEM_PARAMETERS');
11266: FND_MSG_PUB.ADD;
11267: x_return_status := FND_API.G_RET_STS_ERROR;
11268: END ;
11269: END IF;
11303: AND trunc(sysdate) between START_DATE_ACTIVE and nvl(END_DATE_ACTIVE,trunc(sysdate));
11304: */
11305: EXCEPTION
11306: WHEN NO_DATA_FOUND THEN
11307: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11308: FND_MESSAGE.SET_TOKEN( 'FK', 'payment_term_id' );
11309: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11310: FND_MESSAGE.SET_TOKEN( 'TABLE', 'RA_TERMS' );
11311: FND_MSG_PUB.ADD;
11304: */
11305: EXCEPTION
11306: WHEN NO_DATA_FOUND THEN
11307: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11308: FND_MESSAGE.SET_TOKEN( 'FK', 'payment_term_id' );
11309: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11310: FND_MESSAGE.SET_TOKEN( 'TABLE', 'RA_TERMS' );
11311: FND_MSG_PUB.ADD;
11312: x_return_status := FND_API.G_RET_STS_ERROR;
11305: EXCEPTION
11306: WHEN NO_DATA_FOUND THEN
11307: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11308: FND_MESSAGE.SET_TOKEN( 'FK', 'payment_term_id' );
11309: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11310: FND_MESSAGE.SET_TOKEN( 'TABLE', 'RA_TERMS' );
11311: FND_MSG_PUB.ADD;
11312: x_return_status := FND_API.G_RET_STS_ERROR;
11313: END check_payterm_id_fk;
11306: WHEN NO_DATA_FOUND THEN
11307: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11308: FND_MESSAGE.SET_TOKEN( 'FK', 'payment_term_id' );
11309: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11310: FND_MESSAGE.SET_TOKEN( 'TABLE', 'RA_TERMS' );
11311: FND_MSG_PUB.ADD;
11312: x_return_status := FND_API.G_RET_STS_ERROR;
11313: END check_payterm_id_fk;
11314:
11337: EXCEPTION
11338: WHEN NO_DATA_FOUND THEN
11339: -- Balance forward billing has not been enabled.
11340: -- Pass a late charge payment term that does not have a balance forward billing cycle.
11341: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_LC_PAY_TERM_DISABLED' );
11342: FND_MSG_PUB.ADD;
11343: x_return_status := FND_API.G_RET_STS_ERROR;
11344: end;
11345: elsif p_cons_inv_flag = 'Y' then
11355: EXCEPTION
11356: WHEN NO_DATA_FOUND THEN
11357: -- Balance forward billing has been enabled.
11358: -- Pass a late charge payment term that has a balance forward billing cycle.
11359: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_LC_PAY_TERM_ENABLED' );
11360: FND_MSG_PUB.ADD;
11361: x_return_status := FND_API.G_RET_STS_ERROR;
11362: end;
11363: end if;
11381: and trunc(sysdate) between
11382: start_date and nvl(end_date,trunc(sysdate));
11383: EXCEPTION
11384: WHEN NO_DATA_FOUND THEN
11385: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11386: FND_MESSAGE.SET_TOKEN( 'FK', 'standard_text_id' );
11387: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11388: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_standard_text' );
11389: FND_MSG_PUB.ADD;
11382: start_date and nvl(end_date,trunc(sysdate));
11383: EXCEPTION
11384: WHEN NO_DATA_FOUND THEN
11385: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11386: FND_MESSAGE.SET_TOKEN( 'FK', 'standard_text_id' );
11387: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11388: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_standard_text' );
11389: FND_MSG_PUB.ADD;
11390: x_return_status := FND_API.G_RET_STS_ERROR;
11383: EXCEPTION
11384: WHEN NO_DATA_FOUND THEN
11385: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11386: FND_MESSAGE.SET_TOKEN( 'FK', 'standard_text_id' );
11387: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11388: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_standard_text' );
11389: FND_MSG_PUB.ADD;
11390: x_return_status := FND_API.G_RET_STS_ERROR;
11391: END check_message_text_id_fk;
11384: WHEN NO_DATA_FOUND THEN
11385: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11386: FND_MESSAGE.SET_TOKEN( 'FK', 'standard_text_id' );
11387: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11388: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_standard_text' );
11389: FND_MSG_PUB.ADD;
11390: x_return_status := FND_API.G_RET_STS_ERROR;
11391: END check_message_text_id_fk;
11392:
11407: and conversion_type = p_column_value;
11408:
11409: EXCEPTION
11410: WHEN NO_DATA_FOUND THEN
11411: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11412: FND_MESSAGE.SET_TOKEN( 'FK', 'conversion_type' );
11413: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11414: FND_MESSAGE.SET_TOKEN( 'TABLE', 'gl_daily_conversion_types' );
11415: FND_MSG_PUB.ADD;
11408:
11409: EXCEPTION
11410: WHEN NO_DATA_FOUND THEN
11411: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11412: FND_MESSAGE.SET_TOKEN( 'FK', 'conversion_type' );
11413: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11414: FND_MESSAGE.SET_TOKEN( 'TABLE', 'gl_daily_conversion_types' );
11415: FND_MSG_PUB.ADD;
11416: x_return_status := FND_API.G_RET_STS_ERROR;
11409: EXCEPTION
11410: WHEN NO_DATA_FOUND THEN
11411: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11412: FND_MESSAGE.SET_TOKEN( 'FK', 'conversion_type' );
11413: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11414: FND_MESSAGE.SET_TOKEN( 'TABLE', 'gl_daily_conversion_types' );
11415: FND_MSG_PUB.ADD;
11416: x_return_status := FND_API.G_RET_STS_ERROR;
11417: END check_exchange_rate_type_fk;
11410: WHEN NO_DATA_FOUND THEN
11411: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11412: FND_MESSAGE.SET_TOKEN( 'FK', 'conversion_type' );
11413: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11414: FND_MESSAGE.SET_TOKEN( 'TABLE', 'gl_daily_conversion_types' );
11415: FND_MSG_PUB.ADD;
11416: x_return_status := FND_API.G_RET_STS_ERROR;
11417: END check_exchange_rate_type_fk;
11418:
11432: where schedule_id = p_column_value;
11433:
11434: EXCEPTION
11435: WHEN NO_DATA_FOUND THEN
11436: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11437: FND_MESSAGE.SET_TOKEN( 'FK', 'schedule_id' );
11438: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11439: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_charge_schedules' );
11440: FND_MSG_PUB.ADD;
11433:
11434: EXCEPTION
11435: WHEN NO_DATA_FOUND THEN
11436: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11437: FND_MESSAGE.SET_TOKEN( 'FK', 'schedule_id' );
11438: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11439: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_charge_schedules' );
11440: FND_MSG_PUB.ADD;
11441: x_return_status := FND_API.G_RET_STS_ERROR;
11434: EXCEPTION
11435: WHEN NO_DATA_FOUND THEN
11436: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11437: FND_MESSAGE.SET_TOKEN( 'FK', 'schedule_id' );
11438: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11439: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_charge_schedules' );
11440: FND_MSG_PUB.ADD;
11441: x_return_status := FND_API.G_RET_STS_ERROR;
11442: END check_charge_schedule_id_fk;
11435: WHEN NO_DATA_FOUND THEN
11436: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11437: FND_MESSAGE.SET_TOKEN( 'FK', 'schedule_id' );
11438: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11439: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_charge_schedules' );
11440: FND_MSG_PUB.ADD;
11441: x_return_status := FND_API.G_RET_STS_ERROR;
11442: END check_charge_schedule_id_fk;
11443:
11455: AND status = 'A'
11456: AND art.org_id = p_org_id; -- Bug 3456489
11457: EXCEPTION
11458: WHEN NO_DATA_FOUND THEN
11459: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11460: FND_MESSAGE.SET_TOKEN( 'FK', 'finchrg_receivables_trx_id' );
11461: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11462: FND_MESSAGE.SET_TOKEN( 'TABLE', 'AR_RECEIVABLES_TRX' );
11463: FND_MSG_PUB.ADD;
11456: AND art.org_id = p_org_id; -- Bug 3456489
11457: EXCEPTION
11458: WHEN NO_DATA_FOUND THEN
11459: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11460: FND_MESSAGE.SET_TOKEN( 'FK', 'finchrg_receivables_trx_id' );
11461: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11462: FND_MESSAGE.SET_TOKEN( 'TABLE', 'AR_RECEIVABLES_TRX' );
11463: FND_MSG_PUB.ADD;
11464: x_return_status := FND_API.G_RET_STS_ERROR;
11457: EXCEPTION
11458: WHEN NO_DATA_FOUND THEN
11459: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11460: FND_MESSAGE.SET_TOKEN( 'FK', 'finchrg_receivables_trx_id' );
11461: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11462: FND_MESSAGE.SET_TOKEN( 'TABLE', 'AR_RECEIVABLES_TRX' );
11463: FND_MSG_PUB.ADD;
11464: x_return_status := FND_API.G_RET_STS_ERROR;
11465: END check_finchrg_trx_fk;
11458: WHEN NO_DATA_FOUND THEN
11459: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11460: FND_MESSAGE.SET_TOKEN( 'FK', 'finchrg_receivables_trx_id' );
11461: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11462: FND_MESSAGE.SET_TOKEN( 'TABLE', 'AR_RECEIVABLES_TRX' );
11463: FND_MSG_PUB.ADD;
11464: x_return_status := FND_API.G_RET_STS_ERROR;
11465: END check_finchrg_trx_fk;
11466:
11487: AND (sysdate between nvl(lh.start_date_active,sysdate) and nvl(lh.end_date_active,sysdate)
11488: AND nvl(active_flag, 'N') = 'Y');
11489: EXCEPTION
11490: WHEN NO_DATA_FOUND THEN
11491: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11492: FND_MESSAGE.SET_TOKEN( 'FK', 'price_list_id' );
11493: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11494: -- Bug 3591694 FND_MESSAGE.SET_TOKEN( 'TABLE', 'SO_PRICE_LISTS' );
11495: FND_MESSAGE.SET_TOKEN( 'TABLE', 'QP_LIST_HEADERS_B' );
11488: AND nvl(active_flag, 'N') = 'Y');
11489: EXCEPTION
11490: WHEN NO_DATA_FOUND THEN
11491: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11492: FND_MESSAGE.SET_TOKEN( 'FK', 'price_list_id' );
11493: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11494: -- Bug 3591694 FND_MESSAGE.SET_TOKEN( 'TABLE', 'SO_PRICE_LISTS' );
11495: FND_MESSAGE.SET_TOKEN( 'TABLE', 'QP_LIST_HEADERS_B' );
11496:
11489: EXCEPTION
11490: WHEN NO_DATA_FOUND THEN
11491: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11492: FND_MESSAGE.SET_TOKEN( 'FK', 'price_list_id' );
11493: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11494: -- Bug 3591694 FND_MESSAGE.SET_TOKEN( 'TABLE', 'SO_PRICE_LISTS' );
11495: FND_MESSAGE.SET_TOKEN( 'TABLE', 'QP_LIST_HEADERS_B' );
11496:
11497: FND_MSG_PUB.ADD;
11490: WHEN NO_DATA_FOUND THEN
11491: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11492: FND_MESSAGE.SET_TOKEN( 'FK', 'price_list_id' );
11493: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11494: -- Bug 3591694 FND_MESSAGE.SET_TOKEN( 'TABLE', 'SO_PRICE_LISTS' );
11495: FND_MESSAGE.SET_TOKEN( 'TABLE', 'QP_LIST_HEADERS_B' );
11496:
11497: FND_MSG_PUB.ADD;
11498: x_return_status := FND_API.G_RET_STS_ERROR;
11491: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11492: FND_MESSAGE.SET_TOKEN( 'FK', 'price_list_id' );
11493: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11494: -- Bug 3591694 FND_MESSAGE.SET_TOKEN( 'TABLE', 'SO_PRICE_LISTS' );
11495: FND_MESSAGE.SET_TOKEN( 'TABLE', 'QP_LIST_HEADERS_B' );
11496:
11497: FND_MSG_PUB.ADD;
11498: x_return_status := FND_API.G_RET_STS_ERROR;
11499: END check_price_list_fk;
11509: FROM MTL_CROSS_REFERENCE_TYPES mtl
11510: WHERE mtl.cross_reference_type = p_column_value;
11511: EXCEPTION
11512: WHEN NO_DATA_FOUND THEN
11513: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11514: FND_MESSAGE.SET_TOKEN( 'FK', 'item_cross_ref_pref' );
11515: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11516: FND_MESSAGE.SET_TOKEN( 'TABLE', 'mtl_cross_reference_types' );
11517: FND_MSG_PUB.ADD;
11510: WHERE mtl.cross_reference_type = p_column_value;
11511: EXCEPTION
11512: WHEN NO_DATA_FOUND THEN
11513: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11514: FND_MESSAGE.SET_TOKEN( 'FK', 'item_cross_ref_pref' );
11515: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11516: FND_MESSAGE.SET_TOKEN( 'TABLE', 'mtl_cross_reference_types' );
11517: FND_MSG_PUB.ADD;
11518: x_return_status := FND_API.G_RET_STS_ERROR;
11511: EXCEPTION
11512: WHEN NO_DATA_FOUND THEN
11513: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11514: FND_MESSAGE.SET_TOKEN( 'FK', 'item_cross_ref_pref' );
11515: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11516: FND_MESSAGE.SET_TOKEN( 'TABLE', 'mtl_cross_reference_types' );
11517: FND_MSG_PUB.ADD;
11518: x_return_status := FND_API.G_RET_STS_ERROR;
11519: END check_item_cross_ref;
11512: WHEN NO_DATA_FOUND THEN
11513: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11514: FND_MESSAGE.SET_TOKEN( 'FK', 'item_cross_ref_pref' );
11515: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11516: FND_MESSAGE.SET_TOKEN( 'TABLE', 'mtl_cross_reference_types' );
11517: FND_MSG_PUB.ADD;
11518: x_return_status := FND_API.G_RET_STS_ERROR;
11519: END check_item_cross_ref;
11520:
11566: AND avt.org_id = p_org_id;
11567: */
11568: EXCEPTION
11569: WHEN NO_DATA_FOUND THEN
11570: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11571: FND_MESSAGE.SET_TOKEN( 'FK', 'tax_code' );
11572: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11573: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ZX_OUTPUT_CLASSIFICATIONS_V' );
11574: FND_MSG_PUB.ADD;
11567: */
11568: EXCEPTION
11569: WHEN NO_DATA_FOUND THEN
11570: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11571: FND_MESSAGE.SET_TOKEN( 'FK', 'tax_code' );
11572: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11573: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ZX_OUTPUT_CLASSIFICATIONS_V' );
11574: FND_MSG_PUB.ADD;
11575: x_return_status := FND_API.G_RET_STS_ERROR;
11568: EXCEPTION
11569: WHEN NO_DATA_FOUND THEN
11570: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11571: FND_MESSAGE.SET_TOKEN( 'FK', 'tax_code' );
11572: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11573: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ZX_OUTPUT_CLASSIFICATIONS_V' );
11574: FND_MSG_PUB.ADD;
11575: x_return_status := FND_API.G_RET_STS_ERROR;
11576: END check_tax_code;
11569: WHEN NO_DATA_FOUND THEN
11570: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11571: FND_MESSAGE.SET_TOKEN( 'FK', 'tax_code' );
11572: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11573: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ZX_OUTPUT_CLASSIFICATIONS_V' );
11574: FND_MSG_PUB.ADD;
11575: x_return_status := FND_API.G_RET_STS_ERROR;
11576: END check_tax_code;
11577:
11587: WHERE org.organization_id = p_column_value
11588: AND trunc(sysdate) <= nvl(trunc(org.disable_date),trunc(sysdate));
11589: EXCEPTION
11590: WHEN NO_DATA_FOUND THEN
11591: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11592: FND_MESSAGE.SET_TOKEN( 'FK', 'warehouse_id' );
11593: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11594: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ORG_ORGANIZATION_DEFINITIONS' );
11595: FND_MSG_PUB.ADD;
11588: AND trunc(sysdate) <= nvl(trunc(org.disable_date),trunc(sysdate));
11589: EXCEPTION
11590: WHEN NO_DATA_FOUND THEN
11591: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11592: FND_MESSAGE.SET_TOKEN( 'FK', 'warehouse_id' );
11593: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11594: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ORG_ORGANIZATION_DEFINITIONS' );
11595: FND_MSG_PUB.ADD;
11596: x_return_status := FND_API.G_RET_STS_ERROR;
11589: EXCEPTION
11590: WHEN NO_DATA_FOUND THEN
11591: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11592: FND_MESSAGE.SET_TOKEN( 'FK', 'warehouse_id' );
11593: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11594: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ORG_ORGANIZATION_DEFINITIONS' );
11595: FND_MSG_PUB.ADD;
11596: x_return_status := FND_API.G_RET_STS_ERROR;
11597: END check_warehouse;
11590: WHEN NO_DATA_FOUND THEN
11591: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11592: FND_MESSAGE.SET_TOKEN( 'FK', 'warehouse_id' );
11593: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11594: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ORG_ORGANIZATION_DEFINITIONS' );
11595: FND_MSG_PUB.ADD;
11596: x_return_status := FND_API.G_RET_STS_ERROR;
11597: END check_warehouse;
11598:
11617: AND nvl(status, 'A') = 'A'
11618: AND salesrep_id NOT IN( -1,-2);
11619: EXCEPTION
11620: WHEN NO_DATA_FOUND THEN
11621: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11622: FND_MESSAGE.SET_TOKEN( 'FK', 'primary_salesrep_id' );
11623: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11624: FND_MESSAGE.SET_TOKEN( 'TABLE', 'JTF_RS_SALESREPS' );
11625: FND_MSG_PUB.ADD;
11618: AND salesrep_id NOT IN( -1,-2);
11619: EXCEPTION
11620: WHEN NO_DATA_FOUND THEN
11621: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11622: FND_MESSAGE.SET_TOKEN( 'FK', 'primary_salesrep_id' );
11623: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11624: FND_MESSAGE.SET_TOKEN( 'TABLE', 'JTF_RS_SALESREPS' );
11625: FND_MSG_PUB.ADD;
11626: x_return_status := FND_API.G_RET_STS_ERROR;
11619: EXCEPTION
11620: WHEN NO_DATA_FOUND THEN
11621: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11622: FND_MESSAGE.SET_TOKEN( 'FK', 'primary_salesrep_id' );
11623: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11624: FND_MESSAGE.SET_TOKEN( 'TABLE', 'JTF_RS_SALESREPS' );
11625: FND_MSG_PUB.ADD;
11626: x_return_status := FND_API.G_RET_STS_ERROR;
11627: */
11620: WHEN NO_DATA_FOUND THEN
11621: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11622: FND_MESSAGE.SET_TOKEN( 'FK', 'primary_salesrep_id' );
11623: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11624: FND_MESSAGE.SET_TOKEN( 'TABLE', 'JTF_RS_SALESREPS' );
11625: FND_MSG_PUB.ADD;
11626: x_return_status := FND_API.G_RET_STS_ERROR;
11627: */
11628: x_return_status := FND_API.G_RET_STS_SUCCESS;
11656: and nvl(ot.end_date_active,sysdate);
11657:
11658: EXCEPTION
11659: WHEN NO_DATA_FOUND THEN
11660: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11661: FND_MESSAGE.SET_TOKEN( 'FK', 'order_type_id' );
11662: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11663: FND_MESSAGE.SET_TOKEN( 'TABLE', 'OE_TRANSACTIONS_TYPES_VL' );
11664: FND_MSG_PUB.ADD;
11657:
11658: EXCEPTION
11659: WHEN NO_DATA_FOUND THEN
11660: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11661: FND_MESSAGE.SET_TOKEN( 'FK', 'order_type_id' );
11662: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11663: FND_MESSAGE.SET_TOKEN( 'TABLE', 'OE_TRANSACTIONS_TYPES_VL' );
11664: FND_MSG_PUB.ADD;
11665: x_return_status := FND_API.G_RET_STS_ERROR;
11658: EXCEPTION
11659: WHEN NO_DATA_FOUND THEN
11660: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11661: FND_MESSAGE.SET_TOKEN( 'FK', 'order_type_id' );
11662: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11663: FND_MESSAGE.SET_TOKEN( 'TABLE', 'OE_TRANSACTIONS_TYPES_VL' );
11664: FND_MSG_PUB.ADD;
11665: x_return_status := FND_API.G_RET_STS_ERROR;
11666: */
11659: WHEN NO_DATA_FOUND THEN
11660: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11661: FND_MESSAGE.SET_TOKEN( 'FK', 'order_type_id' );
11662: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11663: FND_MESSAGE.SET_TOKEN( 'TABLE', 'OE_TRANSACTIONS_TYPES_VL' );
11664: FND_MSG_PUB.ADD;
11665: x_return_status := FND_API.G_RET_STS_ERROR;
11666: */
11667: --x_return_status := FND_API.G_RET_STS_SUCCESS;
11676:
11677: BEGIN
11678:
11679: IF p_column_value = FND_API.G_MISS_NUM THEN
11680: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
11681: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11682: FND_MSG_PUB.ADD;
11683: x_return_status := FND_API.G_RET_STS_ERROR;
11684: END IF;
11677: BEGIN
11678:
11679: IF p_column_value = FND_API.G_MISS_NUM THEN
11680: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
11681: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11682: FND_MSG_PUB.ADD;
11683: x_return_status := FND_API.G_RET_STS_ERROR;
11684: END IF;
11685:
11693:
11694: BEGIN
11695:
11696: IF p_column_value = FND_API.G_MISS_CHAR THEN
11697: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
11698: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11699: FND_MSG_PUB.ADD;
11700: x_return_status := FND_API.G_RET_STS_ERROR;
11701: END IF;
11694: BEGIN
11695:
11696: IF p_column_value = FND_API.G_MISS_CHAR THEN
11697: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
11698: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11699: FND_MSG_PUB.ADD;
11700: x_return_status := FND_API.G_RET_STS_ERROR;
11701: END IF;
11702:
11721: -- structure_number => ARP_GLOBAL.chart_of_accounts_id,
11722: structure_number => p_coa_id,
11723: combination_id => p_column_value )
11724: THEN
11725: FND_MESSAGE.SET_NAME( 'AR', 'AR_AUTO_' ||
11726: UPPER( p_gl_name ) || '_CCID_INVALID' );
11727: FND_MSG_PUB.ADD;
11728: x_return_status := FND_API.G_RET_STS_ERROR;
11729: END IF;
11747: AND h.autocash_hierarchy_id =
11748: p_column_value;
11749: EXCEPTION
11750: WHEN NO_DATA_FOUND THEN
11751: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11752: FND_MESSAGE.SET_TOKEN( 'FK', p_column );
11753: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11754: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_autocash_hierarchies');
11755: FND_MSG_PUB.ADD;
11748: p_column_value;
11749: EXCEPTION
11750: WHEN NO_DATA_FOUND THEN
11751: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11752: FND_MESSAGE.SET_TOKEN( 'FK', p_column );
11753: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11754: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_autocash_hierarchies');
11755: FND_MSG_PUB.ADD;
11756: x_return_status := FND_API.G_RET_STS_ERROR;
11749: EXCEPTION
11750: WHEN NO_DATA_FOUND THEN
11751: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11752: FND_MESSAGE.SET_TOKEN( 'FK', p_column );
11753: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11754: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_autocash_hierarchies');
11755: FND_MSG_PUB.ADD;
11756: x_return_status := FND_API.G_RET_STS_ERROR;
11757:
11750: WHEN NO_DATA_FOUND THEN
11751: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11752: FND_MESSAGE.SET_TOKEN( 'FK', p_column );
11753: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11754: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_autocash_hierarchies');
11755: FND_MSG_PUB.ADD;
11756: x_return_status := FND_API.G_RET_STS_ERROR;
11757:
11758: END check_auto_hierid_fk;
11772: AND sc.statement_cycle_id =
11773: p_column_value;
11774: EXCEPTION
11775: WHEN NO_DATA_FOUND THEN
11776: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11777: FND_MESSAGE.SET_TOKEN( 'FK', 'statement_cycle_id' );
11778: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11779: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_statement_cycles');
11780: FND_MSG_PUB.ADD;
11773: p_column_value;
11774: EXCEPTION
11775: WHEN NO_DATA_FOUND THEN
11776: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11777: FND_MESSAGE.SET_TOKEN( 'FK', 'statement_cycle_id' );
11778: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11779: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_statement_cycles');
11780: FND_MSG_PUB.ADD;
11781: x_return_status := FND_API.G_RET_STS_ERROR;
11774: EXCEPTION
11775: WHEN NO_DATA_FOUND THEN
11776: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11777: FND_MESSAGE.SET_TOKEN( 'FK', 'statement_cycle_id' );
11778: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11779: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_statement_cycles');
11780: FND_MSG_PUB.ADD;
11781: x_return_status := FND_API.G_RET_STS_ERROR;
11782:
11775: WHEN NO_DATA_FOUND THEN
11776: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11777: FND_MESSAGE.SET_TOKEN( 'FK', 'statement_cycle_id' );
11778: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11779: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_statement_cycles');
11780: FND_MSG_PUB.ADD;
11781: x_return_status := FND_API.G_RET_STS_ERROR;
11782:
11783: END check_stat_cycid_fk;
11797: AND dls.dunning_letter_set_id =
11798: p_column_value;
11799: EXCEPTION
11800: WHEN NO_DATA_FOUND THEN
11801: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11802: FND_MESSAGE.SET_TOKEN( 'FK', 'dunning_letter_set_id' );
11803: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11804: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_dunning_letter_sets');
11805: FND_MSG_PUB.ADD;
11798: p_column_value;
11799: EXCEPTION
11800: WHEN NO_DATA_FOUND THEN
11801: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11802: FND_MESSAGE.SET_TOKEN( 'FK', 'dunning_letter_set_id' );
11803: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11804: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_dunning_letter_sets');
11805: FND_MSG_PUB.ADD;
11806: x_return_status := FND_API.G_RET_STS_ERROR;
11799: EXCEPTION
11800: WHEN NO_DATA_FOUND THEN
11801: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11802: FND_MESSAGE.SET_TOKEN( 'FK', 'dunning_letter_set_id' );
11803: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11804: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_dunning_letter_sets');
11805: FND_MSG_PUB.ADD;
11806: x_return_status := FND_API.G_RET_STS_ERROR;
11807:
11800: WHEN NO_DATA_FOUND THEN
11801: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11802: FND_MESSAGE.SET_TOKEN( 'FK', 'dunning_letter_set_id' );
11803: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11804: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_dunning_letter_sets');
11805: FND_MSG_PUB.ADD;
11806: x_return_status := FND_API.G_RET_STS_ERROR;
11807:
11808: END check_dunning_letid_fk;
11839: Now we will look for any valid term_id if BFB is not enabled.
11840: -- If Balance Forward Billing is enabled for the site but disabled for the
11841: -- account. Pass a payment term without a balance forward billing cycle associated.
11842: if p_ckeck_acc_bfb_enabled = 'Y' then
11843: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_ACCT_BAL_FWD_DISABLED' );
11844: -- Balance forward billing has not been enabled.
11845: -- Pass a payment term without a balance forward billing cycle associated.
11846: else
11847: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_BAL_FWD_BILL_DISABLED' );
11843: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_ACCT_BAL_FWD_DISABLED' );
11844: -- Balance forward billing has not been enabled.
11845: -- Pass a payment term without a balance forward billing cycle associated.
11846: else
11847: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_BAL_FWD_BILL_DISABLED' );
11848: end if;
11849: */
11850: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11851: FND_MESSAGE.SET_TOKEN( 'FK', 'standard_terms' );
11846: else
11847: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_BAL_FWD_BILL_DISABLED' );
11848: end if;
11849: */
11850: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11851: FND_MESSAGE.SET_TOKEN( 'FK', 'standard_terms' );
11852: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11853: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ra_terms_b');
11854: FND_MSG_PUB.ADD;
11847: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_BAL_FWD_BILL_DISABLED' );
11848: end if;
11849: */
11850: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11851: FND_MESSAGE.SET_TOKEN( 'FK', 'standard_terms' );
11852: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11853: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ra_terms_b');
11854: FND_MSG_PUB.ADD;
11855: x_return_status := FND_API.G_RET_STS_ERROR;
11848: end if;
11849: */
11850: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11851: FND_MESSAGE.SET_TOKEN( 'FK', 'standard_terms' );
11852: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11853: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ra_terms_b');
11854: FND_MSG_PUB.ADD;
11855: x_return_status := FND_API.G_RET_STS_ERROR;
11856: end;
11849: */
11850: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11851: FND_MESSAGE.SET_TOKEN( 'FK', 'standard_terms' );
11852: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11853: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ra_terms_b');
11854: FND_MSG_PUB.ADD;
11855: x_return_status := FND_API.G_RET_STS_ERROR;
11856: end;
11857: elsif p_cons_inv_flag = 'Y' then
11867: EXCEPTION
11868: WHEN NO_DATA_FOUND THEN
11869: -- Balance forward billing has been enabled. Pass a payment term
11870: -- with a balance forward billing cycle associated.
11871: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_BAL_FWD_BILL_ENABLED' );
11872: FND_MSG_PUB.ADD;
11873: x_return_status := FND_API.G_RET_STS_ERROR;
11874: end;
11875: end if;
11883: AND t.term_id =
11884: p_column_value;
11885: EXCEPTION
11886: WHEN NO_DATA_FOUND THEN
11887: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11888: FND_MESSAGE.SET_TOKEN( 'FK', 'standard_terms' );
11889: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11890: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ra_terms');
11891: FND_MSG_PUB.ADD;
11884: p_column_value;
11885: EXCEPTION
11886: WHEN NO_DATA_FOUND THEN
11887: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11888: FND_MESSAGE.SET_TOKEN( 'FK', 'standard_terms' );
11889: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11890: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ra_terms');
11891: FND_MSG_PUB.ADD;
11892: x_return_status := FND_API.G_RET_STS_ERROR;
11885: EXCEPTION
11886: WHEN NO_DATA_FOUND THEN
11887: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11888: FND_MESSAGE.SET_TOKEN( 'FK', 'standard_terms' );
11889: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11890: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ra_terms');
11891: FND_MSG_PUB.ADD;
11892: x_return_status := FND_API.G_RET_STS_ERROR;
11893: */
11886: WHEN NO_DATA_FOUND THEN
11887: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11888: FND_MESSAGE.SET_TOKEN( 'FK', 'standard_terms' );
11889: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11890: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ra_terms');
11891: FND_MSG_PUB.ADD;
11892: x_return_status := FND_API.G_RET_STS_ERROR;
11893: */
11894: END check_standard_terms_fk;
11910: AND gr.grouping_rule_id =
11911: p_column_value;
11912: EXCEPTION
11913: WHEN NO_DATA_FOUND THEN
11914: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11915: FND_MESSAGE.SET_TOKEN( 'FK', 'grouping_rule_id' );
11916: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11917: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ra_grouping_rules');
11918: FND_MSG_PUB.ADD;
11911: p_column_value;
11912: EXCEPTION
11913: WHEN NO_DATA_FOUND THEN
11914: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11915: FND_MESSAGE.SET_TOKEN( 'FK', 'grouping_rule_id' );
11916: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11917: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ra_grouping_rules');
11918: FND_MSG_PUB.ADD;
11919: x_return_status := FND_API.G_RET_STS_ERROR;
11912: EXCEPTION
11913: WHEN NO_DATA_FOUND THEN
11914: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11915: FND_MESSAGE.SET_TOKEN( 'FK', 'grouping_rule_id' );
11916: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11917: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ra_grouping_rules');
11918: FND_MSG_PUB.ADD;
11919: x_return_status := FND_API.G_RET_STS_ERROR;
11920:
11913: WHEN NO_DATA_FOUND THEN
11914: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11915: FND_MESSAGE.SET_TOKEN( 'FK', 'grouping_rule_id' );
11916: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11917: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ra_grouping_rules');
11918: FND_MSG_PUB.ADD;
11919: x_return_status := FND_API.G_RET_STS_ERROR;
11920:
11921: END check_grouping_ruleid_fk;
11941: WHERE active_flag = 'Y'
11942: AND automatch_set_id = p_column_value;
11943: EXCEPTION
11944: WHEN NO_DATA_FOUND THEN
11945: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11946: FND_MESSAGE.SET_TOKEN( 'FK', 'Automatch_Set_Id' );
11947: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11948: FND_MESSAGE.SET_TOKEN( 'TABLE', 'AR_CASH_AUTO_RULE_SETS');
11949: FND_MSG_PUB.ADD;
11942: AND automatch_set_id = p_column_value;
11943: EXCEPTION
11944: WHEN NO_DATA_FOUND THEN
11945: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11946: FND_MESSAGE.SET_TOKEN( 'FK', 'Automatch_Set_Id' );
11947: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11948: FND_MESSAGE.SET_TOKEN( 'TABLE', 'AR_CASH_AUTO_RULE_SETS');
11949: FND_MSG_PUB.ADD;
11950: x_return_status := FND_API.G_RET_STS_ERROR;
11943: EXCEPTION
11944: WHEN NO_DATA_FOUND THEN
11945: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11946: FND_MESSAGE.SET_TOKEN( 'FK', 'Automatch_Set_Id' );
11947: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11948: FND_MESSAGE.SET_TOKEN( 'TABLE', 'AR_CASH_AUTO_RULE_SETS');
11949: FND_MSG_PUB.ADD;
11950: x_return_status := FND_API.G_RET_STS_ERROR;
11951:
11944: WHEN NO_DATA_FOUND THEN
11945: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
11946: FND_MESSAGE.SET_TOKEN( 'FK', 'Automatch_Set_Id' );
11947: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11948: FND_MESSAGE.SET_TOKEN( 'TABLE', 'AR_CASH_AUTO_RULE_SETS');
11949: FND_MSG_PUB.ADD;
11950: x_return_status := FND_API.G_RET_STS_ERROR;
11951:
11952: END check_automatch_set_id_fk;
11958: ) IS
11959:
11960: BEGIN
11961: IF p_column_value < 0 THEN
11962: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_LESS_THAN_ZERO' );
11963: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11964: FND_MSG_PUB.ADD;
11965: x_return_status := FND_API.G_RET_STS_ERROR;
11966: END IF;
11959:
11960: BEGIN
11961: IF p_column_value < 0 THEN
11962: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_LESS_THAN_ZERO' );
11963: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11964: FND_MSG_PUB.ADD;
11965: x_return_status := FND_API.G_RET_STS_ERROR;
11966: END IF;
11967:
11974: ) IS
11975:
11976: BEGIN
11977: IF p_column_value <= 0 THEN
11978: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_GREATER_THAN_ZERO' );
11979: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11980: FND_MSG_PUB.ADD;
11981: x_return_status := FND_API.G_RET_STS_ERROR;
11982: END IF;
11975:
11976: BEGIN
11977: IF p_column_value <= 0 THEN
11978: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_GREATER_THAN_ZERO' );
11979: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11980: FND_MSG_PUB.ADD;
11981: x_return_status := FND_API.G_RET_STS_ERROR;
11982: END IF;
11983:
11990: ) IS
11991:
11992: BEGIN
11993: IF p_column_value > 100 THEN
11994: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_GREATER_THAN_100' );
11995: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11996: FND_MSG_PUB.ADD;
11997: x_return_status := FND_API.G_RET_STS_ERROR;
11998: END IF;
11991:
11992: BEGIN
11993: IF p_column_value > 100 THEN
11994: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_GREATER_THAN_100' );
11995: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
11996: FND_MSG_PUB.ADD;
11997: x_return_status := FND_API.G_RET_STS_ERROR;
11998: END IF;
11999:
12378: END IF;
12379: END IF;
12380:
12381: IF l_error THEN
12382: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
12383: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
12384: FND_MSG_PUB.ADD;
12385: x_return_status := FND_API.G_RET_STS_ERROR;
12386: END IF;
12379: END IF;
12380:
12381: IF l_error THEN
12382: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
12383: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
12384: FND_MSG_PUB.ADD;
12385: x_return_status := FND_API.G_RET_STS_ERROR;
12386: END IF;
12387:
12416: END IF;
12417: END IF;
12418:
12419: IF l_error THEN
12420: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
12421: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
12422: FND_MSG_PUB.ADD;
12423: x_return_status := FND_API.G_RET_STS_ERROR;
12424: END IF;
12417: END IF;
12418:
12419: IF l_error THEN
12420: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
12421: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
12422: FND_MSG_PUB.ADD;
12423: x_return_status := FND_API.G_RET_STS_ERROR;
12424: END IF;
12425:
12454: END IF;
12455: END IF;
12456:
12457: IF l_error THEN
12458: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
12459: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
12460: FND_MSG_PUB.ADD;
12461: x_return_status := FND_API.G_RET_STS_ERROR;
12462: END IF;
12455: END IF;
12456:
12457: IF l_error THEN
12458: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
12459: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
12460: FND_MSG_PUB.ADD;
12461: x_return_status := FND_API.G_RET_STS_ERROR;
12462: END IF;
12463:
12496: END IF;
12497: END IF;
12498:
12499: IF l_error THEN
12500: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NONUPDATEABLE_COLUMN' );
12501: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
12502: FND_MSG_PUB.ADD;
12503: x_return_status := FND_API.G_RET_STS_ERROR;
12504: END IF;
12497: END IF;
12498:
12499: IF l_error THEN
12500: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NONUPDATEABLE_COLUMN' );
12501: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
12502: FND_MSG_PUB.ADD;
12503: x_return_status := FND_API.G_RET_STS_ERROR;
12504: END IF;
12505:
12538: END IF;
12539: END IF;
12540:
12541: IF l_error THEN
12542: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NONUPDATEABLE_COLUMN' );
12543: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
12544: FND_MSG_PUB.ADD;
12545: x_return_status := FND_API.G_RET_STS_ERROR;
12546: END IF;
12539: END IF;
12540:
12541: IF l_error THEN
12542: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NONUPDATEABLE_COLUMN' );
12543: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
12544: FND_MSG_PUB.ADD;
12545: x_return_status := FND_API.G_RET_STS_ERROR;
12546: END IF;
12547:
12580: END IF;
12581: END IF;
12582:
12583: IF l_error THEN
12584: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NONUPDATEABLE_COLUMN' );
12585: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
12586: FND_MSG_PUB.ADD;
12587: x_return_status := FND_API.G_RET_STS_ERROR;
12588: END IF;
12581: END IF;
12582:
12583: IF l_error THEN
12584: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NONUPDATEABLE_COLUMN' );
12585: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
12586: FND_MSG_PUB.ADD;
12587: x_return_status := FND_API.G_RET_STS_ERROR;
12588: END IF;
12589:
12633: ( l_start_date IS NULL OR
12634: l_start_date = FND_API.G_MISS_DATE OR
12635: l_start_date > l_end_date )
12636: THEN
12637: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DATE_GREATER' );
12638: FND_MESSAGE.SET_TOKEN( 'DATE2', p_end_date_column_name );
12639: FND_MESSAGE.SET_TOKEN( 'DATE1', p_start_date_column_name );
12640: FND_MSG_PUB.ADD;
12641: x_return_status := FND_API.G_RET_STS_ERROR;
12634: l_start_date = FND_API.G_MISS_DATE OR
12635: l_start_date > l_end_date )
12636: THEN
12637: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DATE_GREATER' );
12638: FND_MESSAGE.SET_TOKEN( 'DATE2', p_end_date_column_name );
12639: FND_MESSAGE.SET_TOKEN( 'DATE1', p_start_date_column_name );
12640: FND_MSG_PUB.ADD;
12641: x_return_status := FND_API.G_RET_STS_ERROR;
12642: END IF;
12635: l_start_date > l_end_date )
12636: THEN
12637: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DATE_GREATER' );
12638: FND_MESSAGE.SET_TOKEN( 'DATE2', p_end_date_column_name );
12639: FND_MESSAGE.SET_TOKEN( 'DATE1', p_start_date_column_name );
12640: FND_MSG_PUB.ADD;
12641: x_return_status := FND_API.G_RET_STS_ERROR;
12642: END IF;
12643:
12651:
12652: BEGIN
12653:
12654: IF p_column_value = FND_API.G_MISS_CHAR THEN
12655: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NONUPDATEABLE_TO_NULL' );
12656: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
12657: FND_MSG_PUB.ADD;
12658: x_return_status := FND_API.G_RET_STS_ERROR;
12659: END IF;
12652: BEGIN
12653:
12654: IF p_column_value = FND_API.G_MISS_CHAR THEN
12655: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NONUPDATEABLE_TO_NULL' );
12656: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
12657: FND_MSG_PUB.ADD;
12658: x_return_status := FND_API.G_RET_STS_ERROR;
12659: END IF;
12660:
12668:
12669: BEGIN
12670:
12671: IF p_column_value = FND_API.G_MISS_NUM THEN
12672: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NONUPDATEABLE_TO_NULL' );
12673: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
12674: FND_MSG_PUB.ADD;
12675: x_return_status := FND_API.G_RET_STS_ERROR;
12676: END IF;
12669: BEGIN
12670:
12671: IF p_column_value = FND_API.G_MISS_NUM THEN
12672: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NONUPDATEABLE_TO_NULL' );
12673: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
12674: FND_MSG_PUB.ADD;
12675: x_return_status := FND_API.G_RET_STS_ERROR;
12676: END IF;
12677:
12685:
12686: BEGIN
12687:
12688: IF p_column_value = FND_API.G_MISS_DATE THEN
12689: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NONUPDATEABLE_TO_NULL' );
12690: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
12691: FND_MSG_PUB.ADD;
12692: x_return_status := FND_API.G_RET_STS_ERROR;
12693: END IF;
12686: BEGIN
12687:
12688: IF p_column_value = FND_API.G_MISS_DATE THEN
12689: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NONUPDATEABLE_TO_NULL' );
12690: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
12691: FND_MSG_PUB.ADD;
12692: x_return_status := FND_API.G_RET_STS_ERROR;
12693: END IF;
12694:
12722: END IF;
12723: END IF;
12724:
12725: IF l_error THEN
12726: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_LOOKUP' );
12727: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
12728: FND_MESSAGE.SET_TOKEN( 'LOOKUP_TYPE', p_lookup_type );
12729: FND_MSG_PUB.ADD;
12730: x_return_status := FND_API.G_RET_STS_ERROR;
12723: END IF;
12724:
12725: IF l_error THEN
12726: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_LOOKUP' );
12727: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
12728: FND_MESSAGE.SET_TOKEN( 'LOOKUP_TYPE', p_lookup_type );
12729: FND_MSG_PUB.ADD;
12730: x_return_status := FND_API.G_RET_STS_ERROR;
12731: END IF;
12724:
12725: IF l_error THEN
12726: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_LOOKUP' );
12727: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
12728: FND_MESSAGE.SET_TOKEN( 'LOOKUP_TYPE', p_lookup_type );
12729: FND_MSG_PUB.ADD;
12730: x_return_status := FND_API.G_RET_STS_ERROR;
12731: END IF;
12732: END IF;
12915: -- If Balance Forward billing is enabled,
12916: -- Bill Level and Type should have valid not null values
12917: if (p_customer_profile_rec.cons_bill_level IS NULL
12918: OR p_customer_profile_rec.cons_inv_type IS NULL) then
12919: FND_MESSAGE.SET_NAME('AR', 'HZ_API_BILL_LVL_TYPE_INVALID');
12920: FND_MSG_PUB.ADD;
12921: x_return_status := FND_API.G_RET_STS_ERROR;
12922: else
12923: if p_customer_profile_rec.cons_bill_level IS NOT NULL then
12929: AND TRUNC(SYSDATE) BETWEEN NVL(start_date_active,SYSDATE) AND NVL(end_date_active, SYSDATE+1)
12930: AND enabled_flag = 'Y';
12931:
12932: IF (l_bill_level_count = 0) THEN
12933: FND_MESSAGE.SET_NAME('AR', 'HZ_API_INVALID_BILL_LEVEL');
12934: FND_MSG_PUB.ADD;
12935: x_return_status := FND_API.G_RET_STS_ERROR;
12936: END IF;
12937: end if;
12948: AND enabled_flag = 'Y'
12949: AND lookup_code <> 'IMPORTED';
12950:
12951: IF (l_bill_TYPE_count = 0) THEN
12952: FND_MESSAGE.SET_NAME('AR', 'HZ_API_INVALID_ACCT_BILL_TYPE');
12953: FND_MSG_PUB.ADD;
12954: x_return_status := FND_API.G_RET_STS_ERROR;
12955: END IF;
12956: -- For Site use bill level, use Summary, Detail, or Imported as bill type.
12963: AND TRUNC(SYSDATE) BETWEEN NVL(start_date_active,SYSDATE) AND NVL(end_date_active, SYSDATE+1)
12964: AND enabled_flag = 'Y';
12965:
12966: IF (l_bill_TYPE_count = 0) THEN
12967: FND_MESSAGE.SET_NAME('AR', 'HZ_API_INVALID_ACCT_BILL_TYPE');
12968: FND_MSG_PUB.ADD;
12969: x_return_status := FND_API.G_RET_STS_ERROR;
12970: END IF;
12971: end if;
13057: AND (nvl(p_cust_account_rec.trading_partner_agency_id,l_trading_partner_agency_id) IS NOT NULL
13058: AND NVL(p_cust_account_rec.trading_partner_agency_id,l_trading_partner_agency_id) <> FND_API.G_MISS_CHAR )
13059: )
13060: THEN
13061: FND_MESSAGE.SET_NAME('AR', 'HZ_TPAI_IS_NOT_NULL');
13062: FND_MSG_PUB.ADD;
13063: x_return_status := FND_API.G_RET_STS_ERROR;
13064: --If Federal Entity Type is 'Federal' and trading partner agency id is null then raise error
13065: ELSIF ( p_create_update_flag = 'C' AND p_cust_account_rec.federal_entity_type = 'F'
13071: AND (nvl(p_cust_account_rec.trading_partner_agency_id,l_trading_partner_agency_id) IS NULL
13072: OR nvl(p_cust_account_rec.trading_partner_agency_id,l_trading_partner_agency_id) = FND_API.G_MISS_CHAR )
13073: )
13074: THEN
13075: FND_MESSAGE.SET_NAME('AR', 'HZ_TPAI_IS_NULL');
13076: FND_MSG_PUB.ADD;
13077: x_return_status := FND_API.G_RET_STS_ERROR;
13078: -- Verify FK value from FV_TP_TREASURY_SYMBOLS table
13079: ELSIF p_cust_account_rec.trading_partner_agency_id IS NOT NULL AND p_cust_account_rec.trading_partner_agency_id <> FND_API.G_MISS_CHAR THEN
13085: AND ROWNUM = 1;
13086:
13087: EXCEPTION
13088: WHEN NO_DATA_FOUND THEN
13089: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
13090: FND_MESSAGE.SET_TOKEN( 'FK', 'Trading Partner Agency Id' );
13091: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'agency_id' );
13092: FND_MESSAGE.SET_TOKEN( 'TABLE', 'FV_TP_TREASURY_SYMBOLS');
13093: FND_MSG_PUB.ADD;
13086:
13087: EXCEPTION
13088: WHEN NO_DATA_FOUND THEN
13089: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
13090: FND_MESSAGE.SET_TOKEN( 'FK', 'Trading Partner Agency Id' );
13091: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'agency_id' );
13092: FND_MESSAGE.SET_TOKEN( 'TABLE', 'FV_TP_TREASURY_SYMBOLS');
13093: FND_MSG_PUB.ADD;
13094: x_return_status := FND_API.G_RET_STS_ERROR;
13087: EXCEPTION
13088: WHEN NO_DATA_FOUND THEN
13089: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
13090: FND_MESSAGE.SET_TOKEN( 'FK', 'Trading Partner Agency Id' );
13091: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'agency_id' );
13092: FND_MESSAGE.SET_TOKEN( 'TABLE', 'FV_TP_TREASURY_SYMBOLS');
13093: FND_MSG_PUB.ADD;
13094: x_return_status := FND_API.G_RET_STS_ERROR;
13095: END;
13088: WHEN NO_DATA_FOUND THEN
13089: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_FK' );
13090: FND_MESSAGE.SET_TOKEN( 'FK', 'Trading Partner Agency Id' );
13091: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'agency_id' );
13092: FND_MESSAGE.SET_TOKEN( 'TABLE', 'FV_TP_TREASURY_SYMBOLS');
13093: FND_MSG_PUB.ADD;
13094: x_return_status := FND_API.G_RET_STS_ERROR;
13095: END;
13096:
13104: p_cust_account_rec.duns_extension <> NVL( l_duns_extension, FND_API.G_MISS_CHAR ) ) )
13105: THEN
13106: IF TRANSLATE(p_cust_account_rec.duns_extension, 'ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789', 'XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX') <> 'XXXX'
13107: THEN
13108: FND_MESSAGE.SET_NAME('AR', 'HZ_DUNS_EXTENSION_IS_INVALID');
13109: FND_MSG_PUB.ADD;
13110: x_return_status := FND_API.G_RET_STS_ERROR;
13111: END IF;
13112: