Is there an equivalent of Excel's EOMonth function in JMP ?

uday_guntupalli

All, 
    Trying to see is there an equivalent of EOMonth function of Excel in JMP ?  I tried to rewrite it as a User Defined Function. While it works with most cases , my code fails in some cases. Trying to see if there is an inbuilt function that JMP offers before I spend more time on this ? 

Source for Screenshot : ExcelJet 

uday_guntupalli

Well, I guess I figured it out - but if anyone comes up with an easier / better / robust solution - please share - doesn't hurt . 

IsLeapYear = function({Input_Year},{Default Local},
						If(Is String(Input_Year),
							Input_Year = Num(Input_Year);
						  );
						If( (Mod(Input_Year,400) == 0 | (Mod(Input_Year,4) == 0  & Mod(Input_Year,100)!= 0)),
							return(1);
							,
							return(0);
						  );
					 );
EOMonth = function({Start_Date,Months},{Default Local},
						
						NewDate = Date Increment(Start_Date,"Month",Months,"start");
						
						NewMonth = Month(NewDate);
						NewDay = Day(NewDate);
						NewYear = Year(NewDate); 
						
						If(Contains({1,3,5,7,8,10,12},NewMonth),
							NewDay = 31; 
							,
							If(Contains({4,6,9,11},NewMonth),
								NewDay = 30; 
								,
								If(NewMonth == 2,
									If(IsLeapYear(NewYear), 
										NewDay = 29; 
										,
										NewDay = 28;
									  );
								  );
							  );
						  ); 

						
						// Return Result 
						return(Date MDY(NewMonth,NewDay,NewYear));
				  );

Start_Date = Date MDY(2,15,2015); 
Months = -15;
Show(As Date(Start_Date)); 
NewDate = EOMonth(Start_Date,Months); 
Show(As Date(NewDate));