DBA Data[Home] [Help]

APPS.CSTPAPPR dependencies on CSTPAPPR

Line 1: PACKAGE BODY CSTPAPPR AS

1: PACKAGE BODY CSTPAPPR AS
2: /* $Header: CSTAPPRB.pls 120.15.12010000.3 2008/11/30 11:43:57 anjha ship $ */
3:
4: l_debug_flag constant VARCHAR2(1) := FND_PROFILE.VALUE('MRP_DEBUG');
5:

Line 646: o_err_msg := 'CSTPAPPR.create_acct_lines :Invalid Transaction Type Code';

642:
643: WHEN CST_TXN_TYPE_FAIL THEN
644: o_err_num := 30002;
645: o_err_code := SQLCODE;
646: o_err_msg := 'CSTPAPPR.create_acct_lines :Invalid Transaction Type Code';
647:
648: WHEN CST_NO_RCV_LINE THEN
649: o_err_num := 30003;
650: o_err_code := SQLCODE;

Line 657: o_err_msg := 'CSTPAPPR.create_acct_lines : ' || to_char(l_stmt_num) || ':'|| substr(SQLERRM,1,180);

653:
654: WHEN CST_INSERT_ERROR THEN
655: o_err_num := 30004;
656: o_err_code := SQLCODE;
657: o_err_msg := 'CSTPAPPR.create_acct_lines : ' || to_char(l_stmt_num) || ':'|| substr(SQLERRM,1,180);
658:
659: WHEN OTHERS THEN
660: o_err_num := SQLCODE;
661: o_err_code := '';

Line 662: o_err_msg := 'CSTPAPPR.create_acct_lines : ' || to_char(l_stmt_num) || ':'||

658:
659: WHEN OTHERS THEN
660: o_err_num := SQLCODE;
661: o_err_code := '';
662: o_err_msg := 'CSTPAPPR.create_acct_lines : ' || to_char(l_stmt_num) || ':'||
663: substr(SQLERRM,1,180);
664:
665: END create_acct_lines;
666:

