PostgreSQL Datum -> NLS "local" ? [erledigt]

Hier dreht es sich um den PostGre Server

Moderator: Moderatoren

Antworten
Benutzeravatar
AUGE_OHR
Marvin
Marvin
Beiträge: 12903
Registriert: Do, 16. Mär 2006 7:55
Wohnort: Hamburg
Hat sich bedankt: 19 Mal
Danksagung erhalten: 44 Mal

PostgreSQL Datum -> NLS "local" ? [erledigt]

Beitrag von AUGE_OHR »

hi,

ich bekomme von SQL ja Datum als (Z)String (ot4xb) im Format YYYY-MM-DD

Edgar hat nun
here we use set date british (dd/mm/aaaa)
während wir ja DD.MM.YYYY verwenden.

Frage : wie gibt es eine Xbase++ Application Datum immer "local" richtig formatiert aus ?

... ich könnte den (Z)String ja ins YYYYMMMDDHHMMSS Format bringen und das über TimeZone API versuchen aber es müsste doch mit "pure" Xbase++ möglich sein ... ich komme nicht drauf.
Zuletzt geändert von AUGE_OHR am Mo, 02. Jul 2012 3:27, insgesamt 1-mal geändert.
gruss by OHR
Jimmy
Benutzeravatar
AUGE_OHR
Marvin
Marvin
Beiträge: 12903
Registriert: Do, 16. Mär 2006 7:55
Wohnort: Hamburg
Hat sich bedankt: 19 Mal
Danksagung erhalten: 44 Mal

Re: PostgreSQL Datem -> NLS "local" ? [erledigt]

Beitrag von AUGE_OHR »

so nun bin ich doch darauf gekommen wie es gehen "müsste"

Code: Alles auswählen

// Einstellung des OS() übernehmen. evtl vom User geändert z.b. DD.MM.YY Kurzformat
SET DATE SYSTEM    

      // 0 Zero - based
      xRet := ::getValue( ::curTuple, nPosi - 1 )
      // convert to local Format
      IF ::UsedField[nPosi][DBS_TYPE] = "D"
         xRet := ::DateSQL2local(xRet)
      ENDIF


METHOD PGResult:DateSQL2local(cString)
LOCAL dDate
LOCAL cDate

   cDate := STRTRAN(cString,"-","")   // SQL (Z)String YYYY-MM-DD
   dDate := STOD(cDate)
   IF EMPTY(dDate) // not valid
*     cDate := DTOC( dDate ) // -> String with Space
      cDate := DTOC( DATE() )
   ELSE
      cDate := DTOC( dDate )
   ENDIF
// local Date Format for SLE and Browse
RETURN cDate
gruss by OHR
Jimmy
Antworten