DBA Data[Home] [Help]

APPS.PA_RETN_BILLING_PKG dependencies on PA_RETN_BILLING_PKG

Line 1: PACKAGE BODY pa_retn_billing_pkg AS

1: PACKAGE BODY pa_retn_billing_pkg AS
2: /* $Header: PAXIRTBB.pls 120.10 2010/03/31 15:27:10 dlella ship $ */
3:
4: -- Function to get the Reten Invoice Format
5: -- Build the retention billing invoice format

Line 10: RETURN pa_retn_billing_pkg.TabRetnBillingInvFmt IS

6:
7: g1_debug_mode varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
8:
9: Function Get_Retn_Billing_Inv_Format(p_project_id NUMBER)
10: RETURN pa_retn_billing_pkg.TabRetnBillingInvFmt IS
11:
12: CURSOR cur_inv_group_columns IS SELECT grp.column_code column_code,
13: fmtdet.text text,
14: fmtdet.start_position start_position,

Line 31: TmpRetnLineFmt pa_retn_billing_pkg.TabRetnBillingInvFmt;

27: Cnt NUMBER :=0;
28:
29: InvGroupColumnsRec cur_Inv_Group_columns%ROWTYPE;
30:
31: TmpRetnLineFmt pa_retn_billing_pkg.TabRetnBillingInvFmt;
32:
33: BEGIN
34: IF g1_debug_mode = 'Y' THEN
35: pa_retention_util.write_log('Entering pa_retn_billing_pkg.Get_Retn_Billing_Inv_Format');

Line 35: pa_retention_util.write_log('Entering pa_retn_billing_pkg.Get_Retn_Billing_Inv_Format');

31: TmpRetnLineFmt pa_retn_billing_pkg.TabRetnBillingInvFmt;
32:
33: BEGIN
34: IF g1_debug_mode = 'Y' THEN
35: pa_retention_util.write_log('Entering pa_retn_billing_pkg.Get_Retn_Billing_Inv_Format');
36: END IF;
37:
38: OPEN cur_inv_group_columns;
39: LOOP

Line 66: pa_retention_util.write_log('Leaving pa_retn_billing_pkg.Get_Retn_Billing_Inv_Format');

62:
63: CLOSE cur_inv_group_columns;
64:
65: IF g1_debug_mode = 'Y' THEN
66: pa_retention_util.write_log('Leaving pa_retn_billing_pkg.Get_Retn_Billing_Inv_Format');
67: END IF;
68:
69: RETURN TmpRetnLineFmt;
70: EXCEPTION

Line 72: pa_retn_billing_pkg.G_ERROR_CODE :='E';

68:
69: RETURN TmpRetnLineFmt;
70: EXCEPTION
71: WHEN OTHERS THEN
72: pa_retn_billing_pkg.G_ERROR_CODE :='E';
73: RETURN TmpRetnLineFmt;
74:
75: END Get_Retn_Billing_Inv_Format;
76:

Line 85: pa_retention_util.write_log('Enterting pa_retn_billing_pkg.CheckInvoiceExists');

81: ExistsFlag VARCHAR2(1) := 'N';
82:
83: BEGIN
84: IF g1_debug_mode = 'Y' THEN
85: pa_retention_util.write_log('Enterting pa_retn_billing_pkg.CheckInvoiceExists');
86: END IF;
87:
88: BEGIN
89: SELECT 'Y'

Line 102: pa_retn_billing_pkg.G_ERROR_CODE :='E';

98: EXCEPTION
99: WHEN NO_DATA_FOUND THEN
100: ExistsFlag := 'N';
101: WHEN OTHERS THEN
102: pa_retn_billing_pkg.G_ERROR_CODE :='E';
103: RAISE;
104:
105: END;
106: IF g1_debug_mode = 'Y' THEN

Line 108: pa_retention_util.write_log('Leaving pa_retn_billing_pkg.CheckInvoiceExists');

