eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.CSTPAPBR dependencies on CSTPAPBR

Line 1: PACKAGE BODY CSTPAPBR AS

1: PACKAGE BODY CSTPAPBR AS
2: /* $Header: CSTAPBRB.pls 120.63.12020000.6 2013/05/22 06:43:38 yunfchen ship $ */
3:
4: g_debug_flag VARCHAR2(1) := NVL(fnd_profile.value('MRP_DEBUG'), 'N'); /* Bug 4586534 */
5:

Line 41: fnd_file.put_line(fnd_file.log, 'CSTPAPBR.Create_acct_lines <<');

37: CST_DIST_PKG_ERROR EXCEPTION;
38: BEGIN
39:
40: IF g_debug_flag = 'Y' THEN
41: fnd_file.put_line(fnd_file.log, 'CSTPAPBR.Create_acct_lines <<');
42: fnd_file.put_line(fnd_file.log, 'i_transaction_id: ' || i_transaction_id);
43: END IF;
44:
45: l_stmt_num := 10;

Line 566: o_err_msg := 'CSTPAPBR.create_acct_lines :Invalid Transaction Type Code';

562:
563: WHEN CST_TXN_TYPE_FAIL THEN
564: o_err_num := 30002;
565: o_err_code := SQLCODE;
566: o_err_msg := 'CSTPAPBR.create_acct_lines :Invalid Transaction Type Code';
567:
568: WHEN OTHERS THEN
569: o_err_num := SQLCODE;
570: o_err_code := '';

Line 571: o_err_msg := 'CSTPAPBR.create_acct_lines : ' || to_char(l_stmt_num) || ':'||

567:
568: WHEN OTHERS THEN
569: o_err_num := SQLCODE;
570: o_err_code := '';
571: o_err_msg := 'CSTPAPBR.create_acct_lines : ' || to_char(l_stmt_num) || ':'||
572: substr(SQLERRM,1,180);
573:
574:
575: END create_acct_lines;

Line 623: l_api_name CONSTANT VARCHAR2(30) := 'CSTPAPBR.create_inv_ae_lines';

619: l_enc_account NUMBER;
620:
621: process_error EXCEPTION;
622:
623: l_api_name CONSTANT VARCHAR2(30) := 'CSTPAPBR.create_inv_ae_lines';
624: l_pd_txfr_ind NUMBER;
625: l_exp_sub NUMBER;
626:
627: BEGIN

