datum tag anzeige.

Hallo zusammen

Ich bin gerade dabei einen Termin plan für unsere Verkäufer für vor Ort Termine zu erstellen .

habe einen frage .
ich möchte gerne das navi den tag selber bezieht anzeigt wenn ich datum eingebe.

Und die Übersicht dann aus bedrucken.

Du hast keine ausreichende Berechtigung, um die Dateianhänge dieses Beitrags anzusehen.

Meinst du den Tag namen? also "Montag"?

falls das so is: schau dir mal die Date Tabelle an :)

ich würde es gerne so abbilden.

wenns geht mit ferirtagen.

Du hast keine ausreichende Berechtigung, um die Dateianhänge dieses Beitrags anzusehen.

Wie gesagt schau dir mal die Date Tabelle an ;) und "Period Type" auf "Day" stellen und tadaaa haste FAST das was du willst.

vll. kannst du auch einfach den Basiskalender nutzen :)

Die Feiertage kannst du, sofern sie eingepflegt sind, aus der Tabelle "Base Calendar Change" ermitteln. Ich hab das kürzlich erst gemacht ^^ - hier mal ein Schubs in die Richtung (damit werden btw. auch Wochenenden abgedeckt):

Code:


fnTagesTyp(parDatum : Date) : Code[10]
// ****************************************************************************
// ***** Diese Funktion ermittelt, ob das übergebene Datum ein Arbeitstag ist.
// ***** Feiertage werden dabei berücksichtigt.
// ***** Zurückgegeben wird 'WERK' oder 'WOENDE' oder 'FEIER'
// ****************************************************************************

DateL.RESET;
DateL.SETRANGE(DateL."Period Start",parDatum);
DateL.SETRANGE(DateL."Period Type",DateL."Period Type"::Date);
DateL.FINDFIRST;

//alles, was kein Wochenende ist
IF DateL."Period No." < 6 THEN BEGIN

  //prüfen auf Feiertag (verschiebend)
  BaseCalChangeL.RESET;
  BaseCalChangeL.SETRANGE(BaseCalChangeL.Date, parDatum);
  IF BaseCalChangeL.ISEMPTY THEN BEGIN
    TestTag := DATE2DMY(parDatum,1);
    TestMonat := DATE2DMY(parDatum,2);
    //prüfen ob es sich um einen jährlichen Feiertag handelt
    BaseCalChangeL.RESET;
    BaseCalChangeL.SETRANGE(BaseCalChangeL."Recurring System", BaseCalChangeL."Recurring System"::"Annual Recurring");
    BaseCalChangeL.FINDSET(FALSE,FALSE);
    REPEAT
      IF (TestTag = DATE2DMY(BaseCalChangeL.Date,1)) AND (TestMonat = DATE2DMY(BaseCalChangeL.Date,2)) THEN BEGIN
        EXIT('FEIERT');
      END;
    UNTIL BaseCalChangeL.NEXT = 0;

    EXIT('WERK');

  END ELSE BEGIN
    EXIT('FEIERT');
  END;

END ELSE BEGIN
  EXIT('WOENDE');
END;


Lokale Variablen:
BaseCalChangeL, Typ Record von Base Calendar Change
DateL, Typ Record von Date
TestTag, Typ Integer
TestMonat, Typ Integer