DBA Data[Home] [Help]

APPS.IEX_AGING_BUCKETS_PKG dependencies on AR_PAYMENT_SCHEDULES

Line 292: ar_payment_schedules ps

288: decode(v_bucket_category,
289: 'PENDADJ_ONLY', 0, 'DISPUTE_PENDADJ', 0,
290: 1))) b6
291: from ra_cust_trx_types,
292: ar_payment_schedules ps
293: where ps.gl_date <= p_as_of_date
294: and ps.cust_trx_type_id = ra_cust_trx_types.cust_trx_type_id
295: and ps.gl_date_closed > p_as_of_date
296: and ps.customer_id = p_customer_id

Line 451: from ar_payment_schedules ps,

447: * decode(nvl(ps.amount_adjusted_pending,0), 0, 1,
448: decode(v_bucket_category,
449: 'PENDADJ_ONLY', 0, 'DISPUTE_PENDADJ', 0,
450: 1))) b6
451: from ar_payment_schedules ps,
452: ar_receivable_applications app
453: where app.gl_date+0 <= p_as_of_date
454: and ps.cash_receipt_id+0 = app.cash_receipt_id
455: and app.status in ( 'ACC', 'UNAPP', 'UNID','OTHER ACC')

Line 854: FROM ar_payment_schedules ps,

850: CURSOR cust_credits IS
851: SELECT NVL( SUM( DECODE(p_currency_code, NULL,
852: ps.acctd_amount_due_remaining,
853: ps.amount_due_remaining)), 0)
854: FROM ar_payment_schedules ps,
855: ra_cust_trx_line_gl_dist gld
856: WHERE ps.customer_id = p_filter_id
857: AND decode(p_customer_site_use_id,
858: NULL, ps.customer_site_use_id,

Line 874: FROM ar_payment_schedules ps,

870: CURSOR cust_site_credits IS
871: SELECT NVL( SUM( DECODE(p_currency_code, NULL,
872: ps.acctd_amount_due_remaining,
873: ps.amount_due_remaining)), 0)
874: FROM ar_payment_schedules ps,
875: ra_cust_trx_line_gl_dist gld
876: WHERE ps.customer_site_use_id = p_filter_id
877: AND decode(upper(p_currency_code),
878: NULL, ps.invoice_currency_code,

Line 892: FROM ar_payment_schedules ps,

888: CURSOR party_credits IS
889: SELECT NVL( SUM( DECODE(p_currency_code, NULL,
890: ps.acctd_amount_due_remaining,
891: ps.amount_due_remaining)), 0)
892: FROM ar_payment_schedules ps,
893: ra_cust_trx_line_gl_dist gld,
894: hz_cust_accounts hzca
895: WHERE ps.customer_id = hzca.cust_account_id
896: AND hzca.party_id = p_filter_id

Line 914: FROM ar_payment_schedules ps,

910: CURSOR party_paying_credits IS
911: SELECT NVL( SUM( DECODE(p_currency_code, NULL,
912: ps.acctd_amount_due_remaining,
913: ps.amount_due_remaining)), 0)
914: FROM ar_payment_schedules ps,
915: ra_cust_trx_line_gl_dist gld,
916: hz_cust_accounts hzca
917: WHERE ps.customer_id = hzca.cust_account_id
918: AND hzca.party_id IN

Line 1066: ar_payment_schedules ps,

1062: DECODE(p_currency_code, NULL,
1063: -app.acctd_amount_applied_from,
1064: -app.amount_applied),0), 0) ), 0)
1065: FROM ar_receivable_applications app,
1066: ar_payment_schedules ps,
1067: hz_cust_accounts hzca
1068: WHERE ps.customer_id = hzca.cust_account_id
1069: AND hzca.party_id = p_filter_id
1070: AND decode(p_customer_site_use_id,

Line 1102: ar_payment_schedules ps,

1098: DECODE(p_currency_code, NULL,
1099: -app.acctd_amount_applied_from,
1100: -app.amount_applied),0), 0) ), 0)
1101: FROM ar_receivable_applications app,
1102: ar_payment_schedules ps,
1103: hz_cust_accounts hzca
1104: WHERE ps.customer_id = hzca.cust_account_id
1105: AND hzca.party_id IN
1106: (SELECT p_filter_id FROM dual

Line 1151: ar_payment_schedules ps

1147: DECODE(p_currency_code, NULL,
1148: -app.acctd_amount_applied_from,
1149: -app.amount_applied),0), 0) ), 0)
1150: FROM ar_receivable_applications app,
1151: ar_payment_schedules ps
1152: WHERE ps.customer_id = p_filter_id
1153: AND decode(p_customer_site_use_id,
1154: NULL, nvl(ps.customer_site_use_id,-10),
1155: p_customer_site_use_id) = nvl(ps.customer_site_use_id,-10)

