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
546: NULL;
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:
624: -- the account_number will be generated from sequence by table handler.
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:
650: /*IF G_DEBUG THEN
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
737: WHEN NO_DATA_FOUND THEN
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
798: NULL;
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: */
1161:
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:
1203:
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:
1259: /*
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 ;
1915: END IF;
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 ;
2004: END IF;
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
2526: WHEN NO_DATA_FOUND THEN
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
2917: 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
3085: NULL;
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
3117: NULL;
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
3369: SELECT STATUS, NAME INTO l_class_status, l_profile_class_name
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
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;
3389:
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:
3494: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level 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:
3511: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
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
3532: NULL;
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:
3557: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level 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 .' ||
4207: 'x_return_status = ' || x_return_status,
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
4243: hz_utility_v2pub.debug(p_message=>'Percent_Collectable should be between 0 and 100 .' ||
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:
4542: END IF;
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
4800: hz_utility_v2pub.debug(p_message=>'discount_grace_days should be null when discount_terms is N.' ||
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
4867: hz_utility_v2pub.debug(p_message=>'dunning_letter_set_id cannot be NULL when dunning_letters is Y.' ||
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
4891: hz_utility_v2pub.debug(p_message=>'dunning_letter_set_id should be NULL when dunning_letters is N.' ||
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
4968: hz_utility_v2pub.debug(p_message=>'statement_cycle_id cannot be NULL when send_statements
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
4984: hz_utility_v2pub.debug(p_message=>'credit_balance_statements cannot be NULL when
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
5009: hz_utility_v2pub.debug(p_message=>'statement_cycle_id should be NULL when send_statements
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
5028: hz_utility_v2pub.debug(p_message=>'credit_balance_statements should be N when send_statements
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,
5114: p_prefix =>l_debug_prefix,
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
5154: hz_utility_v2pub.debug(p_message=>'Interest_period_days should be NULL when interest_charges
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
5172: hz_utility_v2pub.debug(p_message=>'charge_on_finance_charge_flag cannot be Y when
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:
5479: IF p_customer_profile_rec.late_charge_term_id is NOT NULL 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:
5522: IF p_customer_profile_rec.message_text_id is NOT NULL AND
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
5699: NULL;
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:
5797: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
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:
5893: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
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
5992: NULL;
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:
6072: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
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
6147: hz_utility_v2pub.debug(p_message=>'overall_credit_limit should be greater than the trx_credit_limit. ' ||
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
6388: IF (v_cust_profile_amt_rec.min_fc_invoice_amount IS NOT NULL OR
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 (
6395: p_column => 'min_fc_invoice_percent',
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;
6414:
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
6469: IF (v_cust_profile_amt_rec.min_fc_balance_amount IS NOT NULL OR
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 (
6476: p_column => 'min_fc_balance_percent',
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;
6495:
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 (
6558: p_column => 'interest_rate',
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 (
6587: p_column => 'interest_schedule_id',
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;
6607:
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 (
6670: p_column => 'penalty_rate',
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 (
6699: p_column => 'penalty_schedule_id',
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;
6719:
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
6870:
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;
6898:
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
7041: NULL;
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:
7233: -- Debug info.
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
7277: NULL;
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
7326: NULL;
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
7432: 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:
7562: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
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;
7683: END IF;
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;
7702: END IF;
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
7884: NULL;
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;
8149:
8150: EXCEPTION
8151: WHEN NO_DATA_FOUND THEN
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
8186: NULL;
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:
8238: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
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
8293: WHEN NO_DATA_FOUND THEN
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:
8371: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
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;
8384:
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
8410: hz_utility_v2pub.debug(p_message=>'For BILL_TO site use, inactivation not allowed if a SHIP_TO address uses this BILL_TO address ' ||
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
8595: WHEN NO_DATA_FOUND 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;
8651: END IF;
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 ;
8753: END IF;
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 ;
8822: END IF;
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:
9335: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
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:
9363: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level 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:
9386: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
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
9822: NULL;
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:
10054: EXCEPTION
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:
10064: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
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
10172: NULL;
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
10198: NULL;
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
10233: NULL;
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
10262: NULL;
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
10396: NULL;
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
10423: NULL;
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
10626: NULL;
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
10797: NULL;
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
10893: NULL;
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;
10977:
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;
11012:
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;
11046: PROCEDURE check_cust_site_use_cont_fk(
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;
11070:
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;
11094:
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;
11127:
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;
11152:
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;
11177:
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:
11202: END check_party_site_fk;
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;
11232:
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;
11260: END IF;
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;
11270: **************************************************************************/
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:
11315: PROCEDURE check_late_charge_term_id_fk (
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
11346: begin
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;
11364:
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:
11393: PROCEDURE check_exchange_rate_type_fk (
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:
11419: PROCEDURE check_charge_schedule_id_fk (
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:
11444: PROCEDURE check_finchrg_trx_fk (
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:
11467: PROCEDURE check_price_list_fk (
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;
11500:
11501: PROCEDURE check_item_cross_ref(
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:
11521: PROCEDURE check_tax_code(
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:
11578: PROCEDURE check_warehouse(
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:
11599: PROCEDURE check_prim_salesrep(
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;
11629: END check_prim_salesrep;
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;
11668: NULL;
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:
11686: END check_partial_mandatory_column;
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:
11703: END check_partial_mandatory_column;
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;
11730: END IF;
11731:
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;
11759:
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;
11784:
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;
11809:
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
11858: begin
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;
11876:
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;
11895:
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;
11922:
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;
11953:
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:
11968: END check_positive_value;
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:
11984: END check_greater_than_zero;
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:
12000: END check_less_than_100;
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:
12388: END validate_mandatory;
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:
12426: END validate_mandatory;
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:
12464: END validate_mandatory;
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:
12506: END validate_nonupdateable;
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:
12548: END validate_nonupdateable;
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:
12590: END validate_nonupdateable;
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:
12644: END validate_start_end_date;
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:
12661: END validate_cannot_update_to_null;
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:
12678: END validate_cannot_update_to_null;
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:
12695: END validate_cannot_update_to_null;
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;
12733:
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
12924: SELECT COUNT(*)
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;
12938: end if;
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.
12957: else
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;
12972: end if;
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'
13066: AND (p_cust_account_rec.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
13080: BEGIN
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:
13097: END IF;
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:
13113: END IF;