Beim Öffnen des Druckdialogs werden 2 Projekteigenschaften gesetzt:

  • <40050> Benutzer Zusatzfeld 50: Date
  • <40051> Benutzer Zusatzfeld 51: Time

Dadurch kann z.B. im Normblatt ein Feld mit Datum und Datum dargestellt werden.

Das Format für Datum und Zeit ist frei wählbar.

Suplanus - Scripts - DateAndTime (83)

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38

////////////////////////////////////////////////////////////////////////
//                     DateAndTime
////////////////////////////////////////////////////////////////////////
// Erstellt am:     2010-02-19
// Erstellt von:    Johann Weiher
////////////////////////////////////////////////////////////////////////
 
public class DateAndTime
{
 
    [DeclareEventHandler("onActionStart.String.PrnPrintDialogShow")]
 
    public void DateAndTimeVoid()
    {
        // Date
        string sDate = DateTime.Now.ToString("yyyy-MM-dd"); // Datumsformat: Jahr-Monat-Tag
 
        // Date: Set Projectproperty
        ActionCallingContext contextProjectPropDate = new ActionCallingContext();
        contextProjectPropDate.AddParameter("PropertyId", "40050");        // Kennung der festzulegenden Eigenschaft (= Eigenschaftsnummer)
        contextProjectPropDate.AddParameter("PropertyIndex", "0");        // Wenn die Eigenschaft Indexe hat, der Index; meistens 0
        contextProjectPropDate.AddParameter("PropertyValue", sDate);     // Neuer Wert der Eigenschaft
        new CommandLineInterpreter().Execute("XEsSetProjectPropertyAction", contextProjectPropDate);
 
        // Time
        string sTime = DateTime.Now.ToString("HH:mm:ss");
 
        // Time: Set Projectproperty
        ActionCallingContext contextProjectPropTime = new ActionCallingContext();
        contextProjectPropTime.AddParameter("PropertyId", "40051");        // Kennung der festzulegenden Eigenschaft (= Eigenschaftsnummer)
        contextProjectPropTime.AddParameter("PropertyIndex", "0");        // Wenn die Eigenschaft Indexe hat, der Index; meistens 0
        contextProjectPropTime.AddParameter("PropertyValue", sTime);     // Neuer Wert der Eigenschaft
        new CommandLineInterpreter().Execute("XEsSetProjectPropertyAction", contextProjectPropTime);
 
        return;
    }
 
}