• 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:

Increases the date and time variables by a specified amount of minutes.

Parameters:
DateVal	The date value that will receive the increment defined in minutes
TimeVal	The time value that will receive the increment defined in minutes
AddMinutes	The amount of minutes that will be added to time/date

external procedure AddMinutesToDateTime(var date,var time,longint);

function boolean UniversityCacheRecordExpired(record UniversityURLCacheVc UUCr)
begin
  date d;
  time t;
  boolean res;
  
  res = false;
  d = UUCr.UDate;
  t = UUCr.UTime;
  AddMinutesToDateTime(d,t,UniversityCacheAgeLimit);
        
  if (d<=CurrentDate) then begin
    if (d==CurrentDate) then begin
      if (t<=CurrentTime) then begin
        res = true;
      end;
    end else begin
      res = true;
    end;
  end;
  UniversityCacheRecordExpired = res;
  return;
end;

Related topics: