ToolsIII CToMonth()

[Manfred]

Hi,

nur für die, die die Funktion CToMonth() aus den Tools3 nutzen.

Bei CToMonth("") gibt es eine 12 zurück

und bei CToMonth("März") gibt es eine 0 zurück.

beides ist falsch. Alaska weiß Bescheid. 1.= PDR 2. = CToMonth(ConvToOEMCP("März")) Naja, nicht gerade die Lösung.

[brandelh]

Hallo Manfred,

gerade bei der "März" Version ist das doch sicherlich abhängig von der SET CHARSET TO ANSI / OEM Einstellung oder ?

[Jan]

Ist ja interessant. Sei wie vielen Jahren ist an den Tools schon nichts mehr geschraubt worden? Und heute erst fällt der Fehler jemandem auf? Spricht ja nicht sehr für die Verbreitung der Nutzung der Tools. Wobei ich gestehen muß das ich die letzten zwei oder drei Tools-Funktionen auch vor einiger Zeit aus meinen Programmen rausgeworfen habe. Nur dafür auch noch immer reihenweise dll für meine Kunden bereitzuhalten war mir dann irgendwie zu blöd.

Aber den PDR finde ich nicht. Kein Eintrag in der Volltextsuche zu "CToMonth" gefunden.

Jan

[Manfred]

http://www.alaska-software.com/scripts/ ... PDRID=6481

Ich denke mal, viele wissen gar nicht mehr die Tools zu schätzen, oder das es sie überhaupt noch gibt. ich nutze einige Dinge noch daraus und finde sie auch sehr wichtig und nützlich. Aber jeder so wie er will. Und die Sache mit den zusätzlichen DLL..... das ist Kappes hoch12 Xbase++ selbst hat soviele DLL dabei, da spielen die 2 auch keine Rolle mehr.

[Manfred]

Hi Hubert,

sicherlich, aber man denkt nicht immer daran und sucht und sucht und sucht.

[Jan]

Ist ja interessant. In der Volltextsuche ist der Beitrag eindeutig nicht zu finden.

Jan

[Manfred]

Wenn ich das aber jetzt richtig lese, dann ist das Problem schon behoben in einer 2.0.xxx Version.

[Tom]

Code: Alles auswählen

FUNCTION MyCToMonth(cMonth)
DO CASE
  CASE cMonth == "Januar"
  RETURN 1
  CASE cMonth == "Februar"
  RETURN 2
  ..
ENDCASE
RETURN 0

Geht auch noch eleganter. Gerade die Datums- und Zeitfunktionen aus den Tools sind m.E. alles andere als verlässlich; ich habe fast alle durch eigene ersetzt.

[AUGE_OHR]

nur für die, die die Funktion CToMonth() aus den Tools3 nutzen.

ich versuche ja die Tools "los-zu-werden" ...

es gibt doch SETLOCALE() und damit bekommst du die OS() Einstellungen

NLS_SMONTHNAME1 "Januar"
NLS_SMONTHNAME2 "Februar"
NLS_SMONTHNAME3 "März"
NLS_SMONTHNAME4 "April"
NLS_SMONTHNAME5 "Mai"
NLS_SMONTHNAME6 "Juni"
NLS_SMONTHNAME7 "Juli"
NLS_SMONTHNAME8 "August"
NLS_SMONTHNAME9 "September"
NLS_SMONTHNAME10 "Oktober"
NLS_SMONTHNAME11 "November"
NLS_SMONTHNAME12 "Dezember"

das kannst du doch als "String" zusammenstellen

Code: Alles auswählen

cString := "NLS_SMONTHNAME"+LTRIM(STR(nMonat))
? SetLocale( cString )

[UliTs]

Jimmy, es ging um die umgekehrte Funktion .

Uli

[AUGE_OHR]

Jimmy, es ging um die umgekehrte Funktion .

uuuuups ... auch egal ... man kann ja die NLS_SMONTHNAMEx vom OS() "lesen" und sich damit selbst die "umgekehrte" Funktion bauen als "Ersatz" für CToMonth()

[Manfred]

Höhö,

so wie es aussieht liefert die Funktion CToDoW() auch Müll zurück, wenn ein Leerstring drinsteht. Nämlich 7

[Wolfgang Ciriack]

Gibt ja auch keinen Monat der "" oder Leer heißt.