DBA Data[Home] [Help]

APPS.AP_INVOICE_DISTRIBUTIONS_PKG dependencies on AP_INVOICE_DISTRIBUTIONS_PKG

Line 1: PACKAGE BODY AP_INVOICE_DISTRIBUTIONS_PKG AS

1: PACKAGE BODY AP_INVOICE_DISTRIBUTIONS_PKG AS
2: /* $Header: apiindib.pls 120.68.12010000.4 2009/01/13 02:19:05 bgoyal ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'AP_INVOICE_DISTRIBUTIONS_PKG';
5: G_MSG_UERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR;

Line 4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'AP_INVOICE_DISTRIBUTIONS_PKG';

1: PACKAGE BODY AP_INVOICE_DISTRIBUTIONS_PKG AS
2: /* $Header: apiindib.pls 120.68.12010000.4 2009/01/13 02:19:05 bgoyal ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'AP_INVOICE_DISTRIBUTIONS_PKG';
5: G_MSG_UERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR;
6: G_MSG_ERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_ERROR;
7: G_MSG_SUCCESS CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_SUCCESS;
8: G_MSG_HIGH CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH;

Line 20: G_MODULE_NAME CONSTANT VARCHAR2(100) := 'AP.PLSQL.AP_INVOICE_DISTRIBUTIONS_PKG.';

16: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
17: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
18: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
19: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
20: G_MODULE_NAME CONSTANT VARCHAR2(100) := 'AP.PLSQL.AP_INVOICE_DISTRIBUTIONS_PKG.';
21:
22:
23: --Invoice Lines: Distributions. Added the parameter X_INVOICE_LINE_NUMBER
24: -----------------------------------------------------------------------

Line 42: 'AP_INVOICE_DISTRIBUTIONS_PKG.CHECK_UNIQUE<-'||X_Calling_Sequence;

38:
39: -- Update the calling sequence
40: --
41: current_calling_sequence :=
42: 'AP_INVOICE_DISTRIBUTIONS_PKG.CHECK_UNIQUE<-'||X_Calling_Sequence;
43:
44: debug_info := 'Select from ap_invoice_distributions';
45:
46: select count(1)

Line 243: 'AP_INVOICE_DISTRIBUTIONS_PKG.Select_Summary<-'||X_Calling_Sequence;

239:
240: -- Update the calling sequence
241: --
242: current_calling_sequence :=
243: 'AP_INVOICE_DISTRIBUTIONS_PKG.Select_Summary<-'||X_Calling_Sequence;
244:
245: debug_info := 'Select from ap_invoice_distributions';
246:
247: -- eTax Uptake.

Line 361: 'AP_INVOICE_DISTRIBUTIONS_PKG.Query_New_Packet_Id<-'||X_Calling_Sequence;

357:
358: -- Update the calling sequence
359: --
360: current_calling_sequence :=
361: 'AP_INVOICE_DISTRIBUTIONS_PKG.Query_New_Packet_Id<-'||X_Calling_Sequence;
362:
363: debug_info := 'Select from ap_invoice_distributions';
364:
365: select 'TRUE'

Line 407: 'AP_INVOICE_DISTRIBUTIONS_PKG.All_Encumbered<-'||X_Calling_Sequence;

403:
404: -- Update the calling sequence
405: --
406: current_calling_sequence :=
407: 'AP_INVOICE_DISTRIBUTIONS_PKG.All_Encumbered<-'||X_Calling_Sequence;
408:
409: debug_info := 'Select from sys.dual';
410:
411: select 'There are encumbered dists'

Line 479: 'AP_INVOICE_DISTRIBUTIONS_PKG.Check_Cash_Basis_Paid<-'||X_Calling_Sequence;

475:
476: -- Update the calling sequence
477: --
478: current_calling_sequence :=
479: 'AP_INVOICE_DISTRIBUTIONS_PKG.Check_Cash_Basis_Paid<-'||X_Calling_Sequence;
480:
481: debug_info := 'Select accounting method from SOB';
482:
483: SELECT NVL(sla_ledger_cash_basis_flag, 'N')

Line 565: current_calling_sequence := 'AP_INVOICE_DISTRIBUTIONS_PKG.Adjust_PO<-'||X_Calling_Sequence;

561:
562: BEGIN
563:
564: l_api_name := 'Adjust_Po';
565: current_calling_sequence := 'AP_INVOICE_DISTRIBUTIONS_PKG.Adjust_PO<-'||X_Calling_Sequence;
566:
567: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
568: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_INVOICE_DISTRIBUTIONS_PKG.Adjust_Po(-)');
569: END IF;

Line 568: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_INVOICE_DISTRIBUTIONS_PKG.Adjust_Po(-)');

564: l_api_name := 'Adjust_Po';
565: current_calling_sequence := 'AP_INVOICE_DISTRIBUTIONS_PKG.Adjust_PO<-'||X_Calling_Sequence;
566:
567: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
568: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_INVOICE_DISTRIBUTIONS_PKG.Adjust_Po(-)');
569: END IF;
570:
571: l_debug_info := 'Create l_po_ap_dist_rec object';
572: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 623: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_INVOICE_DISTRIBUTIONS_PKG.Adjust_Po(-)');

619: X_Msg_Data => l_msg_data);
620:
621:
622: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
623: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_INVOICE_DISTRIBUTIONS_PKG.Adjust_Po(-)');
624: END IF;
625:
626: EXCEPTION
627: WHEN OTHERS THEN

Line 728: 'AP_INVOICE_DISTRIBUTIONS_PKG.insert_from_dist_set<-'||

724: --------------------------------------------------------------------------
725: -- Step 1 - Update the calling sequence
726: --------------------------------------------------------------------------
727: current_calling_sequence :=
728: 'AP_INVOICE_DISTRIBUTIONS_PKG.insert_from_dist_set<-'||
729: X_calling_sequence;
730:
731: -------------------------------------------------------------------------
732: -- Step 2 - Validate line does not contain other distributions

Line 1382: 'AP_INVOICE_DISTRIBUTIONS_PKG.update_distributions<-'||

1378: --record changes before reaching the PA code.
1379: BEGIN
1380: -- Update the calling sequence
1381: current_calling_sequence :=
1382: 'AP_INVOICE_DISTRIBUTIONS_PKG.update_distributions<-'||
1383: X_calling_sequence;
1384:
1385: /*-----------------------------------------------------------------+
1386: | First, assume that an update to AP_INVOICE_DISTRIBUTIONS |

Line 2108: 'AP_INVOICE_DISTRIBUTIONS_PKG.Insert_Row<-'||X_Calling_Sequence;

2104: BEGIN
2105: -- Update the calling sequence
2106: --
2107: current_calling_sequence :=
2108: 'AP_INVOICE_DISTRIBUTIONS_PKG.Insert_Row<-'||X_Calling_Sequence;
2109:
2110: debug_info := 'Calling invoice distribution handler';
2111:
2112: AP_AID_TABLE_HANDLER_PKG.Insert_Row

Line 2564: 'AP_INVOICE_DISTRIBUTIONS_PKG.Lock_Row<-'||X_Calling_Sequence;

2560:
2561: -- Update the calling sequence
2562: --
2563: current_calling_sequence :=
2564: 'AP_INVOICE_DISTRIBUTIONS_PKG.Lock_Row<-'||X_Calling_Sequence;
2565:
2566: debug_info := 'Select from ap_invoice_distributions';
2567:
2568: OPEN C;

Line 3059: 'AP_INVOICE_DISTRIBUTIONS_PKG.Update_Row<-'||X_Calling_Sequence;

3055:
3056: -- Update the calling sequence
3057: --
3058: current_calling_sequence :=
3059: 'AP_INVOICE_DISTRIBUTIONS_PKG.Update_Row<-'||X_Calling_Sequence;
3060:
3061: AP_AID_TABLE_HANDLER_PKG.Update_Row
3062: (X_Rowid,
3063: X_Invoice_Id,

Line 3207: 'AP_INVOICE_DISTRIBUTIONS_PKG.Delete_Row<-'||X_Calling_Sequence;

3203:
3204: -- Update the calling sequence
3205: --
3206: current_calling_sequence :=
3207: 'AP_INVOICE_DISTRIBUTIONS_PKG.Delete_Row<-'||X_Calling_Sequence;
3208:
3209: AP_AID_TABLE_HANDLER_PKG.Delete_Row(
3210: X_Rowid,
3211: current_calling_sequence);

Line 3320: AND AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(

3316: FROM ap_invoice_distributions
3317: WHERE invoice_id = X_Invoice_Id
3318: AND line_type_lookup_code IN ('ITEM','PREPAY')
3319: AND nvl(reversal_flag,'N') <> 'Y'
3320: AND AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(
3321: dist_code_combination_id, X_Sob_Id) =
3322: AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(
3323: X_Prepay_Dist_CCID, X_Sob_Id);
3324:

Line 3322: AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(

3318: AND line_type_lookup_code IN ('ITEM','PREPAY')
3319: AND nvl(reversal_flag,'N') <> 'Y'
3320: AND AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(
3321: dist_code_combination_id, X_Sob_Id) =
3322: AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(
3323: X_Prepay_Dist_CCID, X_Sob_Id);
3324:
3325: RETURN (l_dist_amount);
3326:

Line 3348: AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(

3344:
3345: -- Bug 2404982. Added package qualifier to procedure call.
3346: CURSOR c_prepay_dist IS
3347: SELECT sum(nvl(prepay_amount_remaining,amount)),
3348: AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(
3349: aip.dist_code_combination_id, X_Sob_Id)
3350: FROM ap_invoice_distributions aip
3351: WHERE aip.invoice_id = X_Prepay_Id
3352: --bugfix:3881673

Line 3356: AND AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(

3352: --bugfix:3881673
3353: AND aip.line_type_lookup_code in ('ITEM','ACCRUAL')
3354: AND nvl(aip.reversal_flag,'N') <> 'Y'
3355: AND nvl(aip.prepay_amount_remaining,amount) > 0
3356: AND AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(
3357: aip.dist_code_combination_id, X_Sob_Id) IN
3358: (SELECT AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(
3359: aid.dist_code_combination_id, X_Sob_Id)
3360: FROM ap_invoice_distributions aid

Line 3358: (SELECT AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(

3354: AND nvl(aip.reversal_flag,'N') <> 'Y'
3355: AND nvl(aip.prepay_amount_remaining,amount) > 0
3356: AND AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(
3357: aip.dist_code_combination_id, X_Sob_Id) IN
3358: (SELECT AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(
3359: aid.dist_code_combination_id, X_Sob_Id)
3360: FROM ap_invoice_distributions aid
3361: WHERE aid.invoice_id = X_Invoice_ID)
3362: GROUP BY AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(

Line 3362: GROUP BY AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(

3358: (SELECT AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(
3359: aid.dist_code_combination_id, X_Sob_Id)
3360: FROM ap_invoice_distributions aid
3361: WHERE aid.invoice_id = X_Invoice_ID)
3362: GROUP BY AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(
3363: aip.dist_code_combination_id, X_Sob_Id)
3364: ORDER BY AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(
3365: aip.dist_code_combination_id, X_Sob_Id);
3366:

Line 3364: ORDER BY AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(

3360: FROM ap_invoice_distributions aid
3361: WHERE aid.invoice_id = X_Invoice_ID)
3362: GROUP BY AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(
3363: aip.dist_code_combination_id, X_Sob_Id)
3364: ORDER BY AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(
3365: aip.dist_code_combination_id, X_Sob_Id);
3366:
3367: BEGIN
3368:

Line 3381: AND AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(

3377: FROM ap_invoice_distributions
3378: WHERE invoice_id = X_Invoice_ID
3379: AND line_type_lookup_code IN ('ITEM','PREPAY')
3380: AND nvl(reversal_flag,'N') <> 'Y'
3381: AND AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(
3382: dist_code_combination_id, X_Sob_Id)
3383: = l_bal_segment;
3384:
3385: IF l_invoice_amount <> 0 THEN

Line 3412: AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(

3408: BEGIN
3409:
3410: --Bug 2404982. Added package qualifier to procedure call.
3411: SELECT count(distinct(
3412: AP_INVOICE_DISTRIBUTIONS_PKG.get_balancing_segment_value(
3413: dist_code_combination_id, X_Sob_Id)) )
3414: INTO l_dist_count
3415: FROM ap_invoice_distributions
3416: WHERE invoice_id = X_Invoice_Id;

Line 3543: 'AP_INVOICE_DISTRIBUTIONS_PKG.Round_Biggest_Distribution<-'

3539:
3540: -- Update current calling sequence
3541: --
3542: current_calling_sequence :=
3543: 'AP_INVOICE_DISTRIBUTIONS_PKG.Round_Biggest_Distribution<-'
3544: ||X_Calling_Sequence;
3545:
3546: debug_info := 'Adjusting distribution amount in biggest distribution';
3547:

Line 3858: 'AP_INVOICE_DISTRIBUTIONS_PKG.insert_single_dist_from_line <-'||

3854: --------------------------------------------------------------------------
3855: -- Step 1 - Update the calling sequence
3856: --------------------------------------------------------------------------
3857: current_calling_sequence :=
3858: 'AP_INVOICE_DISTRIBUTIONS_PKG.insert_single_dist_from_line <-'||
3859: X_calling_sequence;
3860:
3861: --------------------------------------------------------------------------
3862: -- Step 2 - If calling module provided X_invoice_id / X_line_number, then

Line 5319: AP_INVOICE_DISTRIBUTIONS_PKG.GET_TOTAL_DIST_AMOUNT(

5315: AID.pa_quantity, -- bug6699834
5316: AID.expenditure_type,
5317: AID.expenditure_organization_id,
5318: AID.award_id,
5319: AP_INVOICE_DISTRIBUTIONS_PKG.GET_TOTAL_DIST_AMOUNT(
5320: aid.invoice_distribution_id),
5321: AID.dist_code_combination_id,
5322: AID.assets_tracking_flag,
5323: AID.asset_book_type_code,

Line 5446: 'AP_INVOICE_DISTRIBUTIONS_PKG.insert_charge_from_alloc <-'

5442: ---------------------------------------------------------------------------
5443: -- Step 1 - Update the calling sequence
5444: ---------------------------------------------------------------------------
5445: current_calling_sequence :=
5446: 'AP_INVOICE_DISTRIBUTIONS_PKG.insert_charge_from_alloc <-'
5447: ||X_calling_sequence;
5448:
5449: --------------------------------------------------------------------------
5450: -- Step 2 - Validate the line exists and get line level information

Line 7176: 'AP_INVOICE_DISTRIBUTIONS_PKG.DIST_REFER_ACTIVE_CORR<-'

7172:
7173: -- Update the calling sequence
7174: --
7175: current_calling_sequence :=
7176: 'AP_INVOICE_DISTRIBUTIONS_PKG.DIST_REFER_ACTIVE_CORR<-'
7177: ||p_Calling_Sequence;
7178:
7179: debug_info := 'Select from ap_invoice_distributions_all';
7180:

Line 7238: 'AP_INVOICE_DISTRIBUTIONS_PKG.CHRG_REFER_ACTIVE_DIST<-'

7234:
7235: -- Update the calling sequence
7236: --
7237: current_calling_sequence :=
7238: 'AP_INVOICE_DISTRIBUTIONS_PKG.CHRG_REFER_ACTIVE_DIST<-'
7239: ||p_Calling_Sequence;
7240:
7241: debug_info := 'Select from ap_invoice_distributions_all';
7242:

Line 7285: current_calling_sequence := 'Ap_Invoice_Distributions_Pkg.Make_Distributions_Permanent<- '

7281: global_exception EXCEPTION;
7282:
7283: BEGIN
7284:
7285: current_calling_sequence := 'Ap_Invoice_Distributions_Pkg.Make_Distributions_Permanent<- '
7286: ||p_calling_sequence;
7287:
7288: l_debug_info := 'Updating ap_invoice_distributions';
7289:

Line 7416: END AP_INVOICE_DISTRIBUTIONS_PKG;

7412:
7413: END Associated_Charges;
7414:
7415:
7416: END AP_INVOICE_DISTRIBUTIONS_PKG;