• 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 date value in configurable string format

Parameters:
DateVal	The date value that will be turned into a string
FMode	Formatting mode code (more details in the example below).
FormatedDate	The string that will receive the formated date.

external inner procedure LongDateToStr(date,integer,var string);

global
procedure OnApplicationStartup() 
begin
  time t;
  date d;
  string 255 tstr,dstrings;
  
  d = "28.28.03";
  // day.month.year
  LongDateToStr(d,1,tstr);
  dstrings = dstrings & tstr & " / ";
  // year.month.day
  LongDateToStr(d,2,tstr);
  dstrings = dstrings & tstr & " / ";
  // year.day.monthname
  LongDateToStr(d,3,tstr);
  dstrings = dstrings & tstr;
  
  stopalert(dstrings);
  return;
end;

Related topics: