[Home] [Help]
386: IF ( p_row_id IS NULL OR p_cr_id IS NULL OR
387: p_receipt_number IS NULL OR p_receipt_amount IS NULL OR
388: p_batch_id IS NULL OR p_remittance_bank_account_id IS NULL OR
389: p_receipt_method_id IS NULL ) THEN
390: FND_MESSAGE.set_name ('AR', 'AR_ARGUEMENTS_FAIL' );
391: APP_EXCEPTION.raise_exception;
392: END IF;
393: --
394: validate_special_type( p_special_type, p_pay_from_customer,
733: arp_util.debug( 'arp_rw_icr_pkg.validate_args_insert_row()+' );
734: END IF;
735: --
736: IF ( p_row_id IS NOT NULL OR p_cr_id IS NOT NULL ) THEN
737: FND_MESSAGE.set_name ('AR', 'AR_ARGUEMENTS_FAIL' );
738: APP_EXCEPTION.raise_exception;
739: END IF;
740: --
741: IF ( p_receipt_date IS NULL OR p_gl_date IS NULL OR
742: p_receipt_number IS NULL OR p_receipt_amount IS NULL OR
743: p_batch_id IS NULL OR p_currency_code IS NULL OR
744: p_remittance_bank_account_id IS NULL OR
745: p_receipt_method_id IS NULL ) THEN
746: FND_MESSAGE.set_name ('AR', 'AR_ARGUEMENTS_FAIL' );
747: APP_EXCEPTION.raise_exception;
748: END IF;
749: --
750: validate_special_type( p_special_type, p_pay_from_customer,
810: --
811: IF ( p_special_type IS NULL ) THEN
812: IF ( p_customer_trx_id IS NULL OR p_pay_from_customer IS NULL OR
813: p_site_use_id IS NULL OR p_payment_schedule_id IS NULL ) THEN
814: FND_MESSAGE.set_name ('AR', 'AR_ARGUEMENTS_FAIL' );
815: APP_EXCEPTION.raise_exception;
816: END IF;
817: ELSIF ( p_special_type = 'UNIDENTIFIED' ) THEN
818: IF ( p_pay_from_customer IS NOT NULL OR p_site_use_id IS NOT NULL ) THEN
815: APP_EXCEPTION.raise_exception;
816: END IF;
817: ELSIF ( p_special_type = 'UNIDENTIFIED' ) THEN
818: IF ( p_pay_from_customer IS NOT NULL OR p_site_use_id IS NOT NULL ) THEN
819: FND_MESSAGE.set_name ('AR', 'AR_ARGUEMENTS_FAIL' );
820: APP_EXCEPTION.raise_exception;
821: END IF;
822: ELSE
823: IF ( p_pay_from_customer IS NULL OR
822: ELSE
823: IF ( p_pay_from_customer IS NULL OR
824: (arp_global.sysparam.site_required_flag = 'Y' AND
825: p_site_use_id IS NULL )) THEN
826: FND_MESSAGE.set_name ('AR', 'AR_ARGUEMENTS_FAIL' );
827: APP_EXCEPTION.raise_exception;
828: END IF;
829: END IF;
830: END validate_special_type;
929: arp_util.debug( 'arp_rw_icr_pkg.val_args_applied_amount_total()+' );
930: END IF;
931: --
932: IF ( p_cr_id is NULL ) THEN
933: FND_MESSAGE.set_name ('AR', 'AR_ARGUEMENTS_FAIL' );
934: APP_EXCEPTION.raise_exception;
935: END IF;
936: --
937: IF PG_DEBUG in ('Y', 'C') THEN
1019: AND icr.amount = p_receipt_amount
1020: AND icr.factor_discount_amount = p_factor_discount_amount;
1021: --
1022: IF ( l_count <> 0 ) THEN
1023: FND_MESSAGE.set_name( 'AR', 'AR_DUP_PYMNT' );
1024: APP_EXCEPTION.raise_exception;
1025: END IF;
1026: l_count := 0;
1027: --
1036: AND cr.pay_from_customer = p_customer_id
1037: AND cr.amount = p_receipt_amount+p_factor_discount_amount
1038: AND cr.reversal_category IS NULL;
1039: IF ( l_count <> 0 ) THEN
1040: FND_MESSAGE.set_name( 'AR', 'AR_DUP_PYMNT' );
1041: APP_EXCEPTION.raise_exception;
1042: END IF;
1043: --
1044: IF PG_DEBUG in ('Y', 'C') THEN
1092: --
1093: -- Note: Special type can be NULL
1094: --
1095: IF ( p_receipt_number is NULL OR p_receipt_amount IS NULL ) THEN
1096: FND_MESSAGE.set_name ('AR', 'AR_ARGUEMENTS_FAIL' );
1097: APP_EXCEPTION.raise_exception;
1098: END IF;
1099: --
1100: IF( ( p_special_type <> 'UNIDENTIFIED' ) AND
1098: END IF;
1099: --
1100: IF( ( p_special_type <> 'UNIDENTIFIED' ) AND
1101: ( p_customer_id IS NULL ) ) THEN
1102: FND_MESSAGE.set_name ('AR', 'AR_ARGUEMENTS_FAIL' );
1103: APP_EXCEPTION.raise_exception;
1104: END IF;
1105: IF PG_DEBUG in ('Y', 'C') THEN
1106: arp_util.debug( 'arp_rw_icr_pkg.val_args_check_unique_receipt()-' );
1155: -- Do argument validation, Note: No separate procedure used
1156: --
1157: IF ( p_module_name IS NOT NULL AND p_module_version IS NOT NULL ) THEN
1158: IF ( p_cr_id is NULL ) THEN
1159: FND_MESSAGE.set_name ('AR', 'AR_ARGUEMENTS_FAIL' );
1160: APP_EXCEPTION.raise_exception;
1161: END IF;
1162: END IF;
1163: --
1223: -- Do argument validation, Note: No separate procedure used
1224: --
1225: IF ( p_module_name IS NOT NULL AND p_module_version IS NOT NULL ) THEN
1226: IF ( p_cr_id is NULL ) THEN
1227: FND_MESSAGE.set_name ('AR', 'AR_ARGUEMENTS_FAIL' );
1228: APP_EXCEPTION.raise_exception;
1229: END IF;
1230: END IF;
1231: --
1229: END IF;
1230: END IF;
1231: --
1232: IF ( arp_rw_icr_pkg.lines_exists( p_cr_id, NULL, NULL ) = TRUE ) THEN
1233: FND_MESSAGE.set_name( 'AR', 'AR_UPDNA_APP_TYPE' );
1234: APP_EXCEPTION.raise_exception;
1235: END IF;
1236: --
1237: IF PG_DEBUG in ('Y', 'C') THEN
1326: END IF;
1327: --
1328: IF ( p_module_name IS NOT NULL AND p_module_version IS NOT NULL ) THEN
1329: IF ( p_cr_id is NULL OR p_row_id IS NULL ) THEN
1330: FND_MESSAGE.set_name ('AR', 'AR_ARGUEMENTS_FAIL' );
1331: APP_EXCEPTION.raise_exception;
1332: END IF;
1333: END IF;
1334: --
1448: OPEN C;
1449: FETCH C INTO Recinfo;
1450: if (C%NOTFOUND) then
1451: CLOSE C;
1452: FND_MESSAGE.Set_Name( 'FND', 'FORM_RECORD_DELETED');
1453: APP_EXCEPTION.Raise_Exception;
1454: end if;
1455: CLOSE C;
1456: if(
1568: AND (p_anticipated_clearing_date IS NULL)))
1569: ) then
1570: return;
1571: else
1572: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
1573: APP_EXCEPTION.Raise_Exception;
1574: end if;
1575: END lock_row;
1576: --