My IPeople

Internal Meditech Time is set up in two formats.

                1) 4 digit clinical  (EX: 9072)

                2) 9 digit format   (EX:902345678)

Each represents a counter from March 1st 1980.  The 4 digit is the number of days since March 1st 1980 and the 9 digit is the number of seconds since March first 1980.  

It is important to note that the clinical 4 digit date can not be used as a time field.  It is simply the number of days since March 1st 1980 and there is no way to convert this data into a time field.  

Both the 4 digit date and the 9 digit time can be converted into standard formats using any of the Z programs that are provided by Meditech. 

Sample Clinical date programs:

      Z.date.clin.npr

      Z.date.out

 Sample Time programs:

     Z.time.out

     Z..stime.out

There are a number of programs that can convert the data into whatever output might be desired.

 Two less common programs are the $DATE and $TIME programs.

     $DATE(A) A = 4 date or 9 digit time will produce the format of YY/MM/DD    (EX: 03/11/26)

     $DATE1(A) A = 4 date or 9 digit time will produce the format of Month DD, YYYY (EX: Nov 26, 2003)

     $TIME(A) A = 9 digit time (Date can not be used) will produce (EX:12:06:54)

We are calculating turn-around-times for our ED and I have come across one of the 9-digit time formats.  Has anyone converted this time using SQL Server into a usable date time in IPeople Direct?

Here is a SQL function I have used to convert a 9 digit MEDITECH stamp to a PC Date/Time. 

CREATE FUNCTION fn_DateFromMedSeconds
   (@strMeditechSeconds As varchar(50), @blnTime As bit = 0 )
RETURNS varchar(255)
AS
/*
    'Purpose:
    '       Convert Meditech Date from Seconds to a standard date
    '           assuming seconds since 3/1/1980
    'Input:
    '       strMeditechSeconds  - a string in the format of sssssssss
    '       blnTime          - a boolean value
    '                           default=False
    'Output:
    '       a string in one of two formats
    '           if blnTime=True then mm/dd/yyyy hh:nn:ss
    '           if blnTime=False then mm/dd/yyyy
    'History:
    '       02/25/2005  Created: Brett Blue
*/   
BEGIN
  Declare @out varchar(255)

 SET @out = DATEADD(second, @strMeditechSeconds, '3/1/1980')
 If (@blnTime = 1)
  SET @out = convert(varchar(20), 100, @out)
 Else
  SET @out = convert(varchar(20), 101, @out)

   RETURN (@out)
END