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 | aAddTypePrefix:L | Präfix voranstellen (Kunde:; Benutzer: ...) |
LinkTo.CbRelink() Memo Zuordnung ändern | aLinkTo:N | Typ der Zuordnung |
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,