Datei per FTP mit CR LF

[RobertMack]

Hallo,

... im CL (Batch) braucht's eine externe SRC mit den FTP-Anweisungen, habe dazu mal ein Beispiel geposted (Download):

http://www.rlpforen.de/showthread.php?t=5105

Gruß,
Robert

[jogisarge]

Sorry, natürlich habe ich das namefmt 1 vergessen !!!!!

Gibt es auch die Möglichkeit, das CR+LF direkt mit in die Datei auszugeben ?
Wir erzeugen die Datei, die ins Internet soll ja jedesmal neu.
Die Datei enthält die Werte mit einem Semikolon als Trennzeichen.

Kann man CR und LF nicht ans Ende anhängen ?


Gruss Jogi

[Fuerchau]

Klar kann man das auch selber anhängen X'0D25' = CRLF in EBCDIC.
Allerdings solltest du das NICHT am Ende der Daten anhängen, sondern tatsächlich am Ende des Satzes, da die Leerzeichen in der Datei auf jeden Fall mit übertragen werden und somit VOR dem nächsten Satz stehen würden.

[jogisarge]

Ok, ich muss am Ende jedes Datensatzes ein X'0D25' einfügen.

normal :

move 'Hallo'      ergfeld 

Wie kann ich X'0D25' am Ende einfügen.
Ich kenn mich mit RPG nicht so aus.

mfg
jogi

[JonnyRico]

Ok, ich muss am Ende jedes Datensatzes ein X'0D25' einfügen.

normal :
Wie kann ich X'0D25' am Ende einfügen.
Ich kenn mich mit RPG nicht so aus.

mfg
jogi

Moin,

ich würde in deiner Datei ein Feld am Ende einfügen (2 CHAR). In dieses schreibst du dann in jedem Satz ein X'0D25'. Dann sollte es meine ich klappen.

DEnd              S              2A   INZ(X'0D25')
 /Free
      KDNR='XXXX';
      Name='SAWI';
      Ending=End;
      Write SatzFMT;
 /End-Free 

Gruß Sascha

[Fuerchau]

Zu beachten ist:

MOVE überträgt rechtsbündig
MOVEL linksbündig

Dabei wird das Zielfeld nur in der Länge das Quellfeldes überschrieben, der Rest bleibt erhalten.

MOVEL FELD ZIEL P

Das Zielfeld wird mit Leerzeichen (*blank) gefüllt.

Man kann also mittels:

MOVEL FELD ZIEL P <= linksbündig mit löschen
MOVE X'0D25' ZIEL <= rechtsbündig ohne löschen

das gewünschte Ergebnis erreichen.

In ILE kann man das auch so machen, es geht aber auch leichter:

D ZIEL S 256
D QUELLE S 254
EVAL ZIEL = QUELLE + x'0D25'

[jogisarge]

Ok !

Vielen Dank für die Hilfe