Displaying sumof weekly percentage change Pastie For Amibroker (AFL)

The ultimate porfolio management solution.
Shares, Margin, CFD's, Futures and Forex
EOD and Realtime
Dividends and Trust Distributions
And Much More ....
For Portfolio Manager Click Here
#1 Selling Amibroker Plugin featuring:
Advanced Adaptive Indicators
Advanced Pattern Exploration
Neural Networks
And Much More ....
Find Out More Here
Copy & Paste Friendly
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
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
Dear concern
Good Day!
 
Last few days I am trying to modify the "Monthly profit table change%" to "weekly profit table change%". But failed- cause I am not as much expert to make it.
 
But I need this table.
Requirement:
1. year wise weekly change %.
 
Hope I will get support from the expert.
 
 
Hasib
hasib1050@gmail.com
 
==============================================================================
as per my understanding
 
pds=((Close- (Ref(Close,-1)))/(Ref(Close,-1)))*100;
 
 
 
Week1   =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we1 =Sum(pds,(DayOfYear()== 1   ))+ Sum(pds,(DayOfYear()==  2   ))+ Sum(pds,(DayOfYear()==  3   ))+ Sum(pds,(DayOfYear()==  4   ))+ Sum(pds,(DayOfYear()==  5   )),                         
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we1 =Sum(pds,(DayOfYear()== 1   ))+ Sum(pds,(DayOfYear()==  2   ))+ Sum(pds,(DayOfYear()==  3   ))+ Sum(pds,(DayOfYear()==  4   )),IIf((DayOfYear()==1)     ==(DayOfWeek()==    2   ),  we1 =Sum(pds,(DayOfYear()== 1   ))+ Sum(pds,(DayOfYear()==  2   ))+ Sum(pds,(DayOfYear()==  3   )),                                     
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we1 =Sum(pds,(DayOfYear()== 1   ))+ Sum(pds,(DayOfYear()==  2   )), IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we1 =Sum(pds,(DayOfYear()== 1   )),                 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we1 =Sum(pds,(DayOfYear()== 1   ))+     Sum(pds,(DayOfYear()==  2   ))+ Sum(pds,(DayOfYear()==  3   ))+ Sum(pds,(DayOfYear()==  4   ))+ Sum(pds,(DayOfYear()==  5   ))+ Sum(pds,(DayOfYear()==  6   ))+ Sum(pds,(DayOfYear()==  7   )),
                    we1 =Sum(pds,(DayOfYear()== 1   ))+ Sum(pds,(DayOfYear()==  2           ))+ Sum(pds,(DayOfYear()==  3   ))+ Sum(pds,(DayOfYear()==  4   ))+ Sum(pds,(DayOfYear()==  5   ))+ Sum(pds,(DayOfYear()==  6   ))))))));       
                                             
                                                                         
