Hallo *all,
wenn ich eine PF erstelle kann ich ja z.B. sagen: R DAT007SATZ TEXT('SONDERPREIS') wenn ich das in Cobol übernehme macht er das ja wie folgt:
Soweit so gut.Code:01 007-SATZ. COPY DD-ALL-FORMATS OF DAT007. 05 DAT007-RECORD PIC X(72). I-O FORMAT:DAT007SATZ FROM FILE DAT007 OF LIBRARY RPTRADE SONDERPREIS 05 DAT007SATZ REDEFINES DAT007-RECORD. 06 D007PLKZ PIC X(4).
Wenn ich jetzt eine View erstelle mit: create view rptrade/dat008 as select
dann heißt die Datei dat008 dummerweise heißt das Datenelement jetzt auch dat008.
Ich würde jetzt gerne daraus dat008satz machen.Code:01 008-SATZ. COPY DD-ALL-FORMATS OF DAT008. 05 DAT008-RECORD PIC X(29). <-ALL-FMTS I-O FORMAT:DAT008 FROM FILE DAT008 OF LIBRARY RPTRADE <-ALL-FMTS FORMAT0001 <-ALL-FMTS 05 DAT008 REDEFINES DAT008-RECORD. 06 SOID1 PIC S9(8) COMP-3.
Ich kann beim create view statt dat008 dat008satz machen, dann durchbreche ich aber meine Logik der Dateien.
![[NEWSboard IBMi Forum]](images/duke/nblogo.gif)



Mit Zitat antworten
Bookmarks