RE: joined logical, three physicals, same record format names

This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
--
[ Picked text/plain from multipart/alternative ]
You need a different record format for each file

-----Original Message-----
From: Mark A. Manske [mailto:mmanske@minter-weisman.com]
Sent: Thursday, September 06, 2001 3:29 PM
To: RPG400-L (E-mail)
Subject: joined logical, three physicals, same record format names


what did I do wrong - I am just not thinking right now??

this is my DDS

A          R RSHORD                    PFILE(DATA400/SHORDMIN)
A                                               PFILE(DATA400/SHORDMIN2)
A                                               PFILE(DATA400/SHORDSPC)
 *
A          K OCUST#
A          K OSHPDT
A          K OWDTYP
A          K OITEM#
A          O OSTAT                     VALUES('X')


I get this error whilst compiling my RPG
*RNF2121 30     16 001600  Record format RSHORD in file SHORDWEBLF already
def
                           record format is ignored.
*RNF2121 30     16 001600  Record format RSHORD in file SHORDWEBLF already
def
                           record format is ignored.

*---------------------------------------------------------------------
        *                               RPG name         External name
        * File name. . . . . . . . . :  SHORDWEBLF       DATA400/SHORDWEBLF
        * Record format(s) . . . . . :  RSHORD           RSHORD
        *                               (Not used)       RSHORD
        *                               (Not used)       RSHORD

All I did for the F-spec was this

fshordweblfif   e           k disk    prefix(t_)

Because I have other fields named the same, but this is the only file with
this record format (three times)
I have done joins like this before, but come to think of it the format names
where differant -

Did I miss something just too darned obvious??
And looking in IBM's site is a nightmare for "DB2" stuff - I can't find
anything so I have old V4R2 paper manuals.
TIA


Mark A. Manske
Minter-Weisman
Sr. Project Lead
http://www.minter-weisman.com
mailto:mmanske@minter-weisman.com




_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.