1 PACKAGE JG_ZZ_JOURNAL_AR_PKG
2 /* $Header: jgzzjournalars.pls 120.7 2008/01/24 11:54:46 anusaxen ship $ */
3 AS
4 P_VAT_REP_ENTITY_ID NUMBER;
5 -- P_PERIOD VARCHAR2(10);
6 P_PERIOD JG_ZZ_VAT_REP_STATUS.TAX_CALENDAR_PERIOD%TYPE;
7 P_DOCUMENT_SEQUENCE_NAME_FROM NUMBER;
8 P_DOCUMENT_SEQUENCE_NAME_TO NUMBER;
9 P_CUSTOMER_NAME_FROM VARCHAR2(250);
10 P_CUSTOMER_NAME_TO VARCHAR2(250);
11 P_DETAIL_SUMMARY VARCHAR2(10);
12 P_TAX_TYPE VARCHAR2(100);
13 P_TAX_REGISTER_TYPE VARCHAR2(100);
14 P_SEQUENCE VARCHAR2(10);
15 P_VAT_REGISTER_ID NUMBER;
16 P_REPORT_NAME VARCHAR2(10);
17 P_BALANCING_SEGMENT VARCHAR2(100);
18 P_CHART_OF_ACCOUNT_ID NUMBER;
19 P_FIRST_PAGE_NUM NUMBER;
20 l_err_msg VARCHAR2(5000);
21
22 FUNCTION beforeReport RETURN BOOLEAN;
23 FUNCTION get_sequence_number RETURN NUMBER;
24 PROCEDURE jebedv07(p_vat_rep_entity_id IN NUMBER
25 ,p_period IN VARCHAR2
26 ,p_document_sequence_name_from IN NUMBER
27 ,p_document_sequence_name_to IN NUMBER
28 ,p_customer_name_from IN VARCHAR2
29 ,p_customer_name_to IN VARCHAR2
30 ,p_detail_summary IN VARCHAR2
31 ,x_err_msg OUT NOCOPY VARCHAR2);
32 PROCEDURE jeitarsv(p_vat_rep_entity_id IN NUMBER
33 ,p_period IN VARCHAR2
34 ,p_vat_register_id IN NUMBER
35 ,x_err_msg OUT NOCOPY VARCHAR2);
36 PROCEDURE jeitrdvr(p_vat_rep_entity_id IN NUMBER
37 ,p_period IN VARCHAR2
38 ,p_vat_register_id IN NUMBER
39 ,x_err_msg OUT NOCOPY VARCHAR2);
40 PROCEDURE jeesrrvr(p_vat_rep_entity_id IN NUMBER
41 ,p_period IN VARCHAR2
42 ,p_tax_type IN VARCHAR2
43 ,p_tax_register_type IN VARCHAR2
44 ,p_sequence IN VARCHAR2
45 ,x_err_msg OUT NOCOPY VARCHAR2);
46
47 g_jeitrdvr_prel_alert_1 VARCHAR2(500) := 'The register has selected one or more transactions with dates earlier than '
48 || 'the last committed through-date of this register ';
49 g_jeitrdvr_prel_alert_2 VARCHAR2(500) := '. Please review those transactions before the final run to verify that they are '
50 || 'reported properly on the current register.';
51 g_jeitarsv_prel_alert_1 VARCHAR2(500) := 'The register has selected one or more transactions with dates earlier than '
52 || 'the last committed through-date of this register ';
53 g_jeitarsv_prel_alert_2 VARCHAR2(500) := '. Please review those transactions before the final run to verify that they are '
54 || 'reported properly on the current register.';
55
56 END JG_ZZ_JOURNAL_AR_PKG;