Line 964: CSTPAPBR.wip_cost_txn (i_ae_txn_rec,

960: l_curr_rec.currency_conv_type := NULL;
961: l_curr_rec.currency_conv_rate := NULL;
962:
963: l_stmt_num := 20;
964: CSTPAPBR.wip_cost_txn (i_ae_txn_rec,
965: l_curr_rec,
966: l_ae_line_tbl,
967: l_err_rec);
968: -- check error;

Line 978: CSTPAPBR.sub_cost_txn (i_ae_txn_rec,

974:
975: -- Subinventory transfer.
976: -- ----------------------
977: l_stmt_num := 30;
978: CSTPAPBR.sub_cost_txn (i_ae_txn_rec,
979: l_curr_rec,
980: l_ae_line_tbl,
981: l_err_rec);
982: -- check error;

Line 991: CSTPAPBR.interorg_cost_txn (i_ae_txn_rec,

987:
988: -- Interorg transfers.
989: -- -------------------
990: l_stmt_num := 40;
991: CSTPAPBR.interorg_cost_txn (i_ae_txn_rec,
992: l_curr_rec,
993: l_ae_line_tbl,
994: l_err_rec);
995: -- check error;

Line 1004: CSTPAPBR.pcu_cost_txn (i_ae_txn_rec,

1000:
1001: -- Cost Update.
1002: -- ------------
1003: l_stmt_num := 50;
1004: CSTPAPBR.pcu_cost_txn (i_ae_txn_rec,
1005: l_curr_rec,
1006: l_ae_line_tbl,
1007: l_err_rec);
1008: -- check error;

Line 1017: CSTPAPBR.cost_logical_txn (i_ae_txn_rec,

1013: --Call the logical procedure if a logical transaction
1014: elsif (l_logical_transaction = 1 and i_ae_txn_rec.txn_action_id <> 17) then -- Bug 5485387
1015:
1016: l_stmt_num := 55;
1017: CSTPAPBR.cost_logical_txn (i_ae_txn_rec,
1018: l_curr_rec,
1019: l_ae_line_tbl,
1020: l_err_rec);
1021: if(l_err_rec.l_err_num <> 0 and l_err_rec.l_err_num is not null) then

Line 1028: CSTPAPBR.cost_consigned_update_txn(i_ae_txn_rec,

1024:
1025: --For consigned price update transaction
1026: elsif (i_ae_txn_rec.txn_action_id = 25 and i_ae_txn_rec.txn_src_type_id = 1) then
1027: l_stmt_num := 57;
1028: CSTPAPBR.cost_consigned_update_txn(i_ae_txn_rec,
1029: l_curr_rec,
1030: l_ae_line_tbl,
1031: l_err_rec);
1032: if(l_err_rec.l_err_num <> 0 and l_err_rec.l_err_num is not null) then

Line 1042: CSTPAPBR.cost_internal_order_exp_txn(i_ae_txn_rec,

1038: OR i_ae_txn_rec.txn_action_id = 17) then
1039:
1040: l_stmt_num := 58;
1041:
1042: CSTPAPBR.cost_internal_order_exp_txn(i_ae_txn_rec,
1043: l_curr_rec,
1044: l_ae_line_tbl,
1045: l_err_rec);
1046:

Line 1056: CSTPAPBR.inv_cost_txn (i_ae_txn_rec,

1052:
1053: -- Rest of inventory transactions.
1054: -- -------------------------------
1055: l_stmt_num := 60;
1056: CSTPAPBR.inv_cost_txn (i_ae_txn_rec,
1057: l_curr_rec,
1058: l_ae_line_tbl,
1059: l_err_rec);
1060: -- check error;

Line 1200: o_ae_err_rec.l_err_msg := 'CSTPAPBR.create_inv_ae_lines : ' || to_char(l_stmt_num) || ':'||

1196:
1197: when others then
1198: o_ae_err_rec.l_err_num := SQLCODE;
1199: o_ae_err_rec.l_err_code := '';
1200: o_ae_err_rec.l_err_msg := 'CSTPAPBR.create_inv_ae_lines : ' || to_char(l_stmt_num) || ':'||
1201: substr(SQLERRM,1,180);
1202:
1203: END create_inv_ae_lines;
1204:

Line 1566: o_ae_err_rec.l_err_msg := 'CSTPAPBR.wip_cost_txn' || to_char(l_stmt_num) ||

1562:
1563: when others then
1564: o_ae_err_rec.l_err_num := SQLCODE;
1565: o_ae_err_rec.l_err_code := '';
1566: o_ae_err_rec.l_err_msg := 'CSTPAPBR.wip_cost_txn' || to_char(l_stmt_num) ||
1567: substr(SQLERRM,1,180);
1568:
1569: END wip_cost_txn;
1570:

Line 1695: o_ae_err_rec.l_err_msg := 'CSTPAPBR.sub_cost_txn' || to_char(l_stmt_num) ||

1691:
1692: when others then
1693: o_ae_err_rec.l_err_num := SQLCODE;
1694: o_ae_err_rec.l_err_code := '';
1695: o_ae_err_rec.l_err_msg := 'CSTPAPBR.sub_cost_txn' || to_char(l_stmt_num) ||
1696: substr(SQLERRM,1,180);
1697:
1698: END sub_cost_txn;
1699:

Line 1910: l_api_name CONSTANT VARCHAR2(30) := 'CSTPAPBR.interorg_cost_txn';

1906:
1907: l_perp_ship_value NUMBER;
1908: l_use_prev_period_cost NUMBER;
1909: l_cg_exp_item NUMBER;
1910: l_api_name CONSTANT VARCHAR2(30) := 'CSTPAPBR.interorg_cost_txn';
1911:
1912: BEGIN
1913:
1914: IF g_debug_flag = 'Y' THEN

Line 2100: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

2096: l_dr_flag := FALSE;
2097: end if;
2098: END IF;
2099:
2100: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
2101: i_ae_curr_rec,
2102: "FALSE", -- Exp Flag
2103: null, -- Exp Acct
2104: l_dr_flag,

Line 2115: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

2111: end if;
2112:
2113: l_dr_flag := not l_dr_flag;
2114:
2115: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
2116: i_ae_curr_rec,
2117: "TRUE", -- Exp Flag
2118: l_exp_account, -- Exp Acct
2119: l_dr_flag,

Line 2159: CSTPAPBR.offset_accounts(i_ae_txn_rec,

2155:
2156: -- Call Offset Accounts
2157: ------------------------
2158: l_stmt_num := 32;
2159: CSTPAPBR.offset_accounts(i_ae_txn_rec,
2160: i_ae_curr_rec,
2161: 2, -- Accounting Line Type
2162: 0, -- Elemental Flag
2163: 0, -- Overhead Flag

Line 2182: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

2178: -- Call Inventory Accounts
2179: --------------------------
2180: l_stmt_num := 33;
2181: if (l_exp_flg) then
2182: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
2183: i_ae_curr_rec,
2184: l_exp_flg, -- Exp Flag
2185: l_exp_account, -- Exp Acct
2186: l_dr_flag,

Line 2190: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

2186: l_dr_flag,
2187: l_ae_line_tbl,
2188: l_err_rec);
2189: else
2190: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
2191: i_ae_curr_rec,
2192: "FALSE", -- Exp Flag
2193: null, -- Exp Acct
2194: l_dr_flag,

Line 2429: CSTPAPBR.offset_accounts (i_ae_txn_rec,

2425: -- Debit COGS
2426: -- ----------
2427: l_stmt_num := 62;
2428:
2429: CSTPAPBR.offset_accounts (i_ae_txn_rec,
2430: i_ae_curr_rec,
2431: 2, --- Acct Line Type
2432: 0, --- Elemental Flag
2433: 0, --- Ovhd Flag

Line 2450: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

2446:
2447: -- Credit On-hand (if expense, then use expense account)
2448: -- -----------------------------------------------------
2449: IF (l_exp_flg) THEN
2450: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
2451: i_ae_curr_rec,
2452: l_exp_flg, -- Exp Flag
2453: l_exp_account, -- Exp Acct
2454: l_dr_flag,

Line 2458: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

2454: l_dr_flag,
2455: l_ae_line_tbl,
2456: l_err_rec);
2457: ELSE
2458: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
2459: i_ae_curr_rec,
2460: "FALSE", -- Exp Flag
2461: null, -- Exp Acct
2462: l_dr_flag,

Line 2661: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

2657:
2658: /* If the item is expense in the receiving CG, hit the expense account instead of Intransit */
2659: IF (l_cg_exp_item = 1) THEN
2660: /* Debit Expense */
2661: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
2662: i_ae_curr_rec,
2663: l_exp_flg, -- Exp Flag
2664: l_exp_account, -- Exp Acct
2665: l_dr_flag,

Line 2670: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

2666: l_ae_line_tbl,
2667: l_err_rec);
2668: ELSE
2669: /* Debit Inventory - Intransit */
2670: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
2671: i_ae_curr_rec,
2672: "FALSE", --- Exp Flag
2673: null, --- Exp Acct
2674: l_dr_flag,

Line 2704: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

2700: l_dr_flag := TRUE;
2701:
2702: -- Debit Intransit
2703: ------------------
2704: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
2705: i_ae_curr_rec,
2706: "FALSE", --- Exp Flag
2707: null, --- Exp Acct
2708: l_dr_flag,

Line 2723: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

2719:
2720: -- Credit On-hand (if expense, then use expense account)
2721: -- -----------------------------------------------------
2722: IF (l_exp_flg) THEN
2723: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
2724: i_ae_curr_rec,
2725: l_exp_flg, -- Exp Flag
2726: l_exp_account, -- Exp Acct
2727: l_dr_flag,

Line 2731: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

2727: l_dr_flag,
2728: l_ae_line_tbl,
2729: l_err_rec);
2730: ELSE
2731: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
2732: i_ae_curr_rec,
2733: "FALSE", -- Exp Flag
2734: null, -- Exp Acct
2735: l_dr_flag,

Line 2774: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

2770:
2771: -- Credit On-hand (if expense, then use expense account)
2772: -- -----------------------------------------------------
2773: IF (l_exp_flg) THEN
2774: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
2775: i_ae_curr_rec,
2776: l_exp_flg, -- Exp Flag
2777: l_exp_account, -- Exp Acct
2778: l_dr_flag,

Line 2782: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

2778: l_dr_flag,
2779: l_ae_line_tbl,
2780: l_err_rec);
2781: ELSE
2782: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
2783: i_ae_curr_rec,
2784: "FALSE", -- Exp Flag
2785: null, -- Exp Acct
2786: l_dr_flag,

Line 3382: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

3378:
3379: /* If the item is expense in the receiving CG, hit the expense account instead of Intransit */
3380: IF (l_cg_exp_item = 1) THEN
3381: /* Debit Expense */
3382: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
3383: i_ae_curr_rec,
3384: l_exp_flg, -- Exp Flag
3385: l_exp_account, -- Exp Acct
3386: l_dr_flag,

Line 3391: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

3387: l_ae_line_tbl,
3388: l_err_rec);
3389: ELSE
3390: /* Debit Inventory - Intransit */
3391: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
3392: i_ae_curr_rec,
3393: "FALSE", --- Exp Flag
3394: null, --- Exp Acct
3395: l_dr_flag,

Line 3524: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

3520: l_dr_flag := TRUE;
3521:
3522: -- Debit Intransit
3523: -- ---------------
3524: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
3525: i_ae_curr_rec,
3526: "FALSE", --- Exp Flag
3527: null, --- Exp Acct
3528: l_dr_flag,

Line 3543: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

3539:
3540: -- Credit On-hand (if expense, then use expense account)
3541: -- -----------------------------------------------------
3542: IF (l_exp_flg) THEN
3543: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
3544: i_ae_curr_rec,
3545: l_exp_flg, -- Exp Flag
3546: l_exp_account, -- Exp Acct
3547: l_dr_flag,

Line 3551: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

3547: l_dr_flag,
3548: l_ae_line_tbl,
3549: l_err_rec);
3550: ELSE
3551: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
3552: i_ae_curr_rec,
3553: "FALSE", -- Exp Flag
3554: null, -- Exp Acct
3555: l_dr_flag,

Line 3583: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

3579: IF (l_cg_exp_item <> 1) THEN
3580: -- Credit On-hand (if expense, then use expense account)
3581: -- -----------------------------------------------------
3582: IF (l_exp_flg) THEN
3583: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
3584: i_ae_curr_rec,
3585: l_exp_flg, -- Exp Flag
3586: l_exp_account, -- Exp Acct
3587: l_dr_flag,

Line 3591: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

3587: l_dr_flag,
3588: l_ae_line_tbl,
3589: l_err_rec);
3590: ELSE
3591: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
3592: i_ae_curr_rec,
3593: "FALSE", -- Exp Flag
3594: null, -- Exp Acct
3595: l_dr_flag,

Line 4418: CSTPAPBR.offset_accounts (i_ae_txn_rec,

4414: -- Debit COGS
4415: -- ----------
4416: l_stmt_num := 385;
4417:
4418: CSTPAPBR.offset_accounts (i_ae_txn_rec,
4419: i_ae_curr_rec,
4420: 2, --- Acct Line Type
4421: 0, --- Elemental Flag
4422: 0, --- Ovhd Flag

Line 4438: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

4434: -- Credit Intransit
4435: -- ----------------
4436: l_stmt_num := 390;
4437:
4438: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
4439: i_ae_curr_rec,
4440: "FALSE", --- Exp Flag
4441: null, --- Exp Acct
4442: l_dr_flag,

Line 4630: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

4626:
4627: -- Debit On-hand (if expense, then use expense account)
4628: -- -----------------------------------------------------
4629: IF (l_exp_flg) THEN
4630: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
4631: i_ae_curr_rec,
4632: l_exp_flg, -- Exp Flag
4633: l_exp_account, -- Exp Acct
4634: l_dr_flag,

Line 4638: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

4634: l_dr_flag,
4635: l_ae_line_tbl,
4636: l_err_rec);
4637: ELSE
4638: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
4639: i_ae_curr_rec,
4640: "FALSE", -- Exp Flag
4641: null, -- Exp Acct
4642: l_dr_flag,

Line 4673: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

4669:
4670: -- Debit On-hand (if expense, then use expense account)
4671: -- -----------------------------------------------------
4672: IF (l_exp_flg) THEN
4673: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
4674: i_ae_curr_rec,
4675: l_exp_flg, -- Exp Flag
4676: l_exp_account, -- Exp Acct
4677: l_dr_flag,

Line 4681: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

4677: l_dr_flag,
4678: l_ae_line_tbl,
4679: l_err_rec);
4680: ELSE
4681: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
4682: i_ae_curr_rec,
4683: "FALSE", -- Exp Flag
4684: null, -- Exp Acct
4685: l_dr_flag,

Line 4701: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

4697: -- Credit Intransit
4698: -- ----------------
4699: l_stmt_num := 424;
4700:
4701: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
4702: i_ae_curr_rec,
4703: "FALSE", --- Exp Flag
4704: null, --- Exp Acct
4705: l_dr_flag,

Line 4759: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

4755:
4756: -- Debit On-hand (if expense, then use expense account)
4757: -- -----------------------------------------------------
4758: IF (l_exp_flg) THEN
4759: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
4760: i_ae_curr_rec,
4761: l_exp_flg, -- Exp Flag
4762: l_exp_account, -- Exp Acct
4763: l_dr_flag,

Line 4767: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

4763: l_dr_flag,
4764: l_ae_line_tbl,
4765: l_err_rec);
4766: ELSE
4767: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
4768: i_ae_curr_rec,
4769: "FALSE", -- Exp Flag
4770: null, -- Exp Acct
4771: l_dr_flag,

Line 4881: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

4877: l_dr_flag := FALSE;
4878:
4879: IF (l_cg_exp_item = 1) THEN
4880: /* Credit Expense */
4881: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
4882: i_ae_curr_rec,
4883: l_exp_flg, -- Exp Flag
4884: l_exp_account, -- Exp Acct
4885: l_dr_flag,

Line 4890: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

4886: l_ae_line_tbl,
4887: l_err_rec);
4888: ELSE
4889: /* Credit Inventory - Intransit */
4890: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
4891: i_ae_curr_rec,
4892: "FALSE", --- Exp Flag
4893: null, --- Exp Acct
4894: l_dr_flag,

Line 5447: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

5443:
5444: -- Debit On-hand (if expense, then use expense account)
5445: -- -----------------------------------------------------
5446: IF (l_exp_flg) THEN
5447: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
5448: i_ae_curr_rec,
5449: l_exp_flg, -- Exp Flag
5450: l_exp_account, -- Exp Acct
5451: l_dr_flag,

Line 5455: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

5451: l_dr_flag,
5452: l_ae_line_tbl,
5453: l_err_rec);
5454: ELSE
5455: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
5456: i_ae_curr_rec,
5457: "FALSE", -- Exp Flag
5458: null, -- Exp Acct
5459: l_dr_flag,

