28 #include "../../Landscape/ls.h"
29 #include "../../Landscape/cropprogs/Sugarbeet.h"
59 m_field->SetMDates(0, 0, g_date->DayInYear(1, 10));
61 m_field->SetMDates(1, 0, g_date->DayInYear(30, 12));
74 g_msg->Warn(WARN_BUG,
"SugarBeet::Do(): "
75 "Harvest too late for the next crop to start!!!",
"");
79 for (
int i = 0; i<noDates; i++) {
97 d1 = g_date->OldDays() + g_date->DayInYear(1, 7);
98 if (g_date->Date() < d1)
101 g_msg->Warn(WARN_BUG,
"SugarBeet::Do(): "
102 "Crop start attempt between 1st Jan & 1st July",
"");
108 if (g_date->Date() > d1)
111 g_msg->Warn(WARN_BUG,
"SugarBeet::Do(): "
112 "Crop start attempt after last possible start date",
"");
129 d1 = g_date->OldDays() + g_date->DayInYear(10, 3) + 365;
157 g_date->DayInYear(10, 4) -
158 g_date->DayInYear())) {
171 g_date->DayInYear(10, 4) -
172 g_date->DayInYear())) {
185 g_date->DayInYear(10, 4) -
186 g_date->DayInYear())) {
199 g_date->DayInYear(14, 4) -
200 g_date->DayInYear())) {
212 g_date->DayInYear(15, 4) -
213 g_date->DayInYear())) {
219 int d1 = g_date->OldDays() + g_date->DayInYear(20, 4);
233 Field * pf = dynamic_cast<Field*>(
m_field);
234 pf->Add_missed_herb_app();
235 if (
m_farm->
DoIt(80)) pf->Add_missed_herb_app();
236 if (
m_farm->
DoIt(60)) pf->Add_missed_herb_app();
248 int d1 = g_date->Date() + 7;
249 if (d1 < g_date->OldDays() + g_date->DayInYear(2, 5)) {
250 d1 = g_date->OldDays() + g_date->DayInYear(2, 5);
260 g_date->DayInYear(18, 5) -
261 g_date->DayInYear())) {
267 int d1 = g_date->Date() + 7;
268 if (d1 < g_date->OldDays() + g_date->DayInYear(10, 5)) {
269 d1 = g_date->OldDays() + g_date->DayInYear(10, 5);
281 g_date->DayInYear(18, 5) -
282 g_date->DayInYear())) {
293 g_date->DayInYear(25, 5) -
294 g_date->DayInYear())) {
301 int d1 = g_date->Date() + 7;
302 if (d1 < g_date->OldDays() + g_date->DayInYear(17, 5)) {
303 d1 = g_date->OldDays() + g_date->DayInYear(17, 5);
316 SimpleEvent(g_date->OldDays() + g_date->DayInYear(20, 5),
318 SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 6),
320 SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 7),
326 g_date->DayInYear(15, 6) -
327 g_date->DayInYear())) {
337 SimpleEvent(g_date->OldDays() + g_date->DayInYear(8, 6),
348 Field * pf = dynamic_cast<Field*>(
m_field);
349 pf->Add_missed_fi_app();
350 if (
m_farm->
DoIt(81)) pf->Add_missed_fi_app();
366 SimpleEvent(g_date->OldDays() + g_date->DayInYear(8, 6),
375 g_date->DayInYear(15, 6) -
376 g_date->DayInYear())) {
387 SimpleEvent(g_date->OldDays() + g_date->DayInYear(8, 6),
396 g_date->DayInYear(30, 7) -
397 g_date->DayInYear())) {
409 SimpleEvent(g_date->OldDays() + g_date->DayInYear(8, 6),
418 g_date->DayInYear(25, 6) -
419 g_date->DayInYear())) {
441 if (
m_field->GetMConstants(0) == 0) {
443 g_msg->Warn(WARN_BUG,
"Sugarbeet::Do(): failure in 'Harvest' execution",
"");
458 g_msg->Warn(WARN_BUG,
"Sugarbeet::Do(): "
459 "Unknown event type! ",
"");