DBA Data[Home] [Help]

PACKAGE BODY: APPS.ARRX_C_BRS

Source


1 PACKAGE BODY arrx_c_brs AS
2 /* $Header: ARRXCBRB.pls 120.2 2003/10/23 23:12:51 orashid ship $ */
3 
4 PROCEDURE run_report(
5   errbuf            OUT NOCOPY VARCHAR2,
6   retcode           OUT NOCOPY VARCHAR2,
7   argument1         IN  VARCHAR2, -- Reporting Level
8   argument2         IN  VARCHAR2, -- Reporting Context
9   argument3         IN  VARCHAR2, -- Status As of Date
10   argument4         IN  VARCHAR2, -- First Status
11   argument5         IN  VARCHAR2, -- Second Status
12   argument6         IN  VARCHAR2, -- Third Status
13   argument7         IN  VARCHAR2, -- Excluded Status
14   argument8         IN  VARCHAR2, -- Transaction Type
15   argument9         IN  VARCHAR2, -- Maturity Date From
16   argument10        IN  VARCHAR2, -- Maturity Date To
17   argument11        IN  VARCHAR2, -- Drawee Name
18   argument12        IN  VARCHAR2, -- Drawee Number From
19   argument13        IN  VARCHAR2, -- Drawee Number To
20   argument14        IN  VARCHAR2, -- Remittance Batch Name
21   argument15        IN  VARCHAR2, -- Remittance Bank Account
22   argument16        IN  VARCHAR2, -- Drawee Bank Name
23   argument17        IN  VARCHAR2, -- Original Amount From
24   argument18        IN  VARCHAR2, -- Original Amount To
25   argument19        IN  VARCHAR2, -- Transaction Issue Date From
26   argument20        IN  VARCHAR2, -- Transaction Issue Date To
27   argument21        IN  VARCHAR2, -- On Hold
28   argument22        IN  VARCHAR2  DEFAULT  NULL,
29   argument23        IN  VARCHAR2  DEFAULT  NULL,
30   argument24        IN  VARCHAR2  DEFAULT  NULL,
31   argument25        IN  VARCHAR2  DEFAULT  NULL,
32   argument26        IN  VARCHAR2  DEFAULT  NULL,
33   argument27        IN  VARCHAR2  DEFAULT  NULL,
34   argument28        IN  VARCHAR2  DEFAULT  NULL,
35   argument29        IN  VARCHAR2  DEFAULT  NULL,
36   argument30        IN  VARCHAR2  DEFAULT  NULL,
37   argument31        IN  VARCHAR2  DEFAULT  NULL,
38   argument32        IN  VARCHAR2  DEFAULT  NULL,
39   argument33        IN  VARCHAR2  DEFAULT  NULL,
40   argument34        IN  VARCHAR2  DEFAULT  NULL,
41   argument35        IN  VARCHAR2  DEFAULT  NULL,
42   argument36        IN  VARCHAR2  DEFAULT  NULL,
43   argument37        IN  VARCHAR2  DEFAULT  NULL,
44   argument38        IN  VARCHAR2  DEFAULT  NULL,
45   argument39        IN  VARCHAR2  DEFAULT  NULL,
46   argument40        IN  VARCHAR2  DEFAULT  NULL,
47   argument41        IN  VARCHAR2  DEFAULT  NULL,
48   argument42        IN  VARCHAR2  DEFAULT  NULL,
49   argument43        IN  VARCHAR2  DEFAULT  NULL,
50   argument44        IN  VARCHAR2  DEFAULT  NULL,
51   argument45        IN  VARCHAR2  DEFAULT  NULL,
52   argument46        IN  VARCHAR2  DEFAULT  NULL,
53   argument47        IN  VARCHAR2  DEFAULT  NULL,
54   argument48        IN  VARCHAR2  DEFAULT  NULL,
55   argument49        IN  VARCHAR2  DEFAULT  NULL,
56   argument50        IN  VARCHAR2  DEFAULT  NULL,
57   argument51        IN  VARCHAR2  DEFAULT  NULL,
58   argument52        IN  VARCHAR2  DEFAULT  NULL,
59   argument53        IN  VARCHAR2  DEFAULT  NULL,
60   argument54        IN  VARCHAR2  DEFAULT  NULL,
61   argument55        IN  VARCHAR2  DEFAULT  NULL,
62   argument56        IN  VARCHAR2  DEFAULT  NULL,
63   argument57        IN  VARCHAR2  DEFAULT  NULL,
64   argument58        IN  VARCHAR2  DEFAULT  NULL,
65   argument59        IN  VARCHAR2  DEFAULT  NULL,
66   argument60        IN  VARCHAR2  DEFAULT  NULL,
67   argument61        IN  VARCHAR2  DEFAULT  NULL,
68   argument62        IN  VARCHAR2  DEFAULT  NULL,
69   argument63        IN  VARCHAR2  DEFAULT  NULL,
70   argument64        IN  VARCHAR2  DEFAULT  NULL,
71   argument65        IN  VARCHAR2  DEFAULT  NULL,
72   argument66        IN  VARCHAR2  DEFAULT  NULL,
73   argument67        IN  VARCHAR2  DEFAULT  NULL,
74   argument68        IN  VARCHAR2  DEFAULT  NULL,
75   argument69        IN  VARCHAR2  DEFAULT  NULL,
76   argument70        IN  VARCHAR2  DEFAULT  NULL,
77   argument71        IN  VARCHAR2  DEFAULT  NULL,
78   argument72        IN  VARCHAR2  DEFAULT  NULL,
79   argument73        IN  VARCHAR2  DEFAULT  NULL,
80   argument74        IN  VARCHAR2  DEFAULT  NULL,
81   argument75        IN  VARCHAR2  DEFAULT  NULL,
82   argument76        IN  VARCHAR2  DEFAULT  NULL,
83   argument77        IN  VARCHAR2  DEFAULT  NULL,
84   argument78        IN  VARCHAR2  DEFAULT  NULL,
85   argument79        IN  VARCHAR2  DEFAULT  NULL,
86   argument80        IN  VARCHAR2  DEFAULT  NULL,
87   argument81        IN  VARCHAR2  DEFAULT  NULL,
88   argument82        IN  VARCHAR2  DEFAULT  NULL,
89   argument83        IN  VARCHAR2  DEFAULT  NULL,
90   argument84        IN  VARCHAR2  DEFAULT  NULL,
91   argument85        IN  VARCHAR2  DEFAULT  NULL,
92   argument86        IN  VARCHAR2  DEFAULT  NULL,
93   argument87        IN  VARCHAR2  DEFAULT  NULL,
94   argument88        IN  VARCHAR2  DEFAULT  NULL,
95   argument89        IN  VARCHAR2  DEFAULT  NULL,
96   argument90        IN  VARCHAR2  DEFAULT  NULL,
97   argument91        IN  VARCHAR2  DEFAULT  NULL,
98   argument92        IN  VARCHAR2  DEFAULT  NULL,
99   argument93        IN  VARCHAR2  DEFAULT  NULL,
100   argument94        IN  VARCHAR2  DEFAULT  NULL,
101   argument95        IN  VARCHAR2  DEFAULT  NULL,
102   argument96        IN  VARCHAR2  DEFAULT  NULL,
103   argument97        IN  VARCHAR2  DEFAULT  NULL,
104   argument98        IN  VARCHAR2  DEFAULT  NULL,
105   argument99        IN  VARCHAR2  DEFAULT  NULL,
106   argument100       IN  VARCHAR2  DEFAULT  NULL)
107 
108 IS
109 
110   l_request_id                  NUMBER;
111   l_user_id                     NUMBER;
112   l_reporting_level             FND_LOOKUPS.lookup_code%TYPE;
113   l_reporting_context           GL_SETS_OF_BOOKS.set_of_books_id%TYPE;
114   l_status_as_of_date           AR_TRANSACTION_HISTORY.trx_date%TYPE;
115   l_first_status                AR_LOOKUPS.lookup_code%TYPE;
116   l_second_status               AR_LOOKUPS.lookup_code%TYPE;
117   l_third_status                AR_LOOKUPS.lookup_code%TYPE;
118   l_excluded_status             AR_LOOKUPS.lookup_code%TYPE;
119   l_transaction_type            RA_CUST_TRX_TYPES.name%TYPE;
120   l_maturity_date_from          RA_CUSTOMER_TRX.term_due_date%TYPE;
121   l_maturity_date_to            RA_CUSTOMER_TRX.term_due_date%TYPE;
122   l_drawee_name                 HZ_PARTIES.party_name%TYPE;
123   l_drawee_number_from          HZ_CUST_ACCOUNTS.account_number%TYPE;
124   l_drawee_number_to            HZ_CUST_ACCOUNTS.account_number%TYPE;
125   l_remittance_batch_name       AR_BATCHES.name%TYPE;
126   l_remittance_bank_account     ce_bank_accounts.bank_account_name%TYPE;
127   l_drawee_bank_name            ce_bank_branches_v.bank_name%TYPE;
128   l_original_amount_from        AR_PAYMENT_SCHEDULES.amount_due_original%TYPE;
129   l_original_amount_to          AR_PAYMENT_SCHEDULES.amount_due_original%TYPE;
130   l_transaction_issue_date_from RA_CUSTOMER_TRX.trx_date%TYPE;
131   l_transaction_issue_date_to   RA_CUSTOMER_TRX.trx_date%TYPE;
132   l_on_hold                     RA_CUSTOMER_TRX.br_on_hold_flag%TYPE;
133 
134   BEGIN
135 
136     -- Populate mandatory parameters for request_id and user_id
137     l_request_id := fnd_global.conc_request_id;
138     fnd_profile.get('USER_ID', l_user_id);
139 
140     -- Assign parameters to local variables doing any necessary mappings
141     -- e.g. Date/Number conversions
142     l_reporting_level             := argument1;
143     l_reporting_context           := to_number(argument2);
144     l_status_as_of_date           := to_date(argument3, 'YYYY/MM/DD HH24:MI:SS');
145     l_first_status                := argument4;
146     l_second_status               := argument5;
147     l_third_status                := argument6;
148     l_excluded_status             := argument7;
149     l_transaction_type            := argument8;
150     l_maturity_date_from          := to_date(argument9, 'YYYY/MM/DD HH24:MI:SS');
151     l_maturity_date_to            := to_date(argument10, 'YYYY/MM/DD HH24:MI:SS');
152     l_drawee_name                 := argument11;
153     l_drawee_number_from          := argument12;
154     l_drawee_number_to            := argument13;
155     l_remittance_batch_name       := argument14;
156     l_remittance_bank_account     := argument15;
157     l_drawee_bank_name            := argument16;
158     l_original_amount_from        := to_number(argument17);
159     l_original_amount_to          := to_number(argument18);
160     l_transaction_issue_date_from := to_date(argument19, 'YYYY/MM/DD HH24:MI:SS');
161     l_transaction_issue_date_to   := to_date(argument20, 'YYYY/MM/DD HH24:MI:SS');
162     l_on_hold                     := argument21;
163 
164 
165 
166 
167     -- Call the inner report passing mandatory parameters and report specific parameters
168     arrx_brs.arrxbrs_report(l_request_id
169                            ,l_user_id
170                            ,l_reporting_level
171                            ,l_reporting_context
172                            ,l_status_as_of_date
173                            ,l_first_status
174                            ,l_second_status
175                            ,l_third_status
176                            ,l_excluded_status
177                            ,l_transaction_type
178                            ,l_maturity_date_from
179                            ,l_maturity_date_to
180                            ,l_drawee_name
181                            ,l_drawee_number_from
182                            ,l_drawee_number_to
183                            ,l_remittance_batch_name
184                            ,l_remittance_bank_account
185                            ,l_drawee_bank_name
186                            ,l_original_amount_from
187                            ,l_original_amount_to
188                            ,l_transaction_issue_date_from
189                            ,l_transaction_issue_date_to
190                            ,l_on_hold
191                            ,retcode
192                            ,errbuf);
193 
194     COMMIT;
195 
196   EXCEPTION
197     WHEN OTHERS THEN
198       fnd_file.put_line(fnd_file.log,sqlcode);
199       fnd_file.put_line(fnd_file.log,sqlerrm);
200       retcode := 2;
201     RAISE;
202 
203   END run_report;
204 
205 END arrx_c_brs;