[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

187.0. "Dtr -date definition for Focus" by HSKAPL::SIHVONEN (We play 'D'ennis) Wed Mar 15 1989 03:14


		I've got a focus masterfile description problem concerning 
		a datatrieve created rms-indexed file. All other fields I have
		been able to define (for Focus) ok, except the one holding the 
		date. In datatrive I have used the format dd-mmm-yy.

		My masterfile looks now like this:
		
FILENAME=VARASTO,SUFFIX=ISAM
SEGNAME=ROOT,SEGTYPE=S1
GROUP=DEC_KEY,ALIAS=KEY,USAGE=A12,ACTUAL=A12,$
FIELDNAME=DEC_NO,ALIAS=KEY,USAGE=A12,ACTUAL=A12,$
FIELDNAME=ASIAKAS,ALIAS=AS,USAGE=A25,ACTUAL=A25,$
FIELDNAME=LAJI,ALIAS=LAJI,USAGE=P1,ACTUAL=Z1,$
FIELDNAME=KLL,ALIAS=KLL,USAGE=P2,ACTUAL=Z2,$
FIELDNAME=KG,ALIAS=KG,USAGE=P4,ACTUAL=Z4,$
FIELDNAME=KULJ_MUOTO,ALIAS=KULJ,USAGE=P1,ACTUAL=Z1,$

The problem ---------> FIELDNAME=DATE,ALIAS=PVM,USAGE=??,ACTUAL=??,$
		
		I'm tired of banging my head around. I bet somebody has already
 		solved the problem.
T.RTitleUserPersonal
Name		DateLines
187.1Got an answer alreadyHSKAPL::SIHVONENWe play 'D'ennisFri Mar 17 1989 04:195
       		Just to be shure I included this message in both Focus
    -conferences. Now I have got the answer for my question in the3
    other conference so if You want to see the answer please refer to
    shire::focus, note 1`13.
187.2Cross-posted solutionINCH::OTTENTake me to your LizardWed Mar 29 1989 07:5628
               <<< SHIRE::LAYERED:[NOTES$LIBRARY]FOCUS.NOTE;1 >>>
                      -< European FOCUS Notes Conference >-
================================================================================
Note 133.1               Dtr -date definition for Focus                  1 of 10
YARD::OTTEN "Take me to your Lizard"                 17 lines  15-MAR-1989 15:50
                   -< possible, not easy - example follows >-
--------------------------------------------------------------------------------

    Talk to the MRE people - they have a routine to fix into FOCUS that
    unpacks dates - it converts an 11-character VAX format date (understood
    by VMS, DTR, etc.....
    To a I8 format FOCUS Date.
    
    so: (VDTCNV is the routine)
    
FIELDNAME = PRC_EFV_DT_I  ,             ,A8       ,A8       ,$
DEFINE FILLER1_I/A11=CVTSTIME(1,PRC_EFV_DT_I,FILLER1_I);$
DEFINE FILLER2_I/I8=VDTCNV(FILLER1_I,FILLER2_I);$
DEFINE PRC_EFV_DT_I/I8YYMTD=IF FILLER2_I EQ 18581117 THEN 00000000 
                                ELSE FILLER2_I;$

    Contact me,on 7-781-4424 or the ADG Hotline on 7-781-4138 - 
    
    David
    
    Please Note - this'll only work if you have MRE Installed on your
    machine, or have done the post-installation procedures for MRE.
187.3Focus 5.2.1 has a DATE datatype of Rdb, rms?NRMLZE::ESTESThu Apr 06 1989 14:3410
    You also should look at Focus V 5.2.1.   It has included support
    for Date fields and G_floating data types. 
    
    There example is in the Rdb interface manual but it may apply to
    Rms as well.
    
    Regards,
    
    
    Stu
187.4ANY SUGGESTIONS FOR CONVERTING WITHOUT MRE ?DECXPS::KELTINGFri Nov 30 1990 15:027
    I'm working with a FOCUS System which has not got MRE loaded on to it.
    Are there any suggestions on how to perform the same DTR Date
    Conversion without the VDTCNV routine ?
    
    .MAS with FIELDNAME=ISSUE_DATE     ,,USAGE=I11,     ACTUAL=I4,$
    is returning data as : -1738475691. Any smaller USAGE only produces
    ***s.
187.5CUCKOO::OTTENMiddle-Management Buck-passer.Mon Dec 03 1990 04:035
Why not link in the same MRE Routines, without 
necessarily installing MRE?


David
187.6??? Link In Same MRE Routines ???DASXPS::KELTINGMon Dec 03 1990 07:567
    I've tried to use the same routine both within the .MAS & DEFINE FILE
    neither had success as the function VDTCNV is not recognized. The
    output received is merely a copy of the raw data untranslated.
    
    It seems no one here has heard of MRE Routines. What are they ? 
    Where can they be located for copy ? Or is there a substitute process
    which could be applied ?
187.7CUCKOO::OTTENMiddle-Management Buck-passer.Mon Dec 03 1990 09:338
You can get the MRE routines from the MRE save_sets..
Specifically, Save_set B.

Otherwise, they're now in default decnet on DASXPS

Phone me on 782-2675, and I'll tell you how to use them..

David
187.8CVTSTIME ??MILPND::MADDENWed Dec 05 1990 16:054
    If everyone is talking about 8-byte Digital standard date format then 
    as I recall use an actual format of A8, use the CVTSTIME subroutine 
    	as documented in the FOCUS Sub. Lib User Manual, in for example
    	a define  field.