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 453: from ar_payment_schedules ps,

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

Line 874: FROM ar_payment_schedules ps,

870: CURSOR cust_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_id = p_filter_id
877: AND decode(p_customer_site_use_id,
878: NULL, ps.customer_site_use_id,

Line 894: FROM ar_payment_schedules ps,

890: CURSOR cust_site_credits IS
891: SELECT NVL( SUM( DECODE(p_currency_code, NULL,
892: ps.acctd_amount_due_remaining,
893: ps.amount_due_remaining)), 0)
894: FROM ar_payment_schedules ps,
895: ra_cust_trx_line_gl_dist gld
896: WHERE ps.customer_site_use_id = p_filter_id
897: AND decode(upper(p_currency_code),
898: NULL, ps.invoice_currency_code,

Line 912: FROM ar_payment_schedules ps,

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

Line 934: FROM ar_payment_schedules ps,

930: CURSOR party_paying_credits IS
931: SELECT NVL( SUM( DECODE(p_currency_code, NULL,
932: ps.acctd_amount_due_remaining,
933: ps.amount_due_remaining)), 0)
934: FROM ar_payment_schedules ps,
935: ra_cust_trx_line_gl_dist gld,
936: hz_cust_accounts hzca
937: WHERE ps.customer_id = hzca.cust_account_id
938: AND hzca.party_id IN

Line 1086: ar_payment_schedules ps,

1082: DECODE(p_currency_code, NULL,
1083: -app.acctd_amount_applied_from,
1084: -app.amount_applied),0), 0) ), 0)
1085: FROM ar_receivable_applications app,
1086: ar_payment_schedules ps,
1087: hz_cust_accounts hzca
1088: WHERE ps.customer_id = hzca.cust_account_id
1089: AND hzca.party_id = p_filter_id
1090: AND decode(p_customer_site_use_id,

Line 1122: ar_payment_schedules ps,

1118: DECODE(p_currency_code, NULL,
1119: -app.acctd_amount_applied_from,
1120: -app.amount_applied),0), 0) ), 0)
1121: FROM ar_receivable_applications app,
1122: ar_payment_schedules ps,
1123: hz_cust_accounts hzca
1124: WHERE ps.customer_id = hzca.cust_account_id
1125: AND hzca.party_id IN
1126: (SELECT p_filter_id FROM dual

Line 1171: ar_payment_schedules ps

1167: DECODE(p_currency_code, NULL,
1168: -app.acctd_amount_applied_from,
1169: -app.amount_applied),0), 0) ), 0)
1170: FROM ar_receivable_applications app,
1171: ar_payment_schedules ps
1172: WHERE ps.customer_id = p_filter_id
1173: AND decode(p_customer_site_use_id,
1174: NULL, nvl(ps.customer_site_use_id,-10),
1175: p_customer_site_use_id) = nvl(ps.customer_site_use_id,-10)

Line 1207: ar_payment_schedules ps

1203: DECODE(p_currency_code, NULL,
1204: -app.acctd_amount_applied_from,
1205: -app.amount_applied),0), 0) ), 0)
1206: FROM ar_receivable_applications app,
1207: ar_payment_schedules ps
1208: WHERE ps.customer_site_use_id = p_filter_id
1209: AND ps.cash_receipt_id = app.cash_receipt_id
1210: AND nvl( app.confirmed_flag, 'Y' ) = 'Y'
1211: AND app.status in ( 'UNAPP', 'ACC' ,'OTHER ACC')

Line 1239: ar_payment_schedules ps,

1235: DECODE(p_currency_code, NULL,
1236: -app.acctd_amount_applied_from,
1237: -app.amount_applied),0), 0) ), 0)
1238: FROM ar_receivable_applications app,
1239: ar_payment_schedules ps,
1240: hz_cust_site_uses hzsu,
1241: hz_cust_acct_sites hzas
1242: WHERE ps.customer_id = hzas.cust_account_id
1243: and hzsu.cust_acct_site_id = hzas.cust_acct_site_id

Line 1575: FROM ar_payment_schedules ps

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

Line 1594: FROM ar_payment_schedules ps

