1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
|
set client_min_messages = 'warning';
-- First a couple of notes about this file and what will probably change in the
-- future.
--
-- The current generation here of reports assumes that we are providing
-- reporting of purchases or sales to one country only. If this ever changes
-- we will need an abstraction layer like we use with fixed assets. I suspect
-- we will go that way anyway since it will make some things easier.
--
-- This file provides 1099 reporting (MISC and INT). It does NOT provide 1099-K
-- and we'd need an abstraction layer for that. --CT
BEGIN;
DROP TYPE IF EXISTS tax_form_report_item CASCADE;
CREATE TYPE tax_form_report_item AS (
credit_id integer,
legal_name text,
entity_id integer,
entity_class integer,
control_code text,
meta_number character varying(32),
acc_sum numeric,
invoice_sum numeric,
total_sum numeric);
DROP TYPE IF EXISTS tax_form_report_detail_item CASCADE;
CREATE TYPE tax_form_report_detail_item AS (
credit_id integer,
legal_name text,
entity_id integer,
entity_class integer,
control_code text,
meta_number character varying(32),
acc_sum numeric,
invoice_sum numeric,
total_sum numeric,
invnumber text,
duedate text,
invoice_id int);
CREATE OR REPLACE FUNCTION tax_form_summary_report(in_tax_form_id int, in_begin date, in_end date)
RETURNS SETOF tax_form_report_item AS $BODY$
SELECT entity_credit_account.id,
company.legal_name, company.entity_id,
entity_credit_account.entity_class, entity.control_code,
entity_credit_account.meta_number,
sum(CASE WHEN gl.amount = 0 THEN 0
WHEN relation = 'acc_trans'
THEN ac.reportable_amount * pmt.amount
/ gl.amount
ELSE 0
END * CASE WHEN gl.class = 'ap' THEN -1 else 1 end),
sum(CASE WHEN gl.amount = 0 THEN 0
WHEN relation = 'invoice'
THEN ac.reportable_amount * pmt.amount
/ gl.amount
ELSE 0
END * CASE WHEN gl.class = 'ar' THEN -1 else 1 end),
sum(CASE WHEN gl.amount = 0 THEN 0
ELSE ac.reportable_amount * pmt.amount
/ gl.amount
END * CASE WHEN gl.class = 'ap' THEN -1 else 1 end
* CASE WHEN ac.relation = 'invoice' then -1 else 1 end)
FROM (select id, transdate, entity_credit_account, invoice,
amount, 'ar' as class FROM ar
UNION
select id, transdate, entity_credit_account, invoice,
amount, 'ap' as class from ap
) gl
JOIN (select trans_id, 'acc_trans' as relation,
sum(amount) as amount,
sum(case when atf.reportable then amount else 0
end) as reportable_amount
FROM acc_trans
LEFT JOIN ac_tax_form atf
ON (acc_trans.entry_id = atf.entry_id)
GROUP BY trans_id
UNION
select trans_id, 'invoice' as relation,
sum(sellprice * qty) as amount,
sum(case when itf.reportable
then sellprice * qty
else 0
end) as reportable_amount
FROM invoice
LEFT JOIN invoice_tax_form itf
ON (invoice.id = itf.invoice_id)
GROUP BY trans_id
) ac ON (ac.trans_id = gl.id
AND ((gl.invoice is true and ac.relation='invoice')
OR (gl.invoice is false
and ac.relation='acc_trans')))
JOIN (SELECT ac.trans_id, sum(ac.amount) as amount,
as_array(entry_id) as entry_ids,
as_array(chart_id) as chart_ids,
count(*) as num
FROM acc_trans ac
where chart_id in (select account_id
from account_link
where description like '%paid')
AND transdate BETWEEN in_begin AND in_end
group by ac.trans_id
) pmt ON (pmt.trans_id = gl.id)
JOIN entity_credit_account
ON (gl.entity_credit_account = entity_credit_account.id)
JOIN entity ON (entity.id = entity_credit_account.entity_id)
JOIN company ON (entity.id = company.entity_id)
JOIN country_tax_form ON (entity_credit_account.taxform_id = country_tax_form.id)
WHERE country_tax_form.id = in_tax_form_id
GROUP BY legal_name, meta_number, company.entity_id, entity_credit_account.entity_class, entity.control_code, entity_credit_account.id
$BODY$ LANGUAGE SQL;
COMMENT ON FUNCTION tax_form_summary_report
(in_tax_form_id int, in_begin date, in_end date) IS
$$This provides the total reportable value per vendor. As per 1099 forms, these
are cash-basis documents and show amounts paid.$$;
CREATE OR REPLACE FUNCTION tax_form_details_report(in_tax_form_id int, in_begin date, in_end date, in_meta_number text)
RETURNS SETOF tax_form_report_detail_item AS $BODY$
SELECT entity_credit_account.id,
company.legal_name, company.entity_id,
entity_credit_account.entity_class, entity.control_code,
entity_credit_account.meta_number,
sum(CASE WHEN gl.amount = 0 then 0
when relation = 'acc_trans'
THEN ac.reportable_amount * pmt.amount
/ gl.amount
ELSE 0
END * CASE WHEN gl.class = 'ap' THEN -1 else 1 end),
sum(CASE WHEN gl.amount = 0 then 0
WHEN relation = 'invoice'
THEN ac.reportable_amount * pmt.amount
/ gl.amount
ELSE 0
END * CASE WHEN gl.class = 'ar' THEN -1 else 1 end),
SUM(CASE WHEN gl.amount = 0 THEN 0
ELSE ac.reportable_amount * pmt.amount
/ gl.amount
END
* CASE WHEN gl.class = 'ap' THEN -1 else 1 end
* CASE WHEN relation = 'invoice' THEN -1 ELSE 1 END),
gl.invnumber, gl.duedate::text, gl.id
FROM (select id, entity_credit_account, invnumber, duedate,
amount, transdate, 'ar' as class
FROM ar
UNION
select id, entity_credit_account, invnumber, duedate,
amount, transdate, 'ap' as class
FROM ap
) gl
JOIN (select trans_id, 'acc_trans' as relation,
sum(amount) as amount,
sum(case when atf.reportable then amount else 0
end) as reportable_amount
FROM acc_trans
LEFT JOIN ac_tax_form atf
ON (acc_trans.entry_id = atf.entry_id)
GROUP BY trans_id
UNION
select trans_id, 'invoice' as relation,
sum(sellprice * qty) as amount,
sum(case when itf.reportable
then sellprice * qty
else 0
end) as reportable_amount
FROM invoice
LEFT JOIN invoice_tax_form itf
ON (invoice.id = itf.invoice_id)
GROUP BY trans_id
) ac ON (ac.trans_id = gl.id)
JOIN entity_credit_account ON (gl.entity_credit_account = entity_credit_account.id)
JOIN entity ON (entity.id = entity_credit_account.entity_id)
JOIN company ON (entity.id = company.entity_id)
JOIN country_tax_form ON (entity_credit_account.taxform_id = country_tax_form.id)
JOIN (SELECT ac.trans_id, sum(ac.amount) as amount,
as_array(entry_id) as entry_ids,
as_array(chart_id) as chart_ids,
count(*) as num
FROM acc_trans ac
where chart_id in (select account_id
from account_link
where description like '%paid')
AND transdate BETWEEN in_begin AND in_end
group by ac.trans_id
) pmt ON (pmt.trans_id = gl.id)
WHERE country_tax_form.id = in_tax_form_id AND meta_number = in_meta_number
GROUP BY legal_name, meta_number, company.entity_id, entity_credit_account.entity_class, entity.control_code, gl.invnumber, gl.duedate, gl.id, entity_credit_account.id
$BODY$ LANGUAGE SQL;
COMMENT ON FUNCTION tax_form_details_report
(in_tax_form_id int, in_begin date, in_end date, in_meta_number text) IS
$$ This provides a list of invoices and transactions that a report hits. This
is intended to allow an organization to adjust what is reported on the 1099
before printing them.$$;
CREATE OR REPLACE FUNCTION tax_form_summary_report_accrual
(in_tax_form_id int, in_begin date, in_end date)
RETURNS SETOF tax_form_report_item AS $BODY$
SELECT entity_credit_account.id,
company.legal_name, company.entity_id,
entity_credit_account.entity_class, entity.control_code,
entity_credit_account.meta_number,
sum(CASE WHEN gl.amount = 0 THEN 0
WHEN relation = 'acc_trans'
THEN ac.reportable_amount
ELSE 0
END * CASE WHEN gl.class = 'ap' THEN -1 else 1 end),
sum(CASE WHEN gl.amount = 0 THEN 0
WHEN relation = 'invoice'
THEN ac.reportable_amount
ELSE 0
END * CASE WHEN gl.class = 'ar' THEN -1 else 1 end),
sum(CASE WHEN gl.amount = 0 THEN 0
ELSE ac.reportable_amount
END * CASE WHEN gl.class = 'ap' THEN -1 else 1 end
* CASE WHEN ac.relation = 'invoice' then -1 else 1 end)
FROM (select id, transdate, entity_credit_account, invoice,
amount, 'ar' as class FROM ar
WHERE transdate BETWEEN in_begin AND in_end
UNION
select id, transdate, entity_credit_account, invoice,
amount, 'ap' as class from ap
WHERE transdate BETWEEN in_begin AND in_end
) gl
JOIN (select trans_id, 'acc_trans' as relation,
sum(amount) as amount,
sum(case when atf.reportable then amount else 0
end) as reportable_amount
FROM acc_trans
LEFT JOIN ac_tax_form atf
ON (acc_trans.entry_id = atf.entry_id)
GROUP BY trans_id
UNION
select trans_id, 'invoice' as relation,
sum(sellprice * qty) as amount,
sum(case when itf.reportable
then sellprice * qty
else 0
end) as reportable_amount
FROM invoice
LEFT JOIN invoice_tax_form itf
ON (invoice.id = itf.invoice_id)
GROUP BY trans_id
) ac ON (ac.trans_id = gl.id
AND ((gl.invoice is true and ac.relation='invoice')
OR (gl.invoice is false
and ac.relation='acc_trans')))
JOIN entity_credit_account
ON (gl.entity_credit_account = entity_credit_account.id)
JOIN entity ON (entity.id = entity_credit_account.entity_id)
JOIN company ON (entity.id = company.entity_id)
JOIN country_tax_form ON (entity_credit_account.taxform_id = country_tax_form.id)
WHERE country_tax_form.id = in_tax_form_id
GROUP BY legal_name, meta_number, company.entity_id, entity_credit_account.entity_class, entity.control_code, entity_credit_account.id
$BODY$ LANGUAGE SQL;
COMMENT ON FUNCTION tax_form_summary_report_accrual
(in_tax_form_id int, in_begin date, in_end date) IS
$$This provides the total reportable value per vendor. As per 1099 forms, these
are cash-basis documents and show amounts paid.$$;
CREATE OR REPLACE FUNCTION tax_form_details_report_accrual
(in_tax_form_id int, in_begin date, in_end date, in_meta_number text)
RETURNS SETOF tax_form_report_detail_item AS $BODY$
SELECT entity_credit_account.id,
company.legal_name, company.entity_id,
entity_credit_account.entity_class, entity.control_code,
entity_credit_account.meta_number,
sum(CASE WHEN gl.amount = 0 then 0
when relation = 'acc_trans'
THEN ac.reportable_amount
ELSE 0
END * CASE WHEN gl.class = 'ap' THEN -1 else 1 end),
sum(CASE WHEN gl.amount = 0 then 0
WHEN relation = 'invoice'
THEN ac.reportable_amount
ELSE 0
END * CASE WHEN gl.class = 'ar' THEN -1 else 1 end),
SUM(CASE WHEN gl.amount = 0
THEN 0
ELSE ac.reportable_amount
END
* CASE WHEN gl.class = 'ap' THEN -1 else 1 end
* CASE WHEN relation = 'invoice' THEN -1 ELSE 1 END),
gl.invnumber, gl.duedate::text, gl.id
FROM (select id, entity_credit_account, invnumber, duedate,
amount, transdate, 'ar' as class
FROM ar
WHERE transdate BETWEEN in_begin AND in_end
UNION
select id, entity_credit_account, invnumber, duedate,
amount, transdate, 'ap' as class
FROM ap
WHERE transdate BETWEEN in_begin AND in_end
) gl
JOIN (select trans_id, 'acc_trans' as relation,
sum(amount) as amount,
sum(case when atf.reportable then amount else 0
end) as reportable_amount
FROM acc_trans
LEFT JOIN ac_tax_form atf
ON (acc_trans.entry_id = atf.entry_id)
GROUP BY trans_id
UNION
select trans_id, 'invoice' as relation,
sum(sellprice * qty) as amount,
sum(case when itf.reportable
then sellprice * qty
else 0
end) as reportable_amount
FROM invoice
LEFT JOIN invoice_tax_form itf
ON (invoice.id = itf.invoice_id)
GROUP BY trans_id
) ac ON (ac.trans_id = gl.id)
JOIN entity_credit_account ON (gl.entity_credit_account = entity_credit_account.id)
JOIN entity ON (entity.id = entity_credit_account.entity_id)
JOIN company ON (entity.id = company.entity_id)
JOIN country_tax_form ON (entity_credit_account.taxform_id = country_tax_form.id)
WHERE country_tax_form.id = in_tax_form_id AND meta_number = in_meta_number
GROUP BY legal_name, meta_number, company.entity_id, entity_credit_account.entity_class, entity.control_code, gl.invnumber, gl.duedate, gl.id, entity_credit_account.id
$BODY$ LANGUAGE SQL;
COMMENT ON FUNCTION tax_form_details_report_accrual
(in_tax_form_id int, in_begin date, in_end date, in_meta_number text) IS
$$ This provides a list of invoices and transactions that a report hits. This
is intended to allow an organization to adjust what is reported on the 1099
before printing them.$$;
update defaults set value='yes' where setting_key='module_load_ok';
COMMIT;
|
