[Home] [Help]
PACKAGE BODY: APPS.HZ_FINANCIAL_REPORTS_PKG
Source
1 PACKAGE BODY HZ_FINANCIAL_REPORTS_PKG as
2 /* $Header: ARHOFRTB.pls 120.9 2005/10/30 04:20:52 appldev ship $ */
3
4 G_MISS_CONTENT_SOURCE_TYPE CONSTANT VARCHAR2(30) := 'USER_ENTERED';
5 PROCEDURE Insert_Row (
6 x_rowid IN OUT NOCOPY VARCHAR2,
7 x_financial_report_id IN OUT NOCOPY NUMBER,
8 x_date_report_issued IN DATE,
9 x_party_id IN NUMBER,
10 x_document_reference IN VARCHAR2,
11 x_issued_period IN VARCHAR2,
12 x_requiring_authority IN VARCHAR2,
13 x_type_of_financial_report IN VARCHAR2,
14 x_report_start_date IN DATE,
15 x_report_end_date IN DATE,
16 x_audit_ind IN VARCHAR2,
17 x_consolidated_ind IN VARCHAR2,
18 x_estimated_ind IN VARCHAR2,
19 x_fiscal_ind IN VARCHAR2,
20 x_final_ind IN VARCHAR2,
21 x_forecast_ind IN VARCHAR2,
22 x_opening_ind IN VARCHAR2,
23 x_proforma_ind IN VARCHAR2,
24 x_qualified_ind IN VARCHAR2,
25 x_restated_ind IN VARCHAR2,
26 x_signed_by_principals_ind IN VARCHAR2,
27 x_trial_balance_ind IN VARCHAR2,
28 x_unbalanced_ind IN VARCHAR2,
29 x_content_source_type IN VARCHAR2,
30 x_status IN VARCHAR2,
31 x_object_version_number IN NUMBER,
32 x_created_by_module IN VARCHAR2,
33 x_actual_content_source IN VARCHAR2
34 ) IS
35
36 l_success VARCHAR2(1) := 'N';
37
38 BEGIN
39
40 WHILE l_success = 'N' LOOP
41 BEGIN
42 INSERT INTO HZ_FINANCIAL_REPORTS (
43 financial_report_id,
44 date_report_issued,
45 party_id,
46 document_reference,
47 issued_period,
48 requiring_authority,
49 type_of_financial_report,
50 report_start_date,
51 report_end_date,
52 audit_ind,
53 consolidated_ind,
54 estimated_ind,
55 fiscal_ind,
56 final_ind,
57 forecast_ind,
58 opening_ind,
59 proforma_ind,
60 qualified_ind,
61 restated_ind,
62 signed_by_principals_ind,
63 trial_balance_ind,
64 unbalanced_ind,
65 content_source_type,
66 created_by,
67 creation_date,
68 last_update_login,
69 last_update_date,
70 last_updated_by,
71 request_id,
72 program_application_id,
73 program_id,
74 program_update_date,
75 status,
76 object_version_number,
77 created_by_module,
78 application_id,
79 actual_content_source
80 )
81 VALUES (
82 DECODE(x_financial_report_id,
83 FND_API.G_MISS_NUM, HZ_FINANCIAL_REPORTS_S.NEXTVAL,
84 NULL, HZ_FINANCIAL_REPORTS_S.NEXTVAL,
85 x_financial_report_id),
86 DECODE(x_date_report_issued,
87 FND_API.G_MISS_DATE, TO_DATE(NULL),
88 x_date_report_issued),
89 DECODE(x_party_id,
90 FND_API.G_MISS_NUM, NULL,
91 x_party_id),
92 DECODE(x_document_reference,
93 FND_API.G_MISS_CHAR, NULL,
94 x_document_reference),
95 DECODE(x_issued_period,
96 FND_API.G_MISS_CHAR, NULL,
97 x_issued_period),
98 DECODE(x_requiring_authority,
99 FND_API.G_MISS_CHAR, NULL,
100 x_requiring_authority),
101 DECODE(x_type_of_financial_report,
102 FND_API.G_MISS_CHAR, NULL,
103 x_type_of_financial_report),
104 DECODE(x_report_start_date,
105 FND_API.G_MISS_DATE, TO_DATE(NULL),
106 x_report_start_date),
107 DECODE(x_report_end_date,
108 FND_API.G_MISS_DATE, TO_DATE(NULL),
109 x_report_end_date),
110 DECODE(x_audit_ind,
111 FND_API.G_MISS_CHAR, NULL,
112 x_audit_ind),
113 DECODE(x_consolidated_ind,
114 FND_API.G_MISS_CHAR, NULL,
115 x_consolidated_ind),
116 DECODE(x_estimated_ind,
117 FND_API.G_MISS_CHAR, NULL,
118 x_estimated_ind),
119 DECODE(x_fiscal_ind,
120 FND_API.G_MISS_CHAR, NULL,
121 x_fiscal_ind),
122 DECODE(x_final_ind,
123 FND_API.G_MISS_CHAR, NULL,
124 x_final_ind),
125 DECODE(x_forecast_ind,
126 FND_API.G_MISS_CHAR, NULL,
127 x_forecast_ind),
128 DECODE(x_opening_ind,
129 FND_API.G_MISS_CHAR, NULL,
130 x_opening_ind),
131 DECODE(x_proforma_ind,
132 FND_API.G_MISS_CHAR, NULL,
133 x_proforma_ind),
134 DECODE(x_qualified_ind,
135 FND_API.G_MISS_CHAR, NULL,
136 x_qualified_ind),
137 DECODE(x_restated_ind,
138 FND_API.G_MISS_CHAR, NULL,
139 x_restated_ind),
140 DECODE(x_signed_by_principals_ind,
141 FND_API.G_MISS_CHAR, NULL,
142 x_signed_by_principals_ind),
143 DECODE(x_trial_balance_ind,
144 FND_API.G_MISS_CHAR, NULL,
145 x_trial_balance_ind),
146 DECODE(x_unbalanced_ind,
147 FND_API.G_MISS_CHAR, NULL,
148 x_unbalanced_ind),
149 DECODE(x_content_source_type,
150 FND_API.G_MISS_CHAR, G_MISS_CONTENT_SOURCE_TYPE,
151 NULL, G_MISS_CONTENT_SOURCE_TYPE,
152 x_content_source_type),
153 hz_utility_v2pub.created_by,
154 hz_utility_v2pub.creation_date,
155 hz_utility_v2pub.last_update_login,
156 hz_utility_v2pub.last_update_date,
157 hz_utility_v2pub.last_updated_by,
158 hz_utility_v2pub.request_id,
159 hz_utility_v2pub.program_application_id,
160 hz_utility_v2pub.program_id,
161 hz_utility_v2pub.program_update_date,
162 DECODE(x_status,
163 FND_API.G_MISS_CHAR, 'A',
164 NULL, 'A',
165 x_status),
166 DECODE(x_object_version_number,
167 FND_API.G_MISS_NUM, NULL,
168 x_object_version_number),
169 DECODE(x_created_by_module,
170 FND_API.G_MISS_CHAR, NULL,
171 x_created_by_module),
172 hz_utility_v2pub.application_id,
173 DECODE(x_actual_content_source,
174 FND_API.G_MISS_CHAR, G_MISS_CONTENT_SOURCE_TYPE,
175 NULL, G_MISS_CONTENT_SOURCE_TYPE,
176 x_actual_content_source)
177 ) RETURNING
178 rowid,
179 financial_report_id
180 INTO
181 x_rowid,
182 x_financial_report_id;
183
184 l_success := 'Y';
185
186 EXCEPTION
187 WHEN DUP_VAL_ON_INDEX THEN
188 IF INSTR(SQLERRM, 'HZ_FINANCIAL_REPORTS_U1') <> 0 THEN
189 DECLARE
190 l_count NUMBER;
191 l_dummy VARCHAR2(1);
192 BEGIN
193 l_count := 1;
194 WHILE l_count > 0 LOOP
195 SELECT HZ_FINANCIAL_REPORTS_S.NEXTVAL
196 INTO x_financial_report_id FROM dual;
197 BEGIN
198 SELECT 'Y' INTO l_dummy
199 FROM HZ_FINANCIAL_REPORTS
200 WHERE financial_report_id = x_financial_report_id;
201 l_count := 1;
202 EXCEPTION
203 WHEN NO_DATA_FOUND THEN
204 l_count := 0;
205 END;
206 END LOOP;
207 END;
208 --Bug fix 3038555
209 ELSE
210 RAISE;
211 END IF;
212
213 END;
214 END LOOP;
215
216 END Insert_Row;
217
218 PROCEDURE Update_Row (
219 x_rowid IN OUT NOCOPY VARCHAR2,
220 x_financial_report_id IN NUMBER,
221 x_date_report_issued IN DATE,
222 x_party_id IN NUMBER,
223 x_document_reference IN VARCHAR2,
224 x_issued_period IN VARCHAR2,
225 x_requiring_authority IN VARCHAR2,
226 x_type_of_financial_report IN VARCHAR2,
227 x_report_start_date IN DATE,
228 x_report_end_date IN DATE,
229 x_audit_ind IN VARCHAR2,
230 x_consolidated_ind IN VARCHAR2,
231 x_estimated_ind IN VARCHAR2,
232 x_fiscal_ind IN VARCHAR2,
233 x_final_ind IN VARCHAR2,
234 x_forecast_ind IN VARCHAR2,
235 x_opening_ind IN VARCHAR2,
236 x_proforma_ind IN VARCHAR2,
237 x_qualified_ind IN VARCHAR2,
238 x_restated_ind IN VARCHAR2,
239 x_signed_by_principals_ind IN VARCHAR2,
240 x_trial_balance_ind IN VARCHAR2,
241 x_unbalanced_ind IN VARCHAR2,
242 x_content_source_type IN VARCHAR2,
243 x_status IN VARCHAR2,
244 x_object_version_number IN NUMBER,
245 x_created_by_module IN VARCHAR2,
246 x_actual_content_source IN VARCHAR2
247 ) IS
248 BEGIN
249
250 UPDATE HZ_FINANCIAL_REPORTS
251 SET
252 financial_report_id =
253 DECODE(x_financial_report_id,
254 NULL, financial_report_id,
255 FND_API.G_MISS_NUM, NULL,
256 x_financial_report_id),
257 date_report_issued =
258 DECODE(x_date_report_issued,
259 NULL, date_report_issued,
260 FND_API.G_MISS_DATE, NULL,
261 x_date_report_issued),
262 party_id =
263 DECODE(x_party_id,
264 NULL, party_id,
265 FND_API.G_MISS_NUM, NULL,
266 x_party_id),
267 document_reference =
268 DECODE(x_document_reference,
269 NULL, document_reference,
270 FND_API.G_MISS_CHAR, NULL,
271 x_document_reference),
272 issued_period =
273 DECODE(x_issued_period,
274 NULL, issued_period,
275 FND_API.G_MISS_CHAR, NULL,
276 x_issued_period),
277 requiring_authority =
278 DECODE(x_requiring_authority,
279 NULL, requiring_authority,
280 FND_API.G_MISS_CHAR, NULL,
281 x_requiring_authority),
282 type_of_financial_report =
283 DECODE(x_type_of_financial_report,
284 NULL, type_of_financial_report,
285 FND_API.G_MISS_CHAR, NULL,
286 x_type_of_financial_report),
287 report_start_date =
288 DECODE(x_report_start_date,
289 NULL, report_start_date,
290 FND_API.G_MISS_DATE, NULL,
291 x_report_start_date),
292 report_end_date =
293 DECODE(x_report_end_date,
294 NULL, report_end_date,
295 FND_API.G_MISS_DATE, NULL,
296 x_report_end_date),
297 audit_ind =
298 DECODE(x_audit_ind,
299 NULL, audit_ind,
300 FND_API.G_MISS_CHAR, NULL,
301 x_audit_ind),
302 consolidated_ind =
303 DECODE(x_consolidated_ind,
304 NULL, consolidated_ind,
305 FND_API.G_MISS_CHAR, NULL,
306 x_consolidated_ind),
307 estimated_ind =
308 DECODE(x_estimated_ind,
309 NULL, estimated_ind,
310 FND_API.G_MISS_CHAR, NULL,
311 x_estimated_ind),
312 fiscal_ind =
313 DECODE(x_fiscal_ind,
314 NULL, fiscal_ind,
315 FND_API.G_MISS_CHAR, NULL,
316 x_fiscal_ind),
317 final_ind =
318 DECODE(x_final_ind,
319 NULL, final_ind,
320 FND_API.G_MISS_CHAR, NULL,
321 x_final_ind),
322 forecast_ind =
323 DECODE(x_forecast_ind,
324 NULL, forecast_ind,
325 FND_API.G_MISS_CHAR, NULL,
326 x_forecast_ind),
327 opening_ind =
328 DECODE(x_opening_ind,
329 NULL, opening_ind,
330 FND_API.G_MISS_CHAR, NULL,
331 x_opening_ind),
332 proforma_ind =
333 DECODE(x_proforma_ind,
334 NULL, proforma_ind,
335 FND_API.G_MISS_CHAR, NULL,
336 x_proforma_ind),
337 qualified_ind =
338 DECODE(x_qualified_ind,
339 NULL, qualified_ind,
340 FND_API.G_MISS_CHAR, NULL,
341 x_qualified_ind),
342 restated_ind =
343 DECODE(x_restated_ind,
344 NULL, restated_ind,
345 FND_API.G_MISS_CHAR, NULL,
346 x_restated_ind),
347 signed_by_principals_ind =
348 DECODE(x_signed_by_principals_ind,
349 NULL, signed_by_principals_ind,
350 FND_API.G_MISS_CHAR, NULL,
351 x_signed_by_principals_ind),
352 trial_balance_ind =
353 DECODE(x_trial_balance_ind,
354 NULL, trial_balance_ind,
355 FND_API.G_MISS_CHAR, NULL,
356 x_trial_balance_ind),
357 unbalanced_ind =
358 DECODE(x_unbalanced_ind,
359 NULL, unbalanced_ind,
360 FND_API.G_MISS_CHAR, NULL,
361 x_unbalanced_ind),
362 content_source_type =
363 DECODE(x_content_source_type,
364 NULL, content_source_type,
365 FND_API.G_MISS_CHAR, NULL,
366 x_content_source_type),
367 created_by = created_by,
368 creation_date = creation_date,
369 last_update_login = hz_utility_v2pub.last_update_login,
370 last_update_date = hz_utility_v2pub.last_update_date,
371 last_updated_by = hz_utility_v2pub.last_updated_by,
372 request_id = hz_utility_v2pub.request_id,
373 program_application_id = hz_utility_v2pub.program_application_id,
374 program_id = hz_utility_v2pub.program_id,
375 program_update_date = hz_utility_v2pub.program_update_date,
376 status =
377 DECODE(x_status,
378 NULL, status,
379 FND_API.G_MISS_CHAR, NULL,
380 x_status),
381 object_version_number =
382 DECODE(x_object_version_number,
383 NULL, object_version_number,
384 FND_API.G_MISS_NUM, NULL,
385 x_object_version_number),
386 created_by_module =
387 DECODE(x_created_by_module,
388 NULL, created_by_module,
389 FND_API.G_MISS_CHAR, NULL,
390 x_created_by_module),
391 application_id = hz_utility_v2pub.application_id/*,
392
393 ** SSM SST Integration and Extension
397 DECODE(x_actual_content_source,
394 ** actual_content_source is not updated for non-SSM enabled entities.
395
396 actual_content_source =
398 NULL, actual_content_source,
399 FND_API.G_MISS_CHAR, NULL,
400 x_actual_content_source) */
401 WHERE rowid = x_rowid;
402
403 IF ( SQL%NOTFOUND ) THEN
404 RAISE NO_DATA_FOUND;
405 END IF;
406
407 END Update_Row;
408
409 PROCEDURE Lock_Row (
410 x_rowid IN OUT NOCOPY VARCHAR2,
411 x_financial_report_id IN NUMBER,
412 x_date_report_issued IN DATE,
413 x_party_id IN NUMBER,
414 x_document_reference IN VARCHAR2,
415 x_issued_period IN VARCHAR2,
416 x_requiring_authority IN VARCHAR2,
417 x_type_of_financial_report IN VARCHAR2,
418 x_report_start_date IN DATE,
419 x_report_end_date IN DATE,
420 x_audit_ind IN VARCHAR2,
421 x_consolidated_ind IN VARCHAR2,
422 x_estimated_ind IN VARCHAR2,
423 x_fiscal_ind IN VARCHAR2,
424 x_final_ind IN VARCHAR2,
425 x_forecast_ind IN VARCHAR2,
426 x_opening_ind IN VARCHAR2,
427 x_proforma_ind IN VARCHAR2,
428 x_qualified_ind IN VARCHAR2,
429 x_restated_ind IN VARCHAR2,
430 x_signed_by_principals_ind IN VARCHAR2,
431 x_trial_balance_ind IN VARCHAR2,
432 x_unbalanced_ind IN VARCHAR2,
433 x_content_source_type IN VARCHAR2,
434 x_created_by IN NUMBER,
435 x_creation_date IN DATE,
436 x_last_update_login IN NUMBER,
437 x_last_update_date IN DATE,
438 x_last_updated_by IN NUMBER,
439 x_request_id IN NUMBER,
440 x_program_application_id IN NUMBER,
441 x_program_id IN NUMBER,
442 x_program_update_date IN DATE,
443 x_status IN VARCHAR2,
444 x_object_version_number IN NUMBER,
445 x_created_by_module IN VARCHAR2,
446 x_application_id IN NUMBER,
447 x_actual_content_source IN VARCHAR2
448 ) IS
449
450 CURSOR c IS
451 SELECT * FROM hz_financial_reports
452 WHERE rowid = x_rowid
453 FOR UPDATE NOWAIT;
454 Recinfo c%ROWTYPE;
455
456 BEGIN
457
458 OPEN c;
459 FETCH c INTO Recinfo;
460 IF ( c%NOTFOUND ) THEN
461 CLOSE c;
462 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
463 APP_EXCEPTION.RAISE_EXCEPTION;
464 END IF;
465 CLOSE C;
466
467 IF (
468 ( ( Recinfo.financial_report_id = x_financial_report_id )
469 OR ( ( Recinfo.financial_report_id IS NULL )
470 AND ( x_financial_report_id IS NULL ) ) )
471 AND ( ( Recinfo.date_report_issued = x_date_report_issued )
472 OR ( ( Recinfo.date_report_issued IS NULL )
473 AND ( x_date_report_issued IS NULL ) ) )
474 AND ( ( Recinfo.party_id = x_party_id )
475 OR ( ( Recinfo.party_id IS NULL )
476 AND ( x_party_id IS NULL ) ) )
477 AND ( ( Recinfo.document_reference = x_document_reference )
478 OR ( ( Recinfo.document_reference IS NULL )
479 AND ( x_document_reference IS NULL ) ) )
480 AND ( ( Recinfo.issued_period = x_issued_period )
481 OR ( ( Recinfo.issued_period IS NULL )
482 AND ( x_issued_period IS NULL ) ) )
483 AND ( ( Recinfo.requiring_authority = x_requiring_authority )
484 OR ( ( Recinfo.requiring_authority IS NULL )
485 AND ( x_requiring_authority IS NULL ) ) )
486 AND ( ( Recinfo.type_of_financial_report = x_type_of_financial_report )
487 OR ( ( Recinfo.type_of_financial_report IS NULL )
488 AND ( x_type_of_financial_report IS NULL ) ) )
489 AND ( ( Recinfo.report_start_date = x_report_start_date )
490 OR ( ( Recinfo.report_start_date IS NULL )
491 AND ( x_report_start_date IS NULL ) ) )
492 AND ( ( Recinfo.report_end_date = x_report_end_date )
493 OR ( ( Recinfo.report_end_date IS NULL )
494 AND ( x_report_end_date IS NULL ) ) )
495 AND ( ( Recinfo.audit_ind = x_audit_ind )
496 OR ( ( Recinfo.audit_ind IS NULL )
497 AND ( x_audit_ind IS NULL ) ) )
498 AND ( ( Recinfo.consolidated_ind = x_consolidated_ind )
499 OR ( ( Recinfo.consolidated_ind IS NULL )
500 AND ( x_consolidated_ind IS NULL ) ) )
501 AND ( ( Recinfo.estimated_ind = x_estimated_ind )
502 OR ( ( Recinfo.estimated_ind IS NULL )
503 AND ( x_estimated_ind IS NULL ) ) )
504 AND ( ( Recinfo.fiscal_ind = x_fiscal_ind )
505 OR ( ( Recinfo.fiscal_ind IS NULL )
509 AND ( x_final_ind IS NULL ) ) )
506 AND ( x_fiscal_ind IS NULL ) ) )
507 AND ( ( Recinfo.final_ind = x_final_ind )
508 OR ( ( Recinfo.final_ind IS NULL )
510 AND ( ( Recinfo.forecast_ind = x_forecast_ind )
511 OR ( ( Recinfo.forecast_ind IS NULL )
512 AND ( x_forecast_ind IS NULL ) ) )
513 AND ( ( Recinfo.opening_ind = x_opening_ind )
514 OR ( ( Recinfo.opening_ind IS NULL )
515 AND ( x_opening_ind IS NULL ) ) )
516 AND ( ( Recinfo.proforma_ind = x_proforma_ind )
517 OR ( ( Recinfo.proforma_ind IS NULL )
518 AND ( x_proforma_ind IS NULL ) ) )
519 AND ( ( Recinfo.qualified_ind = x_qualified_ind )
520 OR ( ( Recinfo.qualified_ind IS NULL )
521 AND ( x_qualified_ind IS NULL ) ) )
522 AND ( ( Recinfo.restated_ind = x_restated_ind )
523 OR ( ( Recinfo.restated_ind IS NULL )
524 AND ( x_restated_ind IS NULL ) ) )
525 AND ( ( Recinfo.signed_by_principals_ind = x_signed_by_principals_ind )
526 OR ( ( Recinfo.signed_by_principals_ind IS NULL )
527 AND ( x_signed_by_principals_ind IS NULL ) ) )
528 AND ( ( Recinfo.trial_balance_ind = x_trial_balance_ind )
529 OR ( ( Recinfo.trial_balance_ind IS NULL )
530 AND ( x_trial_balance_ind IS NULL ) ) )
531 AND ( ( Recinfo.unbalanced_ind = x_unbalanced_ind )
532 OR ( ( Recinfo.unbalanced_ind IS NULL )
533 AND ( x_unbalanced_ind IS NULL ) ) )
534 AND ( ( Recinfo.content_source_type = x_content_source_type )
535 OR ( ( Recinfo.content_source_type IS NULL )
536 AND ( x_content_source_type IS NULL ) ) )
537 AND ( ( Recinfo.created_by = x_created_by )
538 OR ( ( Recinfo.created_by IS NULL )
539 AND ( x_created_by IS NULL ) ) )
540 AND ( ( Recinfo.creation_date = x_creation_date )
541 OR ( ( Recinfo.creation_date IS NULL )
542 AND ( x_creation_date IS NULL ) ) )
543 AND ( ( Recinfo.last_update_login = x_last_update_login )
544 OR ( ( Recinfo.last_update_login IS NULL )
545 AND ( x_last_update_login IS NULL ) ) )
546 AND ( ( Recinfo.last_update_date = x_last_update_date )
547 OR ( ( Recinfo.last_update_date IS NULL )
548 AND ( x_last_update_date IS NULL ) ) )
549 AND ( ( Recinfo.last_updated_by = x_last_updated_by )
550 OR ( ( Recinfo.last_updated_by IS NULL )
551 AND ( x_last_updated_by IS NULL ) ) )
552 AND ( ( Recinfo.request_id = x_request_id )
553 OR ( ( Recinfo.request_id IS NULL )
554 AND ( x_request_id IS NULL ) ) )
555 AND ( ( Recinfo.program_application_id = x_program_application_id )
556 OR ( ( Recinfo.program_application_id IS NULL )
557 AND ( x_program_application_id IS NULL ) ) )
558 AND ( ( Recinfo.program_id = x_program_id )
559 OR ( ( Recinfo.program_id IS NULL )
560 AND ( x_program_id IS NULL ) ) )
561 AND ( ( Recinfo.program_update_date = x_program_update_date )
562 OR ( ( Recinfo.program_update_date IS NULL )
563 AND ( x_program_update_date IS NULL ) ) )
564 AND ( ( Recinfo.status = x_status )
565 OR ( ( Recinfo.status IS NULL )
566 AND ( x_status IS NULL ) ) )
567 AND ( ( Recinfo.object_version_number = x_object_version_number )
568 OR ( ( Recinfo.object_version_number IS NULL )
569 AND ( x_object_version_number IS NULL ) ) )
570 AND ( ( Recinfo.created_by_module = x_created_by_module )
571 OR ( ( Recinfo.created_by_module IS NULL )
572 AND ( x_created_by_module IS NULL ) ) )
573 AND ( ( Recinfo.application_id = x_application_id )
574 OR ( ( Recinfo.application_id IS NULL )
575 AND ( x_application_id IS NULL ) ) )
576 AND ( ( Recinfo.actual_content_source = x_actual_content_source )
577 OR ( ( Recinfo.actual_content_source IS NULL )
578 AND ( x_actual_content_source IS NULL ) ) )
579 ) THEN
580 RETURN;
581 ELSE
582 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
583 APP_EXCEPTION.RAISE_EXCEPTION;
584 END IF;
585
586 END Lock_Row;
587
588 PROCEDURE Select_Row (
589 x_financial_report_id IN OUT NOCOPY NUMBER,
590 x_date_report_issued OUT NOCOPY DATE,
591 x_party_id OUT NOCOPY NUMBER,
592 x_document_reference OUT NOCOPY VARCHAR2,
593 x_issued_period OUT NOCOPY VARCHAR2,
594 x_requiring_authority OUT NOCOPY VARCHAR2,
595 x_type_of_financial_report OUT NOCOPY VARCHAR2,
596 x_report_start_date OUT NOCOPY DATE,
597 x_report_end_date OUT NOCOPY DATE,
598 x_audit_ind OUT NOCOPY VARCHAR2,
599 x_consolidated_ind OUT NOCOPY VARCHAR2,
600 x_estimated_ind OUT NOCOPY VARCHAR2,
601 x_fiscal_ind OUT NOCOPY VARCHAR2,
602 x_final_ind OUT NOCOPY VARCHAR2,
603 x_forecast_ind OUT NOCOPY VARCHAR2,
604 x_opening_ind OUT NOCOPY VARCHAR2,
605 x_proforma_ind OUT NOCOPY VARCHAR2,
606 x_qualified_ind OUT NOCOPY VARCHAR2,
607 x_restated_ind OUT NOCOPY VARCHAR2,
608 x_signed_by_principals_ind OUT NOCOPY VARCHAR2,
609 x_trial_balance_ind OUT NOCOPY VARCHAR2,
610 x_unbalanced_ind OUT NOCOPY VARCHAR2,
611 x_content_source_type OUT NOCOPY VARCHAR2,
612 x_status OUT NOCOPY VARCHAR2,
613 x_actual_content_source OUT NOCOPY VARCHAR2,
614 x_created_by_module OUT NOCOPY VARCHAR2
615 ) IS
616 BEGIN
617
618 SELECT
619 NVL(financial_report_id, FND_API.G_MISS_NUM),
620 NVL(date_report_issued, FND_API.G_MISS_DATE),
621 NVL(party_id, FND_API.G_MISS_NUM),
622 NVL(document_reference, FND_API.G_MISS_CHAR),
623 NVL(issued_period, FND_API.G_MISS_CHAR),
624 NVL(requiring_authority, FND_API.G_MISS_CHAR),
625 NVL(type_of_financial_report, FND_API.G_MISS_CHAR),
626 NVL(report_start_date, FND_API.G_MISS_DATE),
627 NVL(report_end_date, FND_API.G_MISS_DATE),
628 NVL(audit_ind, FND_API.G_MISS_CHAR),
629 NVL(consolidated_ind, FND_API.G_MISS_CHAR),
630 NVL(estimated_ind, FND_API.G_MISS_CHAR),
631 NVL(fiscal_ind, FND_API.G_MISS_CHAR),
632 NVL(final_ind, FND_API.G_MISS_CHAR),
633 NVL(forecast_ind, FND_API.G_MISS_CHAR),
634 NVL(opening_ind, FND_API.G_MISS_CHAR),
635 NVL(proforma_ind, FND_API.G_MISS_CHAR),
636 NVL(qualified_ind, FND_API.G_MISS_CHAR),
637 NVL(restated_ind, FND_API.G_MISS_CHAR),
638 NVL(signed_by_principals_ind, FND_API.G_MISS_CHAR),
639 NVL(trial_balance_ind, FND_API.G_MISS_CHAR),
640 NVL(unbalanced_ind, FND_API.G_MISS_CHAR),
641 NVL(content_source_type, FND_API.G_MISS_CHAR),
642 NVL(status, FND_API.G_MISS_CHAR),
643 NVL(actual_content_source, FND_API.G_MISS_CHAR),
644 NVL(created_by_module, FND_API.G_MISS_CHAR)
645 INTO
646 x_financial_report_id,
647 x_date_report_issued,
648 x_party_id,
649 x_document_reference,
650 x_issued_period,
651 x_requiring_authority,
652 x_type_of_financial_report,
656 x_consolidated_ind,
653 x_report_start_date,
654 x_report_end_date,
655 x_audit_ind,
657 x_estimated_ind,
658 x_fiscal_ind,
659 x_final_ind,
660 x_forecast_ind,
661 x_opening_ind,
662 x_proforma_ind,
663 x_qualified_ind,
664 x_restated_ind,
665 x_signed_by_principals_ind,
666 x_trial_balance_ind,
667 x_unbalanced_ind,
668 x_content_source_type,
669 x_status,
670 x_actual_content_source,
671 x_created_by_module
672 FROM HZ_FINANCIAL_REPORTS
673 WHERE financial_report_id = x_financial_report_id;
674
675 EXCEPTION
676 WHEN NO_DATA_FOUND THEN
677 FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
678 FND_MESSAGE.SET_TOKEN('RECORD', 'hz_financial_reports_rec');
679 FND_MESSAGE.SET_TOKEN('VALUE', TO_CHAR(x_financial_report_id));
680 FND_MSG_PUB.ADD;
681 RAISE FND_API.G_EXC_ERROR;
682
683 END Select_Row;
684
685 PROCEDURE Delete_Row (
686 x_financial_report_id IN NUMBER
687 ) IS
688 BEGIN
689
690 DELETE FROM HZ_FINANCIAL_REPORTS
691 WHERE financial_report_id = x_financial_report_id;
692
693 IF ( SQL%NOTFOUND ) THEN
694 RAISE NO_DATA_FOUND;
695 END IF;
696
697 END Delete_Row;
698
699 END HZ_FINANCIAL_REPORTS_PKG;