[Home] [Help]
380: IF ( p_row_id IS NULL OR p_cr_id IS NULL OR
381: p_receipt_number IS NULL OR p_receipt_amount IS NULL OR
382: p_batch_id IS NULL OR p_remittance_bank_account_id IS NULL OR
383: p_receipt_method_id IS NULL ) THEN
384: FND_MESSAGE.set_name ('AR', 'AR_ARGUEMENTS_FAIL' );
385: APP_EXCEPTION.raise_exception;
386: END IF;
387: --
388: validate_special_type( p_special_type, p_pay_from_customer,
721: arp_util.debug( 'arp_rw_icr_pkg.validate_args_insert_row()+' );
722: END IF;
723: --
724: IF ( p_row_id IS NOT NULL OR p_cr_id IS NOT NULL ) THEN
725: FND_MESSAGE.set_name ('AR', 'AR_ARGUEMENTS_FAIL' );
726: APP_EXCEPTION.raise_exception;
727: END IF;
728: --
729: IF ( p_receipt_date IS NULL OR p_gl_date IS NULL OR
730: p_receipt_number IS NULL OR p_receipt_amount IS NULL OR
731: p_batch_id IS NULL OR p_currency_code IS NULL OR
732: p_remittance_bank_account_id IS NULL OR
733: p_receipt_method_id IS NULL ) THEN
734: FND_MESSAGE.set_name ('AR', 'AR_ARGUEMENTS_FAIL' );
735: APP_EXCEPTION.raise_exception;
736: END IF;
737: --
738: validate_special_type( p_special_type, p_pay_from_customer,
798: --
799: IF ( p_special_type IS NULL ) THEN
800: IF ( p_customer_trx_id IS NULL OR p_pay_from_customer IS NULL OR
801: p_site_use_id IS NULL OR p_payment_schedule_id IS NULL ) THEN
802: FND_MESSAGE.set_name ('AR', 'AR_ARGUEMENTS_FAIL' );
803: APP_EXCEPTION.raise_exception;
804: END IF;
805: ELSIF ( p_special_type = 'UNIDENTIFIED' ) THEN
806: IF ( p_pay_from_customer IS NOT NULL OR p_site_use_id IS NOT NULL ) THEN
803: APP_EXCEPTION.raise_exception;
804: END IF;
805: ELSIF ( p_special_type = 'UNIDENTIFIED' ) THEN
806: IF ( p_pay_from_customer IS NOT NULL OR p_site_use_id IS NOT NULL ) THEN
807: FND_MESSAGE.set_name ('AR', 'AR_ARGUEMENTS_FAIL' );
808: APP_EXCEPTION.raise_exception;
809: END IF;
810: ELSE
811: IF ( p_pay_from_customer IS NULL OR
810: ELSE
811: IF ( p_pay_from_customer IS NULL OR
812: (arp_global.sysparam.site_required_flag = 'Y' AND
813: p_site_use_id IS NULL )) THEN
814: FND_MESSAGE.set_name ('AR', 'AR_ARGUEMENTS_FAIL' );
815: APP_EXCEPTION.raise_exception;
816: END IF;
817: END IF;
818: END validate_special_type;
917: arp_util.debug( 'arp_rw_icr_pkg.val_args_applied_amount_total()+' );
918: END IF;
919: --
920: IF ( p_cr_id is NULL ) THEN
921: FND_MESSAGE.set_name ('AR', 'AR_ARGUEMENTS_FAIL' );
922: APP_EXCEPTION.raise_exception;
923: END IF;
924: --
925: IF PG_DEBUG in ('Y', 'C') THEN
1007: AND icr.amount = p_receipt_amount
1008: AND icr.factor_discount_amount = p_factor_discount_amount;
1009: --
1010: IF ( l_count <> 0 ) THEN
1011: FND_MESSAGE.set_name( 'AR', 'AR_DUP_PYMNT' );
1012: APP_EXCEPTION.raise_exception;
1013: END IF;
1014: l_count := 0;
1015: --
1024: AND cr.pay_from_customer = p_customer_id
1025: AND cr.amount = p_receipt_amount+p_factor_discount_amount
1026: AND cr.reversal_category IS NULL;
1027: IF ( l_count <> 0 ) THEN
1028: FND_MESSAGE.set_name( 'AR', 'AR_DUP_PYMNT' );
1029: APP_EXCEPTION.raise_exception;
1030: END IF;
1031: --
1032: IF PG_DEBUG in ('Y', 'C') THEN
1080: --
1081: -- Note: Special type can be NULL
1082: --
1083: IF ( p_receipt_number is NULL OR p_receipt_amount IS NULL ) THEN
1084: FND_MESSAGE.set_name ('AR', 'AR_ARGUEMENTS_FAIL' );
1085: APP_EXCEPTION.raise_exception;
1086: END IF;
1087: --
1088: IF( ( p_special_type <> 'UNIDENTIFIED' ) AND
1086: END IF;
1087: --
1088: IF( ( p_special_type <> 'UNIDENTIFIED' ) AND
1089: ( p_customer_id IS NULL ) ) THEN
1090: FND_MESSAGE.set_name ('AR', 'AR_ARGUEMENTS_FAIL' );
1091: APP_EXCEPTION.raise_exception;
1092: END IF;
1093: IF PG_DEBUG in ('Y', 'C') THEN
1094: arp_util.debug( 'arp_rw_icr_pkg.val_args_check_unique_receipt()-' );
1143: -- Do argument validation, Note: No separate procedure used
1144: --
1145: IF ( p_module_name IS NOT NULL AND p_module_version IS NOT NULL ) THEN
1146: IF ( p_cr_id is NULL ) THEN
1147: FND_MESSAGE.set_name ('AR', 'AR_ARGUEMENTS_FAIL' );
1148: APP_EXCEPTION.raise_exception;
1149: END IF;
1150: END IF;
1151: --
1211: -- Do argument validation, Note: No separate procedure used
1212: --
1213: IF ( p_module_name IS NOT NULL AND p_module_version IS NOT NULL ) THEN
1214: IF ( p_cr_id is NULL ) THEN
1215: FND_MESSAGE.set_name ('AR', 'AR_ARGUEMENTS_FAIL' );
1216: APP_EXCEPTION.raise_exception;
1217: END IF;
1218: END IF;
1219: --
1217: END IF;
1218: END IF;
1219: --
1220: IF ( arp_rw_icr_pkg.lines_exists( p_cr_id, NULL, NULL ) = TRUE ) THEN
1221: FND_MESSAGE.set_name( 'AR', 'AR_UPDNA_APP_TYPE' );
1222: APP_EXCEPTION.raise_exception;
1223: END IF;
1224: --
1225: IF PG_DEBUG in ('Y', 'C') THEN
1314: END IF;
1315: --
1316: IF ( p_module_name IS NOT NULL AND p_module_version IS NOT NULL ) THEN
1317: IF ( p_cr_id is NULL OR p_row_id IS NULL ) THEN
1318: FND_MESSAGE.set_name ('AR', 'AR_ARGUEMENTS_FAIL' );
1319: APP_EXCEPTION.raise_exception;
1320: END IF;
1321: END IF;
1322: --
1436: OPEN C;
1437: FETCH C INTO Recinfo;
1438: if (C%NOTFOUND) then
1439: CLOSE C;
1440: FND_MESSAGE.Set_Name( 'FND', 'FORM_RECORD_DELETED');
1441: APP_EXCEPTION.Raise_Exception;
1442: end if;
1443: CLOSE C;
1444: if(
1556: AND (p_anticipated_clearing_date IS NULL)))
1557: ) then
1558: return;
1559: else
1560: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
1561: APP_EXCEPTION.Raise_Exception;
1562: end if;
1563: END lock_row;
1564: --