Solved

Comparing my Table Date, Time fields with System Date&Time.

Posted on 2002-07-25
11
184 Views
Last Modified: 2010-04-04
My Dbase Table have fields 'ST_TIME' Character (10) for Time and 'ST_DATE' Date(8) field for Date. I am using these field to save System Input Time and Date from my application.
I have a calculation in my logic to compare this table 'ST_DATE, 'ST_TIME' with the system present Date&Time. If the difference is more than 48 hours I have some logic to do(like closing the record).
 So how can I compare that table 'ST_DATE', 'ST_TIME' with system present Date&Time to find 48 hours difference.
My Table is saving time like :- 11:56:32PM
                   date like :- 25/07/2002

 Please help me to calculate/compare 48 hours time difference. For ex.if do
(Table.FieldByName('ST_TIME').AsSting - TimetoStr(Time)).

 I am getting errors. Please tell me the way to do this.
0
Comment
Question by:VENKAT
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 6
  • 5
11 Comments
 
LVL 27

Expert Comment

by:kretzschmar
ID: 7176635
try

if time-strtotime(Table.FieldByName('ST_TIME').AsSting) > 2 then ...

but attention
your apptimeformat or systemtimeformat must
be set to this format

11:56:32PM

meikl ;-)
0
 
LVL 27

Accepted Solution

by:
kretzschmar earned 20 total points
ID: 7176642
oops something missed->ST_Date

replace this

if time-strtotime(Table.FieldByName('ST_TIME').AsSting) > 2 then ...

with

if now-(
   Trunc(strtodate(Table.FieldByName('ST_DATE').AsSting))+  
   Frac(strtotime(Table.FieldByName('ST_TIME').AsSting))
   ) > 2 then ...

just from head, not tested

meikl ;-)
0
 
LVL 27

Expert Comment

by:kretzschmar
ID: 7176645
but attention
your apptimeformat or systemtimeformat and
your appdateformat or systemdateformat
must be set to your format

0
[Live Webinar] The Cloud Skills Gap

As Cloud technologies come of age, business leaders grapple with the impact it has on their team's skills and the gap associated with the use of a cloud platform.

Join experts from 451 Research and Concerto Cloud Services on July 27th where we will examine fact and fiction.

 
LVL 1

Author Comment

by:VENKAT
ID: 7176690
hi kretzschmar
       thank u. But How can I check with my Date and Time both with present Date and Time to get 48 hours difference.
0
 
LVL 1

Author Comment

by:VENKAT
ID: 7176694
hi kretzschmar
       thank u. But How can I check with my Date and Time both with present Date and Time to get 48 hours difference.
0
 
LVL 27

Expert Comment

by:kretzschmar
ID: 7176699
now() gives you the current-datetime,
see above, the if statement does all for you

one day is represented by 1

meikl ;-)
0
 
LVL 1

Author Comment

by:VENKAT
ID: 7176701
hi kretzschmar
       thank u. But How can I check with my Date and Time both with present Date and Time to get 48 hours difference.
0
 
LVL 1

Author Comment

by:VENKAT
ID: 7176705
sorry I think my page was refresh..i will check first.
0
 
LVL 1

Author Comment

by:VENKAT
ID: 7176711
I used like this...my ST_DATE is date field which have date like 25/07/2002.
        if now - (
          Trunc(TimeTable.FieldByName('ST_DATE').AsDateTime)+
          Frac(strtotime(TimeTable.FieldByName('ST_TIME').AsString))
          ) > 2 then
...Now I am getting error like 25/07/2002 is not valid DateTime.
0
 
LVL 27

Expert Comment

by:kretzschmar
ID: 7176718
well,
your system-shortdateformat seems
to be other than dd/mm/yyyy

at appstart (for ex. in the create-event of your mainform)
set the dateformat appwide with

shortdateformat := 'dd/mm/yyyy';
dateseparator := '/';

meikl ;-)
0
 
LVL 1

Author Comment

by:VENKAT
ID: 7176782
thank u..success.
0

Featured Post

Ready to get started with anonymous questions?

It's easy! Check out this step-by-step guide for asking an anonymous question on Experts Exchange.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

The uses clause is one of those things that just tends to grow and grow. Most of the time this is in the main form, as it's from this form that all others are called. If you have a big application (including many forms), the uses clause in the in…
Introduction The parallel port is a very commonly known port, it was widely used to connect a printer to the PC, if you look at the back of your computer, for those who don't have newer computers, there will be a port with 25 pins and a small print…
There are cases when e.g. an IT administrator wants to have full access and view into selected mailboxes on Exchange server, directly from his own email account in Outlook or Outlook Web Access. This proves useful when for example administrator want…
In this video, viewers are given an introduction to using the Windows 10 Snipping Tool, how to quickly locate it when it's needed and also how make it always available with a single click of a mouse button, by pinning it to the Desktop Task Bar. Int…
Suggested Courses
Course of the Month9 days, 23 hours left to enroll

624 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question