@RFC822Add

Fügt ein weiteres Segment zu einem RFC822-Feld hinzu.

VHUGERFC822 RFC822:
Das RFC822-Feld, zu dem das Segment hinzugefügt werden soll. Ein leeres VHUGERFC822 RFC822 kann über @HugeRFC822 erzeugt werden.

FN FLAGS:
Die Flags für dieses Segment, bzw. der Datentyp des Feldes.

Die verfügbaren Flags sind:
Flag   Hex   Dec   Kommentar
RFC822_ITEM_FORMAT_ADDR   0000   00000   Type: 822-header is an address
RFC822_ITEM_FORMAT_DATE   0001   00001   Type: 822-header is a date
RFC822_ITEM_FORMAT_TEXT   0002   00002   Type: 822-header is text
RFC822_ITEM_STORAGE_STRICT   0008   00008   Flag: STRICT storage format
RFC822_ITEM_TEXT_LIST   0010   00016   Flag: Text item is TEXT_LIST

TEXT NOTESNATIVEBODY:
Der Body des Segments als LMBCS.

TEXT ORGBODY:
Der Body einem RFC822-konformen Charset (gewöhnlich UTF8) des Segments.

TEXT FIELDNAME:
Der Feld-Name in einem RFC822-konformen Charset (gewöhnlich UTF8) für dieses Segment.

TEXT DELIMITOR:
Der Delimitor für dieses Segment.

Der Retunwert des Function ist im Erfolgsfall ein erweiterter VHUGERFC822 RFC822, andernfalls @Error.

Beispiel: @RFC822Add(RFC822;FLAGS;NOTESNATIVEBODY;ORGBODY;FIELDNAME;DELIMITOR);

/*Erstellen eines RFC822 Feldes:*/
RFC822:=@HugeRFC822;
RFC822:=@RFC822Add(RFC822;10;"Some notes native subject";"Org subject";"Subject";":");

FNSEGMENTNR:=1;
Ret:=@RFC822Get(RFC822;FNSEGMENTNR;RETFLAGS;RETNOTESNATIVEBODY;RETORGBODY;RETFIELDNAME;RETDELIMITOR);
@LogReport(RETFLAGS);
@LogReport(RETNOTESNATIVEBODY);
@LogReport(RETORGBODY);
@LogReport(RETFIELDNAME);
@LogReport(RETDELIMITOR);

Es wird ein RFC822-Feld für ein Subject erstellt und die Daten des 1.ten Segments werden über @RFC822Get wieder ermittelt und im APILOG ausgegeben.