End-of-Line, Codepage

[bufcs]

hallo,
erst einmal danke für die Antwort. Soweit ich verstehe, müsste das auf der AS400 geschehen.
Aber noch zur Frage, ich hätte sehr gerne entweder 0A (UNIX) oder 0D0A (Windows) als EOL haben.

gruss
bufcs

[Fuerchau]

Das gibst du beim CPYTOIMPF direkt an: ... RCDDLM(*CRLF) ...

[bufcs]

hallo, danke,
aber ich bin kein AS400 - Spezialist,

wie würde das in einer FTP-Receive-Script denn aussehen ? Bis jetzt habe ich nur
folgendes .

GET des Files :

@-RECV %TRIG0%MBR; # Empfang des Members aus der library
und
#----------------------------------

# making original file file empty wenn status ok

#----------------------------------

QUOTE "RCMD clrpfm FILE("%TRIG0")";

Also soweit ich das kapierem muss doch jetzt vor dem RECEIVE noch irgendwas kommen ?

gruss
bufcs

[Fuerchau]

Per FTP-Script geht es nur sehr bedingt.
Am besten ist es, du läßt dir die Datei auf der AS/400 bereits im IFS bereitstellen.
Über eine Netzwerkfreigabe benötigst du dann noch nicht ein mal FTP um die Datei dann herunter zu laden.

[bufcs]

hallo,

danke für die Antwort. Um es kurz zu rekapitulieren :

Das von einem Programm erstellte File (member) in ein anderes member
kopieren ? Mit der entsprechenden CCSID versehen und das gewünschte EOL angeben.

Wenn das geschehen ist, das File/member immer noch mit TYPE "E" abholen ? Oder geht dann TYPE "I" ?

Was ist eigentlich nicht verstehe, ist, dass bei meinem bisherigen Vorgehen alles soweit korrekt kommt, jedoch ein EOL von DEC 133 gemäss Codepage 1252 oder 819 herauskommt.

Ist das irgendwie willkürlich ?

[Fuerchau]

So würde ich normalerweise vorgehen.
Die zu übertragenden Daten liegen dann bereits im ASCII/ANSI-Format vor und können einfach binär abgeholt werden.
Allerdings sind sie nicht mehr im Typ Lib/File/Mbr sonder im IFS mit z.B. /Home/MyVerz/MyFile. Beim FTP ist dann "NAMEFMT 1" anzuwenden.

[bufcs]

danke,

das Problem ist allerdings, dass ich meinen Kunden kaum dazu bewegen kann,
seine Imlementation zu ändern, da noch ein komplexeres Spiel mit Triggern und Sperrfiles (membern) ins Spiel kommt.
Gibt es denn keine Möglichkeit, dies auf der Lib/File/Mbr Mimik zu erledigen ?

gruss
bufcs

[Fuerchau]

Das hast du ja schon versucht und die Daten eben so erhalten, wie es möglich ist.
"TYPE C nnnn" wirkt nur auf PUT für neu erstellte Dateien um eine Codepage anzugeben.
Beim GET hast du halt nur die Varianten als ASC- bzw. BIN-Format die Daten so abzuholen, wie sie zur Verfügung gestellt werden.
Irgendeine Anpassung der Daten kann nicht mehr erfolgen.

Die CCSID's für ASCII und EBCDIC werden folgendermassen bestimmt:
CHGFTPA CCSID(nnnn) => ASCII-CCSID, default 819
CHGSYSVAL QCCSID VALUE(nnnn) => EBCDIC-CCSID, defualt 65535 = HEX

Das Ändern dieser Werte gilt aber systemweit und hat ggf. Einfluss auf andere Job's.

[bufcs]

nochmals danke,

ich werde zwar bei Gelegenheit das Thema nochmal bei meinem Kunden ansprechen.
Vorerst bleibt mir wohl nichts anderes übrig als hierfür eine programmtechnische Sonderbehandlung durchzuführen.

gruss
bufcs