Week2   =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we2 =Sum(pds,(DayOfYear()== 6   ))+ Sum(pds,(DayOfYear()==  7   ))+ Sum(pds,(DayOfYear()==  8   ))+ Sum(pds,(DayOfYear()==  9   ))+ Sum(pds,(DayOfYear()==  10  ))+ Sum(pds,(DayOfYear()==  11  ))+ Sum(pds,(DayOfYear()==  12  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we2 =Sum(pds,(DayOfYear()== 5   ))+ Sum(pds,(DayOfYear()==  6   ))+ Sum(pds,(DayOfYear()==  7   ))+ Sum(pds,(DayOfYear()==  8   ))+ Sum(pds,(DayOfYear()==  9   ))+ Sum(pds,(DayOfYear()==  10  ))+ Sum(pds,(DayOfYear()==  11  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we2 =Sum(pds,(DayOfYear()== 4   ))+ Sum(pds,(DayOfYear()==  5   ))+ Sum(pds,(DayOfYear()==  6   ))+ Sum(pds,(DayOfYear()==  7   ))+ Sum(pds,(DayOfYear()==  8   ))+ Sum(pds,(DayOfYear()==  9   ))+ Sum(pds,(DayOfYear()==  10  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we2 =Sum(pds,(DayOfYear()== 3   ))+ Sum(pds,(DayOfYear()==  4   ))+ Sum(pds,(DayOfYear()==  5   ))+ Sum(pds,(DayOfYear()==  6   ))+ Sum(pds,(DayOfYear()==  7   ))+ Sum(pds,(DayOfYear()==  8   ))+ Sum(pds,(DayOfYear()==  9   )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we2 =Sum(pds,(DayOfYear()== 2   ))+ Sum(pds,(DayOfYear()==  3   ))+ Sum(pds,(DayOfYear()==  4   ))+ Sum(pds,(DayOfYear()==  5   ))+ Sum(pds,(DayOfYear()==  6   ))+ Sum(pds,(DayOfYear()==  7   ))+ Sum(pds,(DayOfYear()==  8   )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we2 =Sum(pds,(DayOfYear()== 8   ))+ Sum(pds,(DayOfYear()==  9   ))+ Sum(pds,(DayOfYear()==  10  ))+ Sum(pds,(DayOfYear()==  11  ))+ Sum(pds,(DayOfYear()==  12  ))+ Sum(pds,(DayOfYear()==  13  ))+ Sum(pds,(DayOfYear()==  14  )), 
                    we2 =Sum(pds,(DayOfYear()== 7   ))+ Sum(pds,(DayOfYear()==  8   ))+ Sum(pds,(DayOfYear()==  9   ))+ Sum(pds,(DayOfYear()==  10  ))+ Sum(pds,(DayOfYear()==  11  ))+ Sum(pds,(DayOfYear()==  12  ))+ Sum(pds,(DayOfYear()==  13  ))))))));   
                                                                                                             
Week3   =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we3 =Sum(pds,(DayOfYear()== 13  ))+ Sum(pds,(DayOfYear()==  14  ))+ Sum(pds,(DayOfYear()==  15  ))+ Sum(pds,(DayOfYear()==  16  ))+ Sum(pds,(DayOfYear()==  17  ))+ Sum(pds,(DayOfYear()==  18  ))+ Sum(pds,(DayOfYear()==  19  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we3 =Sum(pds,(DayOfYear()== 12  ))+ Sum(pds,(DayOfYear()==  13  ))+ Sum(pds,(DayOfYear()==  14  ))+ Sum(pds,(DayOfYear()==  15  ))+ Sum(pds,(DayOfYear()==  16  ))+ Sum(pds,(DayOfYear()==  17  ))+ Sum(pds,(DayOfYear()==  18  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we3 =Sum(pds,(DayOfYear()== 11  ))+ Sum(pds,(DayOfYear()==  12  ))+ Sum(pds,(DayOfYear()==  13  ))+ Sum(pds,(DayOfYear()==  14  ))+ Sum(pds,(DayOfYear()==  15  ))+ Sum(pds,(DayOfYear()==  16  ))+ Sum(pds,(DayOfYear()==  17  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we3 =Sum(pds,(DayOfYear()== 10  ))+ Sum(pds,(DayOfYear()==  11  ))+ Sum(pds,(DayOfYear()==  12  ))+ Sum(pds,(DayOfYear()==  13  ))+ Sum(pds,(DayOfYear()==  14  ))+ Sum(pds,(DayOfYear()==  15  ))+ Sum(pds,(DayOfYear()==  16  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we3 =Sum(pds,(DayOfYear()== 9   ))+ Sum(pds,(DayOfYear()==  10  ))+ Sum(pds,(DayOfYear()==  11  ))+ Sum(pds,(DayOfYear()==  12  ))+ Sum(pds,(DayOfYear()==  13  ))+ Sum(pds,(DayOfYear()==  14  ))+ Sum(pds,(DayOfYear()==  15  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we3 =Sum(pds,(DayOfYear()== 15  ))+ Sum(pds,(DayOfYear()==  16  ))+ Sum(pds,(DayOfYear()==  17  ))+ Sum(pds,(DayOfYear()==  18  ))+ Sum(pds,(DayOfYear()==  19  ))+ Sum(pds,(DayOfYear()==  20  ))+ Sum(pds,(DayOfYear()==  21  )), 
                    we3 =Sum(pds,(DayOfYear()== 14  ))+ Sum(pds,(DayOfYear()==  15  ))+ Sum(pds,(DayOfYear()==  16  ))+ Sum(pds,(DayOfYear()==  17  ))+ Sum(pds,(DayOfYear()==  18  ))+ Sum(pds,(DayOfYear()==  19  ))+ Sum(pds,(DayOfYear()==  20  ))))))));   
                                                                                                             
                                                                                                             
Week4   =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we4 =Sum(pds,(DayOfYear()== 20  ))+ Sum(pds,(DayOfYear()==  21  ))+ Sum(pds,(DayOfYear()==  22  ))+ Sum(pds,(DayOfYear()==  23  ))+ Sum(pds,(DayOfYear()==  24  ))+ Sum(pds,(DayOfYear()==  25  ))+ Sum(pds,(DayOfYear()==  26  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we4 =Sum(pds,(DayOfYear()== 19  ))+ Sum(pds,(DayOfYear()==  20  ))+ Sum(pds,(DayOfYear()==  21  ))+ Sum(pds,(DayOfYear()==  22  ))+ Sum(pds,(DayOfYear()==  23  ))+ Sum(pds,(DayOfYear()==  24  ))+ Sum(pds,(DayOfYear()==  25  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we4 =Sum(pds,(DayOfYear()== 18  ))+ Sum(pds,(DayOfYear()==  19  ))+ Sum(pds,(DayOfYear()==  20  ))+ Sum(pds,(DayOfYear()==  21  ))+ Sum(pds,(DayOfYear()==  22  ))+ Sum(pds,(DayOfYear()==  23  ))+ Sum(pds,(DayOfYear()==  24  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we4 =Sum(pds,(DayOfYear()== 17  ))+ Sum(pds,(DayOfYear()==  18  ))+ Sum(pds,(DayOfYear()==  19  ))+ Sum(pds,(DayOfYear()==  20  ))+ Sum(pds,(DayOfYear()==  21  ))+ Sum(pds,(DayOfYear()==  22  ))+ Sum(pds,(DayOfYear()==  23  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we4 =Sum(pds,(DayOfYear()== 16  ))+ Sum(pds,(DayOfYear()==  17  ))+ Sum(pds,(DayOfYear()==  18  ))+ Sum(pds,(DayOfYear()==  19  ))+ Sum(pds,(DayOfYear()==  20  ))+ Sum(pds,(DayOfYear()==  21  ))+ Sum(pds,(DayOfYear()==  22  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we4 =Sum(pds,(DayOfYear()== 22  ))+ Sum(pds,(DayOfYear()==  23  ))+ Sum(pds,(DayOfYear()==  24  ))+ Sum(pds,(DayOfYear()==  25  ))+ Sum(pds,(DayOfYear()==  26  ))+ Sum(pds,(DayOfYear()==  27  ))+ Sum(pds,(DayOfYear()==  28  )), 
                    we4 =Sum(pds,(DayOfYear()== 21  ))+ Sum(pds,(DayOfYear()==  22  ))+ Sum(pds,(DayOfYear()==  23  ))+ Sum(pds,(DayOfYear()==  24  ))+ Sum(pds,(DayOfYear()==  25  ))+ Sum(pds,(DayOfYear()==  26  ))+ Sum(pds,(DayOfYear()==  27  ))))))));   
                                                                                                             
                                                                                                             
Week5   =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we5 =Sum(pds,(DayOfYear()== 27  ))+ Sum(pds,(DayOfYear()==  28  ))+ Sum(pds,(DayOfYear()==  29  ))+ Sum(pds,(DayOfYear()==  30  ))+ Sum(pds,(DayOfYear()==  31  ))+ Sum(pds,(DayOfYear()==  32  ))+ Sum(pds,(DayOfYear()==  33  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we5 =Sum(pds,(DayOfYear()== 26  ))+ Sum(pds,(DayOfYear()==  27  ))+ Sum(pds,(DayOfYear()==  28  ))+ Sum(pds,(DayOfYear()==  29  ))+ Sum(pds,(DayOfYear()==  30  ))+ Sum(pds,(DayOfYear()==  31  ))+ Sum(pds,(DayOfYear()==  32  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we5 =Sum(pds,(DayOfYear()== 25  ))+ Sum(pds,(DayOfYear()==  26  ))+ Sum(pds,(DayOfYear()==  27  ))+ Sum(pds,(DayOfYear()==  28  ))+ Sum(pds,(DayOfYear()==  29  ))+ Sum(pds,(DayOfYear()==  30  ))+ Sum(pds,(DayOfYear()==  31  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we5 =Sum(pds,(DayOfYear()== 24  ))+ Sum(pds,(DayOfYear()==  25  ))+ Sum(pds,(DayOfYear()==  26  ))+ Sum(pds,(DayOfYear()==  27  ))+ Sum(pds,(DayOfYear()==  28  ))+ Sum(pds,(DayOfYear()==  29  ))+ Sum(pds,(DayOfYear()==  30  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we5 =Sum(pds,(DayOfYear()== 23  ))+ Sum(pds,(DayOfYear()==  24  ))+ Sum(pds,(DayOfYear()==  25  ))+ Sum(pds,(DayOfYear()==  26  ))+ Sum(pds,(DayOfYear()==  27  ))+ Sum(pds,(DayOfYear()==  28  ))+ Sum(pds,(DayOfYear()==  29  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we5 =Sum(pds,(DayOfYear()== 29  ))+ Sum(pds,(DayOfYear()==  30  ))+ Sum(pds,(DayOfYear()==  31  ))+ Sum(pds,(DayOfYear()==  32  ))+ Sum(pds,(DayOfYear()==  33  ))+ Sum(pds,(DayOfYear()==  34  ))+ Sum(pds,(DayOfYear()==  35  )), 
                    we5 =Sum(pds,(DayOfYear()== 28  ))+ Sum(pds,(DayOfYear()==  29  ))+ Sum(pds,(DayOfYear()==  30  ))+ Sum(pds,(DayOfYear()==  31  ))+ Sum(pds,(DayOfYear()==  32  ))+ Sum(pds,(DayOfYear()==  33  ))+ Sum(pds,(DayOfYear()==  34  ))))))));   
                                                                                                             
                                                                                                             
Week6   =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we6 =Sum(pds,(DayOfYear()== 34  ))+ Sum(pds,(DayOfYear()==  35  ))+ Sum(pds,(DayOfYear()==  36  ))+ Sum(pds,(DayOfYear()==  37  ))+ Sum(pds,(DayOfYear()==  38  ))+ Sum(pds,(DayOfYear()==  39  ))+ Sum(pds,(DayOfYear()==  40  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we6 =Sum(pds,(DayOfYear()== 33  ))+ Sum(pds,(DayOfYear()==  34  ))+ Sum(pds,(DayOfYear()==  35  ))+ Sum(pds,(DayOfYear()==  36  ))+ Sum(pds,(DayOfYear()==  37  ))+ Sum(pds,(DayOfYear()==  38  ))+ Sum(pds,(DayOfYear()==  39  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we6 =Sum(pds,(DayOfYear()== 32  ))+ Sum(pds,(DayOfYear()==  33  ))+ Sum(pds,(DayOfYear()==  34  ))+ Sum(pds,(DayOfYear()==  35  ))+ Sum(pds,(DayOfYear()==  36  ))+ Sum(pds,(DayOfYear()==  37  ))+ Sum(pds,(DayOfYear()==  38  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we6 =Sum(pds,(DayOfYear()== 31  ))+ Sum(pds,(DayOfYear()==  32  ))+ Sum(pds,(DayOfYear()==  33  ))+ Sum(pds,(DayOfYear()==  34  ))+ Sum(pds,(DayOfYear()==  35  ))+ Sum(pds,(DayOfYear()==  36  ))+ Sum(pds,(DayOfYear()==  37  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we6 =Sum(pds,(DayOfYear()== 30  ))+ Sum(pds,(DayOfYear()==  31  ))+ Sum(pds,(DayOfYear()==  32  ))+ Sum(pds,(DayOfYear()==  33  ))+ Sum(pds,(DayOfYear()==  34  ))+ Sum(pds,(DayOfYear()==  35  ))+ Sum(pds,(DayOfYear()==  36  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we6 =Sum(pds,(DayOfYear()== 36  ))+ Sum(pds,(DayOfYear()==  37  ))+ Sum(pds,(DayOfYear()==  38  ))+ Sum(pds,(DayOfYear()==  39  ))+ Sum(pds,(DayOfYear()==  40  ))+ Sum(pds,(DayOfYear()==  41  ))+ Sum(pds,(DayOfYear()==  42  )), 
                    we6 =Sum(pds,(DayOfYear()== 35  ))+ Sum(pds,(DayOfYear()==  36  ))+ Sum(pds,(DayOfYear()==  37  ))+ Sum(pds,(DayOfYear()==  38  ))+ Sum(pds,(DayOfYear()==  39  ))+ Sum(pds,(DayOfYear()==  40  ))+ Sum(pds,(DayOfYear()==  41  ))))))));   
                                                                                                             
                                                                                                             
Week7   =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we7 =Sum(pds,(DayOfYear()== 41  ))+ Sum(pds,(DayOfYear()==  42  ))+ Sum(pds,(DayOfYear()==  43  ))+ Sum(pds,(DayOfYear()==  44  ))+ Sum(pds,(DayOfYear()==  45  ))+ Sum(pds,(DayOfYear()==  46  ))+ Sum(pds,(DayOfYear()==  47  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we7 =Sum(pds,(DayOfYear()== 40  ))+ Sum(pds,(DayOfYear()==  41  ))+ Sum(pds,(DayOfYear()==  42  ))+ Sum(pds,(DayOfYear()==  43  ))+ Sum(pds,(DayOfYear()==  44  ))+ Sum(pds,(DayOfYear()==  45  ))+ Sum(pds,(DayOfYear()==  46  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we7 =Sum(pds,(DayOfYear()== 39  ))+ Sum(pds,(DayOfYear()==  40  ))+ Sum(pds,(DayOfYear()==  41  ))+ Sum(pds,(DayOfYear()==  42  ))+ Sum(pds,(DayOfYear()==  43  ))+ Sum(pds,(DayOfYear()==  44  ))+ Sum(pds,(DayOfYear()==  45  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we7 =Sum(pds,(DayOfYear()== 38  ))+ Sum(pds,(DayOfYear()==  39  ))+ Sum(pds,(DayOfYear()==  40  ))+ Sum(pds,(DayOfYear()==  41  ))+ Sum(pds,(DayOfYear()==  42  ))+ Sum(pds,(DayOfYear()==  43  ))+ Sum(pds,(DayOfYear()==  44  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we7 =Sum(pds,(DayOfYear()== 37  ))+ Sum(pds,(DayOfYear()==  38  ))+ Sum(pds,(DayOfYear()==  39  ))+ Sum(pds,(DayOfYear()==  40  ))+ Sum(pds,(DayOfYear()==  41  ))+ Sum(pds,(DayOfYear()==  42  ))+ Sum(pds,(DayOfYear()==  43  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we7 =Sum(pds,(DayOfYear()== 43  ))+ Sum(pds,(DayOfYear()==  44  ))+ Sum(pds,(DayOfYear()==  45  ))+ Sum(pds,(DayOfYear()==  46  ))+ Sum(pds,(DayOfYear()==  47  ))+ Sum(pds,(DayOfYear()==  48  ))+ Sum(pds,(DayOfYear()==  49  )), 
                    we7 =Sum(pds,(DayOfYear()== 42  ))+ Sum(pds,(DayOfYear()==  43  ))+ Sum(pds,(DayOfYear()==  44  ))+ Sum(pds,(DayOfYear()==  45  ))+ Sum(pds,(DayOfYear()==  46  ))+ Sum(pds,(DayOfYear()==  47  ))+ Sum(pds,(DayOfYear()==  48  ))))))));   
                                                                                                             
                                                                                                             
Week8   =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we8 =Sum(pds,(DayOfYear()== 48  ))+ Sum(pds,(DayOfYear()==  49  ))+ Sum(pds,(DayOfYear()==  50  ))+ Sum(pds,(DayOfYear()==  51  ))+ Sum(pds,(DayOfYear()==  52  ))+ Sum(pds,(DayOfYear()==  53  ))+ Sum(pds,(DayOfYear()==  54  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we8 =Sum(pds,(DayOfYear()== 47  ))+ Sum(pds,(DayOfYear()==  48  ))+ Sum(pds,(DayOfYear()==  49  ))+ Sum(pds,(DayOfYear()==  50  ))+ Sum(pds,(DayOfYear()==  51  ))+ Sum(pds,(DayOfYear()==  52  ))+ Sum(pds,(DayOfYear()==  53  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we8 =Sum(pds,(DayOfYear()== 46  ))+ Sum(pds,(DayOfYear()==  47  ))+ Sum(pds,(DayOfYear()==  48  ))+ Sum(pds,(DayOfYear()==  49  ))+ Sum(pds,(DayOfYear()==  50  ))+ Sum(pds,(DayOfYear()==  51  ))+ Sum(pds,(DayOfYear()==  52  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we8 =Sum(pds,(DayOfYear()== 45  ))+ Sum(pds,(DayOfYear()==  46  ))+ Sum(pds,(DayOfYear()==  47  ))+ Sum(pds,(DayOfYear()==  48  ))+ Sum(pds,(DayOfYear()==  49  ))+ Sum(pds,(DayOfYear()==  50  ))+ Sum(pds,(DayOfYear()==  51  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we8 =Sum(pds,(DayOfYear()== 44  ))+ Sum(pds,(DayOfYear()==  45  ))+ Sum(pds,(DayOfYear()==  46  ))+ Sum(pds,(DayOfYear()==  47  ))+ Sum(pds,(DayOfYear()==  48  ))+ Sum(pds,(DayOfYear()==  49  ))+ Sum(pds,(DayOfYear()==  50  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we8 =Sum(pds,(DayOfYear()== 50  ))+ Sum(pds,(DayOfYear()==  51  ))+ Sum(pds,(DayOfYear()==  52  ))+ Sum(pds,(DayOfYear()==  53  ))+ Sum(pds,(DayOfYear()==  54  ))+ Sum(pds,(DayOfYear()==  55  ))+ Sum(pds,(DayOfYear()==  56  )), 
                    we8 =Sum(pds,(DayOfYear()== 49  ))+ Sum(pds,(DayOfYear()==  50  ))+ Sum(pds,(DayOfYear()==  51  ))+ Sum(pds,(DayOfYear()==  52  ))+ Sum(pds,(DayOfYear()==  53  ))+ Sum(pds,(DayOfYear()==  54  ))+ Sum(pds,(DayOfYear()==  55  ))))))));   
                                                                                                             
                                                                                                             
Week9   =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we9 =Sum(pds,(DayOfYear()== 55  ))+ Sum(pds,(DayOfYear()==  56  ))+ Sum(pds,(DayOfYear()==  57  ))+ Sum(pds,(DayOfYear()==  58  ))+ Sum(pds,(DayOfYear()==  59  ))+ Sum(pds,(DayOfYear()==  60  ))+ Sum(pds,(DayOfYear()==  61  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we9 =Sum(pds,(DayOfYear()== 54  ))+ Sum(pds,(DayOfYear()==  55  ))+ Sum(pds,(DayOfYear()==  56  ))+ Sum(pds,(DayOfYear()==  57  ))+ Sum(pds,(DayOfYear()==  58  ))+ Sum(pds,(DayOfYear()==  59  ))+ Sum(pds,(DayOfYear()==  60  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we9 =Sum(pds,(DayOfYear()== 53  ))+ Sum(pds,(DayOfYear()==  54  ))+ Sum(pds,(DayOfYear()==  55  ))+ Sum(pds,(DayOfYear()==  56  ))+ Sum(pds,(DayOfYear()==  57  ))+ Sum(pds,(DayOfYear()==  58  ))+ Sum(pds,(DayOfYear()==  59  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we9 =Sum(pds,(DayOfYear()== 52  ))+ Sum(pds,(DayOfYear()==  53  ))+ Sum(pds,(DayOfYear()==  54  ))+ Sum(pds,(DayOfYear()==  55  ))+ Sum(pds,(DayOfYear()==  56  ))+ Sum(pds,(DayOfYear()==  57  ))+ Sum(pds,(DayOfYear()==  58  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we9 =Sum(pds,(DayOfYear()== 51  ))+ Sum(pds,(DayOfYear()==  52  ))+ Sum(pds,(DayOfYear()==  53  ))+ Sum(pds,(DayOfYear()==  54  ))+ Sum(pds,(DayOfYear()==  55  ))+ Sum(pds,(DayOfYear()==  56  ))+ Sum(pds,(DayOfYear()==  57  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we9 =Sum(pds,(DayOfYear()== 57  ))+ Sum(pds,(DayOfYear()==  58  ))+ Sum(pds,(DayOfYear()==  59  ))+ Sum(pds,(DayOfYear()==  60  ))+ Sum(pds,(DayOfYear()==  61  ))+ Sum(pds,(DayOfYear()==  62  ))+ Sum(pds,(DayOfYear()==  63  )), 
                    we9 =Sum(pds,(DayOfYear()== 56  ))+ Sum(pds,(DayOfYear()==  57  ))+ Sum(pds,(DayOfYear()==  58  ))+ Sum(pds,(DayOfYear()==  59  ))+ Sum(pds,(DayOfYear()==  60  ))+ Sum(pds,(DayOfYear()==  61  ))+ Sum(pds,(DayOfYear()==  62  ))))))));   
                                                                                                             
                                                                                                             
Week10  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we10    =Sum(pds,(DayOfYear()== 62  ))+ Sum(pds,(DayOfYear()==  63  ))+ Sum(pds,(DayOfYear()==  64  ))+ Sum(pds,(DayOfYear()==  65  ))+ Sum(pds,(DayOfYear()==  66  ))+ Sum(pds,(DayOfYear()==  67  ))+ Sum(pds,(DayOfYear()==  68  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we10    =Sum(pds,(DayOfYear()== 61  ))+ Sum(pds,(DayOfYear()==  62  ))+ Sum(pds,(DayOfYear()==  63  ))+ Sum(pds,(DayOfYear()==  64  ))+ Sum(pds,(DayOfYear()==  65  ))+ Sum(pds,(DayOfYear()==  66  ))+ Sum(pds,(DayOfYear()==  67  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we10    =Sum(pds,(DayOfYear()== 60  ))+ Sum(pds,(DayOfYear()==  61  ))+ Sum(pds,(DayOfYear()==  62  ))+ Sum(pds,(DayOfYear()==  63  ))+ Sum(pds,(DayOfYear()==  64  ))+ Sum(pds,(DayOfYear()==  65  ))+ Sum(pds,(DayOfYear()==  66  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we10    =Sum(pds,(DayOfYear()== 59  ))+ Sum(pds,(DayOfYear()==  60  ))+ Sum(pds,(DayOfYear()==  61  ))+ Sum(pds,(DayOfYear()==  62  ))+ Sum(pds,(DayOfYear()==  63  ))+ Sum(pds,(DayOfYear()==  64  ))+ Sum(pds,(DayOfYear()==  65  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we10    =Sum(pds,(DayOfYear()== 58  ))+ Sum(pds,(DayOfYear()==  59  ))+ Sum(pds,(DayOfYear()==  60  ))+ Sum(pds,(DayOfYear()==  61  ))+ Sum(pds,(DayOfYear()==  62  ))+ Sum(pds,(DayOfYear()==  63  ))+ Sum(pds,(DayOfYear()==  64  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we10    =Sum(pds,(DayOfYear()== 64  ))+ Sum(pds,(DayOfYear()==  65  ))+ Sum(pds,(DayOfYear()==  66  ))+ Sum(pds,(DayOfYear()==  67  ))+ Sum(pds,(DayOfYear()==  68  ))+ Sum(pds,(DayOfYear()==  69  ))+ Sum(pds,(DayOfYear()==  70  )), 
                    we10    =Sum(pds,(DayOfYear()== 63  ))+ Sum(pds,(DayOfYear()==  64  ))+ Sum(pds,(DayOfYear()==  65  ))+ Sum(pds,(DayOfYear()==  66  ))+ Sum(pds,(DayOfYear()==  67  ))+ Sum(pds,(DayOfYear()==  68  ))+ Sum(pds,(DayOfYear()==  69  ))))))));   
                                                                                                             
                                                                                                             
Week11  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we11    =Sum(pds,(DayOfYear()== 69  ))+ Sum(pds,(DayOfYear()==  70  ))+ Sum(pds,(DayOfYear()==  71  ))+ Sum(pds,(DayOfYear()==  72  ))+ Sum(pds,(DayOfYear()==  73  ))+ Sum(pds,(DayOfYear()==  74  ))+ Sum(pds,(DayOfYear()==  75  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we11    =Sum(pds,(DayOfYear()== 68  ))+ Sum(pds,(DayOfYear()==  69  ))+ Sum(pds,(DayOfYear()==  70  ))+ Sum(pds,(DayOfYear()==  71  ))+ Sum(pds,(DayOfYear()==  72  ))+ Sum(pds,(DayOfYear()==  73  ))+ Sum(pds,(DayOfYear()==  74  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we11    =Sum(pds,(DayOfYear()== 67  ))+ Sum(pds,(DayOfYear()==  68  ))+ Sum(pds,(DayOfYear()==  69  ))+ Sum(pds,(DayOfYear()==  70  ))+ Sum(pds,(DayOfYear()==  71  ))+ Sum(pds,(DayOfYear()==  72  ))+ Sum(pds,(DayOfYear()==  73  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we11    =Sum(pds,(DayOfYear()== 66  ))+ Sum(pds,(DayOfYear()==  67  ))+ Sum(pds,(DayOfYear()==  68  ))+ Sum(pds,(DayOfYear()==  69  ))+ Sum(pds,(DayOfYear()==  70  ))+ Sum(pds,(DayOfYear()==  71  ))+ Sum(pds,(DayOfYear()==  72  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we11    =Sum(pds,(DayOfYear()== 65  ))+ Sum(pds,(DayOfYear()==  66  ))+ Sum(pds,(DayOfYear()==  67  ))+ Sum(pds,(DayOfYear()==  68  ))+ Sum(pds,(DayOfYear()==  69  ))+ Sum(pds,(DayOfYear()==  70  ))+ Sum(pds,(DayOfYear()==  71  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we11    =Sum(pds,(DayOfYear()== 71  ))+ Sum(pds,(DayOfYear()==  72  ))+ Sum(pds,(DayOfYear()==  73  ))+ Sum(pds,(DayOfYear()==  74  ))+ Sum(pds,(DayOfYear()==  75  ))+ Sum(pds,(DayOfYear()==  76  ))+ Sum(pds,(DayOfYear()==  77  )), 
                    we11    =Sum(pds,(DayOfYear()== 70  ))+ Sum(pds,(DayOfYear()==  71  ))+ Sum(pds,(DayOfYear()==  72  ))+ Sum(pds,(DayOfYear()==  73  ))+ Sum(pds,(DayOfYear()==  74  ))+ Sum(pds,(DayOfYear()==  75  ))+ Sum(pds,(DayOfYear()==  76  ))))))));   
                                                                                                             
                                                                                                             
Week12  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we12    =Sum(pds,(DayOfYear()== 76  ))+ Sum(pds,(DayOfYear()==  77  ))+ Sum(pds,(DayOfYear()==  78  ))+ Sum(pds,(DayOfYear()==  79  ))+ Sum(pds,(DayOfYear()==  80  ))+ Sum(pds,(DayOfYear()==  81  ))+ Sum(pds,(DayOfYear()==  82  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we12    =Sum(pds,(DayOfYear()== 75  ))+ Sum(pds,(DayOfYear()==  76  ))+ Sum(pds,(DayOfYear()==  77  ))+ Sum(pds,(DayOfYear()==  78  ))+ Sum(pds,(DayOfYear()==  79  ))+ Sum(pds,(DayOfYear()==  80  ))+ Sum(pds,(DayOfYear()==  81  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we12    =Sum(pds,(DayOfYear()== 74  ))+ Sum(pds,(DayOfYear()==  75  ))+ Sum(pds,(DayOfYear()==  76  ))+ Sum(pds,(DayOfYear()==  77  ))+ Sum(pds,(DayOfYear()==  78  ))+ Sum(pds,(DayOfYear()==  79  ))+ Sum(pds,(DayOfYear()==  80  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we12    =Sum(pds,(DayOfYear()== 73  ))+ Sum(pds,(DayOfYear()==  74  ))+ Sum(pds,(DayOfYear()==  75  ))+ Sum(pds,(DayOfYear()==  76  ))+ Sum(pds,(DayOfYear()==  77  ))+ Sum(pds,(DayOfYear()==  78  ))+ Sum(pds,(DayOfYear()==  79  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we12    =Sum(pds,(DayOfYear()== 72  ))+ Sum(pds,(DayOfYear()==  73  ))+ Sum(pds,(DayOfYear()==  74  ))+ Sum(pds,(DayOfYear()==  75  ))+ Sum(pds,(DayOfYear()==  76  ))+ Sum(pds,(DayOfYear()==  77  ))+ Sum(pds,(DayOfYear()==  78  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we12    =Sum(pds,(DayOfYear()== 78  ))+ Sum(pds,(DayOfYear()==  79  ))+ Sum(pds,(DayOfYear()==  80  ))+ Sum(pds,(DayOfYear()==  81  ))+ Sum(pds,(DayOfYear()==  82  ))+ Sum(pds,(DayOfYear()==  83  ))+ Sum(pds,(DayOfYear()==  84  )), 
                    we12    =Sum(pds,(DayOfYear()== 77  ))+ Sum(pds,(DayOfYear()==  78  ))+ Sum(pds,(DayOfYear()==  79  ))+ Sum(pds,(DayOfYear()==  80  ))+ Sum(pds,(DayOfYear()==  81  ))+ Sum(pds,(DayOfYear()==  82  ))+ Sum(pds,(DayOfYear()==  83  ))))))));   
                                                                                                             
                                                                                                             
Week13  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we13    =Sum(pds,(DayOfYear()== 83  ))+ Sum(pds,(DayOfYear()==  84  ))+ Sum(pds,(DayOfYear()==  85  ))+ Sum(pds,(DayOfYear()==  86  ))+ Sum(pds,(DayOfYear()==  87  ))+ Sum(pds,(DayOfYear()==  88  ))+ Sum(pds,(DayOfYear()==  89  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we13    =Sum(pds,(DayOfYear()== 82  ))+ Sum(pds,(DayOfYear()==  83  ))+ Sum(pds,(DayOfYear()==  84  ))+ Sum(pds,(DayOfYear()==  85  ))+ Sum(pds,(DayOfYear()==  86  ))+ Sum(pds,(DayOfYear()==  87  ))+ Sum(pds,(DayOfYear()==  88  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we13    =Sum(pds,(DayOfYear()== 81  ))+ Sum(pds,(DayOfYear()==  82  ))+ Sum(pds,(DayOfYear()==  83  ))+ Sum(pds,(DayOfYear()==  84  ))+ Sum(pds,(DayOfYear()==  85  ))+ Sum(pds,(DayOfYear()==  86  ))+ Sum(pds,(DayOfYear()==  87  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we13    =Sum(pds,(DayOfYear()== 80  ))+ Sum(pds,(DayOfYear()==  81  ))+ Sum(pds,(DayOfYear()==  82  ))+ Sum(pds,(DayOfYear()==  83  ))+ Sum(pds,(DayOfYear()==  84  ))+ Sum(pds,(DayOfYear()==  85  ))+ Sum(pds,(DayOfYear()==  86  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we13    =Sum(pds,(DayOfYear()== 79  ))+ Sum(pds,(DayOfYear()==  80  ))+ Sum(pds,(DayOfYear()==  81  ))+ Sum(pds,(DayOfYear()==  82  ))+ Sum(pds,(DayOfYear()==  83  ))+ Sum(pds,(DayOfYear()==  84  ))+ Sum(pds,(DayOfYear()==  85  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we13    =Sum(pds,(DayOfYear()== 85  ))+ Sum(pds,(DayOfYear()==  86  ))+ Sum(pds,(DayOfYear()==  87  ))+ Sum(pds,(DayOfYear()==  88  ))+ Sum(pds,(DayOfYear()==  89  ))+ Sum(pds,(DayOfYear()==  90  ))+ Sum(pds,(DayOfYear()==  91  )), 
                    we13    =Sum(pds,(DayOfYear()== 84  ))+ Sum(pds,(DayOfYear()==  85  ))+ Sum(pds,(DayOfYear()==  86  ))+ Sum(pds,(DayOfYear()==  87  ))+ Sum(pds,(DayOfYear()==  88  ))+ Sum(pds,(DayOfYear()==  89  ))+ Sum(pds,(DayOfYear()==  90  ))))))));   
                                                                                                             
                                                                                                             
Week14  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we14    =Sum(pds,(DayOfYear()== 90  ))+ Sum(pds,(DayOfYear()==  91  ))+ Sum(pds,(DayOfYear()==  92  ))+ Sum(pds,(DayOfYear()==  93  ))+ Sum(pds,(DayOfYear()==  94  ))+ Sum(pds,(DayOfYear()==  95  ))+ Sum(pds,(DayOfYear()==  96  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we14    =Sum(pds,(DayOfYear()== 89  ))+ Sum(pds,(DayOfYear()==  90  ))+ Sum(pds,(DayOfYear()==  91  ))+ Sum(pds,(DayOfYear()==  92  ))+ Sum(pds,(DayOfYear()==  93  ))+ Sum(pds,(DayOfYear()==  94  ))+ Sum(pds,(DayOfYear()==  95  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we14    =Sum(pds,(DayOfYear()== 88  ))+ Sum(pds,(DayOfYear()==  89  ))+ Sum(pds,(DayOfYear()==  90  ))+ Sum(pds,(DayOfYear()==  91  ))+ Sum(pds,(DayOfYear()==  92  ))+ Sum(pds,(DayOfYear()==  93  ))+ Sum(pds,(DayOfYear()==  94  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we14    =Sum(pds,(DayOfYear()== 87  ))+ Sum(pds,(DayOfYear()==  88  ))+ Sum(pds,(DayOfYear()==  89  ))+ Sum(pds,(DayOfYear()==  90  ))+ Sum(pds,(DayOfYear()==  91  ))+ Sum(pds,(DayOfYear()==  92  ))+ Sum(pds,(DayOfYear()==  93  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we14    =Sum(pds,(DayOfYear()== 86  ))+ Sum(pds,(DayOfYear()==  87  ))+ Sum(pds,(DayOfYear()==  88  ))+ Sum(pds,(DayOfYear()==  89  ))+ Sum(pds,(DayOfYear()==  90  ))+ Sum(pds,(DayOfYear()==  91  ))+ Sum(pds,(DayOfYear()==  92  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we14    =Sum(pds,(DayOfYear()== 92  ))+ Sum(pds,(DayOfYear()==  93  ))+ Sum(pds,(DayOfYear()==  94  ))+ Sum(pds,(DayOfYear()==  95  ))+ Sum(pds,(DayOfYear()==  96  ))+ Sum(pds,(DayOfYear()==  97  ))+ Sum(pds,(DayOfYear()==  98  )), 
                    we14    =Sum(pds,(DayOfYear()== 91  ))+ Sum(pds,(DayOfYear()==  92  ))+ Sum(pds,(DayOfYear()==  93  ))+ Sum(pds,(DayOfYear()==  94  ))+ Sum(pds,(DayOfYear()==  95  ))+ Sum(pds,(DayOfYear()==  96  ))+ Sum(pds,(DayOfYear()==  97  ))))))));   
                                                                                                             
                                                                                                             
Week15  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we15    =Sum(pds,(DayOfYear()== 97  ))+ Sum(pds,(DayOfYear()==  98  ))+ Sum(pds,(DayOfYear()==  99  ))+ Sum(pds,(DayOfYear()==  100 ))+ Sum(pds,(DayOfYear()==  101 ))+ Sum(pds,(DayOfYear()==  102 ))+ Sum(pds,(DayOfYear()==  103 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we15    =Sum(pds,(DayOfYear()== 96  ))+ Sum(pds,(DayOfYear()==  97  ))+ Sum(pds,(DayOfYear()==  98  ))+ Sum(pds,(DayOfYear()==  99  ))+ Sum(pds,(DayOfYear()==  100 ))+ Sum(pds,(DayOfYear()==  101 ))+ Sum(pds,(DayOfYear()==  102 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we15    =Sum(pds,(DayOfYear()== 95  ))+ Sum(pds,(DayOfYear()==  96  ))+ Sum(pds,(DayOfYear()==  97  ))+ Sum(pds,(DayOfYear()==  98  ))+ Sum(pds,(DayOfYear()==  99  ))+ Sum(pds,(DayOfYear()==  100 ))+ Sum(pds,(DayOfYear()==  101 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we15    =Sum(pds,(DayOfYear()== 94  ))+ Sum(pds,(DayOfYear()==  95  ))+ Sum(pds,(DayOfYear()==  96  ))+ Sum(pds,(DayOfYear()==  97  ))+ Sum(pds,(DayOfYear()==  98  ))+ Sum(pds,(DayOfYear()==  99  ))+ Sum(pds,(DayOfYear()==  100 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we15    =Sum(pds,(DayOfYear()== 93  ))+ Sum(pds,(DayOfYear()==  94  ))+ Sum(pds,(DayOfYear()==  95  ))+ Sum(pds,(DayOfYear()==  96  ))+ Sum(pds,(DayOfYear()==  97  ))+ Sum(pds,(DayOfYear()==  98  ))+ Sum(pds,(DayOfYear()==  99  )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we15    =Sum(pds,(DayOfYear()== 99  ))+ Sum(pds,(DayOfYear()==  100 ))+ Sum(pds,(DayOfYear()==  101 ))+ Sum(pds,(DayOfYear()==  102 ))+ Sum(pds,(DayOfYear()==  103 ))+ Sum(pds,(DayOfYear()==  104 ))+ Sum(pds,(DayOfYear()==  105 )), 
                    we15    =Sum(pds,(DayOfYear()== 98  ))+ Sum(pds,(DayOfYear()==  99  ))+ Sum(pds,(DayOfYear()==  100 ))+ Sum(pds,(DayOfYear()==  101 ))+ Sum(pds,(DayOfYear()==  102 ))+ Sum(pds,(DayOfYear()==  103 ))+ Sum(pds,(DayOfYear()==  104 ))))))));   
                                                                                                             
                                                                                                             
Week16  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we16    =Sum(pds,(DayOfYear()== 104 ))+ Sum(pds,(DayOfYear()==  105 ))+ Sum(pds,(DayOfYear()==  106 ))+ Sum(pds,(DayOfYear()==  107 ))+ Sum(pds,(DayOfYear()==  108 ))+ Sum(pds,(DayOfYear()==  109 ))+ Sum(pds,(DayOfYear()==  110 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we16    =Sum(pds,(DayOfYear()== 103 ))+ Sum(pds,(DayOfYear()==  104 ))+ Sum(pds,(DayOfYear()==  105 ))+ Sum(pds,(DayOfYear()==  106 ))+ Sum(pds,(DayOfYear()==  107 ))+ Sum(pds,(DayOfYear()==  108 ))+ Sum(pds,(DayOfYear()==  109 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we16    =Sum(pds,(DayOfYear()== 102 ))+ Sum(pds,(DayOfYear()==  103 ))+ Sum(pds,(DayOfYear()==  104 ))+ Sum(pds,(DayOfYear()==  105 ))+ Sum(pds,(DayOfYear()==  106 ))+ Sum(pds,(DayOfYear()==  107 ))+ Sum(pds,(DayOfYear()==  108 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we16    =Sum(pds,(DayOfYear()== 101 ))+ Sum(pds,(DayOfYear()==  102 ))+ Sum(pds,(DayOfYear()==  103 ))+ Sum(pds,(DayOfYear()==  104 ))+ Sum(pds,(DayOfYear()==  105 ))+ Sum(pds,(DayOfYear()==  106 ))+ Sum(pds,(DayOfYear()==  107 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we16    =Sum(pds,(DayOfYear()== 100 ))+ Sum(pds,(DayOfYear()==  101 ))+ Sum(pds,(DayOfYear()==  102 ))+ Sum(pds,(DayOfYear()==  103 ))+ Sum(pds,(DayOfYear()==  104 ))+ Sum(pds,(DayOfYear()==  105 ))+ Sum(pds,(DayOfYear()==  106 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we16    =Sum(pds,(DayOfYear()== 106 ))+ Sum(pds,(DayOfYear()==  107 ))+ Sum(pds,(DayOfYear()==  108 ))+ Sum(pds,(DayOfYear()==  109 ))+ Sum(pds,(DayOfYear()==  110 ))+ Sum(pds,(DayOfYear()==  111 ))+ Sum(pds,(DayOfYear()==  112 )), 
                    we16    =Sum(pds,(DayOfYear()== 105 ))+ Sum(pds,(DayOfYear()==  106 ))+ Sum(pds,(DayOfYear()==  107 ))+ Sum(pds,(DayOfYear()==  108 ))+ Sum(pds,(DayOfYear()==  109 ))+ Sum(pds,(DayOfYear()==  110 ))+ Sum(pds,(DayOfYear()==  111 ))))))));   
                                                                                                             
                                                                                                             
Week17  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we17    =Sum(pds,(DayOfYear()== 111 ))+ Sum(pds,(DayOfYear()==  112 ))+ Sum(pds,(DayOfYear()==  113 ))+ Sum(pds,(DayOfYear()==  114 ))+ Sum(pds,(DayOfYear()==  115 ))+ Sum(pds,(DayOfYear()==  116 ))+ Sum(pds,(DayOfYear()==  117 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we17    =Sum(pds,(DayOfYear()== 110 ))+ Sum(pds,(DayOfYear()==  111 ))+ Sum(pds,(DayOfYear()==  112 ))+ Sum(pds,(DayOfYear()==  113 ))+ Sum(pds,(DayOfYear()==  114 ))+ Sum(pds,(DayOfYear()==  115 ))+ Sum(pds,(DayOfYear()==  116 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we17    =Sum(pds,(DayOfYear()== 109 ))+ Sum(pds,(DayOfYear()==  110 ))+ Sum(pds,(DayOfYear()==  111 ))+ Sum(pds,(DayOfYear()==  112 ))+ Sum(pds,(DayOfYear()==  113 ))+ Sum(pds,(DayOfYear()==  114 ))+ Sum(pds,(DayOfYear()==  115 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we17    =Sum(pds,(DayOfYear()== 108 ))+ Sum(pds,(DayOfYear()==  109 ))+ Sum(pds,(DayOfYear()==  110 ))+ Sum(pds,(DayOfYear()==  111 ))+ Sum(pds,(DayOfYear()==  112 ))+ Sum(pds,(DayOfYear()==  113 ))+ Sum(pds,(DayOfYear()==  114 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we17    =Sum(pds,(DayOfYear()== 107 ))+ Sum(pds,(DayOfYear()==  108 ))+ Sum(pds,(DayOfYear()==  109 ))+ Sum(pds,(DayOfYear()==  110 ))+ Sum(pds,(DayOfYear()==  111 ))+ Sum(pds,(DayOfYear()==  112 ))+ Sum(pds,(DayOfYear()==  113 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we17    =Sum(pds,(DayOfYear()== 113 ))+ Sum(pds,(DayOfYear()==  114 ))+ Sum(pds,(DayOfYear()==  115 ))+ Sum(pds,(DayOfYear()==  116 ))+ Sum(pds,(DayOfYear()==  117 ))+ Sum(pds,(DayOfYear()==  118 ))+ Sum(pds,(DayOfYear()==  119 )), 
                    we17    =Sum(pds,(DayOfYear()== 112 ))+ Sum(pds,(DayOfYear()==  113 ))+ Sum(pds,(DayOfYear()==  114 ))+ Sum(pds,(DayOfYear()==  115 ))+ Sum(pds,(DayOfYear()==  116 ))+ Sum(pds,(DayOfYear()==  117 ))+ Sum(pds,(DayOfYear()==  118 ))))))));   
                                                                                                             
                                                                                                             
Week18  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we18    =Sum(pds,(DayOfYear()== 118 ))+ Sum(pds,(DayOfYear()==  119 ))+ Sum(pds,(DayOfYear()==  120 ))+ Sum(pds,(DayOfYear()==  121 ))+ Sum(pds,(DayOfYear()==  122 ))+ Sum(pds,(DayOfYear()==  123 ))+ Sum(pds,(DayOfYear()==  124 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we18    =Sum(pds,(DayOfYear()== 117 ))+ Sum(pds,(DayOfYear()==  118 ))+ Sum(pds,(DayOfYear()==  119 ))+ Sum(pds,(DayOfYear()==  120 ))+ Sum(pds,(DayOfYear()==  121 ))+ Sum(pds,(DayOfYear()==  122 ))+ Sum(pds,(DayOfYear()==  123 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we18    =Sum(pds,(DayOfYear()== 116 ))+ Sum(pds,(DayOfYear()==  117 ))+ Sum(pds,(DayOfYear()==  118 ))+ Sum(pds,(DayOfYear()==  119 ))+ Sum(pds,(DayOfYear()==  120 ))+ Sum(pds,(DayOfYear()==  121 ))+ Sum(pds,(DayOfYear()==  122 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we18    =Sum(pds,(DayOfYear()== 115 ))+ Sum(pds,(DayOfYear()==  116 ))+ Sum(pds,(DayOfYear()==  117 ))+ Sum(pds,(DayOfYear()==  118 ))+ Sum(pds,(DayOfYear()==  119 ))+ Sum(pds,(DayOfYear()==  120 ))+ Sum(pds,(DayOfYear()==  121 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we18    =Sum(pds,(DayOfYear()== 114 ))+ Sum(pds,(DayOfYear()==  115 ))+ Sum(pds,(DayOfYear()==  116 ))+ Sum(pds,(DayOfYear()==  117 ))+ Sum(pds,(DayOfYear()==  118 ))+ Sum(pds,(DayOfYear()==  119 ))+ Sum(pds,(DayOfYear()==  120 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we18    =Sum(pds,(DayOfYear()== 120 ))+ Sum(pds,(DayOfYear()==  121 ))+ Sum(pds,(DayOfYear()==  122 ))+ Sum(pds,(DayOfYear()==  123 ))+ Sum(pds,(DayOfYear()==  124 ))+ Sum(pds,(DayOfYear()==  125 ))+ Sum(pds,(DayOfYear()==  126 )), 
                    we18    =Sum(pds,(DayOfYear()== 119 ))+ Sum(pds,(DayOfYear()==  120 ))+ Sum(pds,(DayOfYear()==  121 ))+ Sum(pds,(DayOfYear()==  122 ))+ Sum(pds,(DayOfYear()==  123 ))+ Sum(pds,(DayOfYear()==  124 ))+ Sum(pds,(DayOfYear()==  125 ))))))));   
                                                                                                             
                                                                                                             
Week19  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we19    =Sum(pds,(DayOfYear()== 125 ))+ Sum(pds,(DayOfYear()==  126 ))+ Sum(pds,(DayOfYear()==  127 ))+ Sum(pds,(DayOfYear()==  128 ))+ Sum(pds,(DayOfYear()==  129 ))+ Sum(pds,(DayOfYear()==  130 ))+ Sum(pds,(DayOfYear()==  131 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we19    =Sum(pds,(DayOfYear()== 124 ))+ Sum(pds,(DayOfYear()==  125 ))+ Sum(pds,(DayOfYear()==  126 ))+ Sum(pds,(DayOfYear()==  127 ))+ Sum(pds,(DayOfYear()==  128 ))+ Sum(pds,(DayOfYear()==  129 ))+ Sum(pds,(DayOfYear()==  130 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we19    =Sum(pds,(DayOfYear()== 123 ))+ Sum(pds,(DayOfYear()==  124 ))+ Sum(pds,(DayOfYear()==  125 ))+ Sum(pds,(DayOfYear()==  126 ))+ Sum(pds,(DayOfYear()==  127 ))+ Sum(pds,(DayOfYear()==  128 ))+ Sum(pds,(DayOfYear()==  129 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we19    =Sum(pds,(DayOfYear()== 122 ))+ Sum(pds,(DayOfYear()==  123 ))+ Sum(pds,(DayOfYear()==  124 ))+ Sum(pds,(DayOfYear()==  125 ))+ Sum(pds,(DayOfYear()==  126 ))+ Sum(pds,(DayOfYear()==  127 ))+ Sum(pds,(DayOfYear()==  128 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we19    =Sum(pds,(DayOfYear()== 121 ))+ Sum(pds,(DayOfYear()==  122 ))+ Sum(pds,(DayOfYear()==  123 ))+ Sum(pds,(DayOfYear()==  124 ))+ Sum(pds,(DayOfYear()==  125 ))+ Sum(pds,(DayOfYear()==  126 ))+ Sum(pds,(DayOfYear()==  127 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we19    =Sum(pds,(DayOfYear()== 127 ))+ Sum(pds,(DayOfYear()==  128 ))+ Sum(pds,(DayOfYear()==  129 ))+ Sum(pds,(DayOfYear()==  130 ))+ Sum(pds,(DayOfYear()==  131 ))+ Sum(pds,(DayOfYear()==  132 ))+ Sum(pds,(DayOfYear()==  133 )), 
                    we19    =Sum(pds,(DayOfYear()== 126 ))+ Sum(pds,(DayOfYear()==  127 ))+ Sum(pds,(DayOfYear()==  128 ))+ Sum(pds,(DayOfYear()==  129 ))+ Sum(pds,(DayOfYear()==  130 ))+ Sum(pds,(DayOfYear()==  131 ))+ Sum(pds,(DayOfYear()==  132 ))))))));   
                                                                                                             
                                                                                                             
Week20  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we20    =Sum(pds,(DayOfYear()== 132 ))+ Sum(pds,(DayOfYear()==  133 ))+ Sum(pds,(DayOfYear()==  134 ))+ Sum(pds,(DayOfYear()==  135 ))+ Sum(pds,(DayOfYear()==  136 ))+ Sum(pds,(DayOfYear()==  137 ))+ Sum(pds,(DayOfYear()==  138 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we20    =Sum(pds,(DayOfYear()== 131 ))+ Sum(pds,(DayOfYear()==  132 ))+ Sum(pds,(DayOfYear()==  133 ))+ Sum(pds,(DayOfYear()==  134 ))+ Sum(pds,(DayOfYear()==  135 ))+ Sum(pds,(DayOfYear()==  136 ))+ Sum(pds,(DayOfYear()==  137 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we20    =Sum(pds,(DayOfYear()== 130 ))+ Sum(pds,(DayOfYear()==  131 ))+ Sum(pds,(DayOfYear()==  132 ))+ Sum(pds,(DayOfYear()==  133 ))+ Sum(pds,(DayOfYear()==  134 ))+ Sum(pds,(DayOfYear()==  135 ))+ Sum(pds,(DayOfYear()==  136 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we20    =Sum(pds,(DayOfYear()== 129 ))+ Sum(pds,(DayOfYear()==  130 ))+ Sum(pds,(DayOfYear()==  131 ))+ Sum(pds,(DayOfYear()==  132 ))+ Sum(pds,(DayOfYear()==  133 ))+ Sum(pds,(DayOfYear()==  134 ))+ Sum(pds,(DayOfYear()==  135 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we20    =Sum(pds,(DayOfYear()== 128 ))+ Sum(pds,(DayOfYear()==  129 ))+ Sum(pds,(DayOfYear()==  130 ))+ Sum(pds,(DayOfYear()==  131 ))+ Sum(pds,(DayOfYear()==  132 ))+ Sum(pds,(DayOfYear()==  133 ))+ Sum(pds,(DayOfYear()==  134 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we20    =Sum(pds,(DayOfYear()== 134 ))+ Sum(pds,(DayOfYear()==  135 ))+ Sum(pds,(DayOfYear()==  136 ))+ Sum(pds,(DayOfYear()==  137 ))+ Sum(pds,(DayOfYear()==  138 ))+ Sum(pds,(DayOfYear()==  139 ))+ Sum(pds,(DayOfYear()==  140 )), 
                    we20    =Sum(pds,(DayOfYear()== 133 ))+ Sum(pds,(DayOfYear()==  134 ))+ Sum(pds,(DayOfYear()==  135 ))+ Sum(pds,(DayOfYear()==  136 ))+ Sum(pds,(DayOfYear()==  137 ))+ Sum(pds,(DayOfYear()==  138 ))+ Sum(pds,(DayOfYear()==  139 ))))))));   
                                                                                                             
                                                                                                             
Week21  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we21    =Sum(pds,(DayOfYear()== 139 ))+ Sum(pds,(DayOfYear()==  140 ))+ Sum(pds,(DayOfYear()==  141 ))+ Sum(pds,(DayOfYear()==  142 ))+ Sum(pds,(DayOfYear()==  143 ))+ Sum(pds,(DayOfYear()==  144 ))+ Sum(pds,(DayOfYear()==  145 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we21    =Sum(pds,(DayOfYear()== 138 ))+ Sum(pds,(DayOfYear()==  139 ))+ Sum(pds,(DayOfYear()==  140 ))+ Sum(pds,(DayOfYear()==  141 ))+ Sum(pds,(DayOfYear()==  142 ))+ Sum(pds,(DayOfYear()==  143 ))+ Sum(pds,(DayOfYear()==  144 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we21    =Sum(pds,(DayOfYear()== 137 ))+ Sum(pds,(DayOfYear()==  138 ))+ Sum(pds,(DayOfYear()==  139 ))+ Sum(pds,(DayOfYear()==  140 ))+ Sum(pds,(DayOfYear()==  141 ))+ Sum(pds,(DayOfYear()==  142 ))+ Sum(pds,(DayOfYear()==  143 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we21    =Sum(pds,(DayOfYear()== 136 ))+ Sum(pds,(DayOfYear()==  137 ))+ Sum(pds,(DayOfYear()==  138 ))+ Sum(pds,(DayOfYear()==  139 ))+ Sum(pds,(DayOfYear()==  140 ))+ Sum(pds,(DayOfYear()==  141 ))+ Sum(pds,(DayOfYear()==  142 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we21    =Sum(pds,(DayOfYear()== 135 ))+ Sum(pds,(DayOfYear()==  136 ))+ Sum(pds,(DayOfYear()==  137 ))+ Sum(pds,(DayOfYear()==  138 ))+ Sum(pds,(DayOfYear()==  139 ))+ Sum(pds,(DayOfYear()==  140 ))+ Sum(pds,(DayOfYear()==  141 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we21    =Sum(pds,(DayOfYear()== 141 ))+ Sum(pds,(DayOfYear()==  142 ))+ Sum(pds,(DayOfYear()==  143 ))+ Sum(pds,(DayOfYear()==  144 ))+ Sum(pds,(DayOfYear()==  145 ))+ Sum(pds,(DayOfYear()==  146 ))+ Sum(pds,(DayOfYear()==  147 )), 
                    we21    =Sum(pds,(DayOfYear()== 140 ))+ Sum(pds,(DayOfYear()==  141 ))+ Sum(pds,(DayOfYear()==  142 ))+ Sum(pds,(DayOfYear()==  143 ))+ Sum(pds,(DayOfYear()==  144 ))+ Sum(pds,(DayOfYear()==  145 ))+ Sum(pds,(DayOfYear()==  146 ))))))));   
                                                                                                             
                                                                                                             
Week22  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we22    =Sum(pds,(DayOfYear()== 146 ))+ Sum(pds,(DayOfYear()==  147 ))+ Sum(pds,(DayOfYear()==  148 ))+ Sum(pds,(DayOfYear()==  149 ))+ Sum(pds,(DayOfYear()==  150 ))+ Sum(pds,(DayOfYear()==  151 ))+ Sum(pds,(DayOfYear()==  152 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we22    =Sum(pds,(DayOfYear()== 145 ))+ Sum(pds,(DayOfYear()==  146 ))+ Sum(pds,(DayOfYear()==  147 ))+ Sum(pds,(DayOfYear()==  148 ))+ Sum(pds,(DayOfYear()==  149 ))+ Sum(pds,(DayOfYear()==  150 ))+ Sum(pds,(DayOfYear()==  151 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we22    =Sum(pds,(DayOfYear()== 144 ))+ Sum(pds,(DayOfYear()==  145 ))+ Sum(pds,(DayOfYear()==  146 ))+ Sum(pds,(DayOfYear()==  147 ))+ Sum(pds,(DayOfYear()==  148 ))+ Sum(pds,(DayOfYear()==  149 ))+ Sum(pds,(DayOfYear()==  150 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we22    =Sum(pds,(DayOfYear()== 143 ))+ Sum(pds,(DayOfYear()==  144 ))+ Sum(pds,(DayOfYear()==  145 ))+ Sum(pds,(DayOfYear()==  146 ))+ Sum(pds,(DayOfYear()==  147 ))+ Sum(pds,(DayOfYear()==  148 ))+ Sum(pds,(DayOfYear()==  149 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we22    =Sum(pds,(DayOfYear()== 142 ))+ Sum(pds,(DayOfYear()==  143 ))+ Sum(pds,(DayOfYear()==  144 ))+ Sum(pds,(DayOfYear()==  145 ))+ Sum(pds,(DayOfYear()==  146 ))+ Sum(pds,(DayOfYear()==  147 ))+ Sum(pds,(DayOfYear()==  148 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we22    =Sum(pds,(DayOfYear()== 148 ))+ Sum(pds,(DayOfYear()==  149 ))+ Sum(pds,(DayOfYear()==  150 ))+ Sum(pds,(DayOfYear()==  151 ))+ Sum(pds,(DayOfYear()==  152 ))+ Sum(pds,(DayOfYear()==  153 ))+ Sum(pds,(DayOfYear()==  154 )), 
                    we22    =Sum(pds,(DayOfYear()== 147 ))+ Sum(pds,(DayOfYear()==  148 ))+ Sum(pds,(DayOfYear()==  149 ))+ Sum(pds,(DayOfYear()==  150 ))+ Sum(pds,(DayOfYear()==  151 ))+ Sum(pds,(DayOfYear()==  152 ))+ Sum(pds,(DayOfYear()==  153 ))))))));   
                                                                                                             
                                                                                                             
Week23  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we23    =Sum(pds,(DayOfYear()== 153 ))+ Sum(pds,(DayOfYear()==  154 ))+ Sum(pds,(DayOfYear()==  155 ))+ Sum(pds,(DayOfYear()==  156 ))+ Sum(pds,(DayOfYear()==  157 ))+ Sum(pds,(DayOfYear()==  158 ))+ Sum(pds,(DayOfYear()==  159 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we23    =Sum(pds,(DayOfYear()== 152 ))+ Sum(pds,(DayOfYear()==  153 ))+ Sum(pds,(DayOfYear()==  154 ))+ Sum(pds,(DayOfYear()==  155 ))+ Sum(pds,(DayOfYear()==  156 ))+ Sum(pds,(DayOfYear()==  157 ))+ Sum(pds,(DayOfYear()==  158 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we23    =Sum(pds,(DayOfYear()== 151 ))+ Sum(pds,(DayOfYear()==  152 ))+ Sum(pds,(DayOfYear()==  153 ))+ Sum(pds,(DayOfYear()==  154 ))+ Sum(pds,(DayOfYear()==  155 ))+ Sum(pds,(DayOfYear()==  156 ))+ Sum(pds,(DayOfYear()==  157 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we23    =Sum(pds,(DayOfYear()== 150 ))+ Sum(pds,(DayOfYear()==  151 ))+ Sum(pds,(DayOfYear()==  152 ))+ Sum(pds,(DayOfYear()==  153 ))+ Sum(pds,(DayOfYear()==  154 ))+ Sum(pds,(DayOfYear()==  155 ))+ Sum(pds,(DayOfYear()==  156 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we23    =Sum(pds,(DayOfYear()== 149 ))+ Sum(pds,(DayOfYear()==  150 ))+ Sum(pds,(DayOfYear()==  151 ))+ Sum(pds,(DayOfYear()==  152 ))+ Sum(pds,(DayOfYear()==  153 ))+ Sum(pds,(DayOfYear()==  154 ))+ Sum(pds,(DayOfYear()==  155 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we23    =Sum(pds,(DayOfYear()== 155 ))+ Sum(pds,(DayOfYear()==  156 ))+ Sum(pds,(DayOfYear()==  157 ))+ Sum(pds,(DayOfYear()==  158 ))+ Sum(pds,(DayOfYear()==  159 ))+ Sum(pds,(DayOfYear()==  160 ))+ Sum(pds,(DayOfYear()==  161 )), 
                    we23    =Sum(pds,(DayOfYear()== 154 ))+ Sum(pds,(DayOfYear()==  155 ))+ Sum(pds,(DayOfYear()==  156 ))+ Sum(pds,(DayOfYear()==  157 ))+ Sum(pds,(DayOfYear()==  158 ))+ Sum(pds,(DayOfYear()==  159 ))+ Sum(pds,(DayOfYear()==  160 ))))))));   
                                                                                                             
                                                                                                             
Week24  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we24    =Sum(pds,(DayOfYear()== 160 ))+ Sum(pds,(DayOfYear()==  161 ))+ Sum(pds,(DayOfYear()==  162 ))+ Sum(pds,(DayOfYear()==  163 ))+ Sum(pds,(DayOfYear()==  164 ))+ Sum(pds,(DayOfYear()==  165 ))+ Sum(pds,(DayOfYear()==  166 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we24    =Sum(pds,(DayOfYear()== 159 ))+ Sum(pds,(DayOfYear()==  160 ))+ Sum(pds,(DayOfYear()==  161 ))+ Sum(pds,(DayOfYear()==  162 ))+ Sum(pds,(DayOfYear()==  163 ))+ Sum(pds,(DayOfYear()==  164 ))+ Sum(pds,(DayOfYear()==  165 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we24    =Sum(pds,(DayOfYear()== 158 ))+ Sum(pds,(DayOfYear()==  159 ))+ Sum(pds,(DayOfYear()==  160 ))+ Sum(pds,(DayOfYear()==  161 ))+ Sum(pds,(DayOfYear()==  162 ))+ Sum(pds,(DayOfYear()==  163 ))+ Sum(pds,(DayOfYear()==  164 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we24    =Sum(pds,(DayOfYear()== 157 ))+ Sum(pds,(DayOfYear()==  158 ))+ Sum(pds,(DayOfYear()==  159 ))+ Sum(pds,(DayOfYear()==  160 ))+ Sum(pds,(DayOfYear()==  161 ))+ Sum(pds,(DayOfYear()==  162 ))+ Sum(pds,(DayOfYear()==  163 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we24    =Sum(pds,(DayOfYear()== 156 ))+ Sum(pds,(DayOfYear()==  157 ))+ Sum(pds,(DayOfYear()==  158 ))+ Sum(pds,(DayOfYear()==  159 ))+ Sum(pds,(DayOfYear()==  160 ))+ Sum(pds,(DayOfYear()==  161 ))+ Sum(pds,(DayOfYear()==  162 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we24    =Sum(pds,(DayOfYear()== 162 ))+ Sum(pds,(DayOfYear()==  163 ))+ Sum(pds,(DayOfYear()==  164 ))+ Sum(pds,(DayOfYear()==  165 ))+ Sum(pds,(DayOfYear()==  166 ))+ Sum(pds,(DayOfYear()==  167 ))+ Sum(pds,(DayOfYear()==  168 )), 
                    we24    =Sum(pds,(DayOfYear()== 161 ))+ Sum(pds,(DayOfYear()==  162 ))+ Sum(pds,(DayOfYear()==  163 ))+ Sum(pds,(DayOfYear()==  164 ))+ Sum(pds,(DayOfYear()==  165 ))+ Sum(pds,(DayOfYear()==  166 ))+ Sum(pds,(DayOfYear()==  167 ))))))));   
                                                                                                             
                                                                                                             
Week25  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we25    =Sum(pds,(DayOfYear()== 167 ))+ Sum(pds,(DayOfYear()==  168 ))+ Sum(pds,(DayOfYear()==  169 ))+ Sum(pds,(DayOfYear()==  170 ))+ Sum(pds,(DayOfYear()==  171 ))+ Sum(pds,(DayOfYear()==  172 ))+ Sum(pds,(DayOfYear()==  173 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we25    =Sum(pds,(DayOfYear()== 166 ))+ Sum(pds,(DayOfYear()==  167 ))+ Sum(pds,(DayOfYear()==  168 ))+ Sum(pds,(DayOfYear()==  169 ))+ Sum(pds,(DayOfYear()==  170 ))+ Sum(pds,(DayOfYear()==  171 ))+ Sum(pds,(DayOfYear()==  172 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we25    =Sum(pds,(DayOfYear()== 165 ))+ Sum(pds,(DayOfYear()==  166 ))+ Sum(pds,(DayOfYear()==  167 ))+ Sum(pds,(DayOfYear()==  168 ))+ Sum(pds,(DayOfYear()==  169 ))+ Sum(pds,(DayOfYear()==  170 ))+ Sum(pds,(DayOfYear()==  171 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we25    =Sum(pds,(DayOfYear()== 164 ))+ Sum(pds,(DayOfYear()==  165 ))+ Sum(pds,(DayOfYear()==  166 ))+ Sum(pds,(DayOfYear()==  167 ))+ Sum(pds,(DayOfYear()==  168 ))+ Sum(pds,(DayOfYear()==  169 ))+ Sum(pds,(DayOfYear()==  170 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we25    =Sum(pds,(DayOfYear()== 163 ))+ Sum(pds,(DayOfYear()==  164 ))+ Sum(pds,(DayOfYear()==  165 ))+ Sum(pds,(DayOfYear()==  166 ))+ Sum(pds,(DayOfYear()==  167 ))+ Sum(pds,(DayOfYear()==  168 ))+ Sum(pds,(DayOfYear()==  169 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we25    =Sum(pds,(DayOfYear()== 169 ))+ Sum(pds,(DayOfYear()==  170 ))+ Sum(pds,(DayOfYear()==  171 ))+ Sum(pds,(DayOfYear()==  172 ))+ Sum(pds,(DayOfYear()==  173 ))+ Sum(pds,(DayOfYear()==  174 ))+ Sum(pds,(DayOfYear()==  175 )), 
                    we25    =Sum(pds,(DayOfYear()== 168 ))+ Sum(pds,(DayOfYear()==  169 ))+ Sum(pds,(DayOfYear()==  170 ))+ Sum(pds,(DayOfYear()==  171 ))+ Sum(pds,(DayOfYear()==  172 ))+ Sum(pds,(DayOfYear()==  173 ))+ Sum(pds,(DayOfYear()==  174 ))))))));   
                                                                                                             
                                                                                                             
Week26  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we26    =Sum(pds,(DayOfYear()== 174 ))+ Sum(pds,(DayOfYear()==  175 ))+ Sum(pds,(DayOfYear()==  176 ))+ Sum(pds,(DayOfYear()==  177 ))+ Sum(pds,(DayOfYear()==  178 ))+ Sum(pds,(DayOfYear()==  179 ))+ Sum(pds,(DayOfYear()==  180 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we26    =Sum(pds,(DayOfYear()== 173 ))+ Sum(pds,(DayOfYear()==  174 ))+ Sum(pds,(DayOfYear()==  175 ))+ Sum(pds,(DayOfYear()==  176 ))+ Sum(pds,(DayOfYear()==  177 ))+ Sum(pds,(DayOfYear()==  178 ))+ Sum(pds,(DayOfYear()==  179 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we26    =Sum(pds,(DayOfYear()== 172 ))+ Sum(pds,(DayOfYear()==  173 ))+ Sum(pds,(DayOfYear()==  174 ))+ Sum(pds,(DayOfYear()==  175 ))+ Sum(pds,(DayOfYear()==  176 ))+ Sum(pds,(DayOfYear()==  177 ))+ Sum(pds,(DayOfYear()==  178 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we26    =Sum(pds,(DayOfYear()== 171 ))+ Sum(pds,(DayOfYear()==  172 ))+ Sum(pds,(DayOfYear()==  173 ))+ Sum(pds,(DayOfYear()==  174 ))+ Sum(pds,(DayOfYear()==  175 ))+ Sum(pds,(DayOfYear()==  176 ))+ Sum(pds,(DayOfYear()==  177 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we26    =Sum(pds,(DayOfYear()== 170 ))+ Sum(pds,(DayOfYear()==  171 ))+ Sum(pds,(DayOfYear()==  172 ))+ Sum(pds,(DayOfYear()==  173 ))+ Sum(pds,(DayOfYear()==  174 ))+ Sum(pds,(DayOfYear()==  175 ))+ Sum(pds,(DayOfYear()==  176 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we26    =Sum(pds,(DayOfYear()== 176 ))+ Sum(pds,(DayOfYear()==  177 ))+ Sum(pds,(DayOfYear()==  178 ))+ Sum(pds,(DayOfYear()==  179 ))+ Sum(pds,(DayOfYear()==  180 ))+ Sum(pds,(DayOfYear()==  181 ))+ Sum(pds,(DayOfYear()==  182 )), 
                    we26    =Sum(pds,(DayOfYear()== 175 ))+ Sum(pds,(DayOfYear()==  176 ))+ Sum(pds,(DayOfYear()==  177 ))+ Sum(pds,(DayOfYear()==  178 ))+ Sum(pds,(DayOfYear()==  179 ))+ Sum(pds,(DayOfYear()==  180 ))+ Sum(pds,(DayOfYear()==  181 ))))))));   
                                                                                                             
                                                                                                             
Week27  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we27    =Sum(pds,(DayOfYear()== 181 ))+ Sum(pds,(DayOfYear()==  182 ))+ Sum(pds,(DayOfYear()==  183 ))+ Sum(pds,(DayOfYear()==  184 ))+ Sum(pds,(DayOfYear()==  185 ))+ Sum(pds,(DayOfYear()==  186 ))+ Sum(pds,(DayOfYear()==  187 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we27    =Sum(pds,(DayOfYear()== 180 ))+ Sum(pds,(DayOfYear()==  181 ))+ Sum(pds,(DayOfYear()==  182 ))+ Sum(pds,(DayOfYear()==  183 ))+ Sum(pds,(DayOfYear()==  184 ))+ Sum(pds,(DayOfYear()==  185 ))+ Sum(pds,(DayOfYear()==  186 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we27    =Sum(pds,(DayOfYear()== 179 ))+ Sum(pds,(DayOfYear()==  180 ))+ Sum(pds,(DayOfYear()==  181 ))+ Sum(pds,(DayOfYear()==  182 ))+ Sum(pds,(DayOfYear()==  183 ))+ Sum(pds,(DayOfYear()==  184 ))+ Sum(pds,(DayOfYear()==  185 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we27    =Sum(pds,(DayOfYear()== 178 ))+ Sum(pds,(DayOfYear()==  179 ))+ Sum(pds,(DayOfYear()==  180 ))+ Sum(pds,(DayOfYear()==  181 ))+ Sum(pds,(DayOfYear()==  182 ))+ Sum(pds,(DayOfYear()==  183 ))+ Sum(pds,(DayOfYear()==  184 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we27    =Sum(pds,(DayOfYear()== 177 ))+ Sum(pds,(DayOfYear()==  178 ))+ Sum(pds,(DayOfYear()==  179 ))+ Sum(pds,(DayOfYear()==  180 ))+ Sum(pds,(DayOfYear()==  181 ))+ Sum(pds,(DayOfYear()==  182 ))+ Sum(pds,(DayOfYear()==  183 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we27    =Sum(pds,(DayOfYear()== 183 ))+ Sum(pds,(DayOfYear()==  184 ))+ Sum(pds,(DayOfYear()==  185 ))+ Sum(pds,(DayOfYear()==  186 ))+ Sum(pds,(DayOfYear()==  187 ))+ Sum(pds,(DayOfYear()==  188 ))+ Sum(pds,(DayOfYear()==  189 )), 
                    we27    =Sum(pds,(DayOfYear()== 182 ))+ Sum(pds,(DayOfYear()==  183 ))+ Sum(pds,(DayOfYear()==  184 ))+ Sum(pds,(DayOfYear()==  185 ))+ Sum(pds,(DayOfYear()==  186 ))+ Sum(pds,(DayOfYear()==  187 ))+ Sum(pds,(DayOfYear()==  188 ))))))));   
                                                                                                             
                                                                                                             
Week28  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we28    =Sum(pds,(DayOfYear()== 188 ))+ Sum(pds,(DayOfYear()==  189 ))+ Sum(pds,(DayOfYear()==  190 ))+ Sum(pds,(DayOfYear()==  191 ))+ Sum(pds,(DayOfYear()==  192 ))+ Sum(pds,(DayOfYear()==  193 ))+ Sum(pds,(DayOfYear()==  194 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we28    =Sum(pds,(DayOfYear()== 187 ))+ Sum(pds,(DayOfYear()==  188 ))+ Sum(pds,(DayOfYear()==  189 ))+ Sum(pds,(DayOfYear()==  190 ))+ Sum(pds,(DayOfYear()==  191 ))+ Sum(pds,(DayOfYear()==  192 ))+ Sum(pds,(DayOfYear()==  193 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we28    =Sum(pds,(DayOfYear()== 186 ))+ Sum(pds,(DayOfYear()==  187 ))+ Sum(pds,(DayOfYear()==  188 ))+ Sum(pds,(DayOfYear()==  189 ))+ Sum(pds,(DayOfYear()==  190 ))+ Sum(pds,(DayOfYear()==  191 ))+ Sum(pds,(DayOfYear()==  192 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we28    =Sum(pds,(DayOfYear()== 185 ))+ Sum(pds,(DayOfYear()==  186 ))+ Sum(pds,(DayOfYear()==  187 ))+ Sum(pds,(DayOfYear()==  188 ))+ Sum(pds,(DayOfYear()==  189 ))+ Sum(pds,(DayOfYear()==  190 ))+ Sum(pds,(DayOfYear()==  191 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we28    =Sum(pds,(DayOfYear()== 184 ))+ Sum(pds,(DayOfYear()==  185 ))+ Sum(pds,(DayOfYear()==  186 ))+ Sum(pds,(DayOfYear()==  187 ))+ Sum(pds,(DayOfYear()==  188 ))+ Sum(pds,(DayOfYear()==  189 ))+ Sum(pds,(DayOfYear()==  190 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we28    =Sum(pds,(DayOfYear()== 190 ))+ Sum(pds,(DayOfYear()==  191 ))+ Sum(pds,(DayOfYear()==  192 ))+ Sum(pds,(DayOfYear()==  193 ))+ Sum(pds,(DayOfYear()==  194 ))+ Sum(pds,(DayOfYear()==  195 ))+ Sum(pds,(DayOfYear()==  196 )), 
                    we28    =Sum(pds,(DayOfYear()== 189 ))+ Sum(pds,(DayOfYear()==  190 ))+ Sum(pds,(DayOfYear()==  191 ))+ Sum(pds,(DayOfYear()==  192 ))+ Sum(pds,(DayOfYear()==  193 ))+ Sum(pds,(DayOfYear()==  194 ))+ Sum(pds,(DayOfYear()==  195 ))))))));   
                                                                                                             
                                                                                                             
Week29  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we29    =Sum(pds,(DayOfYear()== 195 ))+ Sum(pds,(DayOfYear()==  196 ))+ Sum(pds,(DayOfYear()==  197 ))+ Sum(pds,(DayOfYear()==  198 ))+ Sum(pds,(DayOfYear()==  199 ))+ Sum(pds,(DayOfYear()==  200 ))+ Sum(pds,(DayOfYear()==  201 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we29    =Sum(pds,(DayOfYear()== 194 ))+ Sum(pds,(DayOfYear()==  195 ))+ Sum(pds,(DayOfYear()==  196 ))+ Sum(pds,(DayOfYear()==  197 ))+ Sum(pds,(DayOfYear()==  198 ))+ Sum(pds,(DayOfYear()==  199 ))+ Sum(pds,(DayOfYear()==  200 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we29    =Sum(pds,(DayOfYear()== 193 ))+ Sum(pds,(DayOfYear()==  194 ))+ Sum(pds,(DayOfYear()==  195 ))+ Sum(pds,(DayOfYear()==  196 ))+ Sum(pds,(DayOfYear()==  197 ))+ Sum(pds,(DayOfYear()==  198 ))+ Sum(pds,(DayOfYear()==  199 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we29    =Sum(pds,(DayOfYear()== 192 ))+ Sum(pds,(DayOfYear()==  193 ))+ Sum(pds,(DayOfYear()==  194 ))+ Sum(pds,(DayOfYear()==  195 ))+ Sum(pds,(DayOfYear()==  196 ))+ Sum(pds,(DayOfYear()==  197 ))+ Sum(pds,(DayOfYear()==  198 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we29    =Sum(pds,(DayOfYear()== 191 ))+ Sum(pds,(DayOfYear()==  192 ))+ Sum(pds,(DayOfYear()==  193 ))+ Sum(pds,(DayOfYear()==  194 ))+ Sum(pds,(DayOfYear()==  195 ))+ Sum(pds,(DayOfYear()==  196 ))+ Sum(pds,(DayOfYear()==  197 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we29    =Sum(pds,(DayOfYear()== 197 ))+ Sum(pds,(DayOfYear()==  198 ))+ Sum(pds,(DayOfYear()==  199 ))+ Sum(pds,(DayOfYear()==  200 ))+ Sum(pds,(DayOfYear()==  201 ))+ Sum(pds,(DayOfYear()==  202 ))+ Sum(pds,(DayOfYear()==  203 )), 
                    we29    =Sum(pds,(DayOfYear()== 196 ))+ Sum(pds,(DayOfYear()==  197 ))+ Sum(pds,(DayOfYear()==  198 ))+ Sum(pds,(DayOfYear()==  199 ))+ Sum(pds,(DayOfYear()==  200 ))+ Sum(pds,(DayOfYear()==  201 ))+ Sum(pds,(DayOfYear()==  202 ))))))));   
                                                                                                             
                                                                                                             
Week30  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we30    =Sum(pds,(DayOfYear()== 202 ))+ Sum(pds,(DayOfYear()==  203 ))+ Sum(pds,(DayOfYear()==  204 ))+ Sum(pds,(DayOfYear()==  205 ))+ Sum(pds,(DayOfYear()==  206 ))+ Sum(pds,(DayOfYear()==  207 ))+ Sum(pds,(DayOfYear()==  208 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we30    =Sum(pds,(DayOfYear()== 201 ))+ Sum(pds,(DayOfYear()==  202 ))+ Sum(pds,(DayOfYear()==  203 ))+ Sum(pds,(DayOfYear()==  204 ))+ Sum(pds,(DayOfYear()==  205 ))+ Sum(pds,(DayOfYear()==  206 ))+ Sum(pds,(DayOfYear()==  207 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we30    =Sum(pds,(DayOfYear()== 200 ))+ Sum(pds,(DayOfYear()==  201 ))+ Sum(pds,(DayOfYear()==  202 ))+ Sum(pds,(DayOfYear()==  203 ))+ Sum(pds,(DayOfYear()==  204 ))+ Sum(pds,(DayOfYear()==  205 ))+ Sum(pds,(DayOfYear()==  206 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we30    =Sum(pds,(DayOfYear()== 199 ))+ Sum(pds,(DayOfYear()==  200 ))+ Sum(pds,(DayOfYear()==  201 ))+ Sum(pds,(DayOfYear()==  202 ))+ Sum(pds,(DayOfYear()==  203 ))+ Sum(pds,(DayOfYear()==  204 ))+ Sum(pds,(DayOfYear()==  205 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we30    =Sum(pds,(DayOfYear()== 198 ))+ Sum(pds,(DayOfYear()==  199 ))+ Sum(pds,(DayOfYear()==  200 ))+ Sum(pds,(DayOfYear()==  201 ))+ Sum(pds,(DayOfYear()==  202 ))+ Sum(pds,(DayOfYear()==  203 ))+ Sum(pds,(DayOfYear()==  204 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we30    =Sum(pds,(DayOfYear()== 204 ))+ Sum(pds,(DayOfYear()==  205 ))+ Sum(pds,(DayOfYear()==  206 ))+ Sum(pds,(DayOfYear()==  207 ))+ Sum(pds,(DayOfYear()==  208 ))+ Sum(pds,(DayOfYear()==  209 ))+ Sum(pds,(DayOfYear()==  210 )), 
                    we30    =Sum(pds,(DayOfYear()== 203 ))+ Sum(pds,(DayOfYear()==  204 ))+ Sum(pds,(DayOfYear()==  205 ))+ Sum(pds,(DayOfYear()==  206 ))+ Sum(pds,(DayOfYear()==  207 ))+ Sum(pds,(DayOfYear()==  208 ))+ Sum(pds,(DayOfYear()==  209 ))))))));   
                                                                                                             
                                                                                                             
Week31  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we31    =Sum(pds,(DayOfYear()== 209 ))+ Sum(pds,(DayOfYear()==  210 ))+ Sum(pds,(DayOfYear()==  211 ))+ Sum(pds,(DayOfYear()==  212 ))+ Sum(pds,(DayOfYear()==  213 ))+ Sum(pds,(DayOfYear()==  214 ))+ Sum(pds,(DayOfYear()==  215 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we31    =Sum(pds,(DayOfYear()== 208 ))+ Sum(pds,(DayOfYear()==  209 ))+ Sum(pds,(DayOfYear()==  210 ))+ Sum(pds,(DayOfYear()==  211 ))+ Sum(pds,(DayOfYear()==  212 ))+ Sum(pds,(DayOfYear()==  213 ))+ Sum(pds,(DayOfYear()==  214 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we31    =Sum(pds,(DayOfYear()== 207 ))+ Sum(pds,(DayOfYear()==  208 ))+ Sum(pds,(DayOfYear()==  209 ))+ Sum(pds,(DayOfYear()==  210 ))+ Sum(pds,(DayOfYear()==  211 ))+ Sum(pds,(DayOfYear()==  212 ))+ Sum(pds,(DayOfYear()==  213 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we31    =Sum(pds,(DayOfYear()== 206 ))+ Sum(pds,(DayOfYear()==  207 ))+ Sum(pds,(DayOfYear()==  208 ))+ Sum(pds,(DayOfYear()==  209 ))+ Sum(pds,(DayOfYear()==  210 ))+ Sum(pds,(DayOfYear()==  211 ))+ Sum(pds,(DayOfYear()==  212 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we31    =Sum(pds,(DayOfYear()== 205 ))+ Sum(pds,(DayOfYear()==  206 ))+ Sum(pds,(DayOfYear()==  207 ))+ Sum(pds,(DayOfYear()==  208 ))+ Sum(pds,(DayOfYear()==  209 ))+ Sum(pds,(DayOfYear()==  210 ))+ Sum(pds,(DayOfYear()==  211 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we31    =Sum(pds,(DayOfYear()== 211 ))+ Sum(pds,(DayOfYear()==  212 ))+ Sum(pds,(DayOfYear()==  213 ))+ Sum(pds,(DayOfYear()==  214 ))+ Sum(pds,(DayOfYear()==  215 ))+ Sum(pds,(DayOfYear()==  216 ))+ Sum(pds,(DayOfYear()==  217 )), 
                    we31    =Sum(pds,(DayOfYear()== 210 ))+ Sum(pds,(DayOfYear()==  211 ))+ Sum(pds,(DayOfYear()==  212 ))+ Sum(pds,(DayOfYear()==  213 ))+ Sum(pds,(DayOfYear()==  214 ))+ Sum(pds,(DayOfYear()==  215 ))+ Sum(pds,(DayOfYear()==  216 ))))))));   
                                                                                                             
                                                                                                             
Week32  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we32    =Sum(pds,(DayOfYear()== 216 ))+ Sum(pds,(DayOfYear()==  217 ))+ Sum(pds,(DayOfYear()==  218 ))+ Sum(pds,(DayOfYear()==  219 ))+ Sum(pds,(DayOfYear()==  220 ))+ Sum(pds,(DayOfYear()==  221 ))+ Sum(pds,(DayOfYear()==  222 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we32    =Sum(pds,(DayOfYear()== 215 ))+ Sum(pds,(DayOfYear()==  216 ))+ Sum(pds,(DayOfYear()==  217 ))+ Sum(pds,(DayOfYear()==  218 ))+ Sum(pds,(DayOfYear()==  219 ))+ Sum(pds,(DayOfYear()==  220 ))+ Sum(pds,(DayOfYear()==  221 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we32    =Sum(pds,(DayOfYear()== 214 ))+ Sum(pds,(DayOfYear()==  215 ))+ Sum(pds,(DayOfYear()==  216 ))+ Sum(pds,(DayOfYear()==  217 ))+ Sum(pds,(DayOfYear()==  218 ))+ Sum(pds,(DayOfYear()==  219 ))+ Sum(pds,(DayOfYear()==  220 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we32    =Sum(pds,(DayOfYear()== 213 ))+ Sum(pds,(DayOfYear()==  214 ))+ Sum(pds,(DayOfYear()==  215 ))+ Sum(pds,(DayOfYear()==  216 ))+ Sum(pds,(DayOfYear()==  217 ))+ Sum(pds,(DayOfYear()==  218 ))+ Sum(pds,(DayOfYear()==  219 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we32    =Sum(pds,(DayOfYear()== 212 ))+ Sum(pds,(DayOfYear()==  213 ))+ Sum(pds,(DayOfYear()==  214 ))+ Sum(pds,(DayOfYear()==  215 ))+ Sum(pds,(DayOfYear()==  216 ))+ Sum(pds,(DayOfYear()==  217 ))+ Sum(pds,(DayOfYear()==  218 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we32    =Sum(pds,(DayOfYear()== 218 ))+ Sum(pds,(DayOfYear()==  219 ))+ Sum(pds,(DayOfYear()==  220 ))+ Sum(pds,(DayOfYear()==  221 ))+ Sum(pds,(DayOfYear()==  222 ))+ Sum(pds,(DayOfYear()==  223 ))+ Sum(pds,(DayOfYear()==  224 )), 
                    we32    =Sum(pds,(DayOfYear()== 217 ))+ Sum(pds,(DayOfYear()==  218 ))+ Sum(pds,(DayOfYear()==  219 ))+ Sum(pds,(DayOfYear()==  220 ))+ Sum(pds,(DayOfYear()==  221 ))+ Sum(pds,(DayOfYear()==  222 ))+ Sum(pds,(DayOfYear()==  223 ))))))));   
                                                                                                             
                                                                                                             
Week33  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we33    =Sum(pds,(DayOfYear()== 223 ))+ Sum(pds,(DayOfYear()==  224 ))+ Sum(pds,(DayOfYear()==  225 ))+ Sum(pds,(DayOfYear()==  226 ))+ Sum(pds,(DayOfYear()==  227 ))+ Sum(pds,(DayOfYear()==  228 ))+ Sum(pds,(DayOfYear()==  229 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we33    =Sum(pds,(DayOfYear()== 222 ))+ Sum(pds,(DayOfYear()==  223 ))+ Sum(pds,(DayOfYear()==  224 ))+ Sum(pds,(DayOfYear()==  225 ))+ Sum(pds,(DayOfYear()==  226 ))+ Sum(pds,(DayOfYear()==  227 ))+ Sum(pds,(DayOfYear()==  228 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we33    =Sum(pds,(DayOfYear()== 221 ))+ Sum(pds,(DayOfYear()==  222 ))+ Sum(pds,(DayOfYear()==  223 ))+ Sum(pds,(DayOfYear()==  224 ))+ Sum(pds,(DayOfYear()==  225 ))+ Sum(pds,(DayOfYear()==  226 ))+ Sum(pds,(DayOfYear()==  227 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we33    =Sum(pds,(DayOfYear()== 220 ))+ Sum(pds,(DayOfYear()==  221 ))+ Sum(pds,(DayOfYear()==  222 ))+ Sum(pds,(DayOfYear()==  223 ))+ Sum(pds,(DayOfYear()==  224 ))+ Sum(pds,(DayOfYear()==  225 ))+ Sum(pds,(DayOfYear()==  226 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we33    =Sum(pds,(DayOfYear()== 219 ))+ Sum(pds,(DayOfYear()==  220 ))+ Sum(pds,(DayOfYear()==  221 ))+ Sum(pds,(DayOfYear()==  222 ))+ Sum(pds,(DayOfYear()==  223 ))+ Sum(pds,(DayOfYear()==  224 ))+ Sum(pds,(DayOfYear()==  225 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we33    =Sum(pds,(DayOfYear()== 225 ))+ Sum(pds,(DayOfYear()==  226 ))+ Sum(pds,(DayOfYear()==  227 ))+ Sum(pds,(DayOfYear()==  228 ))+ Sum(pds,(DayOfYear()==  229 ))+ Sum(pds,(DayOfYear()==  230 ))+ Sum(pds,(DayOfYear()==  231 )), 
                    we33    =Sum(pds,(DayOfYear()== 224 ))+ Sum(pds,(DayOfYear()==  225 ))+ Sum(pds,(DayOfYear()==  226 ))+ Sum(pds,(DayOfYear()==  227 ))+ Sum(pds,(DayOfYear()==  228 ))+ Sum(pds,(DayOfYear()==  229 ))+ Sum(pds,(DayOfYear()==  230 ))))))));   
                                                                                                             
                                                                                                             
Week34  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we34    =Sum(pds,(DayOfYear()== 230 ))+ Sum(pds,(DayOfYear()==  231 ))+ Sum(pds,(DayOfYear()==  232 ))+ Sum(pds,(DayOfYear()==  233 ))+ Sum(pds,(DayOfYear()==  234 ))+ Sum(pds,(DayOfYear()==  235 ))+ Sum(pds,(DayOfYear()==  236 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we34    =Sum(pds,(DayOfYear()== 229 ))+ Sum(pds,(DayOfYear()==  230 ))+ Sum(pds,(DayOfYear()==  231 ))+ Sum(pds,(DayOfYear()==  232 ))+ Sum(pds,(DayOfYear()==  233 ))+ Sum(pds,(DayOfYear()==  234 ))+ Sum(pds,(DayOfYear()==  235 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we34    =Sum(pds,(DayOfYear()== 228 ))+ Sum(pds,(DayOfYear()==  229 ))+ Sum(pds,(DayOfYear()==  230 ))+ Sum(pds,(DayOfYear()==  231 ))+ Sum(pds,(DayOfYear()==  232 ))+ Sum(pds,(DayOfYear()==  233 ))+ Sum(pds,(DayOfYear()==  234 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we34    =Sum(pds,(DayOfYear()== 227 ))+ Sum(pds,(DayOfYear()==  228 ))+ Sum(pds,(DayOfYear()==  229 ))+ Sum(pds,(DayOfYear()==  230 ))+ Sum(pds,(DayOfYear()==  231 ))+ Sum(pds,(DayOfYear()==  232 ))+ Sum(pds,(DayOfYear()==  233 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we34    =Sum(pds,(DayOfYear()== 226 ))+ Sum(pds,(DayOfYear()==  227 ))+ Sum(pds,(DayOfYear()==  228 ))+ Sum(pds,(DayOfYear()==  229 ))+ Sum(pds,(DayOfYear()==  230 ))+ Sum(pds,(DayOfYear()==  231 ))+ Sum(pds,(DayOfYear()==  232 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we34    =Sum(pds,(DayOfYear()== 232 ))+ Sum(pds,(DayOfYear()==  233 ))+ Sum(pds,(DayOfYear()==  234 ))+ Sum(pds,(DayOfYear()==  235 ))+ Sum(pds,(DayOfYear()==  236 ))+ Sum(pds,(DayOfYear()==  237 ))+ Sum(pds,(DayOfYear()==  238 )), 
                    we34    =Sum(pds,(DayOfYear()== 231 ))+ Sum(pds,(DayOfYear()==  232 ))+ Sum(pds,(DayOfYear()==  233 ))+ Sum(pds,(DayOfYear()==  234 ))+ Sum(pds,(DayOfYear()==  235 ))+ Sum(pds,(DayOfYear()==  236 ))+ Sum(pds,(DayOfYear()==  237 ))))))));   
                                                                                                             
                                                                                                             
Week35  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we35    =Sum(pds,(DayOfYear()== 237 ))+ Sum(pds,(DayOfYear()==  238 ))+ Sum(pds,(DayOfYear()==  239 ))+ Sum(pds,(DayOfYear()==  240 ))+ Sum(pds,(DayOfYear()==  241 ))+ Sum(pds,(DayOfYear()==  242 ))+ Sum(pds,(DayOfYear()==  243 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we35    =Sum(pds,(DayOfYear()== 236 ))+ Sum(pds,(DayOfYear()==  237 ))+ Sum(pds,(DayOfYear()==  238 ))+ Sum(pds,(DayOfYear()==  239 ))+ Sum(pds,(DayOfYear()==  240 ))+ Sum(pds,(DayOfYear()==  241 ))+ Sum(pds,(DayOfYear()==  242 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we35    =Sum(pds,(DayOfYear()== 235 ))+ Sum(pds,(DayOfYear()==  236 ))+ Sum(pds,(DayOfYear()==  237 ))+ Sum(pds,(DayOfYear()==  238 ))+ Sum(pds,(DayOfYear()==  239 ))+ Sum(pds,(DayOfYear()==  240 ))+ Sum(pds,(DayOfYear()==  241 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we35    =Sum(pds,(DayOfYear()== 234 ))+ Sum(pds,(DayOfYear()==  235 ))+ Sum(pds,(DayOfYear()==  236 ))+ Sum(pds,(DayOfYear()==  237 ))+ Sum(pds,(DayOfYear()==  238 ))+ Sum(pds,(DayOfYear()==  239 ))+ Sum(pds,(DayOfYear()==  240 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we35    =Sum(pds,(DayOfYear()== 233 ))+ Sum(pds,(DayOfYear()==  234 ))+ Sum(pds,(DayOfYear()==  235 ))+ Sum(pds,(DayOfYear()==  236 ))+ Sum(pds,(DayOfYear()==  237 ))+ Sum(pds,(DayOfYear()==  238 ))+ Sum(pds,(DayOfYear()==  239 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we35    =Sum(pds,(DayOfYear()== 239 ))+ Sum(pds,(DayOfYear()==  240 ))+ Sum(pds,(DayOfYear()==  241 ))+ Sum(pds,(DayOfYear()==  242 ))+ Sum(pds,(DayOfYear()==  243 ))+ Sum(pds,(DayOfYear()==  244 ))+ Sum(pds,(DayOfYear()==  245 )), 
                    we35    =Sum(pds,(DayOfYear()== 238 ))+ Sum(pds,(DayOfYear()==  239 ))+ Sum(pds,(DayOfYear()==  240 ))+ Sum(pds,(DayOfYear()==  241 ))+ Sum(pds,(DayOfYear()==  242 ))+ Sum(pds,(DayOfYear()==  243 ))+ Sum(pds,(DayOfYear()==  244 ))))))));   
                                                                                                             
                                                                                                             
Week36  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we36    =Sum(pds,(DayOfYear()== 244 ))+ Sum(pds,(DayOfYear()==  245 ))+ Sum(pds,(DayOfYear()==  246 ))+ Sum(pds,(DayOfYear()==  247 ))+ Sum(pds,(DayOfYear()==  248 ))+ Sum(pds,(DayOfYear()==  249 ))+ Sum(pds,(DayOfYear()==  250 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we36    =Sum(pds,(DayOfYear()== 243 ))+ Sum(pds,(DayOfYear()==  244 ))+ Sum(pds,(DayOfYear()==  245 ))+ Sum(pds,(DayOfYear()==  246 ))+ Sum(pds,(DayOfYear()==  247 ))+ Sum(pds,(DayOfYear()==  248 ))+ Sum(pds,(DayOfYear()==  249 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we36    =Sum(pds,(DayOfYear()== 242 ))+ Sum(pds,(DayOfYear()==  243 ))+ Sum(pds,(DayOfYear()==  244 ))+ Sum(pds,(DayOfYear()==  245 ))+ Sum(pds,(DayOfYear()==  246 ))+ Sum(pds,(DayOfYear()==  247 ))+ Sum(pds,(DayOfYear()==  248 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we36    =Sum(pds,(DayOfYear()== 241 ))+ Sum(pds,(DayOfYear()==  242 ))+ Sum(pds,(DayOfYear()==  243 ))+ Sum(pds,(DayOfYear()==  244 ))+ Sum(pds,(DayOfYear()==  245 ))+ Sum(pds,(DayOfYear()==  246 ))+ Sum(pds,(DayOfYear()==  247 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we36    =Sum(pds,(DayOfYear()== 240 ))+ Sum(pds,(DayOfYear()==  241 ))+ Sum(pds,(DayOfYear()==  242 ))+ Sum(pds,(DayOfYear()==  243 ))+ Sum(pds,(DayOfYear()==  244 ))+ Sum(pds,(DayOfYear()==  245 ))+ Sum(pds,(DayOfYear()==  246 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we36    =Sum(pds,(DayOfYear()== 246 ))+ Sum(pds,(DayOfYear()==  247 ))+ Sum(pds,(DayOfYear()==  248 ))+ Sum(pds,(DayOfYear()==  249 ))+ Sum(pds,(DayOfYear()==  250 ))+ Sum(pds,(DayOfYear()==  251 ))+ Sum(pds,(DayOfYear()==  252 )), 
                    we36    =Sum(pds,(DayOfYear()== 245 ))+ Sum(pds,(DayOfYear()==  246 ))+ Sum(pds,(DayOfYear()==  247 ))+ Sum(pds,(DayOfYear()==  248 ))+ Sum(pds,(DayOfYear()==  249 ))+ Sum(pds,(DayOfYear()==  250 ))+ Sum(pds,(DayOfYear()==  251 ))))))));   
                                                                                                             
                                                                                                             
Week37  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we37    =Sum(pds,(DayOfYear()== 251 ))+ Sum(pds,(DayOfYear()==  252 ))+ Sum(pds,(DayOfYear()==  253 ))+ Sum(pds,(DayOfYear()==  254 ))+ Sum(pds,(DayOfYear()==  255 ))+ Sum(pds,(DayOfYear()==  256 ))+ Sum(pds,(DayOfYear()==  257 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we37    =Sum(pds,(DayOfYear()== 250 ))+ Sum(pds,(DayOfYear()==  251 ))+ Sum(pds,(DayOfYear()==  252 ))+ Sum(pds,(DayOfYear()==  253 ))+ Sum(pds,(DayOfYear()==  254 ))+ Sum(pds,(DayOfYear()==  255 ))+ Sum(pds,(DayOfYear()==  256 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we37    =Sum(pds,(DayOfYear()== 249 ))+ Sum(pds,(DayOfYear()==  250 ))+ Sum(pds,(DayOfYear()==  251 ))+ Sum(pds,(DayOfYear()==  252 ))+ Sum(pds,(DayOfYear()==  253 ))+ Sum(pds,(DayOfYear()==  254 ))+ Sum(pds,(DayOfYear()==  255 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we37    =Sum(pds,(DayOfYear()== 248 ))+ Sum(pds,(DayOfYear()==  249 ))+ Sum(pds,(DayOfYear()==  250 ))+ Sum(pds,(DayOfYear()==  251 ))+ Sum(pds,(DayOfYear()==  252 ))+ Sum(pds,(DayOfYear()==  253 ))+ Sum(pds,(DayOfYear()==  254 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we37    =Sum(pds,(DayOfYear()== 247 ))+ Sum(pds,(DayOfYear()==  248 ))+ Sum(pds,(DayOfYear()==  249 ))+ Sum(pds,(DayOfYear()==  250 ))+ Sum(pds,(DayOfYear()==  251 ))+ Sum(pds,(DayOfYear()==  252 ))+ Sum(pds,(DayOfYear()==  253 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we37    =Sum(pds,(DayOfYear()== 253 ))+ Sum(pds,(DayOfYear()==  254 ))+ Sum(pds,(DayOfYear()==  255 ))+ Sum(pds,(DayOfYear()==  256 ))+ Sum(pds,(DayOfYear()==  257 ))+ Sum(pds,(DayOfYear()==  258 ))+ Sum(pds,(DayOfYear()==  259 )), 
                    we37    =Sum(pds,(DayOfYear()== 252 ))+ Sum(pds,(DayOfYear()==  253 ))+ Sum(pds,(DayOfYear()==  254 ))+ Sum(pds,(DayOfYear()==  255 ))+ Sum(pds,(DayOfYear()==  256 ))+ Sum(pds,(DayOfYear()==  257 ))+ Sum(pds,(DayOfYear()==  258 ))))))));   
                                                                                                             
                                                                                                             
Week38  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we38    =Sum(pds,(DayOfYear()== 258 ))+ Sum(pds,(DayOfYear()==  259 ))+ Sum(pds,(DayOfYear()==  260 ))+ Sum(pds,(DayOfYear()==  261 ))+ Sum(pds,(DayOfYear()==  262 ))+ Sum(pds,(DayOfYear()==  263 ))+ Sum(pds,(DayOfYear()==  264 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we38    =Sum(pds,(DayOfYear()== 257 ))+ Sum(pds,(DayOfYear()==  258 ))+ Sum(pds,(DayOfYear()==  259 ))+ Sum(pds,(DayOfYear()==  260 ))+ Sum(pds,(DayOfYear()==  261 ))+ Sum(pds,(DayOfYear()==  262 ))+ Sum(pds,(DayOfYear()==  263 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we38    =Sum(pds,(DayOfYear()== 256 ))+ Sum(pds,(DayOfYear()==  257 ))+ Sum(pds,(DayOfYear()==  258 ))+ Sum(pds,(DayOfYear()==  259 ))+ Sum(pds,(DayOfYear()==  260 ))+ Sum(pds,(DayOfYear()==  261 ))+ Sum(pds,(DayOfYear()==  262 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we38    =Sum(pds,(DayOfYear()== 255 ))+ Sum(pds,(DayOfYear()==  256 ))+ Sum(pds,(DayOfYear()==  257 ))+ Sum(pds,(DayOfYear()==  258 ))+ Sum(pds,(DayOfYear()==  259 ))+ Sum(pds,(DayOfYear()==  260 ))+ Sum(pds,(DayOfYear()==  261 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we38    =Sum(pds,(DayOfYear()== 254 ))+ Sum(pds,(DayOfYear()==  255 ))+ Sum(pds,(DayOfYear()==  256 ))+ Sum(pds,(DayOfYear()==  257 ))+ Sum(pds,(DayOfYear()==  258 ))+ Sum(pds,(DayOfYear()==  259 ))+ Sum(pds,(DayOfYear()==  260 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we38    =Sum(pds,(DayOfYear()== 260 ))+ Sum(pds,(DayOfYear()==  261 ))+ Sum(pds,(DayOfYear()==  262 ))+ Sum(pds,(DayOfYear()==  263 ))+ Sum(pds,(DayOfYear()==  264 ))+ Sum(pds,(DayOfYear()==  265 ))+ Sum(pds,(DayOfYear()==  266 )), 
                    we38    =Sum(pds,(DayOfYear()== 259 ))+ Sum(pds,(DayOfYear()==  260 ))+ Sum(pds,(DayOfYear()==  261 ))+ Sum(pds,(DayOfYear()==  262 ))+ Sum(pds,(DayOfYear()==  263 ))+ Sum(pds,(DayOfYear()==  264 ))+ Sum(pds,(DayOfYear()==  265 ))))))));   
                                                                                                             
                                                                                                             
Week39  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we39    =Sum(pds,(DayOfYear()== 265 ))+ Sum(pds,(DayOfYear()==  266 ))+ Sum(pds,(DayOfYear()==  267 ))+ Sum(pds,(DayOfYear()==  268 ))+ Sum(pds,(DayOfYear()==  269 ))+ Sum(pds,(DayOfYear()==  270 ))+ Sum(pds,(DayOfYear()==  271 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we39    =Sum(pds,(DayOfYear()== 264 ))+ Sum(pds,(DayOfYear()==  265 ))+ Sum(pds,(DayOfYear()==  266 ))+ Sum(pds,(DayOfYear()==  267 ))+ Sum(pds,(DayOfYear()==  268 ))+ Sum(pds,(DayOfYear()==  269 ))+ Sum(pds,(DayOfYear()==  270 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we39    =Sum(pds,(DayOfYear()== 263 ))+ Sum(pds,(DayOfYear()==  264 ))+ Sum(pds,(DayOfYear()==  265 ))+ Sum(pds,(DayOfYear()==  266 ))+ Sum(pds,(DayOfYear()==  267 ))+ Sum(pds,(DayOfYear()==  268 ))+ Sum(pds,(DayOfYear()==  269 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we39    =Sum(pds,(DayOfYear()== 262 ))+ Sum(pds,(DayOfYear()==  263 ))+ Sum(pds,(DayOfYear()==  264 ))+ Sum(pds,(DayOfYear()==  265 ))+ Sum(pds,(DayOfYear()==  266 ))+ Sum(pds,(DayOfYear()==  267 ))+ Sum(pds,(DayOfYear()==  268 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we39    =Sum(pds,(DayOfYear()== 261 ))+ Sum(pds,(DayOfYear()==  262 ))+ Sum(pds,(DayOfYear()==  263 ))+ Sum(pds,(DayOfYear()==  264 ))+ Sum(pds,(DayOfYear()==  265 ))+ Sum(pds,(DayOfYear()==  266 ))+ Sum(pds,(DayOfYear()==  267 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we39    =Sum(pds,(DayOfYear()== 267 ))+ Sum(pds,(DayOfYear()==  268 ))+ Sum(pds,(DayOfYear()==  269 ))+ Sum(pds,(DayOfYear()==  270 ))+ Sum(pds,(DayOfYear()==  271 ))+ Sum(pds,(DayOfYear()==  272 ))+ Sum(pds,(DayOfYear()==  273 )), 
                    we39    =Sum(pds,(DayOfYear()== 266 ))+ Sum(pds,(DayOfYear()==  267 ))+ Sum(pds,(DayOfYear()==  268 ))+ Sum(pds,(DayOfYear()==  269 ))+ Sum(pds,(DayOfYear()==  270 ))+ Sum(pds,(DayOfYear()==  271 ))+ Sum(pds,(DayOfYear()==  272 ))))))));   
                                                                                                             
                                                                                                             
Week40  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we40    =Sum(pds,(DayOfYear()== 272 ))+ Sum(pds,(DayOfYear()==  273 ))+ Sum(pds,(DayOfYear()==  274 ))+ Sum(pds,(DayOfYear()==  275 ))+ Sum(pds,(DayOfYear()==  276 ))+ Sum(pds,(DayOfYear()==  277 ))+ Sum(pds,(DayOfYear()==  278 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we40    =Sum(pds,(DayOfYear()== 271 ))+ Sum(pds,(DayOfYear()==  272 ))+ Sum(pds,(DayOfYear()==  273 ))+ Sum(pds,(DayOfYear()==  274 ))+ Sum(pds,(DayOfYear()==  275 ))+ Sum(pds,(DayOfYear()==  276 ))+ Sum(pds,(DayOfYear()==  277 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we40    =Sum(pds,(DayOfYear()== 270 ))+ Sum(pds,(DayOfYear()==  271 ))+ Sum(pds,(DayOfYear()==  272 ))+ Sum(pds,(DayOfYear()==  273 ))+ Sum(pds,(DayOfYear()==  274 ))+ Sum(pds,(DayOfYear()==  275 ))+ Sum(pds,(DayOfYear()==  276 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we40    =Sum(pds,(DayOfYear()== 269 ))+ Sum(pds,(DayOfYear()==  270 ))+ Sum(pds,(DayOfYear()==  271 ))+ Sum(pds,(DayOfYear()==  272 ))+ Sum(pds,(DayOfYear()==  273 ))+ Sum(pds,(DayOfYear()==  274 ))+ Sum(pds,(DayOfYear()==  275 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we40    =Sum(pds,(DayOfYear()== 268 ))+ Sum(pds,(DayOfYear()==  269 ))+ Sum(pds,(DayOfYear()==  270 ))+ Sum(pds,(DayOfYear()==  271 ))+ Sum(pds,(DayOfYear()==  272 ))+ Sum(pds,(DayOfYear()==  273 ))+ Sum(pds,(DayOfYear()==  274 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we40    =Sum(pds,(DayOfYear()== 274 ))+ Sum(pds,(DayOfYear()==  275 ))+ Sum(pds,(DayOfYear()==  276 ))+ Sum(pds,(DayOfYear()==  277 ))+ Sum(pds,(DayOfYear()==  278 ))+ Sum(pds,(DayOfYear()==  279 ))+ Sum(pds,(DayOfYear()==  280 )), 
                    we40    =Sum(pds,(DayOfYear()== 273 ))+ Sum(pds,(DayOfYear()==  274 ))+ Sum(pds,(DayOfYear()==  275 ))+ Sum(pds,(DayOfYear()==  276 ))+ Sum(pds,(DayOfYear()==  277 ))+ Sum(pds,(DayOfYear()==  278 ))+ Sum(pds,(DayOfYear()==  279 ))))))));   
                                                                                                             
                                                                                                             
Week41  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we41    =Sum(pds,(DayOfYear()== 279 ))+ Sum(pds,(DayOfYear()==  280 ))+ Sum(pds,(DayOfYear()==  281 ))+ Sum(pds,(DayOfYear()==  282 ))+ Sum(pds,(DayOfYear()==  283 ))+ Sum(pds,(DayOfYear()==  284 ))+ Sum(pds,(DayOfYear()==  285 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we41    =Sum(pds,(DayOfYear()== 278 ))+ Sum(pds,(DayOfYear()==  279 ))+ Sum(pds,(DayOfYear()==  280 ))+ Sum(pds,(DayOfYear()==  281 ))+ Sum(pds,(DayOfYear()==  282 ))+ Sum(pds,(DayOfYear()==  283 ))+ Sum(pds,(DayOfYear()==  284 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we41    =Sum(pds,(DayOfYear()== 277 ))+ Sum(pds,(DayOfYear()==  278 ))+ Sum(pds,(DayOfYear()==  279 ))+ Sum(pds,(DayOfYear()==  280 ))+ Sum(pds,(DayOfYear()==  281 ))+ Sum(pds,(DayOfYear()==  282 ))+ Sum(pds,(DayOfYear()==  283 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we41    =Sum(pds,(DayOfYear()== 276 ))+ Sum(pds,(DayOfYear()==  277 ))+ Sum(pds,(DayOfYear()==  278 ))+ Sum(pds,(DayOfYear()==  279 ))+ Sum(pds,(DayOfYear()==  280 ))+ Sum(pds,(DayOfYear()==  281 ))+ Sum(pds,(DayOfYear()==  282 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we41    =Sum(pds,(DayOfYear()== 275 ))+ Sum(pds,(DayOfYear()==  276 ))+ Sum(pds,(DayOfYear()==  277 ))+ Sum(pds,(DayOfYear()==  278 ))+ Sum(pds,(DayOfYear()==  279 ))+ Sum(pds,(DayOfYear()==  280 ))+ Sum(pds,(DayOfYear()==  281 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we41    =Sum(pds,(DayOfYear()== 281 ))+ Sum(pds,(DayOfYear()==  282 ))+ Sum(pds,(DayOfYear()==  283 ))+ Sum(pds,(DayOfYear()==  284 ))+ Sum(pds,(DayOfYear()==  285 ))+ Sum(pds,(DayOfYear()==  286 ))+ Sum(pds,(DayOfYear()==  287 )), 
                    we41    =Sum(pds,(DayOfYear()== 280 ))+ Sum(pds,(DayOfYear()==  281 ))+ Sum(pds,(DayOfYear()==  282 ))+ Sum(pds,(DayOfYear()==  283 ))+ Sum(pds,(DayOfYear()==  284 ))+ Sum(pds,(DayOfYear()==  285 ))+ Sum(pds,(DayOfYear()==  286 ))))))));   
                                                                                                             
                                                                                                             
Week42  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we42    =Sum(pds,(DayOfYear()== 286 ))+ Sum(pds,(DayOfYear()==  287 ))+ Sum(pds,(DayOfYear()==  288 ))+ Sum(pds,(DayOfYear()==  289 ))+ Sum(pds,(DayOfYear()==  290 ))+ Sum(pds,(DayOfYear()==  291 ))+ Sum(pds,(DayOfYear()==  292 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we42    =Sum(pds,(DayOfYear()== 285 ))+ Sum(pds,(DayOfYear()==  286 ))+ Sum(pds,(DayOfYear()==  287 ))+ Sum(pds,(DayOfYear()==  288 ))+ Sum(pds,(DayOfYear()==  289 ))+ Sum(pds,(DayOfYear()==  290 ))+ Sum(pds,(DayOfYear()==  291 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we42    =Sum(pds,(DayOfYear()== 284 ))+ Sum(pds,(DayOfYear()==  285 ))+ Sum(pds,(DayOfYear()==  286 ))+ Sum(pds,(DayOfYear()==  287 ))+ Sum(pds,(DayOfYear()==  288 ))+ Sum(pds,(DayOfYear()==  289 ))+ Sum(pds,(DayOfYear()==  290 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we42    =Sum(pds,(DayOfYear()== 283 ))+ Sum(pds,(DayOfYear()==  284 ))+ Sum(pds,(DayOfYear()==  285 ))+ Sum(pds,(DayOfYear()==  286 ))+ Sum(pds,(DayOfYear()==  287 ))+ Sum(pds,(DayOfYear()==  288 ))+ Sum(pds,(DayOfYear()==  289 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we42    =Sum(pds,(DayOfYear()== 282 ))+ Sum(pds,(DayOfYear()==  283 ))+ Sum(pds,(DayOfYear()==  284 ))+ Sum(pds,(DayOfYear()==  285 ))+ Sum(pds,(DayOfYear()==  286 ))+ Sum(pds,(DayOfYear()==  287 ))+ Sum(pds,(DayOfYear()==  288 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we42    =Sum(pds,(DayOfYear()== 288 ))+ Sum(pds,(DayOfYear()==  289 ))+ Sum(pds,(DayOfYear()==  290 ))+ Sum(pds,(DayOfYear()==  291 ))+ Sum(pds,(DayOfYear()==  292 ))+ Sum(pds,(DayOfYear()==  293 ))+ Sum(pds,(DayOfYear()==  294 )), 
                    we42    =Sum(pds,(DayOfYear()== 287 ))+ Sum(pds,(DayOfYear()==  288 ))+ Sum(pds,(DayOfYear()==  289 ))+ Sum(pds,(DayOfYear()==  290 ))+ Sum(pds,(DayOfYear()==  291 ))+ Sum(pds,(DayOfYear()==  292 ))+ Sum(pds,(DayOfYear()==  293 ))))))));   
                                                                                                             
                                                                                                             
Week43  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we43    =Sum(pds,(DayOfYear()== 293 ))+ Sum(pds,(DayOfYear()==  294 ))+ Sum(pds,(DayOfYear()==  295 ))+ Sum(pds,(DayOfYear()==  296 ))+ Sum(pds,(DayOfYear()==  297 ))+ Sum(pds,(DayOfYear()==  298 ))+ Sum(pds,(DayOfYear()==  299 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we43    =Sum(pds,(DayOfYear()== 292 ))+ Sum(pds,(DayOfYear()==  293 ))+ Sum(pds,(DayOfYear()==  294 ))+ Sum(pds,(DayOfYear()==  295 ))+ Sum(pds,(DayOfYear()==  296 ))+ Sum(pds,(DayOfYear()==  297 ))+ Sum(pds,(DayOfYear()==  298 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we43    =Sum(pds,(DayOfYear()== 291 ))+ Sum(pds,(DayOfYear()==  292 ))+ Sum(pds,(DayOfYear()==  293 ))+ Sum(pds,(DayOfYear()==  294 ))+ Sum(pds,(DayOfYear()==  295 ))+ Sum(pds,(DayOfYear()==  296 ))+ Sum(pds,(DayOfYear()==  297 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we43    =Sum(pds,(DayOfYear()== 290 ))+ Sum(pds,(DayOfYear()==  291 ))+ Sum(pds,(DayOfYear()==  292 ))+ Sum(pds,(DayOfYear()==  293 ))+ Sum(pds,(DayOfYear()==  294 ))+ Sum(pds,(DayOfYear()==  295 ))+ Sum(pds,(DayOfYear()==  296 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we43    =Sum(pds,(DayOfYear()== 289 ))+ Sum(pds,(DayOfYear()==  290 ))+ Sum(pds,(DayOfYear()==  291 ))+ Sum(pds,(DayOfYear()==  292 ))+ Sum(pds,(DayOfYear()==  293 ))+ Sum(pds,(DayOfYear()==  294 ))+ Sum(pds,(DayOfYear()==  295 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we43    =Sum(pds,(DayOfYear()== 295 ))+ Sum(pds,(DayOfYear()==  296 ))+ Sum(pds,(DayOfYear()==  297 ))+ Sum(pds,(DayOfYear()==  298 ))+ Sum(pds,(DayOfYear()==  299 ))+ Sum(pds,(DayOfYear()==  300 ))+ Sum(pds,(DayOfYear()==  301 )), 
                    we43    =Sum(pds,(DayOfYear()== 294 ))+ Sum(pds,(DayOfYear()==  295 ))+ Sum(pds,(DayOfYear()==  296 ))+ Sum(pds,(DayOfYear()==  297 ))+ Sum(pds,(DayOfYear()==  298 ))+ Sum(pds,(DayOfYear()==  299 ))+ Sum(pds,(DayOfYear()==  300 ))))))));   
                                                                                                             
                                                                                                             
Week44  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we44    =Sum(pds,(DayOfYear()== 300 ))+ Sum(pds,(DayOfYear()==  301 ))+ Sum(pds,(DayOfYear()==  302 ))+ Sum(pds,(DayOfYear()==  303 ))+ Sum(pds,(DayOfYear()==  304 ))+ Sum(pds,(DayOfYear()==  305 ))+ Sum(pds,(DayOfYear()==  306 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we44    =Sum(pds,(DayOfYear()== 299 ))+ Sum(pds,(DayOfYear()==  300 ))+ Sum(pds,(DayOfYear()==  301 ))+ Sum(pds,(DayOfYear()==  302 ))+ Sum(pds,(DayOfYear()==  303 ))+ Sum(pds,(DayOfYear()==  304 ))+ Sum(pds,(DayOfYear()==  305 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we44    =Sum(pds,(DayOfYear()== 298 ))+ Sum(pds,(DayOfYear()==  299 ))+ Sum(pds,(DayOfYear()==  300 ))+ Sum(pds,(DayOfYear()==  301 ))+ Sum(pds,(DayOfYear()==  302 ))+ Sum(pds,(DayOfYear()==  303 ))+ Sum(pds,(DayOfYear()==  304 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we44    =Sum(pds,(DayOfYear()== 297 ))+ Sum(pds,(DayOfYear()==  298 ))+ Sum(pds,(DayOfYear()==  299 ))+ Sum(pds,(DayOfYear()==  300 ))+ Sum(pds,(DayOfYear()==  301 ))+ Sum(pds,(DayOfYear()==  302 ))+ Sum(pds,(DayOfYear()==  303 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we44    =Sum(pds,(DayOfYear()== 296 ))+ Sum(pds,(DayOfYear()==  297 ))+ Sum(pds,(DayOfYear()==  298 ))+ Sum(pds,(DayOfYear()==  299 ))+ Sum(pds,(DayOfYear()==  300 ))+ Sum(pds,(DayOfYear()==  301 ))+ Sum(pds,(DayOfYear()==  302 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we44    =Sum(pds,(DayOfYear()== 302 ))+ Sum(pds,(DayOfYear()==  303 ))+ Sum(pds,(DayOfYear()==  304 ))+ Sum(pds,(DayOfYear()==  305 ))+ Sum(pds,(DayOfYear()==  306 ))+ Sum(pds,(DayOfYear()==  307 ))+ Sum(pds,(DayOfYear()==  308 )), 
                    we44    =Sum(pds,(DayOfYear()== 301 ))+ Sum(pds,(DayOfYear()==  302 ))+ Sum(pds,(DayOfYear()==  303 ))+ Sum(pds,(DayOfYear()==  304 ))+ Sum(pds,(DayOfYear()==  305 ))+ Sum(pds,(DayOfYear()==  306 ))+ Sum(pds,(DayOfYear()==  307 ))))))));   
                                                                                                             
                                                                                                             
Week45  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we45    =Sum(pds,(DayOfYear()== 307 ))+ Sum(pds,(DayOfYear()==  308 ))+ Sum(pds,(DayOfYear()==  309 ))+ Sum(pds,(DayOfYear()==  310 ))+ Sum(pds,(DayOfYear()==  311 ))+ Sum(pds,(DayOfYear()==  312 ))+ Sum(pds,(DayOfYear()==  313 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we45    =Sum(pds,(DayOfYear()== 306 ))+ Sum(pds,(DayOfYear()==  307 ))+ Sum(pds,(DayOfYear()==  308 ))+ Sum(pds,(DayOfYear()==  309 ))+ Sum(pds,(DayOfYear()==  310 ))+ Sum(pds,(DayOfYear()==  311 ))+ Sum(pds,(DayOfYear()==  312 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we45    =Sum(pds,(DayOfYear()== 305 ))+ Sum(pds,(DayOfYear()==  306 ))+ Sum(pds,(DayOfYear()==  307 ))+ Sum(pds,(DayOfYear()==  308 ))+ Sum(pds,(DayOfYear()==  309 ))+ Sum(pds,(DayOfYear()==  310 ))+ Sum(pds,(DayOfYear()==  311 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we45    =Sum(pds,(DayOfYear()== 304 ))+ Sum(pds,(DayOfYear()==  305 ))+ Sum(pds,(DayOfYear()==  306 ))+ Sum(pds,(DayOfYear()==  307 ))+ Sum(pds,(DayOfYear()==  308 ))+ Sum(pds,(DayOfYear()==  309 ))+ Sum(pds,(DayOfYear()==  310 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we45    =Sum(pds,(DayOfYear()== 303 ))+ Sum(pds,(DayOfYear()==  304 ))+ Sum(pds,(DayOfYear()==  305 ))+ Sum(pds,(DayOfYear()==  306 ))+ Sum(pds,(DayOfYear()==  307 ))+ Sum(pds,(DayOfYear()==  308 ))+ Sum(pds,(DayOfYear()==  309 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we45    =Sum(pds,(DayOfYear()== 309 ))+ Sum(pds,(DayOfYear()==  310 ))+ Sum(pds,(DayOfYear()==  311 ))+ Sum(pds,(DayOfYear()==  312 ))+ Sum(pds,(DayOfYear()==  313 ))+ Sum(pds,(DayOfYear()==  314 ))+ Sum(pds,(DayOfYear()==  315 )), 
                    we45    =Sum(pds,(DayOfYear()== 308 ))+ Sum(pds,(DayOfYear()==  309 ))+ Sum(pds,(DayOfYear()==  310 ))+ Sum(pds,(DayOfYear()==  311 ))+ Sum(pds,(DayOfYear()==  312 ))+ Sum(pds,(DayOfYear()==  313 ))+ Sum(pds,(DayOfYear()==  314 ))))))));   
                                                                                                             
                                                                                                             
Week46  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we46    =Sum(pds,(DayOfYear()== 314 ))+ Sum(pds,(DayOfYear()==  315 ))+ Sum(pds,(DayOfYear()==  316 ))+ Sum(pds,(DayOfYear()==  317 ))+ Sum(pds,(DayOfYear()==  318 ))+ Sum(pds,(DayOfYear()==  319 ))+ Sum(pds,(DayOfYear()==  320 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we46    =Sum(pds,(DayOfYear()== 313 ))+ Sum(pds,(DayOfYear()==  314 ))+ Sum(pds,(DayOfYear()==  315 ))+ Sum(pds,(DayOfYear()==  316 ))+ Sum(pds,(DayOfYear()==  317 ))+ Sum(pds,(DayOfYear()==  318 ))+ Sum(pds,(DayOfYear()==  319 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we46    =Sum(pds,(DayOfYear()== 312 ))+ Sum(pds,(DayOfYear()==  313 ))+ Sum(pds,(DayOfYear()==  314 ))+ Sum(pds,(DayOfYear()==  315 ))+ Sum(pds,(DayOfYear()==  316 ))+ Sum(pds,(DayOfYear()==  317 ))+ Sum(pds,(DayOfYear()==  318 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we46    =Sum(pds,(DayOfYear()== 311 ))+ Sum(pds,(DayOfYear()==  312 ))+ Sum(pds,(DayOfYear()==  313 ))+ Sum(pds,(DayOfYear()==  314 ))+ Sum(pds,(DayOfYear()==  315 ))+ Sum(pds,(DayOfYear()==  316 ))+ Sum(pds,(DayOfYear()==  317 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we46    =Sum(pds,(DayOfYear()== 310 ))+ Sum(pds,(DayOfYear()==  311 ))+ Sum(pds,(DayOfYear()==  312 ))+ Sum(pds,(DayOfYear()==  313 ))+ Sum(pds,(DayOfYear()==  314 ))+ Sum(pds,(DayOfYear()==  315 ))+ Sum(pds,(DayOfYear()==  316 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we46    =Sum(pds,(DayOfYear()== 316 ))+ Sum(pds,(DayOfYear()==  317 ))+ Sum(pds,(DayOfYear()==  318 ))+ Sum(pds,(DayOfYear()==  319 ))+ Sum(pds,(DayOfYear()==  320 ))+ Sum(pds,(DayOfYear()==  321 ))+ Sum(pds,(DayOfYear()==  322 )), 
                    we46    =Sum(pds,(DayOfYear()== 315 ))+ Sum(pds,(DayOfYear()==  316 ))+ Sum(pds,(DayOfYear()==  317 ))+ Sum(pds,(DayOfYear()==  318 ))+ Sum(pds,(DayOfYear()==  319 ))+ Sum(pds,(DayOfYear()==  320 ))+ Sum(pds,(DayOfYear()==  321 ))))))));   
                                                                                                             
                                                                                                             
Week47  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we47    =Sum(pds,(DayOfYear()== 321 ))+ Sum(pds,(DayOfYear()==  322 ))+ Sum(pds,(DayOfYear()==  323 ))+ Sum(pds,(DayOfYear()==  324 ))+ Sum(pds,(DayOfYear()==  325 ))+ Sum(pds,(DayOfYear()==  326 ))+ Sum(pds,(DayOfYear()==  327 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we47    =Sum(pds,(DayOfYear()== 320 ))+ Sum(pds,(DayOfYear()==  321 ))+ Sum(pds,(DayOfYear()==  322 ))+ Sum(pds,(DayOfYear()==  323 ))+ Sum(pds,(DayOfYear()==  324 ))+ Sum(pds,(DayOfYear()==  325 ))+ Sum(pds,(DayOfYear()==  326 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we47    =Sum(pds,(DayOfYear()== 319 ))+ Sum(pds,(DayOfYear()==  320 ))+ Sum(pds,(DayOfYear()==  321 ))+ Sum(pds,(DayOfYear()==  322 ))+ Sum(pds,(DayOfYear()==  323 ))+ Sum(pds,(DayOfYear()==  324 ))+ Sum(pds,(DayOfYear()==  325 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we47    =Sum(pds,(DayOfYear()== 318 ))+ Sum(pds,(DayOfYear()==  319 ))+ Sum(pds,(DayOfYear()==  320 ))+ Sum(pds,(DayOfYear()==  321 ))+ Sum(pds,(DayOfYear()==  322 ))+ Sum(pds,(DayOfYear()==  323 ))+ Sum(pds,(DayOfYear()==  324 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we47    =Sum(pds,(DayOfYear()== 317 ))+ Sum(pds,(DayOfYear()==  318 ))+ Sum(pds,(DayOfYear()==  319 ))+ Sum(pds,(DayOfYear()==  320 ))+ Sum(pds,(DayOfYear()==  321 ))+ Sum(pds,(DayOfYear()==  322 ))+ Sum(pds,(DayOfYear()==  323 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we47    =Sum(pds,(DayOfYear()== 323 ))+ Sum(pds,(DayOfYear()==  324 ))+ Sum(pds,(DayOfYear()==  325 ))+ Sum(pds,(DayOfYear()==  326 ))+ Sum(pds,(DayOfYear()==  327 ))+ Sum(pds,(DayOfYear()==  328 ))+ Sum(pds,(DayOfYear()==  329 )), 
                    we47    =Sum(pds,(DayOfYear()== 322 ))+ Sum(pds,(DayOfYear()==  323 ))+ Sum(pds,(DayOfYear()==  324 ))+ Sum(pds,(DayOfYear()==  325 ))+ Sum(pds,(DayOfYear()==  326 ))+ Sum(pds,(DayOfYear()==  327 ))+ Sum(pds,(DayOfYear()==  328 ))))))));   
                                                                                                             
                                                                                                             
Week48  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we48    =Sum(pds,(DayOfYear()== 328 ))+ Sum(pds,(DayOfYear()==  329 ))+ Sum(pds,(DayOfYear()==  330 ))+ Sum(pds,(DayOfYear()==  331 ))+ Sum(pds,(DayOfYear()==  332 ))+ Sum(pds,(DayOfYear()==  333 ))+ Sum(pds,(DayOfYear()==  334 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we48    =Sum(pds,(DayOfYear()== 327 ))+ Sum(pds,(DayOfYear()==  328 ))+ Sum(pds,(DayOfYear()==  329 ))+ Sum(pds,(DayOfYear()==  330 ))+ Sum(pds,(DayOfYear()==  331 ))+ Sum(pds,(DayOfYear()==  332 ))+ Sum(pds,(DayOfYear()==  333 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we48    =Sum(pds,(DayOfYear()== 326 ))+ Sum(pds,(DayOfYear()==  327 ))+ Sum(pds,(DayOfYear()==  328 ))+ Sum(pds,(DayOfYear()==  329 ))+ Sum(pds,(DayOfYear()==  330 ))+ Sum(pds,(DayOfYear()==  331 ))+ Sum(pds,(DayOfYear()==  332 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we48    =Sum(pds,(DayOfYear()== 325 ))+ Sum(pds,(DayOfYear()==  326 ))+ Sum(pds,(DayOfYear()==  327 ))+ Sum(pds,(DayOfYear()==  328 ))+ Sum(pds,(DayOfYear()==  329 ))+ Sum(pds,(DayOfYear()==  330 ))+ Sum(pds,(DayOfYear()==  331 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we48    =Sum(pds,(DayOfYear()== 324 ))+ Sum(pds,(DayOfYear()==  325 ))+ Sum(pds,(DayOfYear()==  326 ))+ Sum(pds,(DayOfYear()==  327 ))+ Sum(pds,(DayOfYear()==  328 ))+ Sum(pds,(DayOfYear()==  329 ))+ Sum(pds,(DayOfYear()==  330 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we48    =Sum(pds,(DayOfYear()== 330 ))+ Sum(pds,(DayOfYear()==  331 ))+ Sum(pds,(DayOfYear()==  332 ))+ Sum(pds,(DayOfYear()==  333 ))+ Sum(pds,(DayOfYear()==  334 ))+ Sum(pds,(DayOfYear()==  335 ))+ Sum(pds,(DayOfYear()==  336 )), 
                    we48    =Sum(pds,(DayOfYear()== 329 ))+ Sum(pds,(DayOfYear()==  330 ))+ Sum(pds,(DayOfYear()==  331 ))+ Sum(pds,(DayOfYear()==  332 ))+ Sum(pds,(DayOfYear()==  333 ))+ Sum(pds,(DayOfYear()==  334 ))+ Sum(pds,(DayOfYear()==  335 ))))))));   
                                                                                                             
                                                                                                             
Week49  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we49    =Sum(pds,(DayOfYear()== 335 ))+ Sum(pds,(DayOfYear()==  336 ))+ Sum(pds,(DayOfYear()==  337 ))+ Sum(pds,(DayOfYear()==  338 ))+ Sum(pds,(DayOfYear()==  339 ))+ Sum(pds,(DayOfYear()==  340 ))+ Sum(pds,(DayOfYear()==  341 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we49    =Sum(pds,(DayOfYear()== 334 ))+ Sum(pds,(DayOfYear()==  335 ))+ Sum(pds,(DayOfYear()==  336 ))+ Sum(pds,(DayOfYear()==  337 ))+ Sum(pds,(DayOfYear()==  338 ))+ Sum(pds,(DayOfYear()==  339 ))+ Sum(pds,(DayOfYear()==  340 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we49    =Sum(pds,(DayOfYear()== 333 ))+ Sum(pds,(DayOfYear()==  334 ))+ Sum(pds,(DayOfYear()==  335 ))+ Sum(pds,(DayOfYear()==  336 ))+ Sum(pds,(DayOfYear()==  337 ))+ Sum(pds,(DayOfYear()==  338 ))+ Sum(pds,(DayOfYear()==  339 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we49    =Sum(pds,(DayOfYear()== 332 ))+ Sum(pds,(DayOfYear()==  333 ))+ Sum(pds,(DayOfYear()==  334 ))+ Sum(pds,(DayOfYear()==  335 ))+ Sum(pds,(DayOfYear()==  336 ))+ Sum(pds,(DayOfYear()==  337 ))+ Sum(pds,(DayOfYear()==  338 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we49    =Sum(pds,(DayOfYear()== 331 ))+ Sum(pds,(DayOfYear()==  332 ))+ Sum(pds,(DayOfYear()==  333 ))+ Sum(pds,(DayOfYear()==  334 ))+ Sum(pds,(DayOfYear()==  335 ))+ Sum(pds,(DayOfYear()==  336 ))+ Sum(pds,(DayOfYear()==  337 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we49    =Sum(pds,(DayOfYear()== 337 ))+ Sum(pds,(DayOfYear()==  338 ))+ Sum(pds,(DayOfYear()==  339 ))+ Sum(pds,(DayOfYear()==  340 ))+ Sum(pds,(DayOfYear()==  341 ))+ Sum(pds,(DayOfYear()==  342 ))+ Sum(pds,(DayOfYear()==  343 )), 
                    we49    =Sum(pds,(DayOfYear()== 336 ))+ Sum(pds,(DayOfYear()==  337 ))+ Sum(pds,(DayOfYear()==  338 ))+ Sum(pds,(DayOfYear()==  339 ))+ Sum(pds,(DayOfYear()==  340 ))+ Sum(pds,(DayOfYear()==  341 ))+ Sum(pds,(DayOfYear()==  342 ))))))));   
                                                                                                             
                                                                                                             
Week50  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we50    =Sum(pds,(DayOfYear()== 342 ))+ Sum(pds,(DayOfYear()==  343 ))+ Sum(pds,(DayOfYear()==  344 ))+ Sum(pds,(DayOfYear()==  345 ))+ Sum(pds,(DayOfYear()==  346 ))+ Sum(pds,(DayOfYear()==  347 ))+ Sum(pds,(DayOfYear()==  348 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we50    =Sum(pds,(DayOfYear()== 341 ))+ Sum(pds,(DayOfYear()==  342 ))+ Sum(pds,(DayOfYear()==  343 ))+ Sum(pds,(DayOfYear()==  344 ))+ Sum(pds,(DayOfYear()==  345 ))+ Sum(pds,(DayOfYear()==  346 ))+ Sum(pds,(DayOfYear()==  347 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we50    =Sum(pds,(DayOfYear()== 340 ))+ Sum(pds,(DayOfYear()==  341 ))+ Sum(pds,(DayOfYear()==  342 ))+ Sum(pds,(DayOfYear()==  343 ))+ Sum(pds,(DayOfYear()==  344 ))+ Sum(pds,(DayOfYear()==  345 ))+ Sum(pds,(DayOfYear()==  346 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we50    =Sum(pds,(DayOfYear()== 339 ))+ Sum(pds,(DayOfYear()==  340 ))+ Sum(pds,(DayOfYear()==  341 ))+ Sum(pds,(DayOfYear()==  342 ))+ Sum(pds,(DayOfYear()==  343 ))+ Sum(pds,(DayOfYear()==  344 ))+ Sum(pds,(DayOfYear()==  345 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we50    =Sum(pds,(DayOfYear()== 338 ))+ Sum(pds,(DayOfYear()==  339 ))+ Sum(pds,(DayOfYear()==  340 ))+ Sum(pds,(DayOfYear()==  341 ))+ Sum(pds,(DayOfYear()==  342 ))+ Sum(pds,(DayOfYear()==  343 ))+ Sum(pds,(DayOfYear()==  344 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we50    =Sum(pds,(DayOfYear()== 344 ))+ Sum(pds,(DayOfYear()==  345 ))+ Sum(pds,(DayOfYear()==  346 ))+ Sum(pds,(DayOfYear()==  347 ))+ Sum(pds,(DayOfYear()==  348 ))+ Sum(pds,(DayOfYear()==  349 ))+ Sum(pds,(DayOfYear()==  350 )), 
                    we50    =Sum(pds,(DayOfYear()== 343 ))+ Sum(pds,(DayOfYear()==  344 ))+ Sum(pds,(DayOfYear()==  345 ))+ Sum(pds,(DayOfYear()==  346 ))+ Sum(pds,(DayOfYear()==  347 ))+ Sum(pds,(DayOfYear()==  348 ))+ Sum(pds,(DayOfYear()==  349 ))))))));   
                                                                                                             
                                                                                                             
Week51  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we51    =Sum(pds,(DayOfYear()== 349 ))+ Sum(pds,(DayOfYear()==  350 ))+ Sum(pds,(DayOfYear()==  351 ))+ Sum(pds,(DayOfYear()==  352 ))+ Sum(pds,(DayOfYear()==  353 ))+ Sum(pds,(DayOfYear()==  354 ))+ Sum(pds,(DayOfYear()==  355 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we51    =Sum(pds,(DayOfYear()== 348 ))+ Sum(pds,(DayOfYear()==  349 ))+ Sum(pds,(DayOfYear()==  350 ))+ Sum(pds,(DayOfYear()==  351 ))+ Sum(pds,(DayOfYear()==  352 ))+ Sum(pds,(DayOfYear()==  353 ))+ Sum(pds,(DayOfYear()==  354 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we51    =Sum(pds,(DayOfYear()== 347 ))+ Sum(pds,(DayOfYear()==  348 ))+ Sum(pds,(DayOfYear()==  349 ))+ Sum(pds,(DayOfYear()==  350 ))+ Sum(pds,(DayOfYear()==  351 ))+ Sum(pds,(DayOfYear()==  352 ))+ Sum(pds,(DayOfYear()==  353 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we51    =Sum(pds,(DayOfYear()== 346 ))+ Sum(pds,(DayOfYear()==  347 ))+ Sum(pds,(DayOfYear()==  348 ))+ Sum(pds,(DayOfYear()==  349 ))+ Sum(pds,(DayOfYear()==  350 ))+ Sum(pds,(DayOfYear()==  351 ))+ Sum(pds,(DayOfYear()==  352 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we51    =Sum(pds,(DayOfYear()== 345 ))+ Sum(pds,(DayOfYear()==  346 ))+ Sum(pds,(DayOfYear()==  347 ))+ Sum(pds,(DayOfYear()==  348 ))+ Sum(pds,(DayOfYear()==  349 ))+ Sum(pds,(DayOfYear()==  350 ))+ Sum(pds,(DayOfYear()==  351 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we51    =Sum(pds,(DayOfYear()== 351 ))+ Sum(pds,(DayOfYear()==  352 ))+ Sum(pds,(DayOfYear()==  353 ))+ Sum(pds,(DayOfYear()==  354 ))+ Sum(pds,(DayOfYear()==  355 ))+ Sum(pds,(DayOfYear()==  356 ))+ Sum(pds,(DayOfYear()==  357 )), 
                    we51    =Sum(pds,(DayOfYear()== 350 ))+ Sum(pds,(DayOfYear()==  351 ))+ Sum(pds,(DayOfYear()==  352 ))+ Sum(pds,(DayOfYear()==  353 ))+ Sum(pds,(DayOfYear()==  354 ))+ Sum(pds,(DayOfYear()==  355 ))+ Sum(pds,(DayOfYear()==  356 ))))))));   
                                                                                                             
                                                                                                             
Week52  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we52    =Sum(pds,(DayOfYear()== 356 ))+ Sum(pds,(DayOfYear()==  357 ))+ Sum(pds,(DayOfYear()==  358 ))+ Sum(pds,(DayOfYear()==  359 ))+ Sum(pds,(DayOfYear()==  360 ))+ Sum(pds,(DayOfYear()==  361 ))+ Sum(pds,(DayOfYear()==  362 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we52    =Sum(pds,(DayOfYear()== 355 ))+ Sum(pds,(DayOfYear()==  356 ))+ Sum(pds,(DayOfYear()==  357 ))+ Sum(pds,(DayOfYear()==  358 ))+ Sum(pds,(DayOfYear()==  359 ))+ Sum(pds,(DayOfYear()==  360 ))+ Sum(pds,(DayOfYear()==  361 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we52    =Sum(pds,(DayOfYear()== 354 ))+ Sum(pds,(DayOfYear()==  355 ))+ Sum(pds,(DayOfYear()==  356 ))+ Sum(pds,(DayOfYear()==  357 ))+ Sum(pds,(DayOfYear()==  358 ))+ Sum(pds,(DayOfYear()==  359 ))+ Sum(pds,(DayOfYear()==  360 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we52    =Sum(pds,(DayOfYear()== 353 ))+ Sum(pds,(DayOfYear()==  354 ))+ Sum(pds,(DayOfYear()==  355 ))+ Sum(pds,(DayOfYear()==  356 ))+ Sum(pds,(DayOfYear()==  357 ))+ Sum(pds,(DayOfYear()==  358 ))+ Sum(pds,(DayOfYear()==  359 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we52    =Sum(pds,(DayOfYear()== 352 ))+ Sum(pds,(DayOfYear()==  353 ))+ Sum(pds,(DayOfYear()==  354 ))+ Sum(pds,(DayOfYear()==  355 ))+ Sum(pds,(DayOfYear()==  356 ))+ Sum(pds,(DayOfYear()==  357 ))+ Sum(pds,(DayOfYear()==  358 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we52    =Sum(pds,(DayOfYear()== 358 ))+ Sum(pds,(DayOfYear()==  359 ))+ Sum(pds,(DayOfYear()==  360 ))+ Sum(pds,(DayOfYear()==  361 ))+ Sum(pds,(DayOfYear()==  362 ))+ Sum(pds,(DayOfYear()==  363 ))+ Sum(pds,(DayOfYear()==  364 )), 
                    we52    =Sum(pds,(DayOfYear()== 357 ))+ Sum(pds,(DayOfYear()==  358 ))+ Sum(pds,(DayOfYear()==  359 ))+ Sum(pds,(DayOfYear()==  360 ))+ Sum(pds,(DayOfYear()==  361 ))+ Sum(pds,(DayOfYear()==  362 ))+ Sum(pds,(DayOfYear()==  363 ))))))));   
                                                                                                             
                                                                                                             
Week53  =                                                                                                   
IIf((DayOfYear()==1)        ==(DayOfWeek()==    0   ),  we53    =Sum(pds,(DayOfYear()== 363 ))+ Sum(pds,(DayOfYear()==  364 ))+ Sum(pds,(DayOfYear()==  365 ))+ Sum(pds,(DayOfYear()==  366 ))+ Sum(pds,(DayOfYear()==  367 ))+ Sum(pds,(DayOfYear()==  368 ))+ Sum(pds,(DayOfYear()==  369 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    1   ),  we53    =Sum(pds,(DayOfYear()== 362 ))+ Sum(pds,(DayOfYear()==  363 ))+ Sum(pds,(DayOfYear()==  364 ))+ Sum(pds,(DayOfYear()==  365 ))+ Sum(pds,(DayOfYear()==  366 ))+ Sum(pds,(DayOfYear()==  367 ))+ Sum(pds,(DayOfYear()==  368 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    2   ),  we53    =Sum(pds,(DayOfYear()== 361 ))+ Sum(pds,(DayOfYear()==  362 ))+ Sum(pds,(DayOfYear()==  363 ))+ Sum(pds,(DayOfYear()==  364 ))+ Sum(pds,(DayOfYear()==  365 ))+ Sum(pds,(DayOfYear()==  366 ))+ Sum(pds,(DayOfYear()==  367 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    3   ),  we53    =Sum(pds,(DayOfYear()== 360 ))+ Sum(pds,(DayOfYear()==  361 ))+ Sum(pds,(DayOfYear()==  362 ))+ Sum(pds,(DayOfYear()==  363 ))+ Sum(pds,(DayOfYear()==  364 ))+ Sum(pds,(DayOfYear()==  365 ))+ Sum(pds,(DayOfYear()==  366 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    4   ),  we53    =Sum(pds,(DayOfYear()== 359 ))+ Sum(pds,(DayOfYear()==  360 ))+ Sum(pds,(DayOfYear()==  361 ))+ Sum(pds,(DayOfYear()==  362 ))+ Sum(pds,(DayOfYear()==  363 ))+ Sum(pds,(DayOfYear()==  364 ))+ Sum(pds,(DayOfYear()==  365 )), 
IIf((DayOfYear()==1)        ==(DayOfWeek()==    5   ),  we53    =Sum(pds,(DayOfYear()== 365 ))+ Sum(pds,(DayOfYear()==  366 ))+ Sum(pds,(DayOfYear()==  367 ))+ Sum(pds,(DayOfYear()==  368 ))+ Sum(pds,(DayOfYear()==  369 ))+ Sum(pds,(DayOfYear()==  370 ))+ Sum(pds,(DayOfYear()==  371 )), 
                    we53    =Sum(pds,(DayOfYear()== 364 ))+ Sum(pds,(DayOfYear()==  365 ))+ Sum(pds,(DayOfYear()==  366 ))+ Sum(pds,(DayOfYear()==  367 ))+ Sum(pds,(DayOfYear()==  368 ))+ Sum(pds,(DayOfYear()==  369 ))+ Sum(pds,(DayOfYear()==  370 ))))))));   
 
 
weekdays="sun,mon,tue,wed,thu,fri,sat";
 
 
 
 
Filter=yr;
//SetOption("NoDefaultColumns", True);
AddColumn(Week1,"w1",2.2);
AddColumn(Week2,"w2",2.2);
AddColumn(Week3,"w3",2.2);
AddColumn(Week4,"w4",2.2);
AddColumn(Week5,"w5",2.2);
AddColumn(Week6,"w6",2.2);
 
up to 52 week.
Back
Stock Portfolio Organizer

WiseTrader Toolbox

sumof weekly percentage change for Amibroker (AFL)
