28 #include "../../Landscape/ls.h"
29 #include "../../Landscape/cropprogs/SpringBarleySilage.h"
66 m_field->SetMDates(0,0,g_date->DayInYear(1,7));
68 m_field->SetMDates(1,0,g_date->DayInYear(25,7));
80 g_msg->Warn( WARN_BUG,
"SpringBarleySilage::Do(): "
81 "Harvest too late for the next crop to start!!!",
"" );
85 for (
int i=0; i<noDates; i++) {
100 d1 = g_date->OldDays() + g_date->DayInYear( 1,7 );
101 if (g_date->Date() < d1)
104 g_msg->Warn( WARN_BUG,
"SpringBarleySilage::Do(): "
105 "Crop start attempt between 1st Jan & 1st July",
"" );
111 if (g_date->Date() > d1)
114 g_msg->Warn( WARN_BUG,
"SpringBarleySilage::Do(): "
115 "Crop start attempt after last possible start date",
"" );
122 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 1,4 ),
131 d1 = g_date->OldDays() + g_date->DayInYear( 1,11 );
132 if ( g_date->Date() > d1 ) {
150 g_date->DayInYear( 30,11 ) - g_date->DayInYear())) {
159 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 15,3 )+365,
161 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 15,3 )+365,
163 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 1,3 )+365,
167 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 20,3 )+365,
176 g_date->DayInYear( 15, 4 ) - g_date->DayInYear())) {
194 g_date->DayInYear( 15, 4 ) - g_date->DayInYear())) {
211 g_date->DayInYear( 15, 4 ) - g_date->DayInYear()))
229 g_date->DayInYear( 15, 4 ) - g_date->DayInYear()))
248 g_date->DayInYear( 10, 4 ) - g_date->DayInYear())) {
261 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 20,3 ),
267 g_date->DayInYear( 10, 4 ) - g_date->DayInYear())) {
276 g_date->DayInYear( 10, 4 ) - g_date->DayInYear())) {
293 g_date->DayInYear( 10, 4 ) - g_date->DayInYear())) {
298 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 20,3 ),
304 g_date->DayInYear( 10,4 ) - g_date->DayInYear())) {
313 g_date->DayInYear( 10,4 ) - g_date->DayInYear())) {
317 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 5,4 ),
325 g_date->DayInYear( 20,4 ) - g_date->DayInYear())) {
330 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 15,4 ),
338 g_date->DayInYear( 25,4 ) - g_date->DayInYear())) {
349 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 5,5 ),
353 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 10,5 ),
355 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 10,5 ),
357 SimpleEvent(g_date->OldDays() + g_date->DayInYear(15, 5),
368 g_date->DayInYear( 10,5 ) - g_date->DayInYear())) {
381 Field * pf = dynamic_cast<Field*>(
m_field);
382 pf->Add_missed_herb_app();
387 g_date->DayInYear( 10,5 ) - g_date->DayInYear())) {
400 g_date->DayInYear( 25,5 ) - g_date->DayInYear())) {
418 g_date->DayInYear( 30,5 ) - g_date->DayInYear()))
423 if (g_date->DayInYear()+10<g_date->DayInYear( 1,6 ))
424 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 1,6 ),
443 g_date->DayInYear( 1,7 ) - g_date->DayInYear() ))
513 Field * pf = dynamic_cast<Field*>(
m_field);
514 pf->Add_missed_fi_app();
530 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 25,6 ),
541 SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 7),
547 SimpleEvent( g_date->OldDays() + g_date->DayInYear( 25,7 ),
554 g_date->DayInYear( 8,8 ) - g_date->DayInYear())) {
564 d1=g_date->DayInYear();
569 g_msg->Warn( WARN_BUG,
"SpringBarleySilage::Do(): "
570 "Unknown event type! ",
"" );