Ausgabe bei FTP mit RCMD und Info über Teildatei

[Tom74]

Danke !

Ich habe jetzt die Ausgabe von

DSPFD mit Typ *MBRLIST generiert und sie bei mir auf dem PC unter Windows gespeichert.

Habe aber jetzt wieder ein Problem:

Die Ausgabedatei beinhaltet manche Informationen als Klartext (Datum, Uhrzeit, Dateiname usw.), manche binär und manche im COMP-3 Format.

So beträgt beispielsweise die Dateigröße 270336 Bytes, das steht dann in der Ergebnisdatei auf der AS400 als

00 00 00 00 02 70 33 6F

Beim Übertragen auf den PC (ASCII Modus, Binär geht garnicht) wird dann draus sowas:

00 00 00 00 02 F8 93 3F

Wie komme ich nun von dieser Zahl auf die Dateigröße ? Habe schon versucht die einzelnen Bytes mit einer EBCDIC <-> ASCII Tabelle umzuwandeln aber entweder passt sie nicht oder ich mach was falsch ..

Jemand eine Idee ?

[Fuerchau]

Das Problem ist natürlich, dass eine Datei per FTP nicht so einfach übertragbar ist.

Hier musst du dann ggf. die Datei noch mal per CPYTOIMPF ins IFS ausgeben, dabei kannst du dann z.B. ein CSV-Format erstellen.
Diese Ausgabe holst du dann per GET aus dem IFS.

Einfacher wird das ganze allerdings über ODBC und FTP.

Per ODBC erstellst du die Informationen "CALL QCMDEXC (...)", kannst diese dann per "SELECT ..." im Klartext verarbeiten und dann die benötigten FTP-Scripte generieren.

[Tom74]

Danke !!

Der Hinweis mit CPYTOIMPF war Gold wert. Habe nun meine Datei so wie ich sie brauche. Da mein IFS Verzeichnis als Netzlaufwerk verbunden ist, kann ich das File sogar direkt holen, ohne FTP.

Das sieht dann in etwa so aus

DSPFD FILE(MYLIB/MYFILE) TYPE(*MBRLIST) OUTPUT(*OUTFILE) OUTFILE(QTEMP/OUTPUT)

CPYTOIMPF FROMFILE(QTEMP/OUTPUT) TOSTMF("/TMP/LIST.TXT") MBROPT(*ADD) STMFCODPAG(*PCASCII) RCDDLM(*CRLF) DTAFMT(*DLM)

Den Vorschlag mit ODBC hab ich garnicht weiter verfolgt, da ich von meiner Entwicklungsumgebung keine ODBC Zugriffe machen kann.

Nochmals danke

Thomas