104:
105: END;
106: IF g1_debug_mode = 'Y' THEN
107: pa_retention_util.write_log('CheckInvoiceExists : ' || ExistsFlag);
108: pa_retention_util.write_log('Leaving pa_retn_billing_pkg.CheckInvoiceExists');
109: END IF;
110:
111: RETURN(ExistsFlag);
112:

Line 188: pa_retention_util.write_log('Entering pa_retn_billing_pkg.Build_Retn_Invoice_Header');

184: /* Shared services changes: local variable to store org ID from org context */
185: l_org_id NUMBER;
186: BEGIN
187: IF g1_debug_mode = 'Y' THEN
188: pa_retention_util.write_log('Entering pa_retn_billing_pkg.Build_Retn_Invoice_Header');
189: pa_retention_util.write_log('Build_Retn_Invoice_Header: ' || 'AgreementId : ' || p_agreement_id);
190: pa_retention_util.write_log('Build_Retn_Invoice_Header: ' || 'Project Id : ' || p_project_id);
191: pa_retention_util.write_log('Build_Retn_Invoice_Header: ' || 'Customer Id : ' || p_customer_id);
192: pa_retention_util.write_log('Build_Retn_Invoice_Header: ' || 'Request Id : ' || p_request_id);

Line 416: pa_retn_billing_pkg.G_Inv_By_Bill_Trans_Currency := TmpInvByBtc;

412: /*End of change for customer account relation enhancement bug no 2760630 */
413: PA_INVOICE_CURRENCY.get_proj_curr_info(p_project_id,
414: TmpInvCurrency);
415:
416: pa_retn_billing_pkg.G_Inv_By_Bill_Trans_Currency := TmpInvByBtc;
417:
418: IF pa_billing.Globvars.InvoiceSetId IS NULL THEN
419:
420: -- Generate a set id, happens only user run the retention invoice generation

Line 673: pa_retn_billing_pkg.G_ERROR_CODE :='E';

669: X_Output_exempt_reason_code:= NULL; --NOCOPY
670: RAISE NO_DATA_FOUND;
671: /*End of change for bug no 2760630 */
672: WHEN OTHERS THEN
673: pa_retn_billing_pkg.G_ERROR_CODE :='E';
674: IF g1_debug_mode = 'Y' THEN
675: pa_retention_util.write_log('pa_retn_billing_pkg.Build_Retn_Invoice_Header' || ' Oracle Error : ' || sqlerrm);
676: END IF;
677: RAISE;

Line 675: pa_retention_util.write_log('pa_retn_billing_pkg.Build_Retn_Invoice_Header' || ' Oracle Error : ' || sqlerrm);

671: /*End of change for bug no 2760630 */
672: WHEN OTHERS THEN
673: pa_retn_billing_pkg.G_ERROR_CODE :='E';
674: IF g1_debug_mode = 'Y' THEN
675: pa_retention_util.write_log('pa_retn_billing_pkg.Build_Retn_Invoice_Header' || ' Oracle Error : ' || sqlerrm);
676: END IF;
677: RAISE;
678:
679: END Build_Retn_Invoice_Header;

Line 710: pa_retn_billing_pkg.G_ERROR_CODE :='E';

706: WHERE project_id = P_Project_Id
707: AND draft_invoice_num = p_draft_invoice_num;
708: EXCEPTION
709: WHEN OTHERS THEN
710: pa_retn_billing_pkg.G_ERROR_CODE :='E';
711: IF g1_debug_mode = 'Y' THEN
712: pa_retention_util.write_log('pa_retn_billing_pkg.Update_ProjFunc_Attributes' || ' Oracle Error : ' || sqlerrm);
713: END IF;
714:

Line 712: pa_retention_util.write_log('pa_retn_billing_pkg.Update_ProjFunc_Attributes' || ' Oracle Error : ' || sqlerrm);

708: EXCEPTION
709: WHEN OTHERS THEN
710: pa_retn_billing_pkg.G_ERROR_CODE :='E';
711: IF g1_debug_mode = 'Y' THEN
712: pa_retention_util.write_log('pa_retn_billing_pkg.Update_ProjFunc_Attributes' || ' Oracle Error : ' || sqlerrm);
713: END IF;
714:
715: END Update_ProjFunc_Attributes;
716:

