1 PACKAGE PA_INVOICE_XFER AUTHID CURRENT_USER as
2 /* $Header: PAXITCAS.pls 120.2.12010000.2 2009/12/10 10:49:18 rmandali ship $ */
3
4 TYPE var_arr_30 is TABLE of VARCHAR2(30) index by BINARY_INTEGER;
5 TYPE var_arr_80 is TABLE of VARCHAR2(80) index by BINARY_INTEGER;
6 --
7 -- This procedure will convert the interface line amount of the crediting
8 -- invoices from the project functional currency to the invoice currency
9 -- of the original invoice credited if both are not same.
10 -- Parameter :
11 -- P_Project_Id - Project Id
12 -- P_Project_Num - Project Number
13 -- P_Request_Id - Request Id
14 -- P_Proj_Func_Cur - Project Functional currency
15 -- P_Batch_Src - Project Batch Source
16 -- P_WO_Ccid - Write-Off Ccid
17 -- P_UBR_Ccid - UBR Ccid
18 -- P_UER_Ccid - UER Ccid
19 -- P_REC_Ccid - REC Ccid
20 --
21
22
23 /* This overloaded function was added to provide for compilation of older
24 version of files like patopt.lpc. In these older versions, call to procedure
25 Convert_Amt is made with older, different signature. This procedure is not
26 suposed to be called, hence the body consists of code to raise an exception
27 if called. -- bug 2615572*/
28
29 PROCEDURE Convert_Amt ( P_Project_Id IN NUMBER,
30 P_Project_Num IN VARCHAR2,
31 P_Request_Id IN NUMBER,
32 P_Proj_Func_Cur IN VARCHAR2,
33 P_Batch_Src IN VARCHAR2,
34 P_WO_Ccid IN NUMBER,
35 P_UBR_Ccid IN NUMBER,
36 P_UER_Ccid IN NUMBER,
37 P_REC_Ccid IN NUMBER,
38 P_RND_Ccid IN NUMBER,
39 P_Transfer_Mode IN VARCHAR2);
40
41
42
43 PROCEDURE Convert_Amt ( P_Project_Id IN NUMBER,
44 P_Project_Num IN VARCHAR2,
45 P_Request_Id IN NUMBER,
46 P_Proj_Func_Cur IN VARCHAR2,
47 P_Batch_Src IN VARCHAR2,
48 P_WO_Ccid IN NUMBER,
49 P_UBR_Ccid IN NUMBER,
50 P_UER_Ccid IN NUMBER,
51 P_REC_Ccid IN NUMBER,
52 P_RND_Ccid IN NUMBER,
53 P_UNB_ret_Ccid IN NUMBER,
54 P_Transfer_Mode IN VARCHAR2,
55 P_Retn_Acct_Flag IN VARCHAR2);
56 --
57 -- This procedure will check whether any autoaccounting function transaction
58 -- is disabled for the input function transaction code.
59 --
60 -- Parameter :
61 -- P_Func_code - Function Transaction Code
62 -- X_Status - Output Status Code
63
64 PROCEDURE Check_Invoice_acct_setup ( P_Func_code IN VARCHAR2,
65 P_ou_retn_acct_flag IN VARCHAR2,
66 X_Status OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
67
68
69 --
70 -- This procedure will check whether any input account is invalid
71 --
72 -- Parameter :
73 -- P_Rec_ccid - Receivable Ccid
74 -- P_UBR_ccid - Unbilled Receivable Ccid
75 -- P_UER_ccid - Unearned Revenue Ccid
76 -- P_WO_ccid - Write Off Ccid
77 -- P_RND_ccid - Rounding Ccid
78 -- X_Status - Output Status - 'Y' - Valid
79 -- - 'N' - Invalid
80 --
81
82
83 /* Retention Enahncement : Adding the new param unbilled retention cc id and P_ou_retn_acct_flag*/
84
85 PROCEDURE Check_ccid ( P_Rec_ccid IN NUMBER,
86 P_UBR_ccid IN NUMBER,
87 P_UER_ccid IN NUMBER,
88 P_WO_ccid IN NUMBER,
89 P_RND_ccid IN NUMBER,
90 P_ou_retn_acct_flag IN VARCHAR2,
91 P_UNB_ret_ccid IN NUMBER,
92 X_Status OUT NOCOPY VARCHAR2 ); --File.Sql.39 bug 4440895
93
94
95 --
96 -- This procedure will return rejection reason
97 --
98 -- Parameter :
99 -- P_reject_code - Rejection Code
100 -- P_num_rec - Number of record
101 -- X_reject_reason - Rejection reason
102 --
103 PROCEDURE get_reject_reason ( P_reject_code IN var_arr_30,
104 P_num_rec IN NUMBER,
105 X_reject_reason OUT NOCOPY var_arr_80); --File.Sql.39 bug 4440895
106
107 /* Added p_trans_date in below procedure for bug 8687883*/
108 PROCEDURE GET_TRX_CRMEMO_TYPES (P_business_group_id IN NUMBER,
109 P_carrying_out_org_id IN NUMBER,
110 P_proj_org_struct_version_id IN NUMBER,
111 p_basic_language IN VARCHAR2,
112 p_trans_date IN DATE,
113 P_trans_type OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
114 P_crmo_trx_type OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
115 P_error_status OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
116 P_error_message OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
117
118 ---
119 --- This procedure checks if its an Internal Customer
120 --- for Interproject Billing
121 ---
122
123 PROCEDURE CHECK_TRXTYPE_INTERNAL (
124 P_Proj_id IN NUMBER,
125 P_trans_type IN VARCHAR2,
126 P_crmo_trx_type IN VARCHAR2,
127 P_reject_mesg OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
128 P_error_status OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
129 P_error_message OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
130
131 -- This procedure is added for bug 2958951
132 -- This procedure returns the current GL date and GL period for a given date
133 --
134
135 PROCEDURE GET_GL_DATE_PERIOD (P_inv_date IN DATE DEFAULT SYSDATE,
136 P_ar_install_flag IN VARCHAR2,
137 P_gl_date OUT NOCOPY DATE, --File.Sql.39 bug 4440895
138 P_gl_period_name OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
139 P_pa_date OUT NOCOPY DATE, --File.Sql.39 bug 4440895
140 P_pa_period_name OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
141 P_error_stage OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
142 P_error_msg_code OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
143 END PA_INVOICE_XFER;