[NEWSboard IBMi Forum]

Hybrid View

  1. #1
    Registriert seit
    Nov 2007
    Beiträge
    3

    Unhappy Doppelte Dateinamen

    Hallo,
    ich habe das Problem,dass ich in einem RPG Programm mit 2 Dateien gleichen Namens aus 2 verschiedenen Bibliotheken arbeiten will. Wie kann ich eine der Dateien umbenennen? Habe es schon mit OVRDBF und interner Dateibeschreibung probiert aber die Umwandlung läuft dann auf 40 Fehler...

  2. #2
    Registriert seit
    Jul 2001
    Beiträge
    2.713
    Zitat Zitat von dirk17 Beitrag anzeigen
    Hallo,
    ich habe das Problem,dass ich in einem RPG Programm mit 2 Dateien gleichen Namens aus 2 verschiedenen Bibliotheken arbeiten will. Wie kann ich eine der Dateien umbenennen? Habe es schon mit OVRDBF und interner Dateibeschreibung probiert aber die Umwandlung läuft dann auf 40 Fehler...
    Wie hast Du den OVRDBF gemacht, und hast Du im Programm an PREFIX gedacht?

    -h

  3. #3
    Registriert seit
    Nov 2007
    Beiträge
    3
    Hallo Holger,

    habe einmal den OVRDBF vor der Umwandlung gemacht und dann interaktiv umgewandelt, aber auch im RPG einen OVRDBF mit QCMDEXC und dann umgewandelt. Hat beides nicht funktioniert.
    Was meinst du mit Prefix und an welcher Stelle im Programm???

  4. #4
    Registriert seit
    Aug 2004
    Beiträge
    923
    RPG/400

    PHP-Code:
          FKUEMPIL2UF  E           K        DISK
    F            KUEMPIF1                          KRENAMEKUEMPIF3
    FKUEMPIL3IF  E           K        DISK
    F            KUEMPIF1                          KRENAMEKUEMPIF2 

  5. #5
    Registriert seit
    Jun 2004
    Beiträge
    17
    Hallo dirk17,

    um 2 mal die gleiche Datei in einem Programm zu verwenden, kannst Du wie folgt vorgehen:
    Wenn die Datei z.B. DATEI1 heisst, verwendest Du einmal den Namen DATEI1 und einen beliebigen (nicht existierenden) Dateinamen z.B. XYZ.
    Vor dem Umwandeln und Ausführen erfolgt OVRDBF XYZ mit mylib/DATEI1. Bei gleichem Satzformat muss RENAME für XYZ angegeben werden.

    Bogomil

  6. #6
    Registriert seit
    Aug 2001
    Beiträge
    2.928
    Warum Overrides setzen?

    Versuch doch einfach mal folgendes:
    PHP-Code:
    FFile1     IF   E           K DISK    Rename(FormatFormat1)          
    F                                     ExtFile('MYLIB1/MYFILE')         
    FFile2     IF   E           K DISK    Rename(FormatFormat2)          
    F                                     ExtFile('MYLIB2/MYFILE'
    Anstatt die Dateien in ExtFile hardzucodieren, könnten auch Variablen verwendet werden. Dann müssten die Dateien allerdings zur Compilezeit entweder überschrieben oder angelegt sein.

    Birgitta
    Birgitta Hauser

    Anwendungsmodernisierung, Beratung, Schulungen, Programmierung im Bereich RPG, SQL und Datenbank
    IBM Champion seit 2020 - 5. Jahr in Folge
    Birgitta Hauser - Modernization - Education - Consulting on IBM i

  7. #7
    cbe is offline [professional_User]
    Registriert seit
    May 2005
    Beiträge
    392
    Hallo Dirk 17,

    meine Lieblingsvariante wäre, für eine der Dateien A eine LF B anzulegen (mit gleichem Schlüssel).
    Dies belastet das System nicht, da der Schlüssel mitverwendet wird.

    Im Programm kannst Du dann ganz normal die Dateien A und B verwenden (Formate umbenennen, Felder auch oder Präfix verwenden),
    hast keine Verständnisprobleme von anderen Programmierern, die Deinen Trick nicht kannten,
    und Tools analysieren es richtig.


    Variablen mag ich als Dateien gar nicht. Ich erinnere mich noch gut an die Jahr-2000 Umstellung wo ich froh war, dass ich per Tool die Programme zu einer Datei finden konnte. (Wer weiß, ob wir die Jahr-10000-Umstellung noch machen müssen )

    Gruß,
    Christian

  8. #8
    Registriert seit
    Nov 2007
    Beiträge
    3

    Thumbs up

    Danke an alle,

    hat alles geklappt. Vielen Dank nochmals.-

Similar Threads

  1. CPYTOIMPF mit Dateinamen als Parameter
    By Karo in forum IBM i Hauptforum
    Antworten: 6
    Letzter Beitrag: 09-03-05, 17:47
  2. doppelte Sätze löschen mit SQL
    By hs in forum IBM i Hauptforum
    Antworten: 7
    Letzter Beitrag: 22-11-04, 10:30
  3. Netserver-Freigabe nur 8stellige Dateinamen ?
    By PeterKarsten in forum IBM i Hauptforum
    Antworten: 4
    Letzter Beitrag: 07-06-04, 22:17
  4. AS400 ODBC und Dateinamen
    By hjwenzel in forum IBM i Hauptforum
    Antworten: 4
    Letzter Beitrag: 21-02-02, 08:28
  5. doppelte Sätze in PF finden und löschen
    By Schnichels in forum IBM i Hauptforum
    Antworten: 2
    Letzter Beitrag: 23-11-01, 12:54

Berechtigungen

  • Neue Themen erstellen: Nein
  • Themen beantworten: Nein
  • You may not post attachments
  • You may not edit your posts
  •