DBA Data[Home] [Help]

PACKAGE BODY: APPS.ARP_MISC_CD

Source


1 PACKAGE BODY arp_misc_cd AS
2 /* $Header: ARPLMCDB.pls 120.3 2006/06/09 16:23:23 hyu ship $ */
3 
4 FUNCTION ins_misc_cash_distributions (last_updated_by         NUMBER,
5                                       last_update_date        DATE,
6                                       last_update_login       NUMBER,
7                                       created_by              NUMBER,
8                                       creation_date           DATE,
9                                       cash_receipt_id         NUMBER,
10                                       code_combination_id     NUMBER,
11                                       set_of_books_id         NUMBER,
12                                       gl_date                 DATE,
13                                       percent                 NUMBER,
14                                       amount                  NUMBER,
15                                       comments                VARCHAR2,
16                                       gl_posted_date          DATE,
17                                       apply_date              DATE,
18                                       posting_control_id      NUMBER,
19                                       request_id              NUMBER,
20                                       program_application_id  NUMBER,
21                                       program_id              NUMBER,
22                                       program_update_date     DATE,
23                                       acctd_amount            NUMBER,
24                                       ussgl_tran_code         VARCHAR2,
25                                       ussgl_tran_code_context VARCHAR2,
26                                       created_from            VARCHAR2,
27                                       reversal_gl_date        DATE,
28                                       --BUG#5201086
29                                       p_cash_receipt_history_id    NUMBER   DEFAULT NULL)
30           RETURN NUMBER
31 IS
32     CURSOR get_id IS
33        SELECT AR_MISC_CASH_DISTRIBUTIONS_S.NEXTVAL
34        FROM   DUAL;
35     misc_id    NUMBER;
36 BEGIN
37 arp_standard.debug('ins_misc_cash_distributions +');
38 
39     /*-----------------------*
40      | get unique identifier |
41      *-----------------------*/
42 
43     OPEN get_id;
44     FETCH get_id INTO misc_id;
45     CLOSE get_id;
46 
47     /*---------------*
48      | Insert Record |
49      *---------------*/
50 
51    INSERT INTO AR_MISC_CASH_DISTRIBUTIONS(MISC_CASH_DISTRIBUTION_ID,
52                                           LAST_UPDATED_BY,
53                                           LAST_UPDATE_DATE,
54                                           LAST_UPDATE_LOGIN,
55                                           CREATED_BY,
56                                           CREATION_DATE,
57                                           CASH_RECEIPT_ID,
58                                           CODE_COMBINATION_ID,
59                                           SET_OF_BOOKS_ID,
60                                           GL_DATE,
61                                           PERCENT,
62                                           AMOUNT,
63                                           COMMENTS,
64                                           GL_POSTED_DATE,
65                                           APPLY_DATE,
66                                           ATTRIBUTE_CATEGORY,
67                                           ATTRIBUTE1,
68                                           ATTRIBUTE2,
69                                           ATTRIBUTE3,
70                                           ATTRIBUTE4,
71                                           ATTRIBUTE5,
72                                           ATTRIBUTE6,
73                                           ATTRIBUTE7,
74                                           ATTRIBUTE8,
75                                           ATTRIBUTE9,
76                                           ATTRIBUTE10,
77                                           ATTRIBUTE11,
78                                           ATTRIBUTE12,
79                                           ATTRIBUTE13,
80                                           ATTRIBUTE14,
81                                           ATTRIBUTE15,
82                                           POSTING_CONTROL_ID,
83                                           REQUEST_ID,
84                                           PROGRAM_APPLICATION_ID,
85                                           PROGRAM_ID,
86                                           PROGRAM_UPDATE_DATE,
87                                           ACCTD_AMOUNT,
88                                           USSGL_TRANSACTION_CODE,
89                                           USSGL_TRANSACTION_CODE_CONTEXT,
90                                           CREATED_FROM,
91                                           REVERSAL_GL_DATE,
92                                           ORG_ID,
93                                           --BUG#5201086
94                                           cash_receipt_history_id)
95     VALUES(misc_id,
96            last_updated_by,
97            last_update_date,
98            last_update_login,
99            created_by,
100            creation_date,
101            cash_receipt_id,
102            code_combination_id,
103            set_of_books_id,
104            gl_date,
105            percent,
106            amount,
107            comments,
108            gl_posted_date,
109            apply_date,
110            NULL,
111            NULL,
112            NULL,
113            NULL,
114            NULL,
115            NULL,
116            NULL,
117            NULL,
118            NULL,
119            NULL,
120            NULL,
121            NULL,
122            NULL,
123            NULL,
124            NULL,
125            NULL,
126            posting_control_id,
127            request_id,
128            program_application_id,
129            program_id,
130            program_update_date,
131            acctd_amount,
132            ussgl_tran_code,
133            ussgl_tran_code_context,
134            created_from,
135            reversal_gl_date,
136            arp_standard.sysparm.org_id,
137            --BUG5201086
138            p_cash_receipt_history_id);
139 
140 
141 arp_standard.debug('   misc_id:'||misc_id);
142 arp_standard.debug('ins_misc_cash_distributions -');
143 
144     RETURN(misc_id);
145 
146 END ins_misc_cash_distributions;
147 
148 
149 
150 
151 
152 
153 PROCEDURE upd_reversal_gl_date(misc_cash_dist_id    NUMBER,
154                            rev_gl_date          DATE,
155                            p_last_updated_by    NUMBER,
156                            p_last_update_date   DATE,
157                            p_last_update_login  NUMBER,
158                            --BUG5201086
159                            p_cash_receipt_history_id    NUMBER   DEFAULT NULL
160 						   ) IS
161 BEGIN
162 arp_standard.debug('upd_reversal_gl_date +');
163 
164     UPDATE AR_MISC_CASH_DISTRIBUTIONS
165     SET REVERSAL_GL_DATE = rev_gl_date,
166 	LAST_UPDATED_BY = p_last_updated_by,
167 	LAST_UPDATE_DATE = p_last_update_date,
168 	LAST_UPDATE_LOGIN = p_last_update_login,
169     cash_receipt_history_id = p_cash_receipt_history_id
170     WHERE MISC_CASH_DISTRIBUTION_ID = misc_cash_dist_id;
171 arp_standard.debug('upd_reversal_gl_date -');
172 
173 END upd_reversal_gl_date;
174 
175 END arp_misc_cd;