Sie haben die Mail-Klasse nun fertiggestellt bis auf die Methode zum Lesen des Mail-Textes (
GET_TEXT ). Diese Methode liest den Mail-Text nur und gibt ihn als HTML formatiert an den Aufrufer. So können Sie in der folgenden BSP anzeigen, welches Mail verschickt wird.Der Aufruf der Methoden geschieht nur dann, wenn kein Fehler bei der Eingabe aufgetreten ist und die Mail-Adresse gefüllt ist (Seite
order.htm , Eventhandler OnInputProcessing).if page->messages->num_messages( ) eq 0.
if mail_address is not initial.
Eine Instanz der gerade angelegten Klasse ist unter dem Attribut
application überall in der Seite ansprechbar. Das Setzen der Adresse erfolgt also einfach mit: application->set_address( name = name
street = street
zipcode = zipcode
city = city ).
Als Zeitpunkt wählen Sie den Mittelwert aus dem frühesten und spätesten Termin und rufen dann die Methode
SET_TIME auf: data: time_when type t.
time_when = time_from + ( time_to - time_from ) / 2.
application->set_time( date = date_at
time = time_when ).
Zum Senden wird die Mail-Adresse und das Messages-Objekt (siehe
Objekt messages) übergeben, damit Fehlertexte in die Messages-Liste eingetragen werden können. call method application->send
exporting mail_address = mail_address
changing messages = page->messages .
Wenn alles fehlerlos durchgelaufen ist, übergeben Sie den Mailtext an die Folgeseite (nachdem Sie die Methode in der Klasse angelegt und efüllt haben). Dort wird der Text ausgegeben.
if page->messages->num_messages( ) eq 0.
data text type string.
text = application->get_text( ).
navigation->set_parameter( name = 'mailtext' value = text ).
navigation->next_page( 'show' ).
endif.
else.
navigation->next_page( 'no_address' ).
endif.
endif.