Line 782: CSTPAPPR.insert_account (i_ae_txn_rec,

778: END IF;
779:
780: l_stmt_num := 30;
781:
782: CSTPAPPR.insert_account (i_ae_txn_rec,
783: l_curr_rec,
784: l_dr_flag,
785: l_ae_line_rec,
786: l_ae_line_tbl,

Line 831: CSTPAPPR.insert_account (i_ae_txn_rec,

827: ELSE
828: l_ae_line_rec.rate_or_amount := l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate / i_ae_txn_rec.primary_quantity ;
829: END IF;
830:
831: CSTPAPPR.insert_account (i_ae_txn_rec,
832: l_curr_rec,
833: l_dr_flag,
834: l_ae_line_rec,
835: l_ae_line_tbl,

Line 873: o_ae_err_rec.l_err_msg := 'CSTPAPPR.create_rae_ae_lines : ' || to_char(l_stmt_num) || ':'||

869:
870: when others then
871: o_ae_err_rec.l_err_num := SQLCODE;
872: o_ae_err_rec.l_err_code := '';
873: o_ae_err_rec.l_err_msg := 'CSTPAPPR.create_rae_ae_lines : ' || to_char(l_stmt_num) || ':'||
874: substr(SQLERRM,1,180);
875:
876: END create_rae_ae_lines;
877:

Line 1428: CSTPAPPR.insert_account (i_ae_txn_rec,

1424: l_ae_line_rec.rate_or_amount := l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate / c_receipts_rec.dist_quantity ;
1425: END IF;
1426:
1427: l_stmt_num := 1010;
1428: CSTPAPPR.insert_account (i_ae_txn_rec,
1429: l_curr_rec,
1430: l_dr_flag,
1431: l_ae_line_rec,
1432: l_ae_line_tbl,

Line 1487: CSTPAPPR.insert_account (i_ae_txn_rec,

1483: ELSE
1484: l_ae_line_rec.rate_or_amount := l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate / c_receipts_rec.dist_quantity ;
1485: END IF;
1486: l_stmt_num := 1050;
1487: CSTPAPPR.insert_account (i_ae_txn_rec,
1488: l_curr_rec,
1489: l_dr_flag,
1490: l_ae_line_rec,
1491: l_ae_line_tbl,

Line 1540: CSTPAPPR.insert_account (i_ae_txn_rec,

1536: ELSE
1537: l_ae_line_rec.rate_or_amount := l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate / c_receipts_rec.dist_quantity ;
1538: END IF;
1539: l_stmt_num := 1070;
1540: CSTPAPPR.insert_account (i_ae_txn_rec,
1541: l_curr_rec,
1542: l_dr_flag,
1543: l_ae_line_rec,
1544: l_ae_line_tbl,

Line 1651: CSTPAPPR.insert_account (i_ae_txn_rec,

1647: ELSE
1648: l_ae_line_rec.rate_or_amount := l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate / c_receipts_rec.dist_quantity ;
1649: END IF;
1650:
1651: CSTPAPPR.insert_account (i_ae_txn_rec,
1652: l_curr_rec,
1653: l_dr_flag,
1654: l_ae_line_rec,
1655: l_ae_line_tbl,

Line 1788: CSTPAPPR.insert_account (i_ae_txn_rec,

1784: END IF;
1785:
1786: l_stmt_num := 757;
1787:
1788: CSTPAPPR.insert_account (i_ae_txn_rec,
1789: l_curr_rec,
1790: l_dr_flag,
1791: l_ae_line_rec,
1792: l_ae_line_tbl,

Line 1878: CSTPAPPR.insert_account (i_ae_txn_rec,

1874: ELSE
1875: l_ae_line_rec.rate_or_amount := l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate / i_ae_txn_rec.primary_quantity;
1876: END IF;
1877:
1878: CSTPAPPR.insert_account (i_ae_txn_rec,
1879: l_curr_rec,
1880: l_dr_flag,
1881: l_ae_line_rec,
1882: l_ae_line_tbl,

Line 2011: CSTPAPPR.insert_account (i_ae_txn_rec,

2007: ELSE
2008: l_ae_line_rec.rate_or_amount := l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate / i_ae_txn_rec.primary_quantity;
2009: END IF;
2010:
2011: CSTPAPPR.insert_account (i_ae_txn_rec,
2012: l_curr_rec,
2013: l_dr_flag,
2014: l_ae_line_rec,
2015: l_ae_line_tbl,

Line 2096: CSTPAPPR.insert_account (i_ae_txn_rec,

2092: ELSE
2093: l_ae_line_rec.rate_or_amount := l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate / i_ae_txn_rec.primary_quantity;
2094: END IF;
2095:
2096: CSTPAPPR.insert_account (i_ae_txn_rec,
2097: l_curr_rec,
2098: l_dr_flag,
2099: l_ae_line_rec,
2100: l_ae_line_tbl,

Line 2248: CSTPAPPR.insert_account (i_ae_txn_rec,

2244: ELSE
2245: l_ae_line_rec.rate_or_amount := l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate / c_receipts_rec.dist_quantity;
2246: END IF;
2247:
2248: CSTPAPPR.insert_account (i_ae_txn_rec,
2249: l_curr_rec,
2250: l_dr_flag,
2251: l_ae_line_rec,
2252: l_ae_line_tbl,

Line 2282: CSTPAPPR.insert_account (i_ae_txn_rec,

2278: END IF;
2279:
2280:
2281:
2282: CSTPAPPR.insert_account (i_ae_txn_rec,
2283: l_curr_rec,
2284: l_dr_flag,
2285: l_ae_line_rec,
2286: l_ae_line_tbl,

Line 2333: CSTPAPPR.insert_account (i_ae_txn_rec,

2329: END IF;
2330: END IF;
2331:
2332:
2333: CSTPAPPR.insert_account (i_ae_txn_rec,
2334: l_curr_rec,
2335: l_dr_flag,
2336: l_ae_line_rec,
2337: l_ae_line_tbl,

Line 2362: CSTPAPPR.insert_account (i_ae_txn_rec,

2358: fnd_file.put_line(fnd_file.log,'CR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2359: END IF;
2360: END IF;
2361:
2362: CSTPAPPR.insert_account (i_ae_txn_rec,
2363: l_curr_rec,
2364: l_dr_flag,
2365: l_ae_line_rec,
2366: l_ae_line_tbl,

Line 2400: CSTPAPPR.check_encumbrance(

2396: fnd_file.put_line(fnd_file.log,'No Encumbrance account at PO level');
2397: END IF;
2398: ELSE
2399:
2400: CSTPAPPR.check_encumbrance(
2401: i_transaction_id => i_ae_txn_rec.transaction_id,
2402: i_set_of_books_id => i_ae_txn_rec.set_of_books_id,
2403: i_period_name => i_ae_txn_rec.accounting_period_name,
2404: i_encumbrance_account_id => c_receipts_rec.encumbrance_account_id,

Line 2433: l_quantity_delivered := CSTPAPPR.get_net_del_qty(

2429: -- This quantity will be used to determine the amount that has
2430: -- been reversed and the quantity available to unencumber.
2431: -------------------------------------------------------------------
2432:
2433: l_quantity_delivered := CSTPAPPR.get_net_del_qty(
2434: c_receipts_rec.po_distribution_id,
2435: i_ae_txn_rec.transaction_id);
2436: IF l_debug_flag = 'Y' THEN
2437: fnd_file.put_line(fnd_file.log,'Delivered Quantity: '||to_char(l_quantity_delivered));

Line 2570: CSTPAPPR.insert_account (i_ae_txn_rec,

2566: ELSE
2567: l_ae_line_rec.rate_or_amount := l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate / c_receipts_rec.dist_quantity;
2568: END IF;
2569:
2570: CSTPAPPR.insert_account (i_ae_txn_rec,
2571: l_curr_rec,
2572: l_dr_flag,
2573: l_ae_line_rec,
2574: l_ae_line_tbl,

Line 2622: o_ae_err_rec.l_err_msg := 'CSTPAPPR.create_rcv_ae_lines : ' || to_char(l_stmt_num) || ':'||

2618:
2619: when others then
2620: o_ae_err_rec.l_err_num := SQLCODE;
2621: o_ae_err_rec.l_err_code := '';
2622: o_ae_err_rec.l_err_msg := 'CSTPAPPR.create_rcv_ae_lines : ' || to_char(l_stmt_num) || ':'||
2623: substr(SQLERRM,1,180);
2624:
2625: END create_rcv_ae_lines;
2626:

Line 2793: CSTPAPPR.insert_account (p_ae_txn_rec,

2789: l_ae_line_rec.po_distribution_id := p_ae_txn_rec.po_distribution_id;
2790:
2791: l_stmt_num := 50;
2792:
2793: CSTPAPPR.insert_account (p_ae_txn_rec,
2794: l_curr_rec,
2795: l_dr_flag,
2796: l_ae_line_rec,
2797: l_ae_line_tbl,

Line 2819: CSTPAPPR.insert_account (p_ae_txn_rec,

2815: END IF;
2816:
2817: l_stmt_num := 70;
2818:
2819: CSTPAPPR.insert_account (p_ae_txn_rec,
2820: l_curr_rec,
2821: l_dr_flag,
2822: l_ae_line_rec,
2823: l_ae_line_tbl,

Line 2841: l_err_rec.l_err_msg := 'CSTPAPPR:( '||to_char(l_stmt_num)||' ): ' || l_err_rec.l_err_code;

2837: EXCEPTION
2838: WHEN INVALID_RETRO_ADJ_ACCOUNT THEN
2839: l_err_rec.l_err_num := SQLCODE;
2840: l_err_rec.l_err_code := 'No Periodic Retroactive Adjustment Account Specified';
2841: l_err_rec.l_err_msg := 'CSTPAPPR:( '||to_char(l_stmt_num)||' ): ' || l_err_rec.l_err_code;
2842: x_ae_err_rec := l_err_rec;
2843: FND_FILE.PUT_LINE(FND_FILE.LOG, l_err_rec.l_err_msg);
2844:
2845: WHEN PROCESS_ERROR THEN

Line 2852: l_err_rec.l_err_msg := 'CSTPAPPR:( '||to_char(l_stmt_num)||' ): ' || to_char(SQLCODE);

2848:
2849: WHEN OTHERS THEN
2850: l_err_rec.l_err_num := SQLCODE;
2851: l_err_rec.l_err_code := '';
2852: l_err_rec.l_err_msg := 'CSTPAPPR:( '||to_char(l_stmt_num)||' ): ' || to_char(SQLCODE);
2853: x_ae_err_rec := l_err_rec;
2854: FND_FILE.PUT_LINE(FND_FILE.LOG, l_err_rec.l_err_msg);
2855:
2856: END create_adj_ae_lines;

Line 2956: CSTPAPPR.insert_account (p_ae_txn_rec,

2952: l_ae_line_rec.po_distribution_id := p_ae_txn_rec.po_distribution_id;
2953:
2954: l_stmt_num := 50;
2955:
2956: CSTPAPPR.insert_account (p_ae_txn_rec,
2957: l_curr_rec,
2958: l_dr_flag,
2959: l_ae_line_rec,
2960: l_ae_line_tbl,

Line 2998: CSTPAPPR.insert_account (p_ae_txn_rec,

2994: END IF;
2995:
2996: l_stmt_num := 70;
2997:
2998: CSTPAPPR.insert_account (p_ae_txn_rec,
2999: l_curr_rec,
3000: l_dr_flag,
3001: l_ae_line_rec,
3002: l_ae_line_tbl,

Line 3024: l_err_rec.l_err_msg := 'CSTPAPPR:( '||to_char(l_stmt_num)||' ): ' || to_char(SQLCODE);

3020:
3021: WHEN OTHERS THEN
3022: l_err_rec.l_err_num := SQLCODE;
3023: l_err_rec.l_err_code := '';
3024: l_err_rec.l_err_msg := 'CSTPAPPR:( '||to_char(l_stmt_num)||' ): ' || to_char(SQLCODE);
3025: x_ae_err_rec := l_err_rec;
3026: FND_FILE.PUT_LINE(FND_FILE.LOG, l_err_rec.l_err_msg);
3027:
3028: END create_lc_adj_ae_lines;

Line 3270: CSTPAPPR.insert_account (i_ae_txn_rec,

3266: fnd_file.put_line(fnd_file.log,'CR Expense: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3267: END IF;
3268: END IF;
3269:
3270: CSTPAPPR.insert_account (i_ae_txn_rec,
3271: l_curr_rec,
3272: l_dr_flag,
3273: l_ae_line_rec,
3274: l_ae_line_tbl,

Line 3293: CSTPAPPR.insert_account (i_ae_txn_rec,

3289: ELSE
3290: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3291: END IF;
3292: END IF;
3293: CSTPAPPR.insert_account (i_ae_txn_rec,
3294: l_curr_rec,
3295: l_dr_flag,
3296: l_ae_line_rec,
3297: l_ae_line_tbl,

Line 3328: CSTPAPPR.check_encumbrance(

3324: fnd_file.put_line(fnd_file.log,'No Encumbrance account at PO level');
3325: END IF;
3326: ELSE
3327:
3328: CSTPAPPR.check_encumbrance(
3329: i_transaction_id => i_ae_txn_rec.transaction_id,
3330: i_set_of_books_id => i_ae_txn_rec.set_of_books_id,
3331: i_period_name => i_ae_txn_rec.accounting_period_name,
3332: i_encumbrance_account_id => c_receipts_rec.encumbrance_account_id,

Line 3364: CSTPAPPR.insert_account (i_ae_txn_rec,

3360: ELSE
3361: fnd_file.put_line(fnd_file.log,'CR Encumbrance: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3362: END IF;
3363: END IF;
3364: CSTPAPPR.insert_account (i_ae_txn_rec,
3365: l_curr_rec,
3366: l_dr_flag,
3367: l_ae_line_rec,
3368: l_ae_line_tbl,

Line 3410: o_ae_err_rec.l_err_msg := 'CSTPAPPR.create_per_end_ae_lines : ' || to_char(l_stmt_num) || ':'|| substr(SQLERRM,1,180);

3406:
3407: when others then
3408: o_ae_err_rec.l_err_num := SQLCODE;
3409: o_ae_err_rec.l_err_code := '';
3410: o_ae_err_rec.l_err_msg := 'CSTPAPPR.create_per_end_ae_lines : ' || to_char(l_stmt_num) || ':'|| substr(SQLERRM,1,180);
3411:
3412: END create_per_end_ae_lines;
3413:
3414: PROCEDURE check_encumbrance(

Line 3514: o_ae_err_rec.l_err_msg := 'CSTPAPPR.check_encumbrance : ' || to_char(l_stmt_num) || ':'|| substr(SQLERRM,1,180);

3510:
3511: WHEN OTHERS THEN
3512: o_ae_err_rec.l_err_num := SQLCODE;
3513: o_ae_err_rec.l_err_code := '';
3514: o_ae_err_rec.l_err_msg := 'CSTPAPPR.check_encumbrance : ' || to_char(l_stmt_num) || ':'|| substr(SQLERRM,1,180);
3515:
3516:
3517: END check_encumbrance;
3518:

Line 3705: o_ae_err_rec.l_err_msg := 'CSTPAPPR.insert_account' || to_char(l_stmt_num) ||

3701:
3702: when others then
3703: o_ae_err_rec.l_err_num := SQLCODE;
3704: o_ae_err_rec.l_err_code := '';
3705: o_ae_err_rec.l_err_msg := 'CSTPAPPR.insert_account' || to_char(l_stmt_num) ||
3706: substr(SQLERRM,1,180);
3707:
3708: end insert_account;
3709:

Line 3915: o_ae_err_rec.l_err_msg := 'CSTPAPPR.balance_account' || to_char(l_stmt_num) ||

3911:
3912: when others then
3913: o_ae_err_rec.l_err_num := SQLCODE;
3914: o_ae_err_rec.l_err_code := '';
3915: o_ae_err_rec.l_err_msg := 'CSTPAPPR.balance_account' || to_char(l_stmt_num) ||
3916: substr(SQLERRM,1,180);
3917:
3918: END balance_account;
3919:

Line 3920: end CSTPAPPR;

3916: substr(SQLERRM,1,180);
3917:
3918: END balance_account;
3919:
3920: end CSTPAPPR;