>I am not using vfp 6 at all to do any mods. I don't know if it would have any problems. I have 3 specific questions concerning sbt.
>
>1: In 3 specific prgs sbt turns century off and does not turn it back on why?
> SBTPro\AP\APBANK.PRG
> SBTPro\GL\GLRLOG.PRG
> SBTPro\SO\SO.PRG
>
>2: In sbt.prg they set century off and then set century to 19 directly Why?
>
>3: Why in several prgs do they set century off and the do some stuff and then set century on?
>
>
>These are my main y2k concerns with sbt does anyone have any answers.
>
>Thanks
>Darren Mc Dowell


Do you know what SBT stands for? Sad But True.
set smart_ass off


I looked at AP\APBANK.PRG
here is the code that I just installed?

*-- If beginning Date is not empty then set the filter
IF NOT EMPTY(g_retdt(lc_bdate))
ld_bdate = g_retdt(lc_bdate)

SET CENTURY ON
lc_fltcond = lc_fltcond + ;
" AND IIF(apstat = 'B', bankdate, checkdate) >=" + ;
" {" + ;
DTOC(ld_bdate) + "}"
SET CENTURY OFF
ENDIF

But the thing to llok at is the g_retdt()
*------------------------------------------------------------------------------
*- Version....: SBT Pro Series 5.00.00
*- File Name..: $Workfile: g_retdt.prg $
*- Combined into system procedure file SBTPROC for compilation
*- VCS Level..: $Revision: 1.7 $
*- Last Update: $Date: 28 Apr 1998 10:06:22 $
*------------------------------------------------------------------------------
*- Notice.....: Copyright (c) 1985-1998 SBT Corporation. All rights reserved.
*------------------------------------------------------------------------------
*- Description: Return date with proper century value
*------------------------------------------------------------------------------
*- Synopsis...: Determine the century value of a date passed in
*- the format MM/DD/YY using the global variable and converts
*- the data to a date type from a character string.
*-
*- Example: gn_cntmak = 1950
*-
*- A year value >= 50 will be returned with a 20th century date.
*- The date 07/01/96 will be returned as 07/01/1996.
*-
*- A year value < 50 will be updated with a 21st century date.
*- The date 07/01/00 will be returned as 07/01/2000.
*------------------------------------------------------------------------------
*- Passed:
*- Variables..: None
*-
*- Parameters.: px_date, a date or character date string in the format MM/DD/YY
*- pn_cntmrk, century begin mark. Optional parameter, if not value
*- is passed it will use the global value from gn_cntmrk
*------------------------------------------------------------------------------
*- Returns:
*- Value......: Date with a century value
*------------------------------------------------------------------------------
*- Example: ld_bdate = g_retdt(lc_bdate)
*------------------------------------------------------------------------------


Re-READ the Synopsis and see the CHARACTER reference. That scares the crap out of me. I hate SBT for this stupidity! Use a freakin data like it's suposed to instead they keep old Foxbase, Clipper, Silverfox compatibility/functionality well past the move to VFP.

This is why I laughed at DevCon 98 when SBT won a porting award. They didn't do crap, it's just advertising dollars spent?

But getting back to set century off, I looks like tons of code is expecting a 2 digit year and this will fix it for normal dates today. Just don't set up a 75 year lease.

__Stephen