Line 5475: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

5471: -- Credit Intransit
5472: -- ----------------
5473: l_stmt_num := 580;
5474:
5475: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
5476: i_ae_curr_rec,
5477: "FALSE", --- Exp Flag
5478: null, --- Exp Acct
5479: l_dr_flag,

Line 5506: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

5502:
5503: -- Debit On-hand (if expense, then use expense account)
5504: -- -----------------------------------------------------
5505: IF (l_exp_flg) THEN
5506: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
5507: i_ae_curr_rec,
5508: l_exp_flg, -- Exp Flag
5509: l_exp_account, -- Exp Acct
5510: l_dr_flag,

Line 5514: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

5510: l_dr_flag,
5511: l_ae_line_tbl,
5512: l_err_rec);
5513: ELSE
5514: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
5515: i_ae_curr_rec,
5516: "FALSE", -- Exp Flag
5517: null, -- Exp Acct
5518: l_dr_flag,

Line 5630: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

5626: l_dr_flag := TRUE;
5627:
5628: IF (l_cg_exp_item = 1) THEN /* When Item is expense Bug:5337446 */
5629: /* Debit Expense */
5630: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
5631: i_ae_curr_rec,
5632: l_exp_flg, -- Exp Flag
5633: l_exp_account, -- Exp Acct
5634: l_dr_flag,