Line 765: l_RetnInvLineFmt pa_retn_billing_pkg.TabRetnBillingInvFmt;

761: l_last_update_login NUMBER:= fnd_global.login_id;
762:
763: RetnLineText VARCHAR2(500);
764: TempText VARCHAR2(80);
765: l_RetnInvLineFmt pa_retn_billing_pkg.TabRetnBillingInvFmt;
766: LastEndPosition NUMBER:=0;
767:
768: l_task_name VARCHAR2(20);
769:

Line 1050: DECODE(pa_retn_billing_pkg.G_Inv_By_Bill_Trans_Currency,

1046: p_Output_tax_code,
1047: p_Output_tax_exempt_flag ,
1048: p_Output_tax_exempt_number ,
1049: p_Output_exempt_reason_code,
1050: DECODE(pa_retn_billing_pkg.G_Inv_By_Bill_Trans_Currency,
1051: 'Y',
1052: PA_CURRENCY.ROUND_TRANS_CURRENCY_AMT(p_invproc_amount,
1053: p_invproc_currency),
1054: PA_CURRENCY.ROUND_TRANS_CURRENCY_AMT(

Line 1102: pa_retention_util.write_log('Leaving pa_retn_billing_pkg.Create_Retn_Invoice_Lines');

1098: p_funding_currency =>p_funding_currency,
1099: p_funding_amount =>p_funding_amount);
1100:
1101: IF g1_debug_mode = 'Y' THEN
1102: pa_retention_util.write_log('Leaving pa_retn_billing_pkg.Create_Retn_Invoice_Lines');
1103: END IF;
1104: EXCEPTION
1105: WHEN OTHERS THEN
1106: pa_retn_billing_pkg.G_ERROR_CODE :='E';

Line 1106: pa_retn_billing_pkg.G_ERROR_CODE :='E';

1102: pa_retention_util.write_log('Leaving pa_retn_billing_pkg.Create_Retn_Invoice_Lines');
1103: END IF;
1104: EXCEPTION
1105: WHEN OTHERS THEN
1106: pa_retn_billing_pkg.G_ERROR_CODE :='E';
1107: IF g1_debug_mode = 'Y' THEN
1108: pa_retention_util.write_log('pa_retn_billing_pkg.Create_Retn_Invoice_Lines : Oracle Error : ' || sqlerrm);
1109: END IF;
1110:

Line 1108: pa_retention_util.write_log('pa_retn_billing_pkg.Create_Retn_Invoice_Lines : Oracle Error : ' || sqlerrm);

1104: EXCEPTION
1105: WHEN OTHERS THEN
1106: pa_retn_billing_pkg.G_ERROR_CODE :='E';
1107: IF g1_debug_mode = 'Y' THEN
1108: pa_retention_util.write_log('pa_retn_billing_pkg.Create_Retn_Invoice_Lines : Oracle Error : ' || sqlerrm);
1109: END IF;
1110:
1111: END Create_Retn_Invoice_Lines;
1112:

Line 1160: pa_retention_util.write_log('Entering pa_retn_billing_pkg.Create_Retn_Invoice_Details');

1156:
1157:
1158: BEGIN
1159: IF g1_debug_mode = 'Y' THEN
1160: pa_retention_util.write_log('Entering pa_retn_billing_pkg.Create_Retn_Invoice_Details');
1161: pa_retention_util.write_log('Create_Retn_Invoice_Details: ' || 'Project Id : ' || p_project_id);
1162: pa_retention_util.write_log('Create_Retn_Invoice_Details: ' || 'Task Id : ' || p_task_id);
1163: pa_retention_util.write_log('Create_Retn_Invoice_Details: ' || 'Agreement Id : ' || p_agreement_id);
1164: END IF;

Line 1239: pa_retention_util.write_log('Leaving pa_retn_billing_pkg.Create_Retn_Invoice_Details');

1235:
1236: CLOSE cur_proj_retn;
1237:
1238: IF g1_debug_mode = 'Y' THEN
1239: pa_retention_util.write_log('Leaving pa_retn_billing_pkg.Create_Retn_Invoice_Details');
1240: END IF;
1241: EXCEPTION
1242: WHEN OTHERS THEN
1243: pa_retn_billing_pkg.G_ERROR_CODE :='E';

Line 1243: pa_retn_billing_pkg.G_ERROR_CODE :='E';

1239: pa_retention_util.write_log('Leaving pa_retn_billing_pkg.Create_Retn_Invoice_Details');
1240: END IF;
1241: EXCEPTION
1242: WHEN OTHERS THEN
1243: pa_retn_billing_pkg.G_ERROR_CODE :='E';
1244: IF g1_debug_mode = 'Y' THEN
1245: pa_retention_util.write_log('pa_retn_billing_pkg.Create_Retn_Invoice_Details
1246: : Oracle Error : ' || sqlerrm);
1247: END IF;

Line 1245: pa_retention_util.write_log('pa_retn_billing_pkg.Create_Retn_Invoice_Details

1241: EXCEPTION
1242: WHEN OTHERS THEN
1243: pa_retn_billing_pkg.G_ERROR_CODE :='E';
1244: IF g1_debug_mode = 'Y' THEN
1245: pa_retention_util.write_log('pa_retn_billing_pkg.Create_Retn_Invoice_Details
1246: : Oracle Error : ' || sqlerrm);
1247: END IF;
1248:
1249: END Create_Retn_Invoice_Details;

Line 1443: pa_retention_util.write_log('Entering pa_retn_billing_pkg.Retention_Billing_Processing');

1439: TmpRetnBillInvFmt Number:=0;
1440:
1441: BEGIN
1442: IF g1_debug_mode = 'Y' THEN
1443: pa_retention_util.write_log('Entering pa_retn_billing_pkg.Retention_Billing_Processing');
1444: pa_retention_util.write_log('Retention_Billing_Processing: ' || 'From Project Number ' || p_start_proj_number );
1445: pa_retention_util.write_log('Retention_Billing_Processing: ' || 'End Project Number ' || p_end_proj_number);
1446: END IF;
1447:

Line 1954: pa_retn_billing_pkg.G_ERROR_CODE :='S';

1950: AND NVL(retention_invoice_flag,'N') = 'Y';
1951:
1952:
1953: x_return_status :=FND_API.G_RET_STS_SUCCESS;
1954: pa_retn_billing_pkg.G_ERROR_CODE :='S';
1955:
1956: EXCEPTION
1957: WHEN OTHERS THEN
1958: x_return_status :='E';

Line 1959: pa_retn_billing_pkg.G_ERROR_CODE :='E';

1955:
1956: EXCEPTION
1957: WHEN OTHERS THEN
1958: x_return_status :='E';
1959: pa_retn_billing_pkg.G_ERROR_CODE :='E';
1960: IF g1_debug_mode = 'Y' THEN
1961: pa_retention_util.write_log('Retention_Billing_Processing: Oracle Error : ' || sqlerrm);
1962: END IF;
1963: END Retention_Billing_Processing;

Line 1994: pa_retn_billing_pkg.G_ERROR_CODE :='E';

1990: p_calling_process=>'RETENTION_INVOICES');
1991: END LOOP;
1992: EXCEPTION
1993: WHEN OTHERS THEN
1994: pa_retn_billing_pkg.G_ERROR_CODE :='E';
1995: END Update_Inv_Trans_Attributes;
1996:
1997: -- Procedure Invoice_Generation_Exceptions
1998: -- p_request_id : Request Id

Line 2086: END pa_retn_billing_pkg;

2082: WHEN OTHERS THEN
2083: RAISE;
2084: END Invoice_Generation_Exceptions;
2085:
2086: END pa_retn_billing_pkg;