• Introduction
  • What is HAL?
  • Get Started
  • Language Reference
    • Declarations, assignments and statements
    • Keywords and operations
• Tutorials
  • Change a window
    • Find the window
    • Modify the window
  • Create a report
• HAL Primitives
• HAL Procedures/Functions
• HAL Discussions

Description:

Returns year part of the given Date

Parameters:
d	Date

procedure LastInMonth(Date d,var Date res)
BEGIN
  Integer i,j;
  
  i = GetYear(d);
  j = GetMonth(d);
  i = DaysInMonth(i,j);
  j = GetDay(d);
  i = i-j;
  res = AddDay(d,i);
  RETURN;
END;

Related topics: