[Home] [Help]
PACKAGE BODY: APPS.JA_ZZ_AR_AUTO_INVOICE
Source
1 PACKAGE BODY ja_zz_ar_auto_invoice AS
2 /* $Header: jazzraib.pls 120.2 2005/10/30 01:48:12 appldev ship $ */
3 -----------------------------------------------------------------------------
4 -- PUBLIC FUNCTIONS/PROCEDURES --
5 -----------------------------------------------------------------------------
6
7 -----------------------------------------------------------------------------
8 -- FUNCTION --
9 -- validate_gdff --
10 -- --
11 -- PARAMETERS --
12 -- INPUT --
13 -- p_request_id Number -- Concurrent Request_id --
14 -- --
15 -- RETURNS --
16 -- 0 Number -- Validation Fails, if there is any --
17 -- exceptional case which is handled --
18 -- in WHEN OTHERS --
19 -- 1 Number -- Validation Succeeds --
20 -- --
21 -----------------------------------------------------------------------------
22 FUNCTION validate_gdff (p_request_id IN NUMBER) RETURN NUMBER IS
23
24 l_request_id NUMBER;
25 l_return_code NUMBER(1);
26 l_country_code VARCHAR2(2);
27
28 BEGIN
29
30 l_request_id := p_request_id;
31 ------------------------------------------------------------
32 -- Let's assume everything is OK --
33 ------------------------------------------------------------
34 l_return_code := 1;
35
36 l_country_code := fnd_profile.value ('JGZZ_COUNTRY_CODE');
37
38 IF l_country_code = 'TW' THEN
39 l_return_code := ja_tw_ar_auto_invoice.validate_gdff(
40 l_request_id);
41 ELSIF l_country_code = 'TH' THEN
42 l_return_code := ja_th_ar_auto_invoice.validate_tax_invoice(
43 l_request_id);
44 END IF;
45
46 arp_standard.debug('Return value from ja_zz_ar_atuo_invoice.'
47 ||'validate_gdff() = '||TO_CHAR(l_return_code));
48
49 RETURN l_return_code;
50
51 EXCEPTION
52 WHEN OTHERS THEN
53
54 arp_standard.debug('-- Return From Exception when others');
55 arp_standard.debug('-- Return Code: 0');
56 arp_standard.debug('ja_zz_ar_auto_invoice.validate_gdff()-');
57
58 RETURN 0;
59
60 END validate_gdff;
61
62 -------------------------------------------------------------------------------
63 -- FUNCTION --
64 -- trx_num_upd --
65 -- --
66 -- PARAMETERS --
67 -- INPUT --
68 -- p_batch_source_id Number -- Transaction Source ID --
69 -- p_trx_number VARCHAR2(20) -- Original Transaction Number --
70 -- --
71 -- RETURNS --
72 -- l_trx_number VARCHAR2(20) -- New Transaction Number --
73 -- --
74 -------------------------------------------------------------------------------
75 FUNCTION trx_num_upd(p_batch_source_id IN NUMBER
76 ,p_trx_number IN VARCHAR2) RETURN VARCHAR2 IS
77
78 l_batch_source_id NUMBER(15);
79 l_trx_number VARCHAR2(20);
80 l_country_code VARCHAR2(2);
81
82 BEGIN
83
84 l_batch_source_id := p_batch_source_id;
85 l_trx_number := p_trx_number;
86
87 l_country_code := FND_PROFILE.VALUE('JGZZ_COUNTRY_CODE');
88
89 IF l_country_code = 'TW' THEN
90 l_trx_number := ja_tw_ar_auto_invoice.trx_num_upd(
91 l_batch_source_id
92 , l_trx_number);
93 --
94 --ELSIF l_country_code = 'TH' THEN
95 --
96 END IF;
97
98 RETURN l_trx_number;
99
100 EXCEPTION
101 WHEN OTHERS THEN
102 RAISE;
103 END trx_num_upd;
104
105 END ja_zz_ar_auto_invoice;