Line 1187: ar_payment_schedules ps

1183: DECODE(p_currency_code, NULL,
1184: -app.acctd_amount_applied_from,
1185: -app.amount_applied),0), 0) ), 0)
1186: FROM ar_receivable_applications app,
1187: ar_payment_schedules ps
1188: WHERE ps.customer_site_use_id = p_filter_id
1189: AND ps.cash_receipt_id = app.cash_receipt_id
1190: AND nvl( app.confirmed_flag, 'Y' ) = 'Y'
1191: AND app.status in ( 'UNAPP', 'ACC' ,'OTHER ACC')

Line 1219: ar_payment_schedules ps,

1215: DECODE(p_currency_code, NULL,
1216: -app.acctd_amount_applied_from,
1217: -app.amount_applied),0), 0) ), 0)
1218: FROM ar_receivable_applications app,
1219: ar_payment_schedules ps,
1220: hz_cust_site_uses hzsu,
1221: hz_cust_acct_sites hzas
1222: WHERE ps.customer_id = hzas.cust_account_id
1223: and hzsu.cust_acct_site_id = hzas.cust_acct_site_id

Line 1555: FROM ar_payment_schedules ps

1551: CURSOR cust_dispute IS
1552: SELECT NVL(SUM(decode(p_currency_code, NULL,
1553: ROUND(ps.amount_in_dispute * nvl(ps.exchange_rate,1),l_round_decimal),
1554: ps.amount_in_dispute)),0)
1555: FROM ar_payment_schedules ps
1556: WHERE ps.customer_id = p_filter_id
1557: AND decode(p_customer_site_use_id,
1558: NULL, ps.customer_site_use_id,
1559: p_customer_site_use_id) = ps.customer_site_use_id

Line 1574: FROM ar_payment_schedules ps

1570: CURSOR cust_site_dispute IS
1571: SELECT NVL(SUM(decode(p_currency_code, NULL,
1572: ROUND(ps.amount_in_dispute * nvl(ps.exchange_rate,1),l_round_decimal),
1573: ps.amount_in_dispute)),0)
1574: FROM ar_payment_schedules ps
1575: WHERE ps.customer_site_use_id = p_filter_id
1576: AND decode(upper(p_currency_code),
1577: NULL, ps.invoice_currency_code,
1578: upper(p_currency_code)) = ps.invoice_currency_code

Line 1592: FROM ar_payment_schedules ps,

