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

[rob@xxxxxxxxx]

I feel like I am jumping in the middle, or end, of a thread.

The originator claimed to be using a Join logical file.  However, in their
DDS I failed to see any join specifications.  Or was this a multiformat
logical in which all of the formats happened to be the same?  Or was only
the perceived pertinent DDS displayed?


Rob Berendt

==================
A smart person learns from their mistakes,
but a wise person learns from OTHER peoples mistakes.



                    "Shea, David"
                    <DShea@arctools.c       To:     "'rpg400-l@midrange.com'" 
<rpg400-l@midrange.com>
                    om>                     cc:
                    Sent by:                Fax to:
                    rpg400-l-admin@mi       Subject:     RE: joined logical, 
three physicals, same record format
                    drange.com               names


                    09/06/2001 09:05
                    PM
                    Please respond to
                    rpg400-l






RPG doesn't allow multiple PFs with the same record format.  The trick to
doing this is to create a LF with just one of the record formats.  Compile
your RPG on top of this, then RUN your program on your 3-PF version.  Use
lvlchk(*no) or whatever to get it to run.  Your RPG will work fine - be
careful if you're adding records.

++++++++++++++++++++++++++++++++++++++++++++
Go... FASTER!  Without an upgrade!  With ARCTOOLS/400(tm)
http://www.arctools.com
info@arctools.com
DCSoftware, Inc.
Ph: (508) 435-8243
Fax: (508) 435-4498
++++++++++++++++++++++++++++++++++++++++++++

 -----Original Message-----
From:           rpg400-l-admin@midrange.com
[mailto:rpg400-l-admin@midrange.com]  On
Behalf Of Charlie Browne
Sent:           Thursday, September 06, 2001 4:29 PM
To:        'rpg400-l@midrange.com'
Subject:        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.
_______________________________________________
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.

_______________________________________________
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.