1590: CURSOR cust_site_dispute IS
1591: SELECT NVL(SUM(decode(p_currency_code, NULL,
1592: ROUND(ps.amount_in_dispute * nvl(ps.exchange_rate,1),l_round_decimal),
1593: ps.amount_in_dispute)),0)
1594: FROM ar_payment_schedules ps
1595: WHERE ps.customer_site_use_id = p_filter_id
1596: AND decode(upper(p_currency_code),
1597: NULL, ps.invoice_currency_code,
1598: upper(p_currency_code)) = ps.invoice_currency_code

Line 1612: FROM ar_payment_schedules ps,

1608: CURSOR party_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 = p_filter_id
1616: AND decode(p_customer_site_use_id,

Line 1632: FROM ar_payment_schedules ps,

1628: CURSOR party_paying_dispute IS
1629: SELECT NVL(SUM(decode(p_currency_code, NULL,
1630: ROUND(ps.amount_in_dispute * nvl(ps.exchange_rate,1),l_round_decimal),
1631: ps.amount_in_dispute)),0)
1632: FROM ar_payment_schedules ps,
1633: hz_cust_accounts hzca
1634: WHERE ps.customer_id = hzca.cust_Account_id
1635: AND hzca.party_id IN
1636: (SELECT p_filter_id FROM dual

Line 1765: FROM ar_payment_schedules ps

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

Line 1786: FROM ar_payment_schedules ps,

1782: ROUND(NVL(SUM(ps.amount_adjusted *
1783: NVL(ps.exchange_rate, 1)),0), l_round_decimal),
1784: ROUND(NVL(SUM(ps.amount_adjusted_pending *
1785: NVL(ps.exchange_rate, 1)),0), l_round_decimal)
1786: FROM ar_payment_schedules ps,
1787: hz_cust_accounts hzca
1788: WHERE ps.customer_id = hzca.cust_account_id
1789: AND hzca.party_id = p_filter_id
1790: AND decode(p_customer_site_use_id,

Line 1809: FROM ar_payment_schedules ps,

1805: ROUND(NVL(SUM(ps.amount_adjusted *
1806: NVL(ps.exchange_rate, 1)),0), l_round_decimal),
1807: ROUND(NVL(SUM(ps.amount_adjusted_pending *
1808: NVL(ps.exchange_rate, 1)),0), l_round_decimal)
1809: FROM ar_payment_schedules ps,
1810: hz_cust_accounts hzca
1811: WHERE ps.customer_id = hzca.cust_account_id
1812: AND hzca.party_id IN
1813: (SELECT p_filter_id FROM dual

Line 1841: FROM ar_payment_schedules ps

1837: ROUND(NVL(SUM(ps.amount_adjusted *
1838: NVL(ps.exchange_rate, 1)),0), l_round_decimal),
1839: ROUND(NVL(SUM(ps.amount_adjusted_pending *
1840: NVL(ps.exchange_rate, 1)),0), l_round_decimal)
1841: FROM ar_payment_schedules ps
1842: WHERE ps.customer_site_use_id = p_filter_id
1843: --- Begin - Andre Araujo - 11/09/2004 - Performance fix
1844: AND ps.status = 'OP'
1845: --- End - Andre Araujo - 11/09/2004 - Performance fix

Line 1861: FROM ar_payment_schedules ps

1857: CURSOR cust_fin_charges IS
1858: SELECT
1859: ROUND(NVL(SUM( ps.receivables_charges_charged
1860: * NVL(ps.exchange_rate,1)),0),l_round_decimal)
1861: FROM ar_payment_schedules ps
1862: WHERE ps.customer_id = p_filter_id
1863: AND decode(p_customer_site_use_id,
1864: NULL, ps.customer_site_use_id,
1865: p_customer_site_use_id) = ps.customer_site_use_id

Line 1879: FROM ar_payment_schedules ps,

1875: CURSOR party_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: --- Begin - Andre Araujo - 11/09/2004 - Performance fix
1883: AND ps.status = 'OP'

Line 1899: FROM ar_payment_schedules ps,

1895: CURSOR party_paying_fin_charges IS
1896: SELECT
1897: ROUND(NVL(SUM( ps.receivables_charges_charged
1898: * NVL(ps.exchange_rate,1)),0),l_round_decimal)
1899: FROM ar_payment_schedules ps,
1900: hz_cust_accounts hzca
1901: WHERE ps.customer_id = hzca.cust_account_id
1902: AND hzca.party_id IN
1903: (SELECT p_filter_id FROM dual

Line 1927: FROM ar_payment_schedules ps

1923: CURSOR cust_site_fin_charges IS
1924: SELECT
1925: ROUND(NVL(SUM( ps.receivables_charges_charged
1926: * NVL(ps.exchange_rate,1)),0),l_round_decimal)
1927: FROM ar_payment_schedules ps
1928: WHERE ps.customer_site_use_id = p_filter_id
1929: AND decode(upper(p_currency_code),
1930: NULL, ps.invoice_currency_code,
1931: upper(p_currency_code)) = ps.invoice_currency_code

Line 2319: from ar_payment_schedules aps

2315: if p_filter_mode = 'BILLTO' then
2316: Begin
2317: select DISTINCT aps.customer_id
2318: into v_billto_cust_account_id
2319: from ar_payment_schedules aps
2320: where aps.customer_site_use_id = p_filter_id ;
2321:
2322: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2323: iex_debug_pub.logmessage('Cust Account id for bill to >> '

Line 2903: ar_payment_schedules aps,

2899: BULK COLLECT INTO
2900: l_collectible_bkt_id_tbl,
2901: l_collectible_bkt_amt_tbl
2902: from ar_aging_bucket_lines aabl,
2903: ar_payment_schedules aps,
2904: iex_delinquencies id
2905: where id.payment_schedule_id = aps.payment_schedule_id
2906: --BEGIN-FIX BUG#4356388-05/24/2005-JYPARK-amount overdue should inculde Pre-Delinquent transactions which are not past due
2907: -- and id.status IN ('DELINQUENT', 'PRE-DELINQUENT')

Line 2930: ar_payment_schedules aps,

2926: FROM ra_cm_requests
2927: WHERE customer_trx_id IN
2928: (SELECT DISTINCT id.transaction_id
2929: FROM ar_aging_bucket_lines aabl,
2930: ar_payment_schedules aps,
2931: iex_delinquencies id
2932: WHERE id.payment_schedule_id = aps.payment_schedule_id
2933: AND id.status IN('DELINQUENT', 'PREDELINQUENT')
2934: AND TRUNC(sysdate) -aps.due_date >= aabl.days_start

Line 2954: ar_payment_schedules aps,

2950: BULK COLLECT INTO
2951: l_collectible_bkt_id_tbl,
2952: l_collectible_bkt_amt_tbl
2953: from ar_aging_bucket_lines aabl,
2954: ar_payment_schedules aps,
2955: iex_delinquencies id,
2956: hz_cust_accounts hzca
2957: where id.payment_schedule_id = aps.payment_schedule_id
2958: --BEGIN-FIX BUG#4356388-05/24/2005-JYPARK-amount overdue should inculde Pre-Delinquent transactions which are not past due

Line 2990: ar_payment_schedules aps,

2986: FROM ra_cm_requests
2987: WHERE customer_trx_id IN
2988: (SELECT DISTINCT id.transaction_id
2989: FROM ar_aging_bucket_lines aabl,
2990: ar_payment_schedules aps,
2991: iex_delinquencies id,
2992: hz_cust_accounts hzca
2993: WHERE id.payment_schedule_id = aps.payment_schedule_id
2994: AND id.status IN('DELINQUENT', 'PREDELINQUENT')

Line 3023: ar_payment_schedules aps,

3019: BULK COLLECT INTO
3020: l_collectible_bkt_id_tbl,
3021: l_collectible_bkt_amt_tbl
3022: from ar_aging_bucket_lines aabl,
3023: ar_payment_schedules aps,
3024: iex_delinquencies id,
3025: hz_cust_accounts hzca
3026: where id.payment_schedule_id = aps.payment_schedule_id
3027: --BEGIN-FIX BUG#4356388-05/24/2005-JYPARK-amount overdue should inculde Pre-Delinquent transactions which are not past due

Line 3051: ar_payment_schedules aps,

3047: FROM ra_cm_requests
3048: WHERE customer_trx_id IN
3049: (SELECT DISTINCT id.transaction_id
3050: FROM ar_aging_bucket_lines aabl,
3051: ar_payment_schedules aps,
3052: iex_delinquencies id,
3053: hz_cust_accounts hzca
3054: WHERE id.payment_schedule_id = aps.payment_schedule_id
3055: AND id.status IN('DELINQUENT', 'PREDELINQUENT')

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

3073: BULK COLLECT INTO -- added by ehuh for bill-to
3074: l_collectible_bkt_id_tbl, -- added by ehuh for bill-to
3075: l_collectible_bkt_amt_tbl -- added by ehuh for bill-to
3076: from ar_aging_bucket_lines aabl, -- added by ehuh for bill-to
3077: ar_payment_schedules aps, -- added by ehuh for bill-to
3078: iex_delinquencies id
3079: where id.payment_schedule_id = aps.payment_schedule_id -- added by ehuh for bill-to
3080: --BEGIN-FIX BUG#4356388-05/24/2005-JYPARK-amount overdue should inculde Pre-Delinquent transactions which are not past due
3081: -- and id.status IN ('DELINQUENT', 'PRE-DELINQUENT')

Line 3103: ar_payment_schedules aps,

3099: FROM ra_cm_requests
3100: WHERE customer_trx_id IN
3101: (SELECT DISTINCT id.transaction_id
3102: FROM ar_aging_bucket_lines aabl,
3103: ar_payment_schedules aps,
3104: iex_delinquencies id
3105: WHERE id.payment_schedule_id = aps.payment_schedule_id
3106: AND id.status IN('DELINQUENT', 'PREDELINQUENT')
3107: AND TRUNC(sysdate) -aps.due_date >= aabl.days_start

Line 3388: -- FROM ar_payment_schedules arp,

3384: where aging_bucket_line_id = p_bucket_line_id;
3385:
3386: v_tran_sql :=
3387: -- 'SELECT NVL(count(1), 0), NVL(SUM(ACCTD_AMOUNT_DUE_REMAINING), 0)
3388: -- FROM ar_payment_schedules arp,
3389: -- ar_aging_bucket_lines aabl
3390: -- WHERE sysdate-arp.due_date >= aabl.days_start
3391: -- and sysdate-arp.due_date <= aabl.days_to
3392: -- and arp.class = :class

Line 3398: FROM ar_payment_schedules arp

3394: -- and aabl.aging_bucket_line_id = :bucket_line_id
3395: -- AND arp.customer_id = :cust_account_id ' ;
3396: --Bug5170294. Fix by LKKUMAR. Use Trunc on Dates. Start.
3397: 'SELECT NVL(count(1), 0), NVL(SUM(ACCTD_AMOUNT_DUE_REMAINING), 0)
3398: FROM ar_payment_schedules arp
3399: WHERE (arp.customer_id = :cust_account_id
3400: and arp.status = ''OP'')
3401: and
3402: (

Line 3412: FROM ar_payment_schedules arp,

3408:
3409: IF NVL(p_using_paying_rel, 'N') = 'Y' THEN
3410: v_paying_party_tran_sql :=
3411: 'SELECT NVL(count(1), 0), NVL(SUM(ACCTD_AMOUNT_DUE_REMAINING), 0)
3412: FROM ar_payment_schedules arp,
3413: ar_aging_bucket_lines aabl,
3414: hz_cust_accounts hzca
3415: WHERE trunc(sysdate)-trunc(arp.due_date) >= aabl.days_start
3416: and trunc(sysdate)-trunc(arp.due_date) <= aabl.days_to

Line 3434: -- FROM ar_payment_schedules arp,

3430: --Bug5170294. Fix by LKKUMAR. Use Trunc on Dates. End.
3431: ELSE
3432: v_party_tran_sql :=
3433: -- 'SELECT NVL(count(1), 0), NVL(SUM(ACCTD_AMOUNT_DUE_REMAINING), 0)
3434: -- FROM ar_payment_schedules arp,
3435: -- ar_aging_bucket_lines aabl,
3436: -- hz_cust_accounts hzca
3437: -- WHERE sysdate-arp.due_date >= aabl.days_start
3438: -- and sysdate-arp.due_date <= aabl.days_to

Line 3446: FROM ar_payment_schedules arp

3442: -- and aabl.aging_bucket_line_id = :bucket_line_id
3443: -- and hzca.party_id = :party_id ' ;
3444: --Bug5170294. Fix by LKKUMAR. Use Trunc on Dates. Start.
3445: 'SELECT NVL(count(1), 0), NVL(SUM(ACCTD_AMOUNT_DUE_REMAINING), 0)
3446: FROM ar_payment_schedules arp
3447: WHERE (arp.customer_id in (select cust_account_id from hz_cust_accounts where party_id = :party_id)
3448: and arp.status = ''OP'')
3449: and
3450: (

Line 3462: -- FROM ar_payment_schedules arp,

3458:
3459: /* Start added by ehuh for bill_to */
3460: v_party_billto_tran_sql :=
3461: -- 'SELECT NVL(count(1), 0), NVL(SUM(ACCTD_AMOUNT_DUE_REMAINING), 0)
3462: -- FROM ar_payment_schedules arp,
3463: -- ar_aging_bucket_lines aabl,
3464: -- hz_cust_accounts hzca
3465: -- WHERE sysdate-arp.due_date >= aabl.days_start
3466: -- and sysdate-arp.due_date <= aabl.days_to

Line 3474: FROM ar_payment_schedules arp

3470: -- and aabl.aging_bucket_line_id = :bucket_line_id
3471: -- and arp.customer_site_use_id = :customer_site_use_id ' ;
3472: --Bug5170294. Fix by LKKUMAR. Use Trunc on Dates. Start.
3473: 'SELECT NVL(count(1), 0), NVL(SUM(ACCTD_AMOUNT_DUE_REMAINING), 0)
3474: FROM ar_payment_schedules arp
3475: WHERE (arp.customer_site_use_id = :customer_site_use_id
3476: and arp.status = ''OP'')
3477: and
3478: (

Line 3562: b_class AR_PAYMENT_SCHEDULES.CLASS%TYPE;

3558: v_sql varchar2(3000) ;
3559:
3560:
3561: -- Bind Variables
3562: b_class AR_PAYMENT_SCHEDULES.CLASS%TYPE;
3563: b_status AR_PAYMENT_SCHEDULES.STATUS%TYPE;
3564: b_interface_attr RA_CUSTOMER_TRX.INTERFACE_HEADER_ATTRIBUTE9%TYPE;
3565: b_interface_context RA_CUSTOMER_TRX.INTERFACE_HEADER_CONTEXT%TYPE;
3566:

Line 3563: b_status AR_PAYMENT_SCHEDULES.STATUS%TYPE;

3559:
3560:
3561: -- Bind Variables
3562: b_class AR_PAYMENT_SCHEDULES.CLASS%TYPE;
3563: b_status AR_PAYMENT_SCHEDULES.STATUS%TYPE;
3564: b_interface_attr RA_CUSTOMER_TRX.INTERFACE_HEADER_ATTRIBUTE9%TYPE;
3565: b_interface_context RA_CUSTOMER_TRX.INTERFACE_HEADER_CONTEXT%TYPE;
3566:
3567: BEGIN

Line 3587: FROM ar_payment_schedules arp,

3583: END IF;
3584:
3585: v_cust_cnsld_sql :=
3586: 'SELECT count(distinct ocahb.id)
3587: FROM ar_payment_schedules arp,
3588: ar_aging_bucket_lines aabl,
3589: ra_customer_trx rct,
3590: okl_cnsld_ar_strms_b ocasb,
3591: OKL_CNSLD_AR_LINES_B ocalb,

Line 3610: FROM ar_payment_schedules arp,

3606:
3607: IF NVL(p_using_paying_rel, 'N') = 'Y' THEN
3608: v_party_cnsld_sql :=
3609: 'SELECT count(distinct ocahb.id)
3610: FROM ar_payment_schedules arp,
3611: ar_aging_bucket_lines aabl,
3612: ra_customer_trx rct,
3613: okl_cnsld_ar_strms_b ocasb,
3614: OKL_CNSLD_AR_LINES_B ocalb,

Line 3642: FROM ar_payment_schedules arp,

3638:
3639: ELSE
3640: v_party_cnsld_sql :=
3641: 'SELECT count(distinct ocahb.id)
3642: FROM ar_payment_schedules arp,
3643: ar_aging_bucket_lines aabl,
3644: ra_customer_trx rct,
3645: okl_cnsld_ar_strms_b ocasb,
3646: OKL_CNSLD_AR_LINES_B ocalb,

Line 3674: FROM ar_payment_schedules arp,

3670:
3671:
3672: v_party_billto_cnsld_sql :=
3673: 'SELECT count(distinct ocahb.id)
3674: FROM ar_payment_schedules arp,
3675: ar_aging_bucket_lines aabl,
3676: ra_customer_trx rct,
3677: okl_cnsld_ar_strms_b ocasb,
3678: OKL_CNSLD_AR_LINES_B ocalb,