Konvertierung von SAPscript-Texten

SAPscript-Texte werden im Interchange Text Format (ITF) abgelegt. Als Schnittstelle zu anderen Textverarbeitungen bietet SAPscript Konvertierungsprogramme für die Textdateiformate Rich Text Format (RTF) und ASCII sowie eine Migrationsmöglichkeit für R/2-Texte an.

RTF-Dateien

RTF-Dateien beinhalten die gesamte Formatierungsinformation des Textes und können von allen gängigen Textverarbeitungen sowohl interpretiert als auch erzeugt werden.

Aus SAPscript-Texten erzeugte RTF-Dateien enthalten weitgehend die Zeichen- und Absatzformatierungen aus dem Stil oder Formular des Ursprungstextes. Sie können problemlos in moderne Textverarbeitungen eingelesen werden; bei den älteren DOS-Programmen muß noch etwas Vorarbeit geleistet werden: Bei Microsoft Word (ab Version 5.0) z.B. muß die RTF-Datei auf Betriebssystemebene mit folgendem Befehl in eine Word-Textdatei samt Druckformatvorlage konvertiert werden:

MS-DOS	rtf_dos file1.rtf file2.txt file3.dfv /o/c
MS-DOS	rtf_dos file1.rtf file2.txt file3.dfv /o/m
OS/2	rtf_os2 file1.rtf file2.txt file3.dfv /o/c
OS/2	rtf_os2 file1.rtf file2.txt file3.dfv /o/m

Hinweis Hinweis

/o : Existiert file2.txt bereits, so wird ohne Nachfrage überschrieben

/c : Die Durckformatvorlage file3.dfv wird neu erstellt

/m : Die Druckformatvorlage file3.dfv existiert bereits und wird gegebenenfalls modifiziert

Ende des Hinweises.

Sollen die Namen von Absatz- und Zeichenformaten in Word anders lauten oder auf eine bestehende Word Dokukmentenvorlage umgesetzt werden, kann eine Formatumsetzung durchgeführt werden.

Bei RTF-Import sollte der Quelltext mit einer Dokumentvorlage erstellt und als RTFDatei abgespeichert werden. Nur über Formatvorlagen formatierte Absätze und Zeichenfolgen können auch in SAPscript wieder mit Formaten versehen werden. Also auf keinen Fall frei über Word-Buttons formatieren! Im SAPscript sollte ein Stil oder Formular vorhanden sein, dessen Zeichen- und Absatzformate denen der Dokumentvorlage entsprechen und deren Schlüssel gleich lauten. Sollte dies nicht der Fall oder nicht möglich sein, weil die Bezeichnungen in der Dokumentvorlage anders lauten, besteht noch die Möglichkeit, eine Formatumsetzung anzugeben.

ASCII-Dateien

In ASCII-Dateien liegt der Text ohne Formatierung vor. Einziges Gestaltungselement ist der Zeilenumbruch. Es werden Zeichensatzkonvertierungen in bzw. aus allen in der Spoolverwaltung erfaßten Zeichensätzen unterstützt.

Aus dem SAPscript-Editor heraus können

SAPscript-Texte in eine lokale Datei im Format ITF, RTF oder ASCII exportiert werden
lokale Dateien der Formate ITF, RTF oder ASCII importiert und als ITF-Text an der Cursorposition eingefügt werden.

Diese Funktionen sind in den Texteditoren unter Text Upload... / Text Download... , Dokumentation Upload... / Dokumentation Download... oder Ablage Upload... / Ablage Download... zu finden.

Diese und weitere Funktionen können aber auch in eigenen Programmen über ein Set von Funktionsbausteinen aufgerufen werden.

Prozess

Programmierbeispiel

Ein SAPscript-Standardtext in Systemsprache soll in eine RTF-Datei konvertiert und in ein lokales Verzeichnis geschrieben werden. Textname und Name der Zieldatei können beliebig gewählt werden; Vorschlagswerte sind "SAPSCRIPT-DRUCKERTEST" und als lokales Verzeichnis "C:\temp\". In diesem Beispiel wird nicht abgeprüft, ob der Dateiname auf ".rtf" endet; dafür müßten Sie selbst sorgen.

Syntax Syntax

REPORT YCMTESTE LINE-SIZE 255 MESSAGE-ID TD.

PARAMETERS:
	TEXTNAME LIKE THEAD-TDNAME DEFAULT 'SAPSCRIPT-DRUCKERTEST',
	FILE LIKE RLGRAP-FILENAME DEFAULT 'C:\temp\'.

DATA: TEXTHEADER LIKE THEAD.
DATA: TEXTLINES LIKE TLINE OCCURS 100 WITH HEADER LINE.

CALL FUNCTION 'READ_TEXT'
	EXPORTING NAME		= TEXTNAME
		LANGUAGE	= SY-LANGU
		OBJECT		= 'TEXT'
		ID		= 'ST  '
	IMPORTING HEADER	= TEXTHEADER
	TABLES LINES		= TEXTLINES
	EXCEPTIONS OTHERS	= 1.

CHECK SY-SUBRC = 0.

CALL FUNCTION 'EXPORT_TEXT'
	EXPORTING CODEPAGE	= '1133'
		FILE		= FILE
		FORMATWIDTH	= 132
		FORMAT_TYPE	= 'RTF'
		HEADER		= TEXTHEADER
		SSHEET		= ' '
		WITH_TAB	= ' '
	TABLES ITF_LINES	= TEXTLINES
	EXCEPTIONS DOWNLOAD_ERROR	= 1
		FILE_OPEN_ERROR		= 2
		FILE_WRITE_ERROR	= 3.

CASE SY-SUBRC.
WHEN 0. MESSAGE S807 WITH FILE.
WHEN 1. MESSAGE E815 WITH FILE.
WHEN 2. MESSAGE E811 WITH FILE.
WHEN 3. MESSAGE E814 WITH FILE.
ENDCASE.

Ende des Quelltextes.