Line 5639: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

5635: l_ae_line_tbl,
5636: l_err_rec);
5637: ELSE
5638: /* Debit Intransit */
5639: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
5640: i_ae_curr_rec,
5641: "FALSE", -- Exp Flag
5642: null, -- Exp Acct
5643: l_dr_flag,

Line 5872: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

5868: IF (l_cg_exp_item <> 1) THEN /* Create Credit entries only if item is not expense */
5869:
5870: /* Removed the code for shipping from Exp subInv 5474899 */
5871: /* Credit Intransit */
5872: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
5873: i_ae_curr_rec,
5874: "FALSE", -- Exp Flag
5875: null, -- Exp Acct
5876: l_dr_flag,

Line 5975: o_ae_err_rec.l_err_msg := 'CSTPAPBR.interorg_cost_txn' || to_char(l_stmt_num) ||

5971:
5972: when others then
5973: o_ae_err_rec.l_err_num := SQLCODE;
5974: o_ae_err_rec.l_err_code := '';
5975: o_ae_err_rec.l_err_msg := 'CSTPAPBR.interorg_cost_txn' || to_char(l_stmt_num) ||
5976: substr(SQLERRM,1,180);
5977:
5978: END interorg_cost_txn;
5979:

Line 6228: CSTPAPBR.insert_account (i_ae_txn_rec,

6224: l_ae_line_rec.transaction_value := abs(l_cost - l_var);
6225:
6226: end if;
6227:
6228: CSTPAPBR.insert_account (i_ae_txn_rec,
6229: i_ae_curr_rec,
6230: l_dr_flag,
6231: l_ae_line_rec,
6232: l_ae_line_tbl,

Line 6283: CSTPAPBR.insert_account (i_ae_txn_rec,

6279:
6280: l_ae_line_rec.transaction_value := abs(l_cost);
6281: end if;
6282:
6283: CSTPAPBR.insert_account (i_ae_txn_rec,
6284: i_ae_curr_rec,
6285: l_dr_flag,
6286: l_ae_line_rec,
6287: l_ae_line_tbl,

Line 6329: CSTPAPBR.insert_account (i_ae_txn_rec,

6325: l_ae_line_rec.account := i_ae_txn_rec.expense_account_id;
6326: end if;
6327: l_ae_line_rec.transaction_value := abs(l_onhand_var);
6328: l_stmt_num := 70;
6329: CSTPAPBR.insert_account (i_ae_txn_rec,
6330: i_ae_curr_rec,
6331: l_dr_flag,
6332: l_ae_line_rec,
6333: l_ae_line_tbl,

Line 6381: CSTPAPBR.insert_account (i_ae_txn_rec,

6377: into l_ae_line_rec.account
6378: from dual;
6379: */
6380: l_ae_line_rec.account := i_ae_txn_rec.mat_account;
6381: CSTPAPBR.insert_account (i_ae_txn_rec,
6382: i_ae_curr_rec,
6383: l_dr_flag,
6384: l_ae_line_rec,
6385: l_ae_line_tbl,

Line 6419: CSTPAPBR.insert_account (i_ae_txn_rec,

6415: else
6416: l_dr_flag := "FALSE";
6417: end if;
6418:
6419: CSTPAPBR.insert_account (i_ae_txn_rec,
6420: i_ae_curr_rec,
6421: l_dr_flag,
6422: l_ae_line_rec,
6423: l_ae_line_tbl,

Line 6464: o_ae_err_rec.l_err_msg := 'CSTPAPBR.pcu_cost_txn' || to_char(l_stmt_num) ||

6460:
6461: when others then
6462: o_ae_err_rec.l_err_num := SQLCODE;
6463: o_ae_err_rec.l_err_code := '';
6464: o_ae_err_rec.l_err_msg := 'CSTPAPBR.pcu_cost_txn' || to_char(l_stmt_num) ||
6465: substr(SQLERRM,1,180);
6466:
6467: END pcu_cost_txn;
6468:

Line 6847: o_ae_err_rec.l_err_msg := 'CSTPAPBR.inv_cost_txn' || to_char(l_stmt_num) ||

6843:
6844: when others then
6845: o_ae_err_rec.l_err_num := SQLCODE;
6846: o_ae_err_rec.l_err_code := '';
6847: o_ae_err_rec.l_err_msg := 'CSTPAPBR.inv_cost_txn' || to_char(l_stmt_num) ||
6848: substr(SQLERRM,1,180);
6849:
6850: END inv_cost_txn;
6851:

Line 7092: CSTPAPBR.insert_account (i_ae_txn_rec,

7088:
7089: l_ae_line_rec_std_var.account := l_std_cost_adj_var_acct;
7090: l_stmt_num := 49;
7091:
7092: CSTPAPBR.insert_account (i_ae_txn_rec,
7093: i_ae_curr_rec,
7094: l_dr_flag,
7095: l_ae_line_rec_std_var,
7096: l_ae_line_tbl,

Line 7184: o_ae_err_rec.l_err_msg := 'CSTPAPBR.cost_logical_txn' ||

7180:
7181: when others then
7182: o_ae_err_rec.l_err_num := SQLCODE;
7183: o_ae_err_rec.l_err_code := '';
7184: o_ae_err_rec.l_err_msg := 'CSTPAPBR.cost_logical_txn' ||
7185: to_char(l_stmt_num) || substr(SQLERRM,1,180);
7186:
7187: END cost_logical_txn;
7188:

Line 7351: o_ae_err_rec.l_err_msg := 'CSTPAPBR.inv_cost_txn' || to_char(l_stmt_num) ||

7347:
7348: when others then
7349: o_ae_err_rec.l_err_num := SQLCODE;
7350: o_ae_err_rec.l_err_code := '';
7351: o_ae_err_rec.l_err_msg := 'CSTPAPBR.inv_cost_txn' || to_char(l_stmt_num) ||
7352: substr(SQLERRM,1,180);
7353:
7354: END cost_consigned_update_txn;
7355:

Line 7424: o_ae_err_rec.l_err_msg := 'CSTPAPBR.inv_cost_txn' || to_char(l_stmt_num) ||

7420:
7421: when others then
7422: o_ae_err_rec.l_err_num := SQLCODE;
7423: o_ae_err_rec.l_err_code := '';
7424: o_ae_err_rec.l_err_msg := 'CSTPAPBR.inv_cost_txn' || to_char(l_stmt_num) ||
7425: substr(SQLERRM,1,180);
7426:
7427: END encumbrance_account;
7428:

Line 7453: l_api_name CONSTANT VARCHAR2(30) := 'CSTPAPBR.inventory_accounts';

7449: l_ae_line_rec CSTPALTY.cst_ae_line_rec_type;
7450: l_ele_exist NUMBER;
7451: l_acct_exist NUMBER;
7452: l_stmt_num NUMBER := 0;
7453: l_api_name CONSTANT VARCHAR2(30) := 'CSTPAPBR.inventory_accounts';
7454:
7455: l_expense_account NUMBER;
7456:
7457: l_err_rec CSTPALTY.cst_ae_err_rec_type;

Line 7720: o_ae_err_rec.l_err_msg := 'CSTPAPBR.inventory_accounts' || to_char(l_stmt_num) ||

7716:
7717: when others then
7718: o_ae_err_rec.l_err_num := SQLCODE;
7719: o_ae_err_rec.l_err_code := '';
7720: o_ae_err_rec.l_err_msg := 'CSTPAPBR.inventory_accounts' || to_char(l_stmt_num) ||
7721: substr(SQLERRM,1,180);
7722:
7723: END inventory_accounts;
7724:

Line 7755: l_api_name CONSTANT VARCHAR2(30) := 'CSTPAPBR.offset_accounts';

7751: --l_err_rec CSTPALBR.cst_ae_err_rec_type;
7752: --l_acct_rec CSTPALBR.cst_ae_acct_rec_type;
7753: process_error EXCEPTION;
7754: no_txn_det_error EXCEPTION;
7755: l_api_name CONSTANT VARCHAR2(30) := 'CSTPAPBR.offset_accounts';
7756: BEGIN
7757: IF g_debug_flag = 'Y' THEN
7758: fnd_file.put_line(fnd_file.log, l_api_name || ': ' || l_stmt_num || ': begin << ');
7759: FND_FILE.put_line(fnd_file.log, l_api_name || ': ' || l_stmt_num || ': Elemental flag: ' ||to_char(i_elemental));

Line 7953: o_ae_err_rec.l_err_msg := 'CSTPAPBR.offset_accounts' || to_char(l_stmt_num) ||

7949:
7950: when others then
7951: o_ae_err_rec.l_err_num := SQLCODE;
7952: o_ae_err_rec.l_err_code := '';
7953: o_ae_err_rec.l_err_msg := 'CSTPAPBR.offset_accounts' || to_char(l_stmt_num) ||
7954: substr(SQLERRM,1,180);
7955:
7956: end offset_accounts;
7957:

Line 8093: o_ae_err_rec.l_err_msg := 'CSTPAPBR.ovhd_accounts' || to_char(l_stmt_num) ||

8089:
8090: when others then
8091: o_ae_err_rec.l_err_num := SQLCODE;
8092: o_ae_err_rec.l_err_code := '';
8093: o_ae_err_rec.l_err_msg := 'CSTPAPBR.ovhd_accounts' || to_char(l_stmt_num) ||
8094: substr(SQLERRM,1,180);
8095:
8096: END ovhd_accounts;
8097:

Line 8123: l_api_name CONSTANT VARCHAR2(30) := 'CSTPAPBR.insert_account';

8119: l_stmt_num NUMBER := 0;
8120: next_record_avail NUMBER;
8121: invalid_acct_error EXCEPTION;
8122:
8123: l_api_name CONSTANT VARCHAR2(30) := 'CSTPAPBR.insert_account';
8124:
8125: BEGIN
8126: IF g_debug_flag = 'Y' THEN
8127: fnd_file.put_line(fnd_file.log, l_api_name || ': ' || l_stmt_num || ': begin << ');

Line 8336: o_ae_err_rec.l_err_msg := 'CSTPAPBR.insert_account' || to_char(l_stmt_num) ||

8332:
8333: when others then
8334: o_ae_err_rec.l_err_num := SQLCODE;
8335: o_ae_err_rec.l_err_code := '';
8336: o_ae_err_rec.l_err_msg := 'CSTPAPBR.insert_account' || to_char(l_stmt_num) ||
8337: substr(SQLERRM,1,180);
8338:
8339: end insert_account;
8340:

Line 8354: l_api_name CONSTANT VARCHAR2(30) := 'CSTPAPBR.balance_account';

8350: l_ent_value NUMBER := 0;
8351: l_acc_value NUMBER := 0;
8352: l_last_rec NUMBER;
8353: l_stmt_num NUMBER := 0;
8354: l_api_name CONSTANT VARCHAR2(30) := 'CSTPAPBR.balance_account';
8355: BEGIN
8356: IF g_debug_flag = 'Y' THEN
8357: fnd_file.put_line(fnd_file.log, l_api_name || ': ' || l_stmt_num || ': begin << ');
8358: END IF;

Line 8404: o_ae_err_rec.l_err_msg := 'CSTPAPBR.balance_account' || to_char(l_stmt_num) ||

8400:
8401: when others then
8402: o_ae_err_rec.l_err_num := SQLCODE;
8403: o_ae_err_rec.l_err_code := '';
8404: o_ae_err_rec.l_err_msg := 'CSTPAPBR.balance_account' || to_char(l_stmt_num) ||
8405: substr(SQLERRM,1,180);
8406:
8407: END balance_account;
8408:

Line 8600: CSTPAPBR.insert_account (i_ae_txn_rec,

8596:
8597: /* Call Insert Account.
8598: -- --------------------*/
8599: l_stmt_num := 90;
8600: CSTPAPBR.insert_account (i_ae_txn_rec,
8601: l_ae_curr_rec,
8602: l_dr_flag,
8603: l_ae_line_rec,
8604: l_ae_line_tbl,

Line 8634: CSTPAPBR.insert_account (i_ae_txn_rec,

8630:
8631: /* Call Insert Account.
8632: -- -------------------- */
8633: l_stmt_num := 120;
8634: CSTPAPBR.insert_account (i_ae_txn_rec,
8635: l_ae_curr_rec,
8636: l_dr_flag,
8637: l_ae_line_rec,
8638: l_ae_line_tbl,

Line 8730: CSTPAPBR.get_accts (i_ae_txn_rec,

8726:
8727: if (l_ae_line_rec.account = -1) then
8728: l_stmt_num := 150;
8729: l_ae_line_rec.cost_element_id := cost_element;
8730: CSTPAPBR.get_accts (i_ae_txn_rec,
8731: l_ae_line_rec,
8732: l_ae_line_tbl,
8733: l_acct_id1,
8734: l_acct_id2,

Line 8766: CSTPAPBR.insert_account (i_ae_txn_rec,

8762:
8763: -- Call Insert Account.
8764: -- --------------------
8765: l_stmt_num := 190;
8766: CSTPAPBR.insert_account (i_ae_txn_rec,
8767: l_ae_curr_rec,
8768: l_dr_flag,
8769: l_ae_line_rec,
8770: l_ae_line_tbl,

Line 8795: CSTPAPBR.insert_account (i_ae_txn_rec,

8791:
8792: -- Call Insert Account.
8793: -- --------------------
8794: l_stmt_num := 220;
8795: CSTPAPBR.insert_account (i_ae_txn_rec,
8796: l_ae_curr_rec,
8797: l_dr_flag,
8798: l_ae_line_rec,
8799: l_ae_line_tbl,

Line 8820: CSTPAPBR.balance_account (l_ae_line_tbl,

8816:
8817: -- Take care of rounding errors.
8818: -- -----------------------------
8819: l_stmt_num := 230;
8820: CSTPAPBR.balance_account (l_ae_line_tbl,
8821: l_ae_err_rec);
8822:
8823: -- check error
8824: if(l_ae_err_rec.l_err_num <> 0 and l_ae_err_rec.l_err_num is not null) then

Line 8907: o_ae_err_rec.l_err_msg := 'CSTPAPBR.create_wip_ae_lines : ' || to_char(l_stmt_num) ||' : '||

8903:
8904: when others then
8905: o_ae_err_rec.l_err_num := SQLCODE;
8906: o_ae_err_rec.l_err_code := '';
8907: o_ae_err_rec.l_err_msg := 'CSTPAPBR.create_wip_ae_lines : ' || to_char(l_stmt_num) ||' : '||
8908: substr(SQLERRM,1,180);
8909:
8910: END create_wip_ae_lines;
8911:

Line 9135: o_ae_err_rec.l_err_msg := 'CSTPAPBR.get_accts ' || to_char(l_stmt_num) ||' '||

9131:
9132: when others then
9133: o_ae_err_rec.l_err_num := SQLCODE;
9134: o_ae_err_rec.l_err_code := '';
9135: o_ae_err_rec.l_err_msg := 'CSTPAPBR.get_accts ' || to_char(l_stmt_num) ||' '||
9136: substr(SQLERRM,1,180);
9137:
9138: END get_accts;
9139:

Line 9388: o_ae_err_rec.l_err_msg := 'CSTPAPBR.offset_accounts' || to_char(l_stmt_num) ||

9384:
9385: when others then
9386: o_ae_err_rec.l_err_num := SQLCODE;
9387: o_ae_err_rec.l_err_code := '';
9388: o_ae_err_rec.l_err_msg := 'CSTPAPBR.offset_accounts' || to_char(l_stmt_num) ||
9389: substr(SQLERRM,1,180);
9390:
9391: end WIP_accounts;
9392:

Line 9683: o_ae_err_rec.l_err_msg := 'CSTPAPBR.Get_Intercompany_account ' || to_char(l_stmt_num) ||

9679:
9680: when others then
9681: o_ae_err_rec.l_err_num := SQLCODE;
9682: o_ae_err_rec.l_err_code := '';
9683: o_ae_err_rec.l_err_msg := 'CSTPAPBR.Get_Intercompany_account ' || to_char(l_stmt_num) ||
9684: substr(SQLERRM,1,180);
9685: END Get_Intercompany_account;
9686:
9687:

Line 9773: l_api_name CONSTANT VARCHAR2(240) := 'CSTPAPBR.cost_internal_order_exp_txn';

9769: process_error EXCEPTION;
9770: no_mfca_acct_error EXCEPTION;
9771: no_interorg_profit_acct_error EXCEPTION;
9772:
9773: l_api_name CONSTANT VARCHAR2(240) := 'CSTPAPBR.cost_internal_order_exp_txn';
9774:
9775: BEGIN
9776:
9777: IF g_debug_flag = 'Y' THEN

Line 9960: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

9956:
9957: -- Credit On-hand (if expense, then use expense account)
9958: -- -----------------------------------------------------
9959: IF (l_exp_flag) THEN
9960: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
9961: i_ae_curr_rec,
9962: l_exp_flag, -- Exp Flag
9963: l_mfa_exp_account, -- Exp Acct
9964: l_dr_flag,

Line 9970: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

9966: l_err_rec);
9967:
9968: l_stmt_num := 150;
9969: ELSE
9970: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
9971: i_ae_curr_rec,
9972: "FALSE", -- Exp Flag
9973: null, -- Exp Acct
9974: l_dr_flag,

Line 10049: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

10045:
10046: -- Credit On-hand (if expense, then use expense account)
10047: -- -----------------------------------------------------
10048: IF (l_exp_flag) THEN
10049: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
10050: i_ae_curr_rec,
10051: l_exp_flag, -- Exp Flag
10052: l_mfa_exp_account, -- Exp Acct
10053: l_dr_flag,

Line 10059: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

10055: l_err_rec);
10056:
10057: l_stmt_num := 210;
10058: ELSE
10059: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
10060: i_ae_curr_rec,
10061: "FALSE", -- Exp Flag
10062: null, -- Exp Acct
10063: l_dr_flag,

Line 10466: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

10462:
10463: l_dr_flag := FALSE;
10464:
10465: IF (l_exp_flag) THEN
10466: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
10467: i_ae_curr_rec,
10468: l_exp_flag, -- Exp Flag
10469: l_mfa_exp_account, -- Exp Acct
10470: l_dr_flag,

Line 10476: CSTPAPBR.inventory_accounts (i_ae_txn_rec,

10472: l_err_rec);
10473: l_stmt_num := 570;
10474:
10475: ELSE
10476: CSTPAPBR.inventory_accounts (i_ae_txn_rec,
10477: i_ae_curr_rec,
10478: "FALSE", -- Exp Flag
10479: null, -- Exp Acct
10480: l_dr_flag,

Line 10685: l_api_name CONSTANT VARCHAR2(240) := 'CSTPAPBR.get_pacp_priorPrd_mta_cost';

10681: l_transfer_cost_flag VARCHAR2(1);
10682:
10683: l_err_rec CSTPALTY.cst_ae_err_rec_type;
10684:
10685: l_api_name CONSTANT VARCHAR2(240) := 'CSTPAPBR.get_pacp_priorPrd_mta_cost';
10686:
10687: BEGIN
10688:
10689: IF g_debug_flag = 'Y' THEN

Line 11273: END CSTPAPBR;

11269:
11270: END CompEncumbrance_IntOrdersExp;
11271:
11272:
11273: END CSTPAPBR;