Anmelden

View Full Version : Pgm zum Kopieren von Teildateien



Mädele
19-09-03, 09:27
Hallo,

ich brauche eine Lösung, wie ich automatisch aus einer Datei die aktuellste (zuletzt erstellte) Teildatei in eine andere Datei umkopiere.

Das Pgm (oder was ich immer dazu benötigt wird) möchte ich dann über einen Jobeintrag morgens laufen lassen.

Kann mir jemand helfen?

Danke

Fuerchau
19-09-03, 09:48
Versuch es mal im CLP mit

RTVMBRD

Mit der Option *LASTMBR bekommst du den Namen der letzten Teildatei, die du dann entweder per CPYF kopieren oder mittels OVRDBF und RPG-Programm verarbeiten kannst.

malzusrex
19-09-03, 10:14
ich denke *LAST ist besser, da es ja um das datum geht

fruß ronald

Mädele
19-09-03, 10:22
..habe leider nicht viel Ahnung von CL Programmierung - daher noch paar Fragen.

Im CLP habe ich eine Variable definiert, &lastmbr - hier will ich das Ergebnis vom RTVMBRD auffangen - richtig so?

DCL &LASTMBR *CHAR 10

dann der RVTMBRD

RTVMBRD FILE(BIBL1/FILE) MBR(*LAST) +
RTNMBR(&LASTMBR)

wie muß der CPYF lauten?

Vielen Dank für eure Hilfe!

malzusrex
19-09-03, 10:44
CPYF FROMFILE(MYLIB/MYFILE) +
TOFILE(MYLIB/TOMYFILE) FROMMBR(&LASTMBR)

bateau
19-09-03, 11:03
Achtung, hier gibts ne kleine Falle:

Der Defaultwert für die Ziel-Teildatei ist *FIRST, es wird also immer die erste Member in der Zieldatei überschrieben.

Einfach TOMBR(*FROMMBR) angeben und schon funzt die Sache wunderbar.

Griesse

Martin

Mädele
19-09-03, 11:14
Danke euch allen, funktioniert super!!