LF - DDS beschrieben über 3 PF

[malzusrex]

Hallo Gemeinde.

Ich habe eine Datei die es in 3 Libs gibt. Dabei handelt es sich um 3 seperate Bereiche. Nun habe ich aber den Fall, das ich alle 3 zusammen brauche. Dies habe ich bisher mit eine LF gelöst. Und dazu hätte ich noch eine Frage.

A          R FORMAT1                   PFILE(LIB01/MYFILE  -
A                                            LIB02/MYFILE  -
A                                            LIB03/MYFILE ) 
A                                                           
A          K KUNDE 

FORMAT1 ist in MYFILE definiert. Das wandeln der logischen funktioniert auch, nur im RPGLE kann ich diese nicht wandeln, weil er motzt, das das Format schon verwendet worden ist.

Was geht ist folgendes:

A          R NEUFMT1                   PFILE(LIB01/MYFILE)
A            KUNDE                                        
A            FELD1                                        
A            FELD2                                        
A            FELD3                                        
A          K KUNDE                                      
A          R NEUFMT1                   PFILE(LIB02/MYFILE)
A            KUNDE                                        
A            FELD1                                        
A            FELD2                                        
A            FELD3                                        
A          K KUNDE                                      
A          R NEUFMT1                   PFILE(LIB03/MYFILE)
A            KUNDE                                        
A            FELD1                                        
A            FELD2                                        
A            FELD3                                        
A          K KUNDE 

Was mir an dieser Variante aber nicht gefällt, ich muss alle Felder noch einmal angeben!

Gibt es auch eine Variabte, wo ich mich im DDS ein Format aus einer PF nehme, und diese gleich umbenenne?

Gruß
Ronald

[Fuerchau]

Mit DDS geht das nicht anders, da eben bei RPG jedes Format eindeutig sein muss.

Allerdings, warum machst du es nicht per SQL ?

select ... from mylib1/myfile
union all
select ... from mylib2/myfile
union all
select ... from mylib3/myfile
order by ...

Du kannst natürlich auch eine View erstellen, leider aber ohne Key.

[Pikachu]

Was geht ist folgendes:
...
Was mir an dieser Variante aber nicht gefällt, ich muss alle Felder noch einmal angeben!

Besitzt die Datei einen eindeutigen Schlüssel? Falls ja, einfach noch diese Schlüsselfelder mit in die Formate und im Peogramm dann einen CHAIN mit entsprechender KLIST nach dem READ, um alle Felder zu lesen.

[AS400.lehrling]

Und was ist wenn du dir ganz dusselig eine lf anlegst und referenzierst.

Gruß AS400.lehrling

[malzusrex]

Ich wollte mir ja gerade die Tipparbeit ersparen.
Die Variante mit den neuen Formatnamen und allen Felder angeben, funktionieren ja für einen CHAIN.
Muss man nur halt daran denken, wenn man die PF erweitert, das die LF nicht nur gewandelt, sondern auch angepasst werden muss.

Gruß
Ronald

[Fuerchau]

Seit wann wandelst du LF's neu, wenn die PF sich ändert ?
Per CHGPF mit Quelle werden alle LF's (mit dem selben Formatnamen natürlich) mit geändert.

[malzusrex]

Ja, wenn ich den gleichen Formatnamen habe, muss ich ja nichts tun,
aber in diesen Fall muss ich ja neue Formatnamen vergeben, und alle Felder in dem LF angeben. Wenn in der PF nun ein Feld dazu kommt, muss ich halt auch an den logischen ran

[Fuerchau]

Immerhin ist das denn auch SQL-Like, da eine View (auch select *) beim Alter Table nicht angepasst wird.