[Search for users] [Overall Top Noters] [List of all Conferences] [Download this site]

Conference ilbbak::ibi_focus

Title:	FOCUS, from INFORMATION BUILDERS

Moderator:	ZAYIUS::BROUILLETTE

Created:	Thu Feb 19 1987
Last Modified:	Mon May 05 1997
Last Successful Update:	Fri Jun 06 1997
Number of topics:	615
Total number of notes:	1779

354.0. "Dates field from Focus to DTR. " by ASKFOR::HAIGH (Wine, women and amateur dramatics!) Thu Jul 26 1990 13:06

    Hello people,
    
    	This is cross-posted in SHIRE::FOCUS, but there doesn't seem to be
    to much activity in there.
    
    
                <<< SHIRE::BEORN:[NOTES$LIBRARY]FOCUS.NOTE;1 >>>
                      -< European FOCUS Notes Conference >-
================================================================================
Note 229.0               Dates field from Focus to DTR.               No replies
ASKFOR::HAIGH "Wine, women and amateur dramatics!"   28 lines  25-JUL-1990 16:51
--------------------------------------------------------------------------------
    Hello all,
    
    	First I'd like to say I have never worked much with FOCUS, so I may
    be out of line with some of my ideas, anyway...
    
    
    	We are trying to get a 'HOLD' file into Datatrieve. By looking at
    the .MAS file we were able to get all the data successfully into the DTR
    domain EXCEPT the date fields!
    
    
    	These have a format of 
    
    		I8YYMTD,	I04.
    
    
    	The problem is that DTR doesn't understand dates unless they are in
    a specific format (as is stated in note 133.) So, my question is, is it
    possible to output dates into a HOLD file in the format required by
    Datatrieve i.e. an *-byte binary value?
    
    	If not is it possible to just output the date as an Alphanumerical
    value into a HOLD file?
    
    
    		Thanks
    
    		Steve

T.R Title User Personal
Name Date Lines

354.1 Date suggestions FLAME::MADDEN Mon Aug 06 1990 17:06 10

T.R	Title	User	Personal Name	Date	Lines
354.1	Date suggestions	FLAME::MADDEN		`Mon Aug 06 1990 17:06`	10
	I believe if you SET HOLD = ALPHA your I8YYMTD would look like in the hold data as for example: 19900806 You could also use a define field to create an alpha date. You might want to look at the user subroutine CHGDAT. As far as 64 bit DEC std date format - I think if your dates were originally based on the system date you could use the GETSTIME sub to store them as A8 and then put them in a hold file for DTR. There's another sub called CVTSTIME to read them (in FOCUS).

    I believe if you SET HOLD = ALPHA  your I8YYMTD would look 
    like in the hold data as for example:  19900806  
    
    You could also use a define field to create an alpha date.  You 
    might want to look at the user subroutine CHGDAT.
    
    As far as 64 bit DEC std date format - I think if your dates were
    originally based on the system date you could use the GETSTIME sub
    to store them as A8 and then put them in a hold file for DTR.
    There's another sub called CVTSTIME to read them (in FOCUS).