DBA Data[Home] [Help]

PACKAGE: APPS.PN_EXP_TO_AR

Source


1 package PN_EXP_TO_AR AUTHID CURRENT_USER as
2   -- $Header: PNTXBILS.pls 120.5.12020000.2 2012/11/29 12:17:13 svmohamm ship $
3 
4 -------------------------------------------------------------------
5 -- For setting PN's Invoice Info
6 -- ( Run as a Conc Process )
7 -------------------------------------------------------------------
8 Procedure EXP_TO_AR (
9                       errbuf               OUT NOCOPY        VARCHAR2
10                      ,retcode              OUT NOCOPY        VARCHAR2
11                      ,p_lease_num_low      VARCHAR2
12                      ,p_lease_num_high     VARCHAR2
13                      ,p_sch_dt_low         VARCHAR2
14                      ,p_sch_dt_high        VARCHAR2
15                      ,p_due_dt_low         VARCHAR2
16                      ,p_due_dt_high        VARCHAR2
17                      ,p_pay_prps_code      VARCHAR2
18                      ,p_prd_name           VARCHAR2
19                      ,p_amt_low            NUMBER
20                      ,p_amt_high           NUMBER
21                      ,p_customer_id        NUMBER
22                      ,p_grp_param          VARCHAR2 DEFAULT NULL
23                      );
24 
25 /* Call this procedure if a Grouping Rule on some Optional Attribute is specified */
26 Procedure EXP_TO_AR_GRP (
27    errbuf          IN OUT NOCOPY     VARCHAR2
28   ,retcode         IN OUT NOCOPY     VARCHAR2
29   ,p_groupId                         VARCHAR2
30   ,p_lease_num_low      VARCHAR2
31   ,p_lease_num_high     VARCHAR2
32   ,p_sch_dt_low         VARCHAR2
33   ,p_sch_dt_high        VARCHAR2
34   ,p_due_dt_low         VARCHAR2
35   ,p_due_dt_high        VARCHAR2
36   ,p_pay_prps_code      VARCHAR2
37   ,p_prd_name           VARCHAR2
38   ,p_amt_low            NUMBER
39   ,p_amt_high           NUMBER
40   ,p_customer_id        NUMBER
41   ,p_grp_param          VARCHAR2 DEFAULT NULL
42 );
43 
44 /* Call this procedure if the Default Grouping Rule is specified */
45 Procedure EXP_TO_AR_NO_GRP (
46   errbuf          IN OUT NOCOPY      VARCHAR2
47   ,retcode         IN OUT NOCOPY     VARCHAR2
48   ,p_groupId                         VARCHAR2
49   ,p_lease_num_low      VARCHAR2
50   ,p_lease_num_high     VARCHAR2
51   ,p_sch_dt_low         VARCHAR2
52   ,p_sch_dt_high        VARCHAR2
53   ,p_due_dt_low         VARCHAR2
54   ,p_due_dt_high        VARCHAR2
55   ,p_pay_prps_code      VARCHAR2
56   ,p_prd_name           VARCHAR2
57   ,p_amt_low            NUMBER
58   ,p_amt_high           NUMBER
59   ,p_customer_id        NUMBER
60   ,p_grp_param          VARCHAR2 DEFAULT NULL
61 );
62 
63 PROCEDURE do_binding (p_cursor             NUMBER
64                      ,p_lease_num_low      VARCHAR2
65                      ,p_lease_num_high     VARCHAR2
66                      ,p_sch_dt_low         VARCHAR2
67                      ,p_sch_dt_high        VARCHAR2
68                      ,p_due_dt_low         VARCHAR2
69                      ,p_due_dt_high        VARCHAR2
70                      ,p_pay_prps_code      VARCHAR2
71                      ,p_prd_name           VARCHAR2
72                      ,p_amt_low            NUMBER
73                      ,p_amt_high           NUMBER
74                      ,p_customer_id        NUMBER
75                      ,p_grp_param          VARCHAR2
76                      );
77 
78 /* A Record to hold all the neccessary attributes for exporting */
79 TYPE exp_ar_rec IS RECORD (
80         pn_payment_item_id            PN_PAYMENT_ITEMS.payment_item_id%TYPE
81        ,pn_payment_term_id            PN_PAYMENT_ITEMS.payment_term_id%TYPE
82        ,pn_export_currency_code       PN_PAYMENT_ITEMS.export_currency_code%TYPE
83        ,pn_export_currency_amount     PN_PAYMENT_ITEMS.export_currency_amount%TYPE
84        ,pn_customer_id                PN_PAYMENT_ITEMS.customer_id%TYPE
85        ,pn_customer_site_use_id       PN_PAYMENT_ITEMS.customer_site_use_id%TYPE
86        ,pn_cust_ship_site_id          PN_PAYMENT_TERMS.cust_ship_site_id%TYPE
87        ,pn_tax_code_id                PN_PAYMENT_TERMS.tax_code_id%TYPE
88        ,pn_tax_classification_code    PN_PAYMENT_TERMS.tax_classification_code%TYPE
89        ,pn_legal_entity_id            PN_PAYMENT_TERMS.legal_entity_id%TYPE
90        ,pn_inv_rule_id                PN_PAYMENT_TERMS.inv_rule_id%TYPE
91        ,pn_account_rule_id            PN_PAYMENT_TERMS.account_rule_id%TYPE
92        ,pn_term_id                    PN_PAYMENT_TERMS.ap_ar_term_id%TYPE
93        ,pn_trx_type_id                PN_PAYMENT_TERMS.cust_trx_type_id%TYPE
94        ,pn_pay_method_id              PN_PAYMENT_TERMS.receipt_method_id%TYPE
95        ,pn_po_number                  PN_PAYMENT_TERMS.cust_po_number%TYPE
96        ,pn_tax_included               PN_PAYMENT_TERMS.tax_included%TYPE
97        ,pn_salesrep_id                PN_PAYMENT_TERMS.salesrep_id%TYPE
98        ,pn_proj_attr_catg             PN_PAYMENT_TERMS.project_attribute_category%TYPE
99        ,pn_proj_attr3                 PN_PAYMENT_TERMS.project_attribute3%TYPE
100        ,pn_proj_attr4                 PN_PAYMENT_TERMS.project_attribute4%TYPE
101        ,pn_proj_attr5                 PN_PAYMENT_TERMS.project_attribute5%TYPE
102        ,pn_proj_attr6                 PN_PAYMENT_TERMS.project_attribute6%TYPE
103        ,pn_proj_attr7                 PN_PAYMENT_TERMS.project_attribute7%TYPE
104        ,pn_org_id                     PN_PAYMENT_TERMS.org_id%TYPE
105        ,pn_lease_num                  PN_LEASES.lease_num%TYPE
106        ,pn_payment_schedule_id        PN_PAYMENT_ITEMS.payment_schedule_id%TYPE
107        ,pn_period_name                PN_PAYMENT_SCHEDULES.period_name%TYPE
108        ,pn_description                PN_PAYMENT_TERMS.payment_purpose_code%TYPE
109        ,pn_lease_id                   PN_LEASES.lease_id%TYPE
110        ,transaction_date              PN_PAYMENT_ITEMS.due_date%TYPE
111        ,normalize                     PN_PAYMENT_TERMS.normalize%TYPE
112        ,pn_accounted_date             PN_PAYMENT_ITEMS.accounted_date%TYPE
113        ,pn_rate                       PN_PAYMENT_ITEMS.rate%TYPE
114        ,location_id                   PN_LOCATIONS.LOCATION_ID%TYPE
115        ,send_entries                  PN_LEASE_DETAILS.send_entries%TYPE
116        ,rec_account                   PN_DISTRIBUTIONS.account_id%TYPE
117        ,gl_date                       RA_CUST_TRX_LINE_GL_DIST.gl_date%TYPE
118        ,conv_rate_type                PN_CURRENCIES.conversion_type%TYPE
119        ,conv_rate                     PN_PAYMENT_ITEMS.rate%TYPE
120        ,set_of_books_id               NUMBER
121        ,payment_purpose               PN_PAYMENT_TERMS.payment_purpose_code%TYPE
122        ,payment_type                  PN_PAYMENT_TERMS.payment_term_type_code%TYPE
123        ,rule_gl_date                  RA_CUST_TRX_LINE_GL_DIST.gl_date%TYPE
124        ,schedule_date                 pn_payment_schedules_all.schedule_date%TYPE
125        );
126 
127 /* Declare a PL/SQL table of above record */
128 TYPE exp_ar_tbl_type IS TABLE OF exp_ar_rec INDEX BY BINARY_INTEGER;
129 
130 TYPE err_ar_rec is RECORD (
131         pn_payment_item_id            PN_PAYMENT_ITEMS.payment_item_id%TYPE
132        ,pn_payment_term_id            PN_PAYMENT_ITEMS.payment_term_id%TYPE
133        ,pn_lease_num                  PN_LEASES.lease_num%TYPE
134        ,location_id                   PN_LOCATIONS.LOCATION_ID%TYPE
135                           );
136 
137 TYPE err_ar_tbl_type IS TABLE OF err_ar_rec INDEX BY BINARY_INTEGER;
138 
139 END PN_EXP_TO_AR;