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

[Charlie Browne <crbrowne@xxxxxxxxxxxxxxxxx>]

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.