Interaktiver Datentransfer zu MS WORD

[Fibbes28]

Die Methode mit der RTF-Datei und dem Hin-und-Herkopieren habe ich schin ausprobiert. Es gibt dazu ein Dokument von Rochester-Initiative. Leider sind RTF-Dokumente sehr groß und somit bemötigen die Kopiervorgänge relativ viel Zeit (bis zu 40 Sek.). Im Dialog nicht brauchbar.

Meien Idee ist, eine Vorlage in WORD 2003 als XML zu speichern, diese auf die AS/400 zu kopiren (1x); Innerhalb der RPG-Anwendung zu verändern und dann mit STRPCCMD Word 2003 aufzurufen mit dem Link auf das XML-Dokument auf der AS/400.

Werde mal probieren, ob es funktioniert. Sollte auf jeden Fall schneller sein.

Bis hierher erstmal Danke für Deine Hilfe. Wenn ich ein Ergebnis habe werde ich es hier schreiben.

So long.

[Fuerchau]

Die XML-Worddateien sind mit Sicherheit größer als die RTF-Dateien und ggf. auch komplizierter zu bedienen (XML-Parser).

Ausserdem solltest du nicht hin- und herkopieren sondern nur eine Basis sozusagen als Muster in einer PF verfügbar halten und bei Bedarf eben ins IFS kopieren.

RTF's und XML's werden dann besonders groß wenn Bilder oder Logos enthalten (eingebettet) sind.
Diese werden dann meist als Expanded-Hex abgelegt.

Besser wäre für solche Fälle, Bilder oder Logos nicht einbetten sondern verknüpfen. Hier wird dann nur ein Pfadverweis eingetragen und das Bild nicht eingebettet.
Vorteil: gringere Größe des Dokuments und ggf. Anpassung des Bildes/Logos ohne alle Dokumente anpassen zu müssen.

Noch schlimmer wirds, wenn andere Anwendungen (z.B. Excel-Tabelle) eingebettet werden.

[Spateneder]

Die RTF-Ausgabe kann man auch von der iSeries aus starten, ohne vorher ein Word-RTF mit dem genzen MS-Overhead zu erzeugen. Ein Beispiel dazu findest Du in NEWSolutions (Dez. 05 oder Anfang 06), auf Wunsch kann ich es zusenden.
So ein schlankes RTF sollte mit Word schnell zu öffnen und zu ergänzen sein.
Eine weitere Alternative wäre die Serienbrieffunktion mit Zugriff auf eine ODBC-Datenquelle. Auch das ist mit relativ wenig Makro-Programmierung lösbar.
Noch ein Hinweis zu Word-Makros: Es gibt verschiedene Auto-Makros (z.B. AutoNew), die man in Dokumentvorlagen speichern kann, und die für solche Aufgaben sehr hilfreich sind.
Viel Spaß
MS

[KM]

Eine weitere Möglichkeit wäre evtl. noch Java. Es gab da mal vom Jakarta-POI Projekt den Bereich HWPF. Das wurde jedoch nie zu Ende entwickelt und wird es wohl auch nicht werden. Aber damit hatten wir z.B. aus der iSeries heraus "echte" Word-Dokumente (doc) erstellt, geöffnet und mit diversen Feldern (z.B. Adresse, Briefkopf, etc.) vorbelegt. Also einfache Funktionen wie z.B. Texte einfügen hat funktioniert. Aufwendigere wie z.B. Grafiken einfügen ging nicht.

Gruß,
KM

[Fibbes28]

Hallo KM,

Danke für den Tip; werde mal entsprechend googeln. Den direkte Weg würde ich natürlich bevorzugen.

Gruss
Fibbes28

[Fibbes28]

Hallo Spateneder,

vielen Dank für deine Hilfe. Ich werde mir die zitierten Artikel sicher anschauen.

Gruss
Fibbes28

[Fibbes28]

Hallo Spateneder.

sende mir bitte mal das Beispiel aus der Newsolution; ich finde es nicht.

Meine email-Adresse ist: fw@ubw.de

Danke und schüne Grüße
Fibbes28

[Fuerchau]

Beim CPYTOSTMF muss die CCSID 1252 angegeben werden.
Des weiteren kann es ein Problem mit Zeilenschaltungen geben (CRLF), die zu einem anderen Aussehen führen können.

Ggf. muss die Satzlänge der PF mit 32K definiert werden um die Zeilenumbrüche korrekt hinzubekommen, vielleicht ist die Datei ja auch kleiner als 32K so dass nur 1 Satz entsteht.

Ein Problem sind dann eingebettete Grafiken, da diese durch CPYTOSTMF an der falschen Stelle CRLF erhalten.

Vielleicht musst du sogar C-Funktionen verwenden und das IFS selber lesen/schreiben um der CRLF-Problematik aus dem Weg zu gehen.

[Spateneder]

Daten sind unterwegs! Das Beispiel arbeitet verwendet auch die von Fuerchau angesprochenen IFS-APIs.
Gruß
MS

[Fuerchau]

Wenn eine Datei im IFS erstellt wird bekommt sie die Berechtigung des Users und Default *PUBLIC *EXCLUDE.
Ggf. nach dem CPY einen CHGAUT für die Datei machen.

Teilweise wird die Objektberechtigung des übergeordneten Verzeichnisses übernommen.

[Fibbes28]

Zur Information für alle:

Wir haben nun eine Lösung gefunden; es ist eine Kombination aus RTF-File und dem Datenimport aus WORD.

Alle Briefdaten wie Anschrift, Datum, Anrede usw. ändern wir nach COPYFRMSTMF direkt im Dialogprogramm auf der AS/400; die varablen Positionszeilen geben wird im gleichen Programm in eine Formulardatei (normale DB2) aus. Nachdem wir das geänderte Template zurückkopiert haben (COPYTOSTMF) wird WORD aufgerufen und ein Makro aufgerufen, das die Positionsdaten
in das Dokument importiert.
Es gibt leider nur einen kleinen Haken, den wir noch nicht gelöst haben: In dem Makro können wir keine Formatierungsbefehle einbinden (geht nicht oder wir können es nicht), so dass die Tabelle leichte Verschiebungen aufweist. Vielleicht finde ich dies auch noch.

Wer Interesse an der Procedure hat oder eine ähnliche Aufgabenstellung kann sich gerne an mich wenden, ich werde ihm ein Beispiel zusenden. (Email: fw@ubw.de)

Ich möchte es nicht versäumen, mich bei alle für die Hilfe und die guten Tips herzlich zu bedanken.

Gruss Fibbes28