437: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
438: l_procedure_name, l_log_msg);
439: END IF;
440:
441: AP_APPROVAL_PKG.Get_Hold_Status(
442: p_invoice_id,
443: null,
444: null,
445: 'INSUFFICIENT FUNDS',
712: p_set_of_books_id IN NUMBER,
713: p_base_currency_code IN VARCHAR2,
714: p_conc_flag IN VARCHAR2,
715: p_system_user IN NUMBER,
716: p_holds IN OUT NOCOPY AP_APPROVAL_PKG.HOLDSARRAY,
717: p_hold_count IN OUT NOCOPY AP_APPROVAL_PKG.COUNTARRAY,
718: p_release_count IN OUT NOCOPY AP_APPROVAL_PKG.COUNTARRAY,
719: p_funds_return_code OUT NOCOPY VARCHAR2, -- 4276409 (3462325)
720: p_calling_sequence IN VARCHAR2) IS
713: p_base_currency_code IN VARCHAR2,
714: p_conc_flag IN VARCHAR2,
715: p_system_user IN NUMBER,
716: p_holds IN OUT NOCOPY AP_APPROVAL_PKG.HOLDSARRAY,
717: p_hold_count IN OUT NOCOPY AP_APPROVAL_PKG.COUNTARRAY,
718: p_release_count IN OUT NOCOPY AP_APPROVAL_PKG.COUNTARRAY,
719: p_funds_return_code OUT NOCOPY VARCHAR2, -- 4276409 (3462325)
720: p_calling_sequence IN VARCHAR2) IS
721:
714: p_conc_flag IN VARCHAR2,
715: p_system_user IN NUMBER,
716: p_holds IN OUT NOCOPY AP_APPROVAL_PKG.HOLDSARRAY,
717: p_hold_count IN OUT NOCOPY AP_APPROVAL_PKG.COUNTARRAY,
718: p_release_count IN OUT NOCOPY AP_APPROVAL_PKG.COUNTARRAY,
719: p_funds_return_code OUT NOCOPY VARCHAR2, -- 4276409 (3462325)
720: p_calling_sequence IN VARCHAR2) IS
721:
722:
1573: l_procedure_name, l_log_msg);
1574: END IF;
1575:
1576:
1577: AP_APPROVAL_PKG.Process_Inv_Hold_Status(
1578: p_invoice_id,
1579: null,
1580: null,
1581: 'INSUFFICIENT FUNDS',
1594: l_log_msg := 'step 7.1 - process PSA accoutning hold if exists';
1595: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
1596: l_procedure_name, l_log_msg);
1597: END IF;
1598: AP_APPROVAL_PKG.Process_Inv_Hold_Status(
1599: p_invoice_id,
1600: null,
1601: null,
1602: 'Encumbrance Acctg Fail',
1619: l_procedure_name, l_log_msg);
1620: END IF;
1621:
1622:
1623: AP_APPROVAL_PKG.Process_Inv_Hold_Status(
1624: p_invoice_id,
1625: null,
1626: null,
1627: 'CANT FUNDS CHECK',
1639: | Bug 9168747 Starts |
1640: | and releasing any existing CANT FUNDS CHECK hold. |
1641: +-----------------------------------------------------------------*/
1642:
1643: AP_APPROVAL_PKG.Release_fund_holds
1644: (P_Invoice_ID => p_Invoice_ID,
1645: p_system_user => p_system_user,
1646: p_calling_mode => 'NO DIST IN TAB', --bug11659334
1647: p_holds => p_holds,
1689: l_log_msg := 'Encountered an Exception in the PSA api, inside the exception block';
1690: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
1691: END IF;
1692:
1693: AP_APPROVAL_PKG.Process_Inv_Hold_Status(
1694: p_invoice_id,
1695: null,
1696: null,
1697: 'CANT FUNDS CHECK',
3338: l_result NUMBER;
3339: l_success BOOLEAN := TRUE;
3340: t_inv_lines_table AP_INVOICES_PKG.t_invoice_lines_table;
3341: i NUMBER;
3342: l_holds AP_APPROVAL_PKG.HOLDSARRAY;
3343: l_hold_count AP_APPROVAL_PKG.COUNTARRAY;
3344: l_release_count AP_APPROVAL_PKG.COUNTARRAY;
3345: l_system_user NUMBER := 5;
3346: l_chart_of_accounts_id NUMBER;
3339: l_success BOOLEAN := TRUE;
3340: t_inv_lines_table AP_INVOICES_PKG.t_invoice_lines_table;
3341: i NUMBER;
3342: l_holds AP_APPROVAL_PKG.HOLDSARRAY;
3343: l_hold_count AP_APPROVAL_PKG.COUNTARRAY;
3344: l_release_count AP_APPROVAL_PKG.COUNTARRAY;
3345: l_system_user NUMBER := 5;
3346: l_chart_of_accounts_id NUMBER;
3347: l_auto_offsets_flag VARCHAR2(1);
3340: t_inv_lines_table AP_INVOICES_PKG.t_invoice_lines_table;
3341: i NUMBER;
3342: l_holds AP_APPROVAL_PKG.HOLDSARRAY;
3343: l_hold_count AP_APPROVAL_PKG.COUNTARRAY;
3344: l_release_count AP_APPROVAL_PKG.COUNTARRAY;
3345: l_system_user NUMBER := 5;
3346: l_chart_of_accounts_id NUMBER;
3347: l_auto_offsets_flag VARCHAR2(1);
3348: l_sys_xrate_gain_ccid NUMBER;
3455:
3456: IF ( t_inv_lines_table(i).line_type_lookup_code <> 'TAX' AND
3457: t_inv_lines_table(i).generate_dists = 'Y' ) THEN
3458:
3459: AP_Approval_Pkg.Check_Insufficient_Line_Data(
3460: p_inv_line_rec => t_inv_lines_table(i),
3461: p_system_user => l_system_user,
3462: p_holds => l_holds,
3463: p_holds_count => l_hold_count,
3467: p_calling_sequence => l_curr_calling_sequence );
3468:
3469: IF ( NOT l_insufficient_data_exist ) THEN
3470:
3471: l_success := AP_Approval_Pkg.Execute_Dist_Generation_Check(
3472: p_batch_id => l_batch_id,
3473: p_invoice_date => l_invoice_date,
3474: p_vendor_id => l_vendor_id,
3475: p_invoice_currency => l_invoice_currency_code,