Codeblock Onlinehilfe

TBeMemoBOLinkTo

TBeMemoBOLinkTo

Die Klasse TBeMemoBOLinkTo kapselt Eigenschaften und Funktionen für die Zuordnung eines Memos.

Eigenschaften

Eigenschaft

Beschreibung

LinkTo.UserID:C

Be-UserNo, muss vor jeder Zuordnung gesetzt werden

LinkTo.WriteMemoHistory:L

(default) True=History-Eintrag bei Änderung schreiben

Funktionen

Funktion

Parameter

Beschreibung

LinkTo.CbInfoCaption():C

Zuordnungs-Beschriftung eines Memos
Anzeige Format: "Präfix: Name (ID)"

aAddTypePrefix:L

Präfix voranstellen (Kunde:; Benutzer: ...)

LinkTo.CbRelink()

Memo Zuordnung ändern


aLinkTo:N

Typ der Zuordnung
bcMemoLinkIdCustomer = Zuordnung Kunde
bcMemoLinkIdSupplier = Zuordnung Lieferant
bcMemoLinkIdAgent = Zuordnung Vertreter
bcMemoLinkIdUser = Zuordnung Benutzer

aPersNo:N

ID der Hauptzuordnung

aContactID:N

ID der Kontaktperson

Beispiel

//******************************************************************************
//******************************************************************************
// Memo-Zuordnung ändern
//******************************************************************************
//******************************************************************************

|oMemoBo|

oMemoBo := CreateObject('TBeMemoBo', 'MemoBo'),
startseq,
  oMemoBo.MemoID := 1234, // MemoBO positionieren
  oMemoBo.CbEdit(),       // Edit-Modus
  // Keinen Histroy-Eintrag schreiben
  oMemoBo.LinkTo.WriteMemoHistory := False,
  oMemoBo.LinkTo.UserID           := c_usr,
  // Memo dem Kunden 12345 und dessen Kontaktperson 98765 zuordnen
  oMemoBo.LinkTo.CbRelink(bcMemoLinkIdCustomer, 12345, 98765),
  oMemoBo.CbPost(),
always,
  DestroyObject(oMemoBo),
stopseq,

Weitere Verknüpfungen