( |
|
|
|||
Returns true if argument is correct time and false if argument is blank |
Parameters: | |
Time for comparision with blank time | |
function Boolean TimeInRangeUserCheck(Time tt,Time st,Time et) BEGIN Boolean res; res = true; if (nonblanktime(st)) then begin if (tt<=st) then begin res = false; end; end; if (nonblanktime(et)) then begin if (tt>=et) then begin res = false; end; end; if (blanktime(tt)) then begin res = true; end; TimeInRangeUserCheck = res; RETURN; END;
Related topics: |