1588: CURSOR party_dispute IS
1589: SELECT NVL(SUM(decode(p_currency_code, NULL,
1590: ROUND(ps.amount_in_dispute * nvl(ps.exchange_rate,1),l_round_decimal),
1591: ps.amount_in_dispute)),0)
1592: FROM ar_payment_schedules ps,
1593: hz_cust_accounts hzca
1594: WHERE ps.customer_id = hzca.cust_Account_id
1595: AND hzca.party_id = p_filter_id
1596: AND decode(p_customer_site_use_id,

Line 1612: FROM ar_payment_schedules ps,

1608: CURSOR party_paying_dispute IS
1609: SELECT NVL(SUM(decode(p_currency_code, NULL,
1610: ROUND(ps.amount_in_dispute * nvl(ps.exchange_rate,1),l_round_decimal),
1611: ps.amount_in_dispute)),0)
1612: FROM ar_payment_schedules ps,
1613: hz_cust_accounts hzca
1614: WHERE ps.customer_id = hzca.cust_Account_id
1615: AND hzca.party_id IN
1616: (SELECT p_filter_id FROM dual

Line 1745: FROM ar_payment_schedules ps

1741: ROUND(NVL(SUM(ps.amount_adjusted *
1742: NVL(ps.exchange_rate, 1)),0), l_round_decimal),
1743: ROUND(NVL(SUM(ps.amount_adjusted_pending *
1744: NVL(ps.exchange_rate, 1)),0), l_round_decimal)
1745: FROM ar_payment_schedules ps
1746: WHERE ps.customer_id = p_filter_id
1747: AND decode(p_customer_site_use_id,
1748: NULL, ps.customer_site_use_id,
1749: p_customer_site_use_id) = ps.customer_site_use_id

Line 1766: FROM ar_payment_schedules ps,

1762: ROUND(NVL(SUM(ps.amount_adjusted *
1763: NVL(ps.exchange_rate, 1)),0), l_round_decimal),
1764: ROUND(NVL(SUM(ps.amount_adjusted_pending *
1765: NVL(ps.exchange_rate, 1)),0), l_round_decimal)
1766: FROM ar_payment_schedules ps,
1767: hz_cust_accounts hzca
1768: WHERE ps.customer_id = hzca.cust_account_id
1769: AND hzca.party_id = p_filter_id
1770: AND decode(p_customer_site_use_id,

Line 1789: FROM ar_payment_schedules ps,

1785: ROUND(NVL(SUM(ps.amount_adjusted *
1786: NVL(ps.exchange_rate, 1)),0), l_round_decimal),
1787: ROUND(NVL(SUM(ps.amount_adjusted_pending *
1788: NVL(ps.exchange_rate, 1)),0), l_round_decimal)
1789: FROM ar_payment_schedules ps,
1790: hz_cust_accounts hzca
1791: WHERE ps.customer_id = hzca.cust_account_id
1792: AND hzca.party_id IN
1793: (SELECT p_filter_id FROM dual

Line 1821: FROM ar_payment_schedules ps

1817: ROUND(NVL(SUM(ps.amount_adjusted *
1818: NVL(ps.exchange_rate, 1)),0), l_round_decimal),
1819: ROUND(NVL(SUM(ps.amount_adjusted_pending *
1820: NVL(ps.exchange_rate, 1)),0), l_round_decimal)
1821: FROM ar_payment_schedules ps
1822: WHERE ps.customer_site_use_id = p_filter_id
1823: --- Begin - Andre Araujo - 11/09/2004 - Performance fix
1824: AND ps.status = 'OP'
1825: --- End - Andre Araujo - 11/09/2004 - Performance fix

Line 1841: FROM ar_payment_schedules ps

1837: CURSOR cust_fin_charges IS
1838: SELECT
1839: ROUND(NVL(SUM( ps.receivables_charges_charged
1840: * NVL(ps.exchange_rate,1)),0),l_round_decimal)
1841: FROM ar_payment_schedules ps
1842: WHERE ps.customer_id = p_filter_id
1843: AND decode(p_customer_site_use_id,
1844: NULL, ps.customer_site_use_id,
1845: p_customer_site_use_id) = ps.customer_site_use_id

Line 1859: FROM ar_payment_schedules ps,

1855: CURSOR party_fin_charges IS
1856: SELECT
1857: ROUND(NVL(SUM( ps.receivables_charges_charged
1858: * NVL(ps.exchange_rate,1)),0),l_round_decimal)
1859: FROM ar_payment_schedules ps,
1860: hz_cust_accounts hzca
1861: WHERE ps.customer_id = hzca.cust_account_id
1862: --- Begin - Andre Araujo - 11/09/2004 - Performance fix
1863: AND ps.status = 'OP'

Line 1879: FROM ar_payment_schedules ps,

1875: CURSOR party_paying_fin_charges IS
1876: SELECT
1877: ROUND(NVL(SUM( ps.receivables_charges_charged
1878: * NVL(ps.exchange_rate,1)),0),l_round_decimal)
1879: FROM ar_payment_schedules ps,
1880: hz_cust_accounts hzca
1881: WHERE ps.customer_id = hzca.cust_account_id
1882: AND hzca.party_id IN
1883: (SELECT p_filter_id FROM dual

Line 1907: FROM ar_payment_schedules ps

1903: CURSOR cust_site_fin_charges IS
1904: SELECT
1905: ROUND(NVL(SUM( ps.receivables_charges_charged
1906: * NVL(ps.exchange_rate,1)),0),l_round_decimal)
1907: FROM ar_payment_schedules ps
1908: WHERE ps.customer_site_use_id = p_filter_id
1909: AND decode(upper(p_currency_code),
1910: NULL, ps.invoice_currency_code,
1911: upper(p_currency_code)) = ps.invoice_currency_code

Line 2299: from ar_payment_schedules aps

2295: if p_filter_mode = 'BILLTO' then
2296: Begin
2297: select DISTINCT aps.customer_id
2298: into v_billto_cust_account_id
2299: from ar_payment_schedules aps
2300: where aps.customer_site_use_id = p_filter_id ;
2301:
2302: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2303: iex_debug_pub.logmessage('Cust Account id for bill to >> '

Line 2883: ar_payment_schedules aps,

2879: BULK COLLECT INTO
2880: l_collectible_bkt_id_tbl,
2881: l_collectible_bkt_amt_tbl
2882: from ar_aging_bucket_lines aabl,
2883: ar_payment_schedules aps,
2884: iex_delinquencies id
2885: where id.payment_schedule_id = aps.payment_schedule_id
2886: --BEGIN-FIX BUG#4356388-05/24/2005-JYPARK-amount overdue should inculde Pre-Delinquent transactions which are not past due
2887: -- and id.status IN ('DELINQUENT', 'PRE-DELINQUENT')

Line 2910: ar_payment_schedules aps,

2906: FROM ra_cm_requests
2907: WHERE customer_trx_id IN
2908: (SELECT DISTINCT id.transaction_id
2909: FROM ar_aging_bucket_lines aabl,
2910: ar_payment_schedules aps,
2911: iex_delinquencies id
2912: WHERE id.payment_schedule_id = aps.payment_schedule_id
2913: AND id.status IN('DELINQUENT', 'PREDELINQUENT')
2914: AND TRUNC(sysdate) -aps.due_date >= aabl.days_start

Line 2934: ar_payment_schedules aps,

2930: BULK COLLECT INTO
2931: l_collectible_bkt_id_tbl,
2932: l_collectible_bkt_amt_tbl
2933: from ar_aging_bucket_lines aabl,
2934: ar_payment_schedules aps,
2935: iex_delinquencies id,
2936: hz_cust_accounts hzca
2937: where id.payment_schedule_id = aps.payment_schedule_id
2938: --BEGIN-FIX BUG#4356388-05/24/2005-JYPARK-amount overdue should inculde Pre-Delinquent transactions which are not past due

Line 2970: ar_payment_schedules aps,

2966: FROM ra_cm_requests
2967: WHERE customer_trx_id IN
2968: (SELECT DISTINCT id.transaction_id
2969: FROM ar_aging_bucket_lines aabl,
2970: ar_payment_schedules aps,
2971: iex_delinquencies id,
2972: hz_cust_accounts hzca
2973: WHERE id.payment_schedule_id = aps.payment_schedule_id
2974: AND id.status IN('DELINQUENT', 'PREDELINQUENT')

Line 3003: ar_payment_schedules aps,

2999: BULK COLLECT INTO
3000: l_collectible_bkt_id_tbl,
3001: l_collectible_bkt_amt_tbl
3002: from ar_aging_bucket_lines aabl,
3003: ar_payment_schedules aps,
3004: iex_delinquencies id,
3005: hz_cust_accounts hzca
3006: where id.payment_schedule_id = aps.payment_schedule_id
3007: --BEGIN-FIX BUG#4356388-05/24/2005-JYPARK-amount overdue should inculde Pre-Delinquent transactions which are not past due

Line 3031: ar_payment_schedules aps,

3027: FROM ra_cm_requests
3028: WHERE customer_trx_id IN
3029: (SELECT DISTINCT id.transaction_id
3030: FROM ar_aging_bucket_lines aabl,
3031: ar_payment_schedules aps,
3032: iex_delinquencies id,
3033: hz_cust_accounts hzca
3034: WHERE id.payment_schedule_id = aps.payment_schedule_id
3035: AND id.status IN('DELINQUENT', 'PREDELINQUENT')

Line 3057: ar_payment_schedules aps, -- added by ehuh for bill-to

3053: BULK COLLECT INTO -- added by ehuh for bill-to
3054: l_collectible_bkt_id_tbl, -- added by ehuh for bill-to
3055: l_collectible_bkt_amt_tbl -- added by ehuh for bill-to
3056: from ar_aging_bucket_lines aabl, -- added by ehuh for bill-to
3057: ar_payment_schedules aps, -- added by ehuh for bill-to
3058: iex_delinquencies id
3059: where id.payment_schedule_id = aps.payment_schedule_id -- added by ehuh for bill-to
3060: --BEGIN-FIX BUG#4356388-05/24/2005-JYPARK-amount overdue should inculde Pre-Delinquent transactions which are not past due
3061: -- and id.status IN ('DELINQUENT', 'PRE-DELINQUENT')

Line 3083: ar_payment_schedules aps,

3079: FROM ra_cm_requests
3080: WHERE customer_trx_id IN
3081: (SELECT DISTINCT id.transaction_id
3082: FROM ar_aging_bucket_lines aabl,
3083: ar_payment_schedules aps,
3084: iex_delinquencies id
3085: WHERE id.payment_schedule_id = aps.payment_schedule_id
3086: AND id.status IN('DELINQUENT', 'PREDELINQUENT')
3087: AND TRUNC(sysdate) -aps.due_date >= aabl.days_start

Line 3353: -- FROM ar_payment_schedules arp,

3349: where aging_bucket_line_id = p_bucket_line_id;
3350:
3351: v_tran_sql :=
3352: -- 'SELECT NVL(count(1), 0), NVL(SUM(ACCTD_AMOUNT_DUE_REMAINING), 0)
3353: -- FROM ar_payment_schedules arp,
3354: -- ar_aging_bucket_lines aabl
3355: -- WHERE sysdate-arp.due_date >= aabl.days_start
3356: -- and sysdate-arp.due_date <= aabl.days_to
3357: -- and arp.class = :class

Line 3363: FROM ar_payment_schedules arp

3359: -- and aabl.aging_bucket_line_id = :bucket_line_id
3360: -- AND arp.customer_id = :cust_account_id ' ;
3361: --Bug5170294. Fix by LKKUMAR. Use Trunc on Dates. Start.
3362: 'SELECT NVL(count(1), 0), NVL(SUM(ACCTD_AMOUNT_DUE_REMAINING), 0)
3363: FROM ar_payment_schedules arp
3364: WHERE (arp.customer_id = :cust_account_id
3365: and arp.status = ''OP'')
3366: and
3367: (

Line 3377: FROM ar_payment_schedules arp,

3373:
3374: IF NVL(p_using_paying_rel, 'N') = 'Y' THEN
3375: v_paying_party_tran_sql :=
3376: 'SELECT NVL(count(1), 0), NVL(SUM(ACCTD_AMOUNT_DUE_REMAINING), 0)
3377: FROM ar_payment_schedules arp,
3378: ar_aging_bucket_lines aabl,
3379: hz_cust_accounts hzca
3380: WHERE trunc(sysdate)-trunc(arp.due_date) >= aabl.days_start
3381: and trunc(sysdate)-trunc(arp.due_date) <= aabl.days_to

Line 3399: -- FROM ar_payment_schedules arp,

3395: --Bug5170294. Fix by LKKUMAR. Use Trunc on Dates. End.
3396: ELSE
3397: v_party_tran_sql :=
3398: -- 'SELECT NVL(count(1), 0), NVL(SUM(ACCTD_AMOUNT_DUE_REMAINING), 0)
3399: -- FROM ar_payment_schedules arp,
3400: -- ar_aging_bucket_lines aabl,
3401: -- hz_cust_accounts hzca
3402: -- WHERE sysdate-arp.due_date >= aabl.days_start
3403: -- and sysdate-arp.due_date <= aabl.days_to

Line 3411: FROM ar_payment_schedules arp

3407: -- and aabl.aging_bucket_line_id = :bucket_line_id
3408: -- and hzca.party_id = :party_id ' ;
3409: --Bug5170294. Fix by LKKUMAR. Use Trunc on Dates. Start.
3410: 'SELECT NVL(count(1), 0), NVL(SUM(ACCTD_AMOUNT_DUE_REMAINING), 0)
3411: FROM ar_payment_schedules arp
3412: WHERE (arp.customer_id in (select cust_account_id from hz_cust_accounts where party_id = :party_id)
3413: and arp.status = ''OP'')
3414: and
3415: (

Line 3427: -- FROM ar_payment_schedules arp,

3423:
3424: /* Start added by ehuh for bill_to */
3425: v_party_billto_tran_sql :=
3426: -- 'SELECT NVL(count(1), 0), NVL(SUM(ACCTD_AMOUNT_DUE_REMAINING), 0)
3427: -- FROM ar_payment_schedules arp,
3428: -- ar_aging_bucket_lines aabl,
3429: -- hz_cust_accounts hzca
3430: -- WHERE sysdate-arp.due_date >= aabl.days_start
3431: -- and sysdate-arp.due_date <= aabl.days_to

Line 3439: FROM ar_payment_schedules arp

3435: -- and aabl.aging_bucket_line_id = :bucket_line_id
3436: -- and arp.customer_site_use_id = :customer_site_use_id ' ;
3437: --Bug5170294. Fix by LKKUMAR. Use Trunc on Dates. Start.
3438: 'SELECT NVL(count(1), 0), NVL(SUM(ACCTD_AMOUNT_DUE_REMAINING), 0)
3439: FROM ar_payment_schedules arp
3440: WHERE (arp.customer_site_use_id = :customer_site_use_id
3441: and arp.status = ''OP'')
3442: and
3443: (

Line 3527: b_class AR_PAYMENT_SCHEDULES.CLASS%TYPE;

3523: v_sql varchar2(3000) ;
3524:
3525:
3526: -- Bind Variables
3527: b_class AR_PAYMENT_SCHEDULES.CLASS%TYPE;
3528: b_status AR_PAYMENT_SCHEDULES.STATUS%TYPE;
3529: b_interface_attr RA_CUSTOMER_TRX.INTERFACE_HEADER_ATTRIBUTE9%TYPE;
3530: b_interface_context RA_CUSTOMER_TRX.INTERFACE_HEADER_CONTEXT%TYPE;
3531:

Line 3528: b_status AR_PAYMENT_SCHEDULES.STATUS%TYPE;

3524:
3525:
3526: -- Bind Variables
3527: b_class AR_PAYMENT_SCHEDULES.CLASS%TYPE;
3528: b_status AR_PAYMENT_SCHEDULES.STATUS%TYPE;
3529: b_interface_attr RA_CUSTOMER_TRX.INTERFACE_HEADER_ATTRIBUTE9%TYPE;
3530: b_interface_context RA_CUSTOMER_TRX.INTERFACE_HEADER_CONTEXT%TYPE;
3531:
3532: BEGIN

Line 3552: FROM ar_payment_schedules arp,

3548: END IF;
3549:
3550: v_cust_cnsld_sql :=
3551: 'SELECT count(distinct ocahb.id)
3552: FROM ar_payment_schedules arp,
3553: ar_aging_bucket_lines aabl,
3554: ra_customer_trx rct,
3555: okl_cnsld_ar_strms_b ocasb,
3556: OKL_CNSLD_AR_LINES_B ocalb,

Line 3575: FROM ar_payment_schedules arp,

3571:
3572: IF NVL(p_using_paying_rel, 'N') = 'Y' THEN
3573: v_party_cnsld_sql :=
3574: 'SELECT count(distinct ocahb.id)
3575: FROM ar_payment_schedules arp,
3576: ar_aging_bucket_lines aabl,
3577: ra_customer_trx rct,
3578: okl_cnsld_ar_strms_b ocasb,
3579: OKL_CNSLD_AR_LINES_B ocalb,

Line 3607: FROM ar_payment_schedules arp,

3603:
3604: ELSE
3605: v_party_cnsld_sql :=
3606: 'SELECT count(distinct ocahb.id)
3607: FROM ar_payment_schedules arp,
3608: ar_aging_bucket_lines aabl,
3609: ra_customer_trx rct,
3610: okl_cnsld_ar_strms_b ocasb,
3611: OKL_CNSLD_AR_LINES_B ocalb,

Line 3639: FROM ar_payment_schedules arp,

3635:
3636:
3637: v_party_billto_cnsld_sql :=
3638: 'SELECT count(distinct ocahb.id)
3639: FROM ar_payment_schedules arp,
3640: ar_aging_bucket_lines aabl,
3641: ra_customer_trx rct,
3642: okl_cnsld_ar_strms_b ocasb,
3643: OKL_CNSLD_AR_LINES_B ocalb,