-
CL-Problem
Ist es möglich, mittels CL eine Datei zu kopieren, wobei die Datei mittels einer Variablen einen neuen Namen erhält? Die Variable beinhaltet den alten Dateinamen und dann wird neu das Datum angehängt. Ich erhalte aber immer die Fehlermeldung, dass ich mit CPYF keine Variable angeben kann (TOFILE &FILE0103). Kann man das irgendwie anders lösen?
Gruss Iginla
-
Guten morgen,
erstell doch erst ein Duplikat der Ursprungsdatein mit CRTDUPOBJ ( hier kannst
Du den variablen Dateinamen verwenden + Parameter DATA *NO ). Im Anschluß kannst Du
dann per CPYF die Daten kopieren.
Andreas
Andreas Herzfeldt
-
Hallo,
interaktiv wird bei Eingabe des Parameters TOFILE &Variable eine Fehlermeldung ausgegeben. Bei Ausführung innerhalb eines CL-Programmes funktioniert dies aber. Siehe nachfolgendes Beispiel.
DCL VAR(&FILE) TYPE(*CHAR) LEN(10) VALUE(DATEINEU)
CPYF FROMFILE(MYLIB/DATEIALT) TOFILE(MYLIB/&FILE) CRTFILE(*YES)
Gruss
Bodo
-
Danke für Eure Antworten. Werde das mit CRTDUPOBJ versuchen. Denn es funktioniert nicht, wenn man die Variable im CL angibt bei CPYF.
Gruss Iginla
-
sollte eigentlich im cl gehen
Code:
pgm (&lib &file &newlib)
dcl &lib *char 10 /* Bibliothek */
dcl &file *char 10 /* FileName */
dcl &newlib *char 10 /* neue Bibliothek */
dcl &newfile *char 10 /* neuer FileName */
dcl &date *char 6 /* Datum */
rtvsysval qdate &date
chgvar &newfile (&file *tcat %sst(&date 1 4))
cpyf &lib/&file &newlib/&newfile mbropt(*replace) crtfile(*yes)
endpgm
gruß ronald
-
Hallo Iginla,
versuche doch folgendes:
DCL VAR(&MBRNAME) TYPE(*CHAR) LEN(10)
DCL VAR(&MBRDATE) TYPE(*CHAR) LEN(6)
RTVJOBA DATE(&MBRDATE)
CHGVAR VAR(&MBRNAME) VALUE('Dateiname' *CAT &MBRDATE)
CPYF FROMFILE(Bibliothek/Dateiname) TOFILE(&MBRNAME) MBROPT(*ADD)
Viel Erfolg, Marc
-
Kann man die Parameter auch fix hinterlegen? Es handelt sich immer um die selbe Datei.
Gruss Iginla
-
wenn immer die gleiche datei gemeint ist, so gib diese eben im cmd an
Code:
pgm
dcl &newfile *char 10 /* neuer FileName */
dcl &date *char 6 /* Datum */
rtvsysval qdate &date
chgvar &newfile ('MyFile' *tcat %sst(&date 1 4))
cpyf MyLib/MyFile MyLib/&newfile mbropt(*replace) crtfile(*yes)
endpgm
gruß ronald
[Dieser Beitrag wurde von malzusrex am 31. März 2003 editiert.]
-
Oh, das mit der fixen Datei im CMD war ja eigentlich logisch :-) Ist halt noch Montag...
Auf jeden Fall funktioniert es jetzt. Vielen vielen Dank!!!
Gruss Iginla
Similar Threads
-
By Stoeberl in forum NEWSboard Programmierung
Antworten: 8
Letzter Beitrag: 10-01-07, 10:58
-
By Stoeberl in forum NEWSboard Programmierung
Antworten: 11
Letzter Beitrag: 26-10-06, 10:07
-
By ChrisX in forum IBM i Hauptforum
Antworten: 1
Letzter Beitrag: 11-10-06, 15:31
-
By Flappes in forum IBM i Hauptforum
Antworten: 0
Letzter Beitrag: 06-10-06, 08:39
-
By bo1 in forum IBM i Hauptforum
Antworten: 3
Letzter Beitrag: 23-06-06, 15:00
Berechtigungen
- Neue Themen erstellen: Nein
- Themen beantworten: Nein
- You may not post attachments
- You may not edit your posts
-
Foren-Regeln
|
Erweiterte Foren Suche
Google Foren Suche
Forum & Artikel Update eMail
AS/400 / IBM i
Server Expert Gruppen
Unternehmens IT
|
Kategorien online Artikel
- Big Data, Analytics, BI, MIS
- Cloud, Social Media, Devices
- DMS, Archivierung, Druck
- ERP + Add-ons, Business Software
- Hochverfügbarkeit
- Human Resources, Personal
- IBM Announcements
- IT-Karikaturen
- Leitartikel
- Load`n`go
- Messen, Veranstaltungen
- NEWSolutions Dossiers
- Programmierung
- Security
- Software Development + Change Mgmt.
- Solutions & Provider
- Speicher – Storage
- Strategische Berichte
- Systemmanagement
- Tools, Hot-Tips
Auf dem Laufenden bleiben